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