LPCManager.py
author Laurent Bessard
Wed, 20 Feb 2013 18:46:26 +0100
changeset 23 41616a8c80a7
parent 22 45982ef9370b
child 24 04205032298b
permissions -rwxr-xr-x
Fixed bug in socket client not working properly when command length was too long
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     1
#!/usr/bin/env python
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     3
import shutil
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     4
import socket
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     5
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     6
__version__ = "$Revision$"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     7
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     8
import os, sys, getopt, wx, tempfile
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
     9
import __builtin__
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    10
from types import TupleType, StringType, UnicodeType
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    11
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    12
CWD = os.path.split(os.path.realpath(__file__))[0]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    13
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    14
def Bpath(*args):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    15
    return os.path.join(CWD,*args)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    16
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    17
if __name__ == '__main__':
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    18
    def usage():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    19
        print "\nUsage of LPCBeremiz.py :"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    20
        print "\n   %s Projectpath Buildpath port\n"%sys.argv[0]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    21
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    22
    try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    23
        opts, args = getopt.getopt(sys.argv[1:], "h", ["help"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    24
    except getopt.GetoptError:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    25
        # print help information and exit:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    26
        usage()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    27
        sys.exit(2)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    28
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    29
    for o, a in opts:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    30
        if o in ("-h", "--help"):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    31
            usage()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    32
            sys.exit()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    33
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    34
    if len(args) != 3:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    35
        usage()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    36
        sys.exit()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    37
    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    38
        projectOpen = args[0]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    39
        buildpath = args[1]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    40
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    41
            port = int(args[2])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    42
        except:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    43
            usage()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    44
            sys.exit()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    45
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    46
    if os.path.exists("LPC_DEBUG"):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    47
        __builtin__.__dict__["BMZ_DBG"] = True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    48
    else :
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    49
        __builtin__.__dict__["BMZ_DBG"] = False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    50
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    51
app = wx.PySimpleApp(redirect=BMZ_DBG)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    52
app.SetAppName('beremiz')
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    53
wx.InitAllImageHandlers()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    54
18
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    55
_base_folder = os.path.split(sys.path[0])[0]
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    56
sys.path.append(os.path.join(_base_folder, "beremiz"))
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    57
22
45982ef9370b Disabled internationalization
Laurent Bessard
parents: 21
diff changeset
    58
from util.TranslationCatalogs import AddCatalog
18
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    59
AddCatalog(os.path.join(CWD, "locale"))
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    60
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    61
if __name__ == '__main__':
18
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    62
    # Import module for internationalization
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    63
    import gettext
17e6293e9191 Adding support for extending internationalization to extensions
Laurent Bessard
parents: 17
diff changeset
    64
    
22
45982ef9370b Disabled internationalization
Laurent Bessard
parents: 21
diff changeset
    65
    #__builtin__.__dict__['_'] = wx.GetTranslation
45982ef9370b Disabled internationalization
Laurent Bessard
parents: 21
diff changeset
    66
    __builtin__.__dict__['_'] = lambda x: x
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    67
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    68
_base_path = os.path.split(__file__)[0]
3
169d552a345c Purge libraries to be loaded by beremiz by default
Edouard Tisserant
parents: 2
diff changeset
    69
import features
7
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    70
from POULibrary import POULibrary
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    71
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    72
class PLCLibrary(POULibrary):
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    73
    def GetLibraryPath(self):
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    74
        return os.path.join(_base_path, "pous.xml")
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    75
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    76
features.libraries=[('LPC', lambda: PLCLibrary)]
299a4e345380 Moved LPC lib loading to the right place
Edouard Tisserant
parents: 5
diff changeset
    77
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    78
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    79
import connectors
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    80
from LPCconnector import LPC_connector_factory
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    81
connectors.connectors["LPC"]=lambda:LPC_connector_factory
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    82
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    83
import targets
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    84
from LPCtarget import LPC_target 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    85
targets.targets["LPC"] = {"xsd": os.path.join(_base_path, "LPCtarget", "XSD"),
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
    86
                          "class": lambda: LPC_target,
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    87
                          "code": os.path.join(_base_path,"LPCtarget","plc_LPC_main.c")} 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    88
targets.toolchains["makefile"] = os.path.join(_base_path, "LPCtarget", "XSD_toolchain_makefile")
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    89
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    90
from Beremiz import *
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    91
from ProjectController import ProjectController
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    92
from ConfigTreeNode import ConfigTreeNode
17
7228610e2273 Fix import after integration of plcopeneditor into Beremiz
Laurent Bessard
parents: 16
diff changeset
    93
from editors.ProjectNodeEditor import ProjectNodeEditor
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    94
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    95
from plcopen.structures import LOCATIONDATATYPES
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
    96
from PLCControler import PLCControler, LOCATION_CONFNODE, LOCATION_MODULE, LOCATION_GROUP,\
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
    97
                         LOCATION_VAR_INPUT, LOCATION_VAR_OUTPUT, LOCATION_VAR_MEMORY
17
7228610e2273 Fix import after integration of plcopeneditor into Beremiz
Laurent Bessard
parents: 16
diff changeset
    98
from IDEFrame import IDEFrame
7228610e2273 Fix import after integration of plcopeneditor into Beremiz
Laurent Bessard
parents: 16
diff changeset
    99
from dialogs import ProjectDialog
20
6bfbf83d6c2d Fixing CanFestival extension node params XSDs
Laurent Bessard
parents: 19
diff changeset
   100
from controls import TextCtrlAutoComplete
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   101
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   102
havecanfestival = False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   103
try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   104
    from canfestival import RootClass as CanOpenRootClass
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   105
    from canfestival.canfestival import _SlaveCTN, _NodeListCTN, NodeManager
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   106
    from canfestival.NetworkEditor import NetworkEditor
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   107
    from canfestival.SlaveEditor import SlaveEditor
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   108
    havecanfestival = True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   109
except:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   110
    havecanfestival = False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   111
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   112
SCROLLBAR_UNIT = 10
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   113
WINDOW_COLOUR = wx.Colour(240,240,240)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   114
TITLE_COLOUR = wx.Colour(200,200,220)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   115
CHANGED_TITLE_COLOUR = wx.Colour(220,200,220)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   116
CHANGED_WINDOW_COLOUR = wx.Colour(255,240,240)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   117
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   118
if wx.Platform == '__WXMSW__':
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   119
    faces = { 'times': 'Times New Roman',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   120
              'mono' : 'Courier New',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   121
              'helv' : 'Arial',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   122
              'other': 'Comic Sans MS',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   123
              'size' : 16,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   124
             }
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   125
else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   126
    faces = { 'times': 'Times',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   127
              'mono' : 'Courier',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   128
              'helv' : 'Helvetica',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   129
              'other': 'new century schoolbook',
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   130
              'size' : 18,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   131
             }
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   132
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   133
# Some helpers to tweak GenBitmapTextButtons
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   134
# TODO: declare customized classes instead.
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   135
gen_mini_GetBackgroundBrush = lambda obj:lambda dc: wx.Brush(obj.GetParent().GetBackgroundColour(), wx.SOLID)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   136
gen_textbutton_GetLabelSize = lambda obj:lambda:(wx.lib.buttons.GenButton._GetLabelSize(obj)[:-1] + (False,))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   137
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   138
def make_genbitmaptogglebutton_flat(button):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   139
    button.GetBackgroundBrush = gen_mini_GetBackgroundBrush(button)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   140
    button.labelDelta = 0
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   141
    button.SetBezelWidth(0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   142
    button.SetUseFocusIndicator(False)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   143
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   144
# Patch wx.lib.imageutils so that gray is supported on alpha images
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   145
import wx.lib.imageutils
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   146
from wx.lib.imageutils import grayOut as old_grayOut
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   147
def grayOut(anImage):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   148
    if anImage.HasAlpha():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   149
        AlphaData = anImage.GetAlphaData()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   150
    else :
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   151
        AlphaData = None
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   152
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   153
    old_grayOut(anImage)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   154
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   155
    if AlphaData is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   156
        anImage.SetAlphaData(AlphaData)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   157
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   158
wx.lib.imageutils.grayOut = grayOut
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   159
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   160
class GenBitmapTextButton(wx.lib.buttons.GenBitmapTextButton):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   161
    def _GetLabelSize(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   162
        """ used internally """
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   163
        w, h = self.GetTextExtent(self.GetLabel())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   164
        if not self.bmpLabel:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   165
            return w, h, False       # if there isn't a bitmap use the size of the text
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   166
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   167
        w_bmp = self.bmpLabel.GetWidth()+2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   168
        h_bmp = self.bmpLabel.GetHeight()+2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   169
        height = h + h_bmp
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   170
        if w_bmp > w:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   171
            width = w_bmp
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   172
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   173
            width = w
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   174
        return width, height, False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   175
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   176
    def DrawLabel(self, dc, width, height, dw=0, dy=0):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   177
        bmp = self.bmpLabel
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   178
        if bmp != None:     # if the bitmap is used
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   179
            if self.bmpDisabled and not self.IsEnabled():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   180
                bmp = self.bmpDisabled
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   181
            if self.bmpFocus and self.hasFocus:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   182
                bmp = self.bmpFocus
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   183
            if self.bmpSelected and not self.up:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   184
                bmp = self.bmpSelected
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   185
            bw,bh = bmp.GetWidth(), bmp.GetHeight()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   186
            if not self.up:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   187
                dw = dy = self.labelDelta
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   188
            hasMask = bmp.GetMask() != None
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   189
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   190
            bw = bh = 0     # no bitmap -> size is zero
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   191
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   192
        dc.SetFont(self.GetFont())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   193
        if self.IsEnabled():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   194
            dc.SetTextForeground(self.GetForegroundColour())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   195
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   196
            dc.SetTextForeground(wx.SystemSettings.GetColour(wx.SYS_COLOUR_GRAYTEXT))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   197
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   198
        label = self.GetLabel()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   199
        tw, th = dc.GetTextExtent(label)        # size of text
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   200
        if not self.up:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   201
            dw = dy = self.labelDelta
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   202
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   203
        pos_x = (width-bw)/2+dw      # adjust for bitmap and text to centre
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   204
        pos_y = (height-bh-th)/2+dy
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   205
        if bmp !=None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   206
            dc.DrawBitmap(bmp, pos_x, pos_y, hasMask) # draw bitmap if available
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   207
            pos_x = (width-tw)/2+dw      # adjust for bitmap and text to centre
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   208
            pos_y += bh + 2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   209
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   210
        dc.DrawText(label, pos_x, pos_y)      # draw the text
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   211
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   212
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   213
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   214
#                          CANFESTIVAL CONFNODE HACK
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   215
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   216
# from canfestival import canfestival
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   217
# class LPC_canfestival_config:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   218
#     def getCFLAGS(self, *args):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   219
#         return ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   220
# 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   221
#     def getLDFLAGS(self, *args):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   222
#         return ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   223
#         
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   224
# canfestival.local_canfestival_config = LPC_canfestival_config() 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   225
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   226
#                              LPCModule Class
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   227
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   228
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   229
LOCATION_TYPES = {"I": LOCATION_VAR_INPUT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   230
                  "Q": LOCATION_VAR_OUTPUT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   231
                  "M": LOCATION_VAR_MEMORY}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   232
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   233
LOCATION_DIRS = dict([(dir, size) for size, dir in LOCATION_TYPES.iteritems()])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   234
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   235
LOCATION_SIZES = {}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   236
for size, types in LOCATIONDATATYPES.iteritems():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   237
    for type in types:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   238
        LOCATION_SIZES[type] = size
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   239
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   240
def _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   241
    children = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   242
    for child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   243
        if child["type"] == LOCATION_GROUP:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   244
            children.extend(child["children"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   245
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   246
            children.append(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   247
    return children
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   248
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   249
def _GetVariables(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   250
    variables = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   251
    for child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   252
        if child["type"] in [LOCATION_GROUP, LOCATION_MODULE]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   253
            variables.extend(_GetVariables(child))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   254
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   255
            variables.append(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   256
    return variables
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   257
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   258
def _GetLastModuleGroup(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   259
    group = module
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   260
    for child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   261
        if child["type"] == LOCATION_GROUP:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   262
            group = child
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   263
    return group["children"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   264
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   265
def _GetModuleBySomething(module, something, toks):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   266
    for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   267
        if child.get(something) == toks[0]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   268
            if len(toks) > 1:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   269
                return _GetModuleBySomething(child, something, toks[1:])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   270
            return child
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   271
    return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   272
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   273
def _GetModuleVariable(module, location, direction):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   274
    for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   275
        if child["location"] == location and child["type"] == LOCATION_TYPES[direction]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   276
            return child
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   277
    return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   278
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   279
def _RemoveModuleChild(module, child):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   280
    if child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   281
        module["children"].remove(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   282
    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   283
        for group in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   284
            if group["type"] == LOCATION_GROUP and child in group["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   285
                group["children"].remove(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   286
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   287
BUS_TEXT = """/* Code generated by LPCBus confnode */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   288
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   289
/* LPCBus confnode includes */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   290
#include "app_glue.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   291
#ifdef _WINDOWS_H
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   292
  #include "iec_types.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   293
#else
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   294
  #include "iec_std_lib.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   295
#endif
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   296
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   297
%(declare_code)s
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   298
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   299
/* LPCBus confnode user variables definition */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   300
%(var_decl)s
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   301
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   302
/* LPCBus confnode functions */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   303
int __init_%(location_str)s(int argc,char **argv)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   304
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   305
%(init_code)s
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   306
  return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   307
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   308
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   309
void __cleanup_%(location_str)s(void)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   310
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   311
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   312
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   313
void __retrieve_%(location_str)s(void)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   314
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   315
%(retrieve_code)s
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   316
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   317
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   318
void __publish_%(location_str)s(void)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   319
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   320
%(publish_code)s
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   321
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   322
"""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   323
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   324
class LPCBus(object):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   325
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   326
    def __init__(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   327
        self.VariableLocationTree = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   328
        self.ResetUsedLocations()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   329
        self.Icon = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   330
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   331
    def __getitem__(self, key):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   332
        if key == "children":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   333
            return self.VariableLocationTree
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   334
        raise KeyError, "Only 'children' key is available"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   335
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   336
    def CTNEnabled(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   337
        return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   338
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   339
    def SetIcon(self, icon):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   340
        self.Icon = icon
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   341
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   342
    def _GetChildBySomething(self, something, toks):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   343
        return _GetModuleBySomething({"children" : self.VariableLocationTree}, something, toks)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   344
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   345
    def GetBaseTypes(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   346
        return self.GetCTRoot().GetBaseTypes()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   347
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   348
    def GetSizeOfType(self, type):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   349
        return LOCATION_SIZES[self.GetCTRoot().GetBaseType(type)]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   350
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   351
    def _GetVariableLocationTree(self, current_location, infos):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   352
        if infos["type"] == LOCATION_MODULE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   353
            location = current_location + (infos["IEC_Channel"],)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   354
            return {"name": infos["name"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   355
                    "type": infos["type"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   356
                    "location": ".".join(map(str, location + ("x",))), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   357
                    "icon": infos["icon"], 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   358
                    "children": [self._GetVariableLocationTree(location, child) for child in infos["children"]]}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   359
        elif infos["type"] == LOCATION_GROUP:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   360
            return {"name": infos["name"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   361
                    "type": infos["type"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   362
                    "location": "", 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   363
                    "icon": infos["icon"], 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   364
                    "children": [self._GetVariableLocationTree(current_location, child) for child in infos["children"]]}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   365
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   366
            size = self.GetSizeOfType(infos["IEC_type"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   367
            location = "%" + LOCATION_DIRS[infos["type"]] + size + ".".join(map(str, current_location + infos["location"]))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   368
            return {"name": infos["name"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   369
                    "type": infos["type"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   370
                    "size": size,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   371
                    "IEC_type": infos["IEC_type"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   372
                    "var_name": infos["name"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   373
                    "location": location,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   374
                    "description": infos["description"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   375
                    "children": []}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   376
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   377
    def GetVariableLocationTree(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   378
        return {"name": self.BaseParams.getName(),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   379
                "type": LOCATION_CONFNODE,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   380
                "location": self.GetFullIEC_Channel(),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   381
                "icon": self.Icon, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   382
                "children": [self._GetVariableLocationTree(self.GetCurrentLocation(), child) 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   383
                             for child in self.VariableLocationTree]}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   384
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   385
    def CTNTestModified(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   386
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   387
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   388
    def CTNMakeDir(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   389
        pass
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   390
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   391
    def CTNRequestSave(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   392
        return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   393
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   394
    def ResetUsedLocations(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   395
        self.UsedLocations = {}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   396
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   397
    def _AddUsedLocation(self, parent, location):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   398
        num = location.pop(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   399
        if not parent.has_key(num):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   400
            parent[num] = {"used": False, "children": {}}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   401
        if len(location) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   402
            self._AddUsedLocation(parent[num]["children"], location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   403
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   404
            parent[num]["used"] = True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   405
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   406
    def AddUsedLocation(self, location):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   407
        if len(location) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   408
            self._AddUsedLocation(self.UsedLocations, list(location))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   409
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   410
    def _CheckLocationConflicts(self, parent, location):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   411
        num = location.pop(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   412
        if not parent.has_key(num):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   413
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   414
        if len(location) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   415
            if parent[num]["used"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   416
                return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   417
            return self._CheckLocationConflicts(parent[num]["children"], location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   418
        elif len(parent[num]["children"]) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   419
            return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   420
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   421
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   422
    def CheckLocationConflicts(self, location):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   423
        if len(location) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   424
            return self._CheckLocationConflicts(self.UsedLocations, list(location))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   425
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   426
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   427
    def CTNGenerate_C(self, buildpath, locations):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   428
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   429
        Generate C code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   430
        @param current_location: Tupple containing confnode IEC location : %I0.0.4.5 => (0,0,4,5)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   431
        @param locations: List of complete variables locations \
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   432
            [{"IEC_TYPE" : the IEC type (i.e. "INT", "STRING", ...)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   433
            "NAME" : name of the variable (generally "__IW0_1_2" style)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   434
            "DIR" : direction "Q","I" or "M"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   435
            "SIZE" : size "X", "B", "W", "D", "L"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   436
            "LOC" : tuple of interger for IEC location (0,1,2,...)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   437
            }, ...]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   438
        @return: [(C_file_name, CFLAGS),...] , LDFLAGS_TO_APPEND
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   439
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   440
        current_location = self.GetCurrentLocation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   441
        # define a unique name for the generated C file
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   442
        location_str = "_".join(map(str, current_location))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   443
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   444
        code_str = {"location_str": location_str,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   445
                    "var_decl": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   446
                    "declare_code": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   447
                    "init_code": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   448
                    "retrieve_code": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   449
                    "publish_code": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   450
                   }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   451
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   452
        for module in _GetModuleChildren(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   453
            if module["init"] != "":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   454
                code_str["init_code"] += "  %s\n" % module["init"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   455
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   456
        # Adding variables
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   457
        vars = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   458
        self.ResetUsedLocations()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   459
        for location in locations:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   460
            loc = location["LOC"][len(current_location):]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   461
            group = next = self
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   462
            i = 0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   463
            while next is not None and i < len(loc):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   464
                next = self._GetChildBySomething("IEC_Channel", loc[:i + 1])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   465
                if next is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   466
                    i += 1
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   467
                    group = next
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   468
            var_loc = loc[i:]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   469
            for variable in _GetModuleChildren(group):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   470
                if variable["location"] == var_loc and location["DIR"] == LOCATION_DIRS[variable["type"]]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   471
#                    if location["DIR"] != LOCATION_DIRS[variable["type"]]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   472
#                        raise Exception, "Direction conflict in variable definition"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   473
#                    if location["IEC_TYPE"] != variable["IEC_type"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   474
#                        raise Exception, "Type conflict in variable definition"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   475
                    if location["DIR"] == "Q":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   476
                        if self.CheckLocationConflicts(location["LOC"]):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   477
                            raise Exception, "BYTE and BIT from the same BYTE can't be used together"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   478
                        self.AddUsedLocation(location["LOC"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   479
                    vars.append({"location": location["NAME"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   480
                                 "Type": variable["IEC_type"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   481
                                 "Retrieve": variable["retrieve"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   482
                                 "Publish": variable["publish"],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   483
                                })
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   484
                    break
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   485
        base_types = self.GetCTRoot().GetBaseTypes()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   486
        for var in vars:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   487
            prefix = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   488
            if var["Type"] in base_types:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   489
                prefix = "IEC_"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   490
            code_str["var_decl"] += "%s%s beremiz%s;\n"%(prefix, var["Type"], var["location"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   491
            code_str["var_decl"] += "%s%s *%s = &beremiz%s;\n"%(prefix, var["Type"], var["location"], var["location"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   492
            if var["Retrieve"] != "":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   493
                code_str["retrieve_code"] += "  " + var["Retrieve"] % ("*" + var["location"]) + "\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   494
            if var["Publish"] != "":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   495
                code_str["publish_code"] += "  " + var["Publish"] % ("*" + var["location"]) + "\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   496
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   497
        Gen_Module_path = os.path.join(buildpath, "Bus_%s.c"%location_str)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   498
        module = open(Gen_Module_path,'w')
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   499
        module.write(BUS_TEXT % code_str)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   500
        module.close()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   501
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   502
        matiec_flags = '"-I%s"'%os.path.abspath(self.GetCTRoot().GetIECLibPath())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   503
        return [(Gen_Module_path, matiec_flags)],"",True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   504
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   505
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   506
#                          LPC CanFestival ConfNode Class
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   507
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   508
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   509
if havecanfestival:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   510
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   511
    DEFAULT_SETTINGS = {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   512
        "CAN_Baudrate": "125K",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   513
        "Slave_NodeId": 2,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   514
        "Master_NodeId": 1,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   515
    }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   516
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   517
    class LPCSlaveEditor(SlaveEditor):
11
6aca5bc9c9a1 Fix bug showing canfestival base node params that can't be changed
Laurent Bessard
parents: 9
diff changeset
   518
        SHOW_BASE_PARAMS = False
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   519
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   520
    class LPCCanOpenSlave(_SlaveCTN):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   521
        XSD = """<?xml version="1.0" encoding="ISO-8859-1" ?>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   522
        <xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   523
          <xsd:element name="CanFestivalSlaveNode">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   524
            <xsd:complexType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   525
              <xsd:attribute name="CAN_Baudrate" type="xsd:string" use="optional" default="%(CAN_Baudrate)s"/>
20
6bfbf83d6c2d Fixing CanFestival extension node params XSDs
Laurent Bessard
parents: 19
diff changeset
   526
              <xsd:attribute name="NodeId" type="xsd:integer" use="optional" default="%(Slave_NodeId)d"/>
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   527
              <xsd:attribute name="Sync_Align" type="xsd:integer" use="optional" default="0"/>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   528
              <xsd:attribute name="Sync_Align_Ratio" use="optional" default="50">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   529
                <xsd:simpleType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   530
                    <xsd:restriction base="xsd:integer">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   531
                        <xsd:minInclusive value="1"/>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   532
                        <xsd:maxInclusive value="99"/>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   533
                    </xsd:restriction>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   534
                </xsd:simpleType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   535
              </xsd:attribute>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   536
            </xsd:complexType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   537
          </xsd:element>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   538
        </xsd:schema>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   539
        """ % DEFAULT_SETTINGS
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   540
        
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   541
        EditorType = LPCSlaveEditor
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   542
        
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   543
        def __init__(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   544
            # TODO change netname when name change
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   545
            NodeManager.__init__(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   546
            odfilepath = self.GetSlaveODPath()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   547
            if(os.path.isfile(odfilepath)):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   548
                self.OpenFileInCurrent(odfilepath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   549
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   550
                self.CreateNewNode("SlaveNode",  # Name - will be changed at build time
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   551
                                   0x00,         # NodeID - will be changed at build time
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   552
                                   "slave",      # Type
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   553
                                   "",           # description 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   554
                                   "None",       # profile
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   555
                                   "", # prfile filepath
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   556
                                   "heartbeat",  # NMT
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   557
                                   [])           # options
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   558
                self.OnCTNSave()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   559
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   560
        def GetCanDevice(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   561
            return str(self.BaseParams.getIEC_Channel())
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   562
    
14
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   563
        ConfNodeMethods = [
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   564
            {"bitmap" : "NetworkEdit",
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   565
             "name" : _("Edit slave"), 
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   566
             "tooltip" : _("Edit CanOpen slave with ObjdictEdit"),
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   567
             "method" : "_OpenView"},
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   568
        ] + _SlaveCTN.ConfNodeMethods
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   569
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   570
    class LPCNetworkEditor(NetworkEditor):
11
6aca5bc9c9a1 Fix bug showing canfestival base node params that can't be changed
Laurent Bessard
parents: 9
diff changeset
   571
        SHOW_BASE_PARAMS = False
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   572
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   573
    class LPCCanOpenMaster(_NodeListCTN):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   574
        XSD = """<?xml version="1.0" encoding="ISO-8859-1" ?>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   575
        <xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   576
          <xsd:element name="CanFestivalNode">
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   577
            <xsd:complexType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   578
              <xsd:attribute name="CAN_Baudrate" type="xsd:string" use="optional" default="%(CAN_Baudrate)s"/>
20
6bfbf83d6c2d Fixing CanFestival extension node params XSDs
Laurent Bessard
parents: 19
diff changeset
   579
              <xsd:attribute name="NodeId" type="xsd:integer" use="optional" default="%(Master_NodeId)d"/>
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   580
              <xsd:attribute name="Sync_TPDOs" type="xsd:boolean" use="optional" default="true"/>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   581
            </xsd:complexType>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   582
          </xsd:element>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   583
        </xsd:schema>
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   584
        """ % DEFAULT_SETTINGS
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   585
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   586
        EditorType = LPCNetworkEditor
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   587
        
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   588
        def GetCanDevice(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   589
            return str(self.BaseParams.getIEC_Channel())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   590
    
14
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   591
        ConfNodeMethods = [
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   592
            {"bitmap" : "NetworkEdit",
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   593
             "name" : _("Edit network"), 
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   594
             "tooltip" : _("Edit CanOpen Network with NetworkEdit"),
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   595
             "method" : "_OpenView"},
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   596
        ] + _NodeListCTN.ConfNodeMethods
37734da73adc Adding canfestival specific buttons for opening slave and network editors
Laurent Bessard
parents: 13
diff changeset
   597
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   598
    class LPCCanOpen(CanOpenRootClass):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   599
        XSD = None
11
6aca5bc9c9a1 Fix bug showing canfestival base node params that can't be changed
Laurent Bessard
parents: 9
diff changeset
   600
        CTNChildrenTypes = [("CanOpenNode", LPCCanOpenMaster, "CanOpen Master"),
6aca5bc9c9a1 Fix bug showing canfestival base node params that can't be changed
Laurent Bessard
parents: 9
diff changeset
   601
                            ("CanOpenSlave", LPCCanOpenSlave, "CanOpen Slave")]
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   602
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   603
        def GetCanDriver(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   604
            return ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   605
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   606
        def LoadChildren(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   607
            ConfigTreeNode.LoadChildren(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   608
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   609
            if self.GetChildByName("Master") is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   610
                master = self.CTNAddChild("Master", "CanOpenNode", 0)
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
   611
                #master.BaseParams.setEnabled(False)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   612
                master.CTNRequestSave()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   613
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   614
            if self.GetChildByName("Slave") is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   615
                slave = self.CTNAddChild("Slave", "CanOpenSlave", 1)
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
   616
                #slave.BaseParams.setEnabled(False)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   617
                slave.CTNRequestSave()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   618
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   619
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   620
#                              LPCProjectController Class
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   621
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   622
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   623
def mycopytree(src, dst):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   624
    """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   625
    Copy content of a directory to an other, omit hidden files
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   626
    @param src: source directory
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   627
    @param dst: destination directory
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   628
    """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   629
    for i in os.listdir(src):
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
   630
        if not i.startswith('.'):
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   631
            srcpath = os.path.join(src,i)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   632
            dstpath = os.path.join(dst,i)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   633
            if os.path.isdir(srcpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   634
                if os.path.exists(dstpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   635
                    shutil.rmtree(dstpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   636
                os.makedirs(dstpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   637
                mycopytree(srcpath, dstpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   638
            elif os.path.isfile(srcpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   639
                shutil.copy2(srcpath, dstpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   640
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   641
[SIMULATION_MODE, TRANSFER_MODE] = range(2)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   642
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   643
class LPCProjectNodeEditor(ProjectNodeEditor):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   644
    SHOW_PARAMS = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   645
    ENABLE_REQUIRED = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   646
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   647
class LPCProjectController(ProjectController):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   648
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   649
    StatusMethods = [
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   650
        {"bitmap" : "Debug",
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   651
         "name" : _("Simulate"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   652
         "tooltip" : _("Simulate PLC"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   653
         "method" : "_Simulate"},
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   654
        {"bitmap" : "Run",
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   655
         "name" : _("Run"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   656
         "shown" : False,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   657
         "tooltip" : _("Start PLC"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   658
         "method" : "_Run"},
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   659
        {"bitmap" : "Stop",
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   660
         "name" : _("Stop"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   661
         "shown" : False,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   662
         "tooltip" : _("Stop Running PLC"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   663
         "method" : "_Stop"},
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   664
        {"bitmap" : "Build",
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   665
         "name" : _("Build"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   666
         "tooltip" : _("Build project into build folder"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   667
         "method" : "_Build"},
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   668
        {"bitmap" : "Transfer",
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   669
         "name" : _("Transfer"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   670
         "shown" : False,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   671
         "tooltip" : _("Transfer PLC"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   672
         "method" : "_Transfer"},
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   673
    ]
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   674
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   675
    ConfNodeMethods = []
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   676
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   677
    EditorType = LPCProjectNodeEditor
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   678
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   679
    def __init__(self, frame, logger, buildpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   680
        self.OrigBuildPath = buildpath
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   681
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   682
        ProjectController.__init__(self, frame, logger)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   683
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   684
        if havecanfestival:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   685
            self.CTNChildrenTypes += [("LPCBus", LPCBus, "LPC bus"), ("CanOpen", LPCCanOpen, "CanOpen bus")]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   686
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   687
            self.CTNChildrenTypes += [("LPCBus", LPCBus, "LPC bus")]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   688
        self.CTNType = "LPC"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   689
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   690
        self.OnlineMode = "OFF"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   691
        self.LPCConnector = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   692
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   693
        self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   694
        self.previous_mode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   695
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   696
        self.SimulationBuildPath = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   697
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   698
        self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   699
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   700
    def GetProjectInfos(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   701
        infos = PLCControler.GetProjectInfos(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   702
        configurations = infos["values"].pop(-1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   703
        resources = None
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   704
        for config_infos in configurations["values"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   705
            if resources is None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   706
                resources = config_infos["values"][0]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   707
            else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   708
                resources["values"].extend(config_infos["values"][0]["values"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   709
        if resources is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   710
            infos["values"].append(resources)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   711
        return infos
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   712
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   713
    def GetProjectName(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   714
        return self.Project.getname()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   715
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   716
    def GetDefaultTargetName(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   717
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   718
            return ProjectController.GetDefaultTargetName(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   719
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   720
            return "LPC"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   721
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   722
    def GetTarget(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   723
        target = ProjectController.GetTarget(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   724
        if self.CurrentMode != SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   725
            target.getcontent()["value"].setBuildPath(self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   726
        return target
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   727
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   728
    def _getBuildPath(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   729
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   730
            if self.SimulationBuildPath is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   731
                self.SimulationBuildPath = os.path.join(tempfile.mkdtemp(), os.path.basename(self.ProjectPath), "build")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   732
            return self.SimulationBuildPath
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   733
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   734
            return ProjectController._getBuildPath(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   735
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   736
    def _Build(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   737
        save = self.ProjectTestModified()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   738
        if save:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   739
            self.SaveProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   740
            self.AppFrame._Refresh(TITLE, FILEMENU)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   741
        if self.BuildPath is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   742
            mycopytree(self.OrigBuildPath, self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   743
        ProjectController._Build(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   744
        if save:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   745
            wx.CallAfter(self.AppFrame.RefreshAll)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   746
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   747
    def SetProjectName(self, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   748
        return self.Project.setname(name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   749
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   750
    def SetOnlineMode(self, mode, path=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   751
        if self.OnlineMode != mode.upper():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   752
            self.OnlineMode = mode.upper()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   753
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   754
            if self.OnlineMode != "OFF":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   755
                uri = "LPC://%s/%s" % (self.OnlineMode,path)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   756
                try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   757
                    self.LPCConnector = connectors.ConnectorFactory(uri, self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   758
                except Exception, msg:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   759
                    self.logger.write_error(_("Exception while connecting %s!\n")%uri)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   760
                    self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   761
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   762
                # Did connection success ?
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   763
                if self.LPCConnector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   764
                    # Oups.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   765
                    self.logger.write_error(_("Connection failed to %s!\n")%uri)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   766
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   767
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   768
                self.LPCConnector = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   769
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   770
            self.ApplyOnlineMode()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   771
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   772
    def ApplyOnlineMode(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   773
        if self.CurrentMode != SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   774
            self.KillDebugThread()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   775
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   776
            self._connector = self.LPCConnector
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   777
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   778
            # Init with actual PLC status and print it
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   779
            self.UpdateMethodsFromPLCStatus()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   780
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   781
            if self.LPCConnector is not None and self.OnlineMode == "APPLICATION":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   782
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   783
                self.CompareLocalAndRemotePLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   784
                            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   785
                if self.previous_plcstate is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   786
                    status = _(self.previous_plcstate)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   787
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   788
                    status = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   789
                self.logger.write(_("PLC is %s\n")%status)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   790
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   791
                #if self.StatusTimer and not self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   792
                #    # Start the status Timer
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   793
                #    self.StatusTimer.Start(milliseconds=2000, oneShot=False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   794
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   795
                if self.previous_plcstate=="Started":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   796
                    if self.DebugAvailable() and self.GetIECProgramsAndVariables():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   797
                        self.logger.write(_("Debug connect matching running PLC\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   798
                        self._connect_debug()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   799
                    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   800
                        self.logger.write_warning(_("Debug do not match PLC - stop/transfert/start to re-enable\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   801
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   802
            elif self.StatusTimer and self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   803
                self.StatusTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   804
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   805
            if self.CurrentMode == TRANSFER_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   806
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   807
                if self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   808
                    self.BeginTransfer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   809
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   810
                elif self.OnlineMode == "APPLICATION":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   811
                    self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   812
                    self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   813
                    self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   814
                    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   815
                    self.logger.write(_("PLC transferred successfully\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   816
    
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   817
    # Update a PLCOpenEditor Pou variable location
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   818
    def UpdateProjectVariableLocation(self, old_leading, new_leading):
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   819
        self.Project.updateElementAddress(old_leading, new_leading)
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   820
        self.BufferProject()
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   821
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   822
    # Update a PLCOpenEditor Pou variable name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   823
    def UpdateProjectVariableName(self, old_name, new_name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   824
        self.Project.updateElementName(old_name, new_name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   825
        self.BufferProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   826
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   827
    def RemoveProjectVariableByAddress(self, address):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   828
        self.Project.removeVariableByAddress(address)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   829
        self.BufferProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   830
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   831
    def RemoveProjectVariableByFilter(self, leading):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   832
        self.Project.removeVariableByFilter(leading)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   833
        self.BufferProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   834
19
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   835
    def AddProjectDefaultConfiguration(self, config_name="config", res_name="resource1"):
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   836
        ProjectController.AddProjectDefaultConfiguration(self, config_name, res_name)
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   837
        
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   838
        self.SetEditedResourceInfos(
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   839
            self.ComputeConfigurationResourceName(config_name, res_name),
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   840
            [{"Name": "main_task",
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   841
              "Triggering": "Cyclic",
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   842
              "Interval": "T#50ms",
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   843
              "Priority": 0}],
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   844
            [])
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   845
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   846
    def LoadProject(self, ProjectPath, BuildPath=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   847
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   848
        Load a project contained in a folder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   849
        @param ProjectPath: path of the project folder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   850
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   851
        if os.path.basename(ProjectPath) == "":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   852
            ProjectPath = os.path.dirname(ProjectPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   853
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   854
        # Verify that project contains a PLCOpen program
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   855
        plc_file = os.path.join(ProjectPath, "plc.xml")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   856
        if os.path.isfile(plc_file):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   857
            # Load PLCOpen file
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   858
            result = self.OpenXMLFile(plc_file)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   859
            if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   860
                return result
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   861
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   862
            self.CreateNewProject({"companyName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   863
                                   "productName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   864
                                   "productVersion": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   865
                                   "projectName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   866
                                   "pageSize": (0, 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   867
                                   "scaling": {}})
19
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   868
        if len(self.GetProjectConfigNames()) == 0:
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   869
            self.AddProjectDefaultConfiguration()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   870
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   871
        # Change XSD into class members
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   872
        self._AddParamsMembers()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   873
        self.Children = {}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   874
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   875
        # Keep track of the root confnode (i.e. project path)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   876
        self.ProjectPath = ProjectPath
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   877
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   878
        self.BuildPath = self._getBuildPath()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   879
        if self.OrigBuildPath is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   880
            mycopytree(self.OrigBuildPath, self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   881
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   882
        # If dir have already be made, and file exist
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   883
        if os.path.isdir(self.CTNPath()) and os.path.isfile(self.ConfNodeXmlFilePath()):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   884
            #Load the confnode.xml file into parameters members
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   885
            result = self.LoadXMLParams()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   886
            if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   887
                return result
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   888
            #Load and init all the children
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   889
            self.LoadChildren()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   890
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   891
        if havecanfestival and self.GetChildByName("CanOpen") is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   892
            canopen = self.CTNAddChild("CanOpen", "CanOpen", 0)
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
   893
            #canopen.BaseParams.setEnabled(False)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   894
            canopen.LoadChildren()
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   895
            canopen.CTNRequestSave()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   896
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   897
        if self.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   898
            self.SaveProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   899
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   900
        if wx.GetApp() is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   901
            self.RefreshConfNodesBlockLists()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   902
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   903
            wx.CallAfter(self.RefreshConfNodesBlockLists)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   904
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   905
        return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   906
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   907
    ############# Real PLC object access #############
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   908
    def UpdateMethodsFromPLCStatus(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   909
        # Get PLC state : Running or Stopped
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   910
        # TODO : use explicit status instead of boolean
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   911
        if self.OnlineMode == "OFF":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   912
            status = "Disconnected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   913
        elif self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   914
            status = "Connected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   915
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   916
            if self._connector is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   917
                status = self._connector.GetPLCstatus()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   918
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   919
                status = "Disconnected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   920
        if self.previous_plcstate != status or self.previous_mode != self.CurrentMode:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   921
            simulating = self.CurrentMode == SIMULATION_MODE
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   922
            for args in {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   923
                     "Started" :     [("_Simulate", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   924
                                      ("_Run", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   925
                                      ("_Stop", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   926
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   927
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   928
                     "Stopped" :     [("_Simulate", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   929
                                      ("_Run", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   930
                                      ("_Stop", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   931
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   932
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   933
                     "Connected" :   [("_Simulate", not simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   934
                                      ("_Run", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   935
                                      ("_Stop", simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   936
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   937
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   938
                     "Disconnected" :[("_Simulate", not simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   939
                                      ("_Run", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   940
                                      ("_Stop", simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   941
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   942
                                      ("_Transfer", False)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   943
                   }.get(status,[]):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   944
                self.ShowMethod(*args)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   945
            self.previous_plcstate = status
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   946
            self.previous_mode = self.CurrentMode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   947
            return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   948
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   949
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   950
    def Generate_plc_declare_locations(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   951
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   952
        Declare used locations in order to simulatePLC in a black box
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   953
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   954
        return """#include "iec_types_all.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   955
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   956
#define __LOCATED_VAR(type, name, ...) \
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   957
type beremiz_##name;\
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   958
type *name = &beremiz_##name;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   959
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   960
#include "LOCATED_VARIABLES.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   961
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   962
#undef __LOCATED_VAR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   963
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   964
"""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   965
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   966
    def Generate_lpc_retain_array_sim(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   967
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   968
        Support for retain array in Simulation
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   969
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   970
        return """/* Support for retain array */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   971
#define USER_RETAIN_ARRAY_SIZE 2000
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   972
#define NUM_OF_COLS    3
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   973
unsigned char readOK = 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   974
unsigned int foundIndex = USER_RETAIN_ARRAY_SIZE;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   975
unsigned int retainArray[USER_RETAIN_ARRAY_SIZE][NUM_OF_COLS];
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   976
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   977
unsigned int __GetRetainData(unsigned char READ, unsigned int INDEX, unsigned int COLUMN)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   978
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   979
    if(READ == 1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   980
    {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   981
        if((0<=INDEX) && (INDEX<USER_RETAIN_ARRAY_SIZE) && (0<=COLUMN) && (COLUMN<NUM_OF_COLS))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   982
        {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   983
            readOK = 1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   984
            return retainArray[INDEX][COLUMN];
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   985
        }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   986
    }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   987
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   988
    readOK = 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   989
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   990
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   991
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   992
unsigned char __SetRetainData(unsigned char WRITE, unsigned int INDEX, unsigned int WORD1, unsigned int WORD2, unsigned int WORD3)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   993
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   994
    if(WRITE == 1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   995
    {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   996
        if((0<=INDEX) && (INDEX<USER_RETAIN_ARRAY_SIZE))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   997
        {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   998
            retainArray[INDEX][0] = WORD1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   999
            retainArray[INDEX][1] = WORD2;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1000
            retainArray[INDEX][2] = WORD3;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1001
            return 1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1002
        }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1003
    }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1004
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1005
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1006
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1007
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1008
unsigned char __FindRetainData(unsigned char SEARCH, unsigned int START_IDX, unsigned int END_IDX, unsigned int WORD1, unsigned int WORD2, unsigned int WORD3)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1009
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1010
    unsigned int i;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1011
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1012
    if((SEARCH==1) && (0<=START_IDX) && (START_IDX<USER_RETAIN_ARRAY_SIZE) && (START_IDX<=END_IDX) && (END_IDX<USER_RETAIN_ARRAY_SIZE))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1013
    {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1014
        for(i=START_IDX;i<=END_IDX;i++)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1015
        {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1016
            if((retainArray[i][0] == WORD1) && (retainArray[i][1] == WORD2) && (retainArray[i][2] == WORD3))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1017
            {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1018
                foundIndex = i;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1019
                return 1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1020
            }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1021
        }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1022
    }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1023
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1024
    foundIndex = USER_RETAIN_ARRAY_SIZE;    /* Data not found => return index that is out of array bounds */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1025
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1026
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1027
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1028
/* Since Beremiz debugger doesn't like pointer-by-reference stuff or global varibles, separate function is a must */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1029
unsigned char __GetReadStatus(unsigned char dummy)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1030
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1031
    return readOK;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1032
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1033
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1034
unsigned int __GetFoundIndex(unsigned char dummy)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1035
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1036
    return foundIndex;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1037
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1038
"""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1039
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1040
    def _Simulate(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1041
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1042
        Method called by user to Simulate PLC
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1043
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1044
        self.CurrentMode = SIMULATION_MODE
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1045
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1046
        uri = "LOCAL://"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1047
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1048
            self._connector = connectors.ConnectorFactory(uri, self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1049
        except Exception, msg:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1050
            self.logger.write_error(_("Exception while connecting %s!\n")%uri)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1051
            self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1052
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1053
        # Did connection success ?
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1054
        if self._connector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1055
            # Oups.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1056
            self.logger.write_error(_("Connection failed to %s!\n")%uri)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1057
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1058
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1059
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1060
        buildpath = self._getBuildPath()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1061
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1062
        # Eventually create build dir
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1063
        if not os.path.exists(buildpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1064
            os.makedirs(buildpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1065
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1066
        # Generate SoftPLC IEC code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1067
        IECGenRes = self._Generate_SoftPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1068
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1069
         # If IEC code gen fail, bail out.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1070
        if not IECGenRes:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1071
            self.logger.write_error(_("IEC-61131-3 code generation failed !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1072
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1073
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1074
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1075
        # Reset variable and program list that are parsed from
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1076
        # CSV file generated by IEC2C compiler.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1077
        self.ResetIECProgramsAndVariables()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1078
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1079
        gen_result = self.CTNGenerate_C(buildpath, self.PLCGeneratedLocatedVars)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1080
        CTNCFilesAndCFLAGS, CTNLDFLAGS, DoCalls = gen_result[:3]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1081
        # if some files have been generated put them in the list with their location
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1082
        if CTNCFilesAndCFLAGS:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1083
            self.LocationCFilesAndCFLAGS = [(self.GetCurrentLocation(), CTNCFilesAndCFLAGS, DoCalls)]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1084
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1085
            self.LocationCFilesAndCFLAGS = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1086
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1087
        # confnode asks for some LDFLAGS
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1088
        if CTNLDFLAGS:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1089
            # LDFLAGS can be either string
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1090
            if type(CTNLDFLAGS)==type(str()):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1091
                self.LDFLAGS=[CTNLDFLAGS]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1092
            #or list of strings
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1093
            elif type(CTNLDFLAGS)==type(list()):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1094
                self.LDFLAGS=CTNLDFLAGS[:]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1095
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1096
            self.LDFLAGS=[]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1097
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1098
        # Template based part of C code generation
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1099
        # files are stacked at the beginning, as files of confnode tree root
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1100
        for generator, filename, name in [
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1101
           # debugger code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1102
           (self.Generate_plc_debugger, "plc_debugger.c", "Debugger"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1103
           # init/cleanup/retrieve/publish, run and align code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1104
           (self.Generate_plc_common_main,"plc_common_main.c","Common runtime"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1105
           # declare located variables for simulate in a black box
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1106
           (self.Generate_plc_declare_locations,"plc_declare_locations.c","Declare Locations"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1107
           # declare located variables for simulate in a black box
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1108
           (self.Generate_lpc_retain_array_sim,"lpc_retain_array_sim.c","Retain Array for Simulation")]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1109
            try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1110
                # Do generate
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1111
                code = generator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1112
                if code is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1113
                     raise
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1114
                code_path = os.path.join(buildpath,filename)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1115
                open(code_path, "w").write(code)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1116
                # Insert this file as first file to be compiled at root confnode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1117
                self.LocationCFilesAndCFLAGS[0][1].insert(0,(code_path, self.plcCFLAGS))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1118
            except Exception, exc:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1119
                self.logger.write_error(name+_(" generation failed !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1120
                self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1121
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1122
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1123
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1124
        # Get simulation builder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1125
        builder = self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1126
        if builder is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1127
            self.logger.write_error(_("Fatal : cannot get builder.\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1128
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1129
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1130
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1131
        # Build
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1132
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1133
            if not builder.build() :
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1134
                self.logger.write_error(_("C Build failed.\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1135
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1136
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1137
        except Exception, exc:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1138
            self.logger.write_error(_("C Build crashed !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1139
            self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1140
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1141
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1142
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1143
        data = builder.GetBinaryCode()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1144
        if data is not None :
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1145
            if self._connector.NewPLC(builder.GetBinaryCodeMD5(), data, []):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1146
                self.UnsubscribeAllDebugIECVariable()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1147
                self.ProgramTransferred()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1148
                if self.AppFrame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1149
                    self.AppFrame.CloseObsoleteDebugTabs()
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1150
                    self.AppFrame.RefreshPouInstanceVariablesPanel()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1151
                self.logger.write(_("Transfer completed successfully.\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1152
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1153
                self.logger.write_error(_("Transfer failed\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1154
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1155
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1156
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1157
        self._Run()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1158
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1159
        if not self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1160
            # Start the status Timer
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1161
            self.StatusTimer.Start(milliseconds=500, oneShot=False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1162
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1163
    def StopSimulation(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1164
        self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1165
        self.ApplyOnlineMode()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1166
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1167
    def _Stop(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1168
        ProjectController._Stop(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1169
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1170
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1171
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1172
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1173
    def CompareLocalAndRemotePLC(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1174
        if self.LPCConnector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1175
            return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1176
        # We are now connected. Update button status
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1177
        MD5 = self.GetLastBuildMD5()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1178
        # Check remote target PLC correspondance to that md5
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1179
        if MD5 is not None and self.LPCConnector.MatchMD5(MD5):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1180
            # warns controller that program match
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1181
            self.ProgramTransferred()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1182
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1183
    def ResetBuildMD5(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1184
        builder=self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1185
        if builder is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1186
            builder.ResetBinaryCodeMD5(self.OnlineMode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1187
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1188
    def GetLastBuildMD5(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1189
        builder=self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1190
        if builder is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1191
            return builder.GetBinaryCodeMD5(self.OnlineMode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1192
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1193
            return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1194
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1195
    def _Transfer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1196
        if self.CurrentMode is None and self.OnlineMode != "OFF":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1197
            self.CurrentMode = TRANSFER_MODE
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1198
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1199
            if ProjectController._Build(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1200
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1201
                ID_ABORTTRANSFERTIMER = wx.NewId()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1202
                self.AbortTransferTimer = wx.Timer(self.AppFrame, ID_ABORTTRANSFERTIMER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1203
                self.AppFrame.Bind(wx.EVT_TIMER, self.AbortTransfer, self.AbortTransferTimer)  
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1204
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1205
                if self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1206
                    self.BeginTransfer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1207
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1208
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1209
                    self.logger.write(_("Resetting PLC\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1210
                    #self.StatusTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1211
                    self.LPCConnector.ResetPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1212
                    self.AbortTransferTimer.Start(milliseconds=5000, oneShot=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1213
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1214
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1215
                self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1216
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1217
    def BeginTransfer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1218
        self.logger.write(_("Start PLC transfer\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1219
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1220
        self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1221
        ProjectController._Transfer(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1222
        self.AbortTransferTimer.Start(milliseconds=5000, oneShot=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1223
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1224
    def AbortTransfer(self, event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1225
        self.logger.write_warning(_("Timeout waiting PLC to recover\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1226
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1227
        self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1228
        self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1229
        self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1230
        event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1231
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1232
    def _Run(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1233
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1234
        Start PLC
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1235
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1236
        if self.GetIECProgramsAndVariables():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1237
            self._connector.StartPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1238
            self.logger.write(_("Starting PLC\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1239
            self._connect_debug()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1240
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1241
            self.logger.write_error(_("Couldn't start PLC !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1242
        self.UpdateMethodsFromPLCStatus()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1243
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1244
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1245
#                              LPCBeremiz Class
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1246
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1247
lpcberemiz_cmd=None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1248
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1249
class LPCBeremiz(Beremiz):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1250
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1251
    def _init_coll_FileMenu_Items(self, parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1252
        AppendMenu(parent, help='', id=wx.ID_SAVE,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1253
              kind=wx.ITEM_NORMAL, text=_(u'Save\tCTRL+S'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1254
        AppendMenu(parent, help='', id=wx.ID_CLOSE,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1255
              kind=wx.ITEM_NORMAL, text=_(u'Close Tab\tCTRL+W'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1256
        parent.AppendSeparator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1257
        AppendMenu(parent, help='', id=wx.ID_PAGE_SETUP,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1258
              kind=wx.ITEM_NORMAL, text=_(u'Page Setup'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1259
        AppendMenu(parent, help='', id=wx.ID_PREVIEW,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1260
              kind=wx.ITEM_NORMAL, text=_(u'Preview'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1261
        AppendMenu(parent, help='', id=wx.ID_PRINT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1262
              kind=wx.ITEM_NORMAL, text=_(u'Print'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1263
        parent.AppendSeparator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1264
        AppendMenu(parent, help='', id=wx.ID_EXIT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1265
              kind=wx.ITEM_NORMAL, text=_(u'Quit\tCTRL+Q'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1266
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1267
        self.Bind(wx.EVT_MENU, self.OnSaveProjectMenu, id=wx.ID_SAVE)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1268
        self.Bind(wx.EVT_MENU, self.OnCloseTabMenu, id=wx.ID_CLOSE)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1269
        self.Bind(wx.EVT_MENU, self.OnPageSetupMenu, id=wx.ID_PAGE_SETUP)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1270
        self.Bind(wx.EVT_MENU, self.OnPreviewMenu, id=wx.ID_PREVIEW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1271
        self.Bind(wx.EVT_MENU, self.OnPrintMenu, id=wx.ID_PRINT)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1272
        self.Bind(wx.EVT_MENU, self.OnQuitMenu, id=wx.ID_EXIT)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1273
    
16
3eaac9927941 Fix bug in icon names for file menu toolbar items
Laurent Bessard
parents: 15
diff changeset
  1274
        self.AddToMenuToolBar([(wx.ID_SAVE, "save", _(u'Save'), None),
3eaac9927941 Fix bug in icon names for file menu toolbar items
Laurent Bessard
parents: 15
diff changeset
  1275
                               (wx.ID_PRINT, "print", _(u'Print'), None)])
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1276
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1277
    def _init_coll_AddMenu_Items(self, parent):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1278
        IDEFrame._init_coll_AddMenu_Items(self, parent, False)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1279
        new_id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1280
        AppendMenu(parent, help='', id=new_id,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1281
                  kind=wx.ITEM_NORMAL, text=_(u'&Resource'))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1282
        self.Bind(wx.EVT_MENU, self.AddResourceMenu, id=new_id)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1283
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1284
    def _init_ctrls(self, prnt):
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1285
        Beremiz._init_ctrls(self, prnt)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1286
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1287
        self.PLCConfig = wx.ScrolledWindow(id=ID_BEREMIZPLCCONFIG,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1288
              name='PLCConfig', parent=self.LeftNoteBook, pos=wx.Point(0, 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1289
              size=wx.Size(-1, -1), style=wx.TAB_TRAVERSAL|wx.SUNKEN_BORDER|wx.HSCROLL|wx.VSCROLL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1290
        self.PLCConfig.SetBackgroundColour(wx.WHITE)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1291
        self.PLCConfig.Bind(wx.EVT_LEFT_DOWN, self.OnPanelLeftDown)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1292
        self.PLCConfig.Bind(wx.EVT_SIZE, self.OnMoveWindow)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1293
        self.MainTabs["PLCConfig"] = (self.PLCConfig, _("Topology"))
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1294
        self.LeftNoteBook.InsertPage(0, self.PLCConfig, _("Topology"), True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1295
        
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1296
        self.PLCConfigMainSizer = wx.FlexGridSizer(cols=1, hgap=2, rows=2, vgap=2)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1297
        self.PLCParamsSizer = wx.BoxSizer(wx.VERTICAL)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1298
        self.ConfNodeTreeSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=0, vgap=2)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1299
        self.ConfNodeTreeSizer.AddGrowableCol(0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1300
        self.ConfNodeTreeSizer.AddGrowableCol(1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1301
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1302
        self.PLCConfigMainSizer.AddSizer(self.PLCParamsSizer, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1303
        self.PLCConfigMainSizer.AddSizer(self.ConfNodeTreeSizer, 0, border=10, flag=wx.BOTTOM|wx.LEFT|wx.RIGHT)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1304
        self.PLCConfigMainSizer.AddGrowableCol(0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1305
        self.PLCConfigMainSizer.AddGrowableRow(1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1306
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1307
        self.PLCConfig.SetSizer(self.PLCConfigMainSizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1308
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1309
        self.AUIManager.Update()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1310
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1311
    def __init__(self, parent, projectOpen=None, buildpath=None, ctr=None, debug=True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1312
        self.ConfNodeInfos = {}
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1313
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1314
        Beremiz.__init__(self, parent, projectOpen, buildpath, ctr, debug)
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1315
    
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1316
    def Show(self):
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1317
        wx.Frame.Show(self)
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1318
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1319
    def OnCloseFrame(self, event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1320
        global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1321
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1322
        if self.CheckSaveBeforeClosing(_("Close Application")):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1323
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1324
            frame.Hide()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1325
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1326
            self.CTR.ResetAppFrame(lpcberemiz_cmd.Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1327
            if self.CTR.OnlineMode == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1328
                self.CTR._connector = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1329
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1330
            self.CTR.KillDebugThread()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1331
            self.KillLocalRuntime()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1332
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1333
            self.SaveLastState()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1334
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1335
            lpcberemiz_cmd.Log.write("Closed\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1336
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1337
        event.Veto()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1338
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1339
    def OnMoveWindow(self, event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1340
        self.GetBestSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1341
        self.RefreshScrollBars()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1342
        event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1343
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1344
    def OnPanelLeftDown(self, event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1345
        focused = self.FindFocus()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1346
        if isinstance(focused, TextCtrlAutoComplete):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1347
            focused.DismissListBox()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1348
        event.Skip()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1349
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1350
    def RefreshFileMenu(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1351
        MenuToolBar = self.Panes["MenuToolBar"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1352
        if self.CTR is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1353
            selected = self.TabsOpened.GetSelection()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1354
            if selected >= 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1355
                graphic_viewer = isinstance(self.TabsOpened.GetPage(selected), Viewer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1356
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1357
                graphic_viewer = False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1358
            if self.TabsOpened.GetPageCount() > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1359
                self.FileMenu.Enable(wx.ID_CLOSE, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1360
                if graphic_viewer:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1361
                    self.FileMenu.Enable(wx.ID_PREVIEW, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1362
                    self.FileMenu.Enable(wx.ID_PRINT, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1363
                    MenuToolBar.EnableTool(wx.ID_PRINT, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1364
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1365
                    self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1366
                    self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1367
                    MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1368
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1369
                self.FileMenu.Enable(wx.ID_CLOSE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1370
                self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1371
                self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1372
                MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1373
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1374
            project_modified = self.CTR.ProjectTestModified()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1375
            self.FileMenu.Enable(wx.ID_SAVE, project_modified)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1376
            MenuToolBar.EnableTool(wx.ID_SAVE, project_modified)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1377
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1378
            self.FileMenu.Enable(wx.ID_CLOSE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1379
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1380
            self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1381
            self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1382
            MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1383
            self.FileMenu.Enable(wx.ID_SAVE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1384
            MenuToolBar.EnableTool(wx.ID_SAVE, False)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1385
            
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1386
    def RefreshScrollBars(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1387
        xstart, ystart = self.PLCConfig.GetViewStart()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1388
        window_size = self.PLCConfig.GetClientSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1389
        sizer = self.PLCConfig.GetSizer()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1390
        if sizer:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1391
            maxx, maxy = sizer.GetMinSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1392
            posx = max(0, min(xstart, (maxx - window_size[0]) / SCROLLBAR_UNIT))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1393
            posy = max(0, min(ystart, (maxy - window_size[1]) / SCROLLBAR_UNIT))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1394
            self.PLCConfig.Scroll(posx, posy)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1395
            self.PLCConfig.SetScrollbars(SCROLLBAR_UNIT, SCROLLBAR_UNIT, 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1396
                maxx / SCROLLBAR_UNIT, maxy / SCROLLBAR_UNIT, posx, posy)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1397
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1398
    def RefreshPLCParams(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1399
        self.Freeze()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1400
        self.ClearSizer(self.PLCParamsSizer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1401
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1402
        if self.CTR is not None:    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1403
            plcwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1404
            if self.CTR.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1405
                bkgdclr = CHANGED_TITLE_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1406
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1407
                bkgdclr = TITLE_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1408
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1409
            if self.CTR not in self.ConfNodeInfos:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1410
                self.ConfNodeInfos[self.CTR] = {"right_visible" : False}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1411
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1412
            plcwindow.SetBackgroundColour(TITLE_COLOUR)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1413
            plcwindow.Bind(wx.EVT_LEFT_DOWN, self.OnPanelLeftDown)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1414
            self.PLCParamsSizer.AddWindow(plcwindow, 0, border=0, flag=wx.GROW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1415
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1416
            plcwindowsizer = wx.BoxSizer(wx.HORIZONTAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1417
            plcwindow.SetSizer(plcwindowsizer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1418
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1419
            st = wx.StaticText(plcwindow, -1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1420
            st.SetFont(wx.Font(faces["size"], wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1421
            st.SetLabel(self.CTR.GetProjectName())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1422
            plcwindowsizer.AddWindow(st, 0, border=5, flag=wx.ALL|wx.ALIGN_CENTER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1423
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1424
            plcwindowmainsizer = wx.BoxSizer(wx.VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1425
            plcwindowsizer.AddSizer(plcwindowmainsizer, 0, border=5, flag=wx.ALL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1426
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1427
            plcwindowbuttonsizer = wx.BoxSizer(wx.HORIZONTAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1428
            plcwindowmainsizer.AddSizer(plcwindowbuttonsizer, 0, border=0, flag=wx.ALIGN_CENTER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1429
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1430
            msizer = self.GenerateMethodButtonSizer(self.CTR, plcwindow, not self.ConfNodeInfos[self.CTR]["right_visible"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1431
            plcwindowbuttonsizer.AddSizer(msizer, 0, border=0, flag=wx.GROW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1432
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1433
        self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1434
        self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1435
        self.Thaw()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1436
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1437
    def GenerateMethodButtonSizer(self, confnode, parent, horizontal = True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1438
        normal_bt_font=wx.Font(faces["size"] / 3, wx.DEFAULT, wx.NORMAL, wx.NORMAL, faceName = faces["helv"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1439
        mouseover_bt_font=wx.Font(faces["size"] / 3, wx.DEFAULT, wx.NORMAL, wx.NORMAL, underline=True, faceName = faces["helv"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1440
        if horizontal:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1441
            msizer = wx.FlexGridSizer(cols=len(confnode.ConfNodeMethods))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1442
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1443
            msizer = wx.FlexGridSizer(cols=1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1444
        for confnode_method in confnode.ConfNodeMethods:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1445
            if "method" in confnode_method and confnode_method.get("shown",True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1446
                id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1447
                label = confnode_method["name"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1448
                button = GenBitmapTextButton(id=id, parent=parent,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1449
                    bitmap=wx.Bitmap(Bpath("images", "%s.png"%confnode_method.get("bitmap", "Unknown"))), label=label, 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1450
                    name=label, pos=wx.DefaultPosition, style=wx.NO_BORDER)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1451
                button.SetFont(normal_bt_font)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1452
                button.SetToolTipString(confnode_method["tooltip"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1453
                button.Bind(wx.EVT_BUTTON, self.GetButtonCallBackFunction(confnode, confnode_method["method"]), id=id)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1454
                # a fancy underline on mouseover
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1455
                def setFontStyle(b, s):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1456
                    def fn(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1457
                        b.SetFont(s)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1458
                        b.Refresh()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1459
                        event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1460
                    return fn
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1461
                button.Bind(wx.EVT_ENTER_WINDOW, setFontStyle(button, mouseover_bt_font))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1462
                button.Bind(wx.EVT_LEAVE_WINDOW, setFontStyle(button, normal_bt_font))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1463
                #hack to force size to mini
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1464
                if not confnode_method.get("enabled",True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1465
                    button.Disable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1466
                msizer.AddWindow(button, 0, border=0, flag=wx.ALIGN_CENTER)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1467
        return msizer
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1468
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1469
    def GenerateEnableButton(self, parent, sizer, confnode):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1470
        enabled = confnode.CTNEnabled()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1471
        if enabled is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1472
            enablebutton_id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1473
            enablebutton = wx.lib.buttons.GenBitmapToggleButton(id=enablebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Disabled.png')),
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1474
                  name='EnableButton', parent=parent, size=wx.Size(16, 16), pos=wx.Point(0, 0), style=0)#wx.NO_BORDER)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1475
            enablebutton.SetToolTipString(_("Enable/Disable this confnode"))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1476
            make_genbitmaptogglebutton_flat(enablebutton)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1477
            enablebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'Enabled.png')))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1478
            enablebutton.SetToggle(enabled)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1479
            def toggleenablebutton(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1480
                res = self.SetConfNodeParamsAttribute(confnode, "BaseParams.Enabled", enablebutton.GetToggle())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1481
                enablebutton.SetToggle(res)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1482
                event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1483
            enablebutton.Bind(wx.EVT_BUTTON, toggleenablebutton, id=enablebutton_id)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1484
            sizer.AddWindow(enablebutton, 0, border=0, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1485
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1486
            sizer.AddSpacer(wx.Size(16, 16))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1487
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1488
    def RefreshConfNodeTree(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1489
        self.Freeze()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1490
        self.ClearSizer(self.ConfNodeTreeSizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1491
        if self.CTR is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1492
            for child in self.CTR.IECSortedChildren():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1493
                self.GenerateTreeBranch(child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1494
                if not self.ConfNodeInfos[child]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1495
                    self.CollapseConfNode(child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1496
        self.PLCConfigMainSizer.Layout()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1497
        self.RefreshScrollBars()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1498
        self.Thaw()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1499
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1500
    def GenerateTreeBranch(self, confnode):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1501
        leftwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1502
        if confnode.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1503
            bkgdclr=CHANGED_WINDOW_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1504
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1505
            bkgdclr=WINDOW_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1506
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1507
        leftwindow.SetBackgroundColour(bkgdclr)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1508
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1509
        if confnode not in self.ConfNodeInfos:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1510
            self.ConfNodeInfos[confnode] = {"expanded" : False, "left_visible" : False, "right_visible" : False}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1511
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1512
        self.ConfNodeInfos[confnode]["children"] = confnode.IECSortedChildren()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1513
        confnode_infos = confnode.GetVariableLocationTree()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1514
        confnode_locations = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1515
        if len(self.ConfNodeInfos[confnode]["children"]) == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1516
            confnode_locations = confnode_infos["children"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1517
            if not self.ConfNodeInfos[confnode].has_key("locations_infos"):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1518
                self.ConfNodeInfos[confnode]["locations_infos"] = {"root": {"expanded" : False}}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1519
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1520
            self.ConfNodeInfos[confnode]["locations_infos"]["root"]["left"] = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1521
            self.ConfNodeInfos[confnode]["locations_infos"]["root"]["right"] = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1522
            self.ConfNodeInfos[confnode]["locations_infos"]["root"]["children"] = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1523
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1524
        self.ConfNodeTreeSizer.AddWindow(leftwindow, 0, border=0, flag=wx.GROW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1525
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1526
        leftwindowvsizer = wx.BoxSizer(wx.VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1527
        leftwindow.SetSizer(leftwindowvsizer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1528
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1529
        leftwindowsizer = wx.BoxSizer(wx.HORIZONTAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1530
        leftwindowvsizer.AddSizer(leftwindowsizer, 0, border=0, flag=0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1531
        
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
  1532
        #self.GenerateEnableButton(leftwindow, leftwindowsizer, confnode)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1533
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1534
        st = wx.StaticText(leftwindow, -1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1535
        st.SetFont(wx.Font(faces["size"], wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1536
        st.SetLabel(confnode.GetFullIEC_Channel())
4
e8a0af6b89d9 Adding support for LPC pous library using new Beremiz extension paradigm
Laurent Bessard
parents: 2
diff changeset
  1537
        leftwindowsizer.AddWindow(st, 0, border=5, flag=wx.LEFT|wx.RIGHT)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1538
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1539
        expandbutton_id = wx.NewId()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1540
        expandbutton = wx.lib.buttons.GenBitmapToggleButton(id=expandbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'plus.png')),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1541
              name='ExpandButton', parent=leftwindow, pos=wx.Point(0, 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1542
              size=wx.Size(13, 13), style=wx.NO_BORDER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1543
        expandbutton.labelDelta = 0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1544
        expandbutton.SetBezelWidth(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1545
        expandbutton.SetUseFocusIndicator(False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1546
        expandbutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'minus.png')))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1547
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1548
        if len(self.ConfNodeInfos[confnode]["children"]) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1549
            expandbutton.SetToggle(self.ConfNodeInfos[confnode]["expanded"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1550
            def togglebutton(event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1551
                if expandbutton.GetToggle():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1552
                    self.ExpandConfNode(confnode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1553
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1554
                    self.CollapseConfNode(confnode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1555
                self.ConfNodeInfos[confnode]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1556
                self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1557
                self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1558
                event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1559
            expandbutton.Bind(wx.EVT_BUTTON, togglebutton, id=expandbutton_id)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1560
        elif len(confnode_locations) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1561
            locations_infos = self.ConfNodeInfos[confnode]["locations_infos"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1562
            expandbutton.SetToggle(locations_infos["root"]["expanded"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1563
            def togglebutton(event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1564
                if expandbutton.GetToggle():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1565
                    self.ExpandLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1566
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1567
                    self.CollapseLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1568
                self.ConfNodeInfos[confnode]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1569
                locations_infos["root"]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1570
                self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1571
                self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1572
                event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1573
            expandbutton.Bind(wx.EVT_BUTTON, togglebutton, id=expandbutton_id)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1574
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1575
            expandbutton.Enable(False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1576
        leftwindowsizer.AddWindow(expandbutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1577
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1578
        sb = wx.StaticBitmap(leftwindow, -1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1579
        icon = confnode_infos.get("icon", None)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1580
        if icon is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1581
            icon_bitmap = self.LocationImageList.GetBitmap(self.LocationImageDict[confnode_infos["type"]])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1582
        else: 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1583
            icon_bitmap = wx.Bitmap(icon)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1584
        sb.SetBitmap(icon_bitmap)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1585
        leftwindowsizer.AddWindow(sb, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1586
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1587
        st_id = wx.NewId()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1588
        st = wx.StaticText(leftwindow, st_id, size=wx.DefaultSize, style=wx.NO_BORDER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1589
        st.SetFont(wx.Font(faces["size"] * 0.75, wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1590
        st.SetLabel(confnode.MandatoryParams[1].getName())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1591
        leftwindowsizer.AddWindow(st, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1592
        
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1593
        rightwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1594
        rightwindow.SetBackgroundColour(bkgdclr) 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1595
        rightwindowsizer = self.GenerateMethodButtonSizer(confnode, rightwindow, not self.ConfNodeInfos[confnode]["right_visible"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1596
        rightwindow.SetSizer(rightwindowsizer)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1597
        self.ConfNodeTreeSizer.AddWindow(rightwindow, 0, border=0, flag=wx.GROW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1598
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1599
        self.ConfNodeInfos[confnode]["left"] = leftwindow
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1600
        self.ConfNodeInfos[confnode]["right"] = rightwindow
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1601
        for child in self.ConfNodeInfos[confnode]["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1602
            self.GenerateTreeBranch(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1603
            if not self.ConfNodeInfos[child]["expanded"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1604
                self.CollapseConfNode(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1605
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1606
        if len(confnode_locations) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1607
            locations_infos = self.ConfNodeInfos[confnode]["locations_infos"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1608
            treectrl = wx.TreeCtrl(self.PLCConfig, -1, size=wx.DefaultSize, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1609
                                   style=wx.TR_HAS_BUTTONS|wx.TR_SINGLE|wx.NO_BORDER|wx.TR_HIDE_ROOT|wx.TR_NO_LINES|wx.TR_LINES_AT_ROOT)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1610
            treectrl.SetImageList(self.LocationImageList)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1611
            treectrl.Bind(wx.EVT_TREE_BEGIN_DRAG, self.GenerateLocationBeginDragFunction(locations_infos))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1612
            treectrl.Bind(wx.EVT_TREE_ITEM_EXPANDED, self.GenerateLocationExpandCollapseFunction(locations_infos, True))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1613
            treectrl.Bind(wx.EVT_TREE_ITEM_COLLAPSED, self.GenerateLocationExpandCollapseFunction(locations_infos, False))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1614
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1615
            treectrl.AddRoot("")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1616
            self.ConfNodeTreeSizer.AddWindow(treectrl, 0, border=0, flag=0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1617
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1618
            rightwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1619
            rightwindow.SetBackgroundColour(wx.WHITE)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1620
            self.ConfNodeTreeSizer.AddWindow(rightwindow, 0, border=0, flag=wx.GROW)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1621
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1622
            locations_infos["root"]["left"] = treectrl
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1623
            locations_infos["root"]["right"] = rightwindow
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1624
            for location in confnode_locations:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1625
                locations_infos["root"]["children"].append("root.%s" % location["name"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1626
                self.GenerateLocationTreeBranch(treectrl, treectrl.GetRootItem(), locations_infos, "root", location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1627
            if locations_infos["root"]["expanded"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1628
                self.ExpandLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1629
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1630
    def ExpandConfNode(self, confnode, force = False):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1631
        for child in self.ConfNodeInfos[confnode]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1632
            self.ConfNodeInfos[child]["left"].Show()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1633
            self.ConfNodeInfos[child]["right"].Show()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1634
            if force or self.ConfNodeInfos[child]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1635
                self.ExpandConfNode(child, force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1636
                if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1637
                    self.ConfNodeInfos[child]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1638
        locations_infos = self.ConfNodeInfos[confnode].get("locations_infos", None)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1639
        if locations_infos is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1640
            if force or locations_infos["root"]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1641
                self.ExpandLocation(locations_infos, "root", force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1642
                if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1643
                    locations_infos["root"]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1644
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1645
    def CollapseConfNode(self, confnode, force = False):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1646
        for child in self.ConfNodeInfos[confnode]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1647
            self.ConfNodeInfos[child]["left"].Hide()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1648
            self.ConfNodeInfos[child]["right"].Hide()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1649
            self.CollapseConfNode(child, force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1650
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1651
                self.ConfNodeInfos[child]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1652
        locations_infos = self.ConfNodeInfos[confnode].get("locations_infos", None)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1653
        if locations_infos is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1654
            self.CollapseLocation(locations_infos, "root", force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1655
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1656
                locations_infos["root"]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1657
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1658
    def ExpandLocation(self, locations_infos, group, force = False, refresh_size=True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1659
        locations_infos[group]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1660
        if group == "root":
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1661
            if locations_infos[group]["left"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1662
                locations_infos[group]["left"].Show()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1663
            if locations_infos[group]["right"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1664
                locations_infos[group]["right"].Show()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1665
        elif locations_infos["root"]["left"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1666
            locations_infos["root"]["left"].Expand(locations_infos[group]["item"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1667
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1668
                for child in locations_infos[group]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1669
                    self.ExpandLocation(locations_infos, child, force, False)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1670
        if locations_infos["root"]["left"] is not None and refresh_size:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1671
            self.RefreshTreeCtrlSize(locations_infos["root"]["left"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1672
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1673
    def CollapseLocation(self, locations_infos, group, force = False, refresh_size=True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1674
        locations_infos[group]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1675
        if group == "root":
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1676
            if locations_infos[group]["left"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1677
                locations_infos[group]["left"].Hide()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1678
            if locations_infos[group]["right"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1679
                locations_infos[group]["right"].Hide()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1680
        elif locations_infos["root"]["left"] is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1681
            locations_infos["root"]["left"].Collapse(locations_infos[group]["item"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1682
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1683
                for child in locations_infos[group]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1684
                    self.CollapseLocation(locations_infos, child, force, False)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1685
        if locations_infos["root"]["left"] is not None and refresh_size:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1686
            self.RefreshTreeCtrlSize(locations_infos["root"]["left"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1687
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1688
    def GenerateLocationTreeBranch(self, treectrl, root, locations_infos, parent, location):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1689
        location_name = "%s.%s" % (parent, location["name"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1690
        if not locations_infos.has_key(location_name):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1691
            locations_infos[location_name] = {"expanded" : False}
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1692
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1693
        if location["type"] in [LOCATION_VAR_INPUT, LOCATION_VAR_OUTPUT, LOCATION_VAR_MEMORY]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1694
            label = "%(name)s (%(location)s)" % location
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1695
        elif location["location"] != "":
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1696
            label = "%(location)s: %(name)s" % location
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1697
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1698
            label = location["name"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1699
        item = treectrl.AppendItem(root, label)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1700
        treectrl.SetPyData(item, location_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1701
        treectrl.SetItemImage(item, self.LocationImageDict[location["type"]])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1702
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1703
        locations_infos[location_name]["item"] = item
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1704
        locations_infos[location_name]["children"] = []
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1705
        infos = location.copy()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1706
        infos.pop("children")
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1707
        locations_infos[location_name]["infos"] = infos
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1708
        for child in location["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1709
            child_name = "%s.%s" % (location_name, child["name"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1710
            locations_infos[location_name]["children"].append(child_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1711
            self.GenerateLocationTreeBranch(treectrl, item, locations_infos, location_name, child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1712
        if locations_infos[location_name]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1713
            self.ExpandLocation(locations_infos, location_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1714
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1715
    def GenerateLocationBeginDragFunction(self, locations_infos):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1716
        def OnLocationBeginDragFunction(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1717
            item = event.GetItem()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1718
            location_name = locations_infos["root"]["left"].GetPyData(item)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1719
            if location_name is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1720
                infos = locations_infos[location_name]["infos"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1721
                if infos["type"] in [LOCATION_VAR_INPUT, LOCATION_VAR_OUTPUT, LOCATION_VAR_MEMORY]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1722
                    data = wx.TextDataObject(str((infos["location"], "location", infos["IEC_type"], infos["var_name"], infos["description"])))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1723
                    dragSource = wx.DropSource(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1724
                    dragSource.SetData(data)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1725
                    dragSource.DoDragDrop()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1726
        return OnLocationBeginDragFunction
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1727
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1728
    def RefreshTreeCtrlSize(self, treectrl):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1729
        rect = self.GetTreeCtrlItemRect(treectrl, treectrl.GetRootItem())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1730
        treectrl.SetMinSize(wx.Size(max(rect.width, rect.x + rect.width) + 20, max(rect.height, rect.y + rect.height)))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1731
        self.PLCConfigMainSizer.Layout()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1732
        self.PLCConfig.Refresh()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1733
        wx.CallAfter(self.RefreshScrollBars)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1734
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1735
    def GetTreeCtrlItemRect(self, treectrl, item):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1736
        item_rect = treectrl.GetBoundingRect(item, True)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1737
        if item_rect is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1738
            minx, miny = item_rect.x, item_rect.y
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1739
            maxx, maxy = item_rect.x + item_rect.width, item_rect.y + item_rect.height
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1740
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1741
            minx = miny = maxx = maxy = 0
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1742
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1743
        if treectrl.ItemHasChildren(item) and (item == treectrl.GetRootItem() or treectrl.IsExpanded(item)):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1744
            if wx.VERSION >= (2, 6, 0):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1745
                child, item_cookie = treectrl.GetFirstChild(item)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1746
            else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1747
                child, item_cookie = treectrl.GetFirstChild(item, 0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1748
            while child.IsOk():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1749
                child_rect = self.GetTreeCtrlItemRect(treectrl, child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1750
                minx = min(minx, child_rect.x)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1751
                miny = min(miny, child_rect.y)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1752
                maxx = max(maxx, child_rect.x + child_rect.width)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1753
                maxy = max(maxy, child_rect.y + child_rect.height)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1754
                child, item_cookie = treectrl.GetNextChild(item, item_cookie)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1755
                
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1756
        return wx.Rect(minx, miny, maxx - minx, maxy - miny)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1757
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1758
    def GenerateLocationExpandCollapseFunction(self, locations_infos, expand):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1759
        def OnLocationExpandedFunction(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1760
            item = event.GetItem()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1761
            location_name = locations_infos["root"]["left"].GetPyData(item)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1762
            if location_name is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1763
                locations_infos[location_name]["expanded"] = expand
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1764
                self.RefreshTreeCtrlSize(locations_infos["root"]["left"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1765
            event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1766
        return OnLocationExpandedFunction
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1767
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1768
    def GetButtonCallBackFunction(self, confnode, method):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1769
        """ Generate the callbackfunc for a given confnode method"""
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1770
        def OnButtonClick(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1771
            # Disable button to prevent re-entrant call 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1772
            event.GetEventObject().Disable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1773
            # Call
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1774
            getattr(confnode,method)()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1775
            # Re-enable button 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1776
            event.GetEventObject().Enable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1777
            # Trigger refresh on Idle
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1778
            wx.CallAfter(self.RefreshAll)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1779
            event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1780
        return OnButtonClick
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1781
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1782
    def ClearSizer(self, sizer):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1783
        staticboxes = []
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1784
        for item in sizer.GetChildren():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1785
            if item.IsSizer():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1786
                item_sizer = item.GetSizer()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1787
                self.ClearSizer(item_sizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1788
                if isinstance(item_sizer, wx.StaticBoxSizer):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1789
                    staticboxes.append(item_sizer.GetStaticBox())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1790
        sizer.Clear(True)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1791
        for staticbox in staticboxes:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1792
            staticbox.Destroy()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1793
                
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1794
    def RefreshAll(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1795
        Beremiz.RefreshAll(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1796
        self.RefreshPLCParams()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1797
        self.RefreshConfNodeTree()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1798
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1799
class StdoutPseudoFile:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1800
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1801
    def __init__(self, port):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1802
        self.socket = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1803
        self.socket.connect(('localhost', port))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1804
        self.Buffer = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1805
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1806
    def __del__(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1807
        self.socket.close()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1808
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1809
    def readline(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1810
        idx = self.Buffer.find("\n")
23
41616a8c80a7 Fixed bug in socket client not working properly when command length was too long
Laurent Bessard
parents: 22
diff changeset
  1811
        while idx == -1:
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1812
            self.Buffer += self.socket.recv(2048)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1813
            idx = self.Buffer.find("\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1814
        if idx != -1:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1815
            line = self.Buffer[:idx+1]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1816
            self.Buffer = self.Buffer[idx+1:]
22
45982ef9370b Disabled internationalization
Laurent Bessard
parents: 21
diff changeset
  1817
            if True:#BMZ_DBG:
45982ef9370b Disabled internationalization
Laurent Bessard
parents: 21
diff changeset
  1818
                print "command >"+line+str(len(line))
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1819
            return line
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1820
        return ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1821
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1822
    """ Base class for file like objects to facilitate StdOut for the Shell."""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1823
    def write(self, s, style = None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1824
        if s != '':
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1825
            self.socket.send(s.encode('utf8'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1826
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1827
    def writeyield(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1828
        self.write(s)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1829
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1830
    def write_warning(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1831
        self.write(s)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1832
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1833
    def write_error(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1834
        self.write(s)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1835
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1836
    def flush(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1837
        pass
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1838
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1839
    def isatty(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1840
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1841
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1842
if __name__ == '__main__':
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1843
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1844
    from threading import Thread, Timer, Semaphore
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1845
    import cmd
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1846
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1847
    wx_eval_lock = Semaphore(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1848
    eval_res = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1849
    def wx_evaluator(callable, *args, **kwargs):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1850
        global eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1851
        eval_res = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1852
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1853
            eval_res=callable(*args,**kwargs)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1854
        finally:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1855
            wx_eval_lock.release()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1856
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1857
    def evaluator(callable, *args, **kwargs):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1858
        global eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1859
        wx.CallAfter(wx_evaluator,callable,*args,**kwargs)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1860
        wx_eval_lock.acquire()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1861
        return eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1862
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1863
    # Command log for debug, for viewing from wxInspector
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1864
    if BMZ_DBG:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1865
        __builtins__.cmdlog = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1866
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1867
    class LPCBeremiz_Cmd(cmd.Cmd):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1868
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1869
        prompt = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1870
        RefreshTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1871
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1872
        def __init__(self, CTR, Log):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1873
            cmd.Cmd.__init__(self, stdin=Log, stdout=Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1874
            self.use_rawinput = False
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1875
            self.restore_last_state = False
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1876
            self.Log = Log
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1877
            self.CTR = CTR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1878
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1879
        def RestartTimer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1880
            if self.RefreshTimer is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1881
                self.RefreshTimer.cancel()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1882
            self.RefreshTimer = Timer(0.1, wx.CallAfter, args = [self.Refresh])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1883
            self.RefreshTimer.start()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1884
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1885
        def Exit(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1886
            global frame, app
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1887
            self.Close()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1888
            app.ExitMainLoop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1889
            return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1890
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1891
        def do_EOF(self, line):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1892
            return self.Exit()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1893
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1894
        def Show(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1895
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1896
            if frame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1897
                self.CTR.SetAppFrame(frame, frame.Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1898
                frame.Show()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1899
                frame.Raise()
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1900
                self.restore_last_state = True
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1901
            self.RestartTimer()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1902
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1903
        def Refresh(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1904
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1905
            if frame is not None:
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1906
                if self.restore_last_state:
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1907
                    self.restore_last_state = False
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1908
                    frame.RestoreLastState()
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1909
                else:
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1910
                    frame.RefreshEditor()
19
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
  1911
                frame._Refresh(TITLE, PROJECTTREE, POUINSTANCEVARIABLESPANEL, FILEMENU, EDITMENU)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1912
                frame.RefreshAll()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1913
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1914
        def Close(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1915
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1916
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1917
            self.CTR.ResetAppFrame(self.Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1918
            if frame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1919
                frame.Hide()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1920
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1921
        def Compile(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1922
            self.CTR._Build()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1923
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1924
        def SetProjectProperties(self, projectname, productname, productversion, companyname):
6
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1925
            new_properties = {
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1926
                "projectName": projectname,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1927
                "productName": productname,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1928
                "productVersion": productversion,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1929
                "companyName": companyname}
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1930
            self.CTR.SetProjectProperties(properties=new_properties, buffer=False)
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1931
            self.RestartTimer()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1932
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1933
        def SetOnlineMode(self, mode, path=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1934
            self.CTR.SetOnlineMode(mode, path)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1935
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1936
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1937
        def AddBus(self, iec_channel, name, icon=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1938
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1939
                if child.BaseParams.getName() == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1940
                    return "Error: A bus named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1941
                elif child.BaseParams.getIEC_Channel() == iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1942
                    return "Error: A bus with IEC_channel %d already exists\n" % iec_channel
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1943
            bus = self.CTR.CTNAddChild(name, "LPCBus", iec_channel)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1944
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1945
                return "Error: Unable to create bus\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1946
            bus.SetIcon(icon)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1947
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1948
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1949
        def RenameBus(self, iec_channel, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1950
            bus = self.CTR.GetChildByIECLocation((iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1951
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1952
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1953
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1954
                if child != bus and child.BaseParams.getName() == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1955
                    return "Error: A bus named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1956
            bus.BaseParams.setName(name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1957
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1958
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1959
        def ChangeBusIECChannel(self, old_iec_channel, new_iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1960
            bus = self.CTR.GetChildByIECLocation((old_iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1961
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1962
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1963
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1964
                if child != bus and child.BaseParams.getIEC_Channel() == new_iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1965
                    return "Error: A bus with IEC_channel %d already exists\n" % new_iec_channel
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1966
            if wx.GetApp() is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1967
                self.CTR.UpdateProjectVariableLocation(str(old_iec_channel), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1968
                                                              str(new_iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1969
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1970
                self.CTR.UpdateProjectVariableLocation(
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1971
                             str(old_iec_channel), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1972
                             str(new_iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1973
            bus.BaseParams.setIEC_Channel(new_iec_channel)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1974
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1975
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1976
        def RemoveBus(self, iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1977
            bus = self.CTR.GetChildByIECLocation((iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1978
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1979
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1980
            self.CTR.RemoveProjectVariableByFilter(str(iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1981
            self.CTR.Children["LPCBus"].remove(bus)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1982
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1983
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1984
        def AddModule(self, parent, iec_channel, name, icode, icon=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1985
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1986
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1987
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1988
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1989
                if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1990
                    return "Error: A module named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1991
                elif child["IEC_Channel"] == iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1992
                    return "Error: A module with IEC_channel %d already exists\n" % iec_channel 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1993
            _GetLastModuleGroup(module).append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1994
                                                "type": LOCATION_MODULE, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1995
                                                "IEC_Channel": iec_channel, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1996
                                                "icon": icon, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1997
                                                "init": icode, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1998
                                                "children": []})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1999
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2000
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2001
        def RenameModule(self, iec_location, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2002
            module = self.CTR.GetChildByIECLocation(iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2003
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2004
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2005
            parent = self.CTR.GetChildByIECLocation(iec_location[:-1])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2006
            if parent is self.CTR:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2007
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2008
            if module["name"] != name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2009
                for child in _GetModuleChildren(parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2010
                    if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2011
                        return "Error: A module named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2012
                module["name"] = name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2013
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2014
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2015
        def ChangeModuleIECChannel(self, old_iec_location, new_iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2016
            module = self.CTR.GetChildByIECLocation(old_iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2017
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2018
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2019
            parent = self.CTR.GetChildByIECLocation(old_iec_location[:-1])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2020
            if parent is self.CTR:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2021
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2022
            if module["IEC_Channel"] != new_iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2023
                for child in _GetModuleChildren(parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2024
                    if child["IEC_Channel"] == new_iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2025
                        return "Error: A module with IEC_channel %d already exists\n" % new_iec_channel
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2026
            self.CTR.UpdateProjectVariableLocation(".".join(map(str, old_iec_location)), ".".join(map(str, old_iec_location[:1] + (new_iec_channel,))))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2027
            module["IEC_Channel"] = new_iec_channel
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2028
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2029
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2030
        def ChangeModuleInitCode(self, iec_location, icode):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2031
            module = self.CTR.GetChildByIECLocation(iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2032
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2033
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2034
            module["init"] = icode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2035
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2036
        def RemoveModule(self, parent, iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2037
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2038
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2039
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2040
            child = _GetModuleBySomething(module, "IEC_Channel", (iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2041
            if child is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2042
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2043
            self.CTR.RemoveProjectVariableByFilter(".".join(map(str, parent + (iec_channel,))))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2044
            _RemoveModuleChild(module, child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2045
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2046
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2047
        def StartGroup(self, parent, name, icon=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2048
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2049
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2050
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2051
            for child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2052
                if child["type"] == LOCATION_GROUP and child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2053
                    return "Error: A group named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2054
            module["children"].append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2055
                                      "type": LOCATION_GROUP, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2056
                                      "icon": icon, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2057
                                      "children": []})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2058
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2059
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2060
        def AddVariable(self, parent, location, name, direction, type, rcode, pcode, description=""):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2061
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2062
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2063
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2064
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2065
                if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2066
                    return "Error: A variable named %s already exists\n" % name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2067
                if child["location"] == location and child["type"] == LOCATION_TYPES[direction]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2068
                    return "Error: A variable with location %s already exists\n" % ".".join(map(str, location))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2069
            _GetLastModuleGroup(module).append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2070
                                                "location": location, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2071
                                                "type": LOCATION_TYPES[direction], 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2072
                                                "IEC_type": type, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2073
                                                "description": description, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2074
                                                "retrieve": rcode, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2075
                                                "publish": pcode})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2076
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2077
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2078
        def ChangeVariableParams(self, parent, location, new_name, new_direction, new_type, new_rcode, new_pcode, new_description=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2079
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2080
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2081
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2082
            variable = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2083
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2084
                if child["location"] == location and child["type"] == LOCATION_TYPES[new_direction]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2085
                    variable = child
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2086
                elif child["name"] == new_name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2087
                    return "Error: A variable named %s already exists\n" % new_name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2088
            if variable is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2089
                return "Error: No variable found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2090
            if variable["name"] != new_name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2091
                self.CTR.UpdateProjectVariableName(variable["name"], new_name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2092
                variable["name"] = new_name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2093
            variable["type"] = LOCATION_TYPES[new_direction]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2094
            variable["IEC_type"] = new_type
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2095
            variable["retrieve"] = new_rcode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2096
            variable["publish"] = new_pcode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2097
            if new_description is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2098
                variable["description"] = new_description
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2099
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2100
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2101
        def RemoveVariable(self, parent, location, direction):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2102
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2103
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2104
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2105
            child = _GetModuleVariable(module, location, direction)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2106
            if child is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2107
                return "Error: No variable found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2108
            size = LOCATION_SIZES[self.CTR.GetBaseType(child["IEC_type"])]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2109
            address = "%" + LOCATION_DIRS[child["type"]] + size + ".".join(map(str, parent + location))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2110
            self.CTR.RemoveProjectVariableByAddress(address)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2111
            _RemoveModuleChild(module, child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2112
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2113
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2114
    def location(loc):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2115
        return tuple(map(int, loc.split(".")))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2116
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2117
    def GetCmdFunction(function, arg_types, opt=0):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2118
        arg_number = len(arg_types)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2119
        def CmdFunction(self, line):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2120
            args_toks = line.split('"')
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2121
            if len(args_toks) % 2 == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2122
                self.Log.write("Error: Invalid command\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2123
                sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2124
                return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2125
            args = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2126
            for num, arg in enumerate(args_toks):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2127
                if num % 2 == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2128
                    stripped = arg.strip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2129
                    if stripped:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2130
                        args.extend(stripped.split(" "))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2131
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2132
                    args.append(arg)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2133
            number = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2134
            extra = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2135
            if opt == 0 and len(args) != arg_number:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2136
                number = arg_number
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2137
            elif len(args) > arg_number:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2138
                number = arg_number
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2139
                extra = " at most"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2140
            elif len(args) < arg_number - opt:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2141
                number = arg_number - opt
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2142
                extra = " at least"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2143
            if number is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2144
                if number == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2145
                    self.Log.write("Error: No argument%s expected\n" % extra)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2146
                elif number == 1:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2147
                    self.Log.write("Error: 1 argument%s expected\n" % extra)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2148
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2149
                    self.Log.write("Error: %d arguments%s expected\n" % (number, extra))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2150
                sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2151
                return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2152
            for num, arg in enumerate(args):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2153
                try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2154
                    args[num] = arg_types[num](arg)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2155
                except:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2156
                    self.Log.write("Error: Invalid value for argument %d\n" % (num + 1))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2157
                    sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2158
                    return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2159
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2160
            func = getattr(self, function)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2161
            res = evaluator(func,*args)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2162
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2163
            if BMZ_DBG:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2164
                cmdlog.append((function,line,res))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2165
                if len(cmdlog) > 100: #prevent debug log to grow too much
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2166
                    cmdlog.pop(0) 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2167
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2168
            if isinstance(res, (StringType, UnicodeType)):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2169
                self.Log.write(res)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2170
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2171
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2172
                return res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2173
        return CmdFunction
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2174
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2175
    def CmdThreadProc(CTR, Log):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2176
        global lpcberemiz_cmd
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2177
        for function, (arg_types, opt) in {"Exit": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2178
                                           "Show": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2179
                                           "Refresh": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2180
                                           "Close": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2181
                                           "Compile": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2182
                                           "SetProjectProperties": ([str, str, str, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2183
                                           "SetOnlineMode": ([str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2184
                                           "AddBus": ([int, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2185
                                           "RenameBus": ([int, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2186
                                           "ChangeBusIECChannel": ([int, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2187
                                           "RemoveBus": ([int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2188
                                           "AddModule": ([location, int, str, str, str], 1), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2189
                                           "RenameModule": ([location, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2190
                                           "ChangeModuleIECChannel": ([location, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2191
                                           "ChangeModuleInitCode": ([location, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2192
                                           "RemoveModule": ([location, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2193
                                           "StartGroup": ([location, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2194
                                           "AddVariable": ([location, location, str, str, str, str, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2195
                                           "ChangeVariableParams": ([location, location, str, str, str, str, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2196
                                           "RemoveVariable": ([location, location], 0)}.iteritems():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2197
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2198
            setattr(LPCBeremiz_Cmd, "do_%s" % function, GetCmdFunction(function, arg_types, opt))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2199
        lpcberemiz_cmd = LPCBeremiz_Cmd(CTR, Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2200
        lpcberemiz_cmd.cmdloop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2201
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2202
    Log = StdoutPseudoFile(port)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2203
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2204
    CTR = LPCProjectController(None, Log, buildpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2205
    if projectOpen is not None and os.path.isdir(projectOpen):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2206
        result = CTR.LoadProject(projectOpen)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2207
        if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2208
            Log.write("Error: Invalid project directory", result)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2209
    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2210
        Log.write("Error: No such file or directory")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2211
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2212
    cmd_thread=Thread(target=CmdThreadProc, args=[CTR, Log])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2213
    cmd_thread.start()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2214
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2215
    # Install a exception handle for bug reports
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2216
    AddExceptHook(os.getcwd(),__version__)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2217
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2218
    frame = LPCBeremiz(None, ctr=CTR, debug=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2219
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2220
    app.MainLoop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2221