LPCManager.py
author Laurent Bessard
Tue, 07 May 2013 12:27:35 +0200
changeset 49 f340728940f6
parent 43 003a9ae0cf66
child 50 ed1f9752f929
permissions -rwxr-xr-x
Fixed bug when forcing STRING variables
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
40
000de4f24ab2 Fixed Save As... function in Beremiz
Laurent Bessard
parents: 39
diff changeset
   397
    def CTNRequestSave(self, from_project_path=None):
0
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
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   698
        self.ConnectorPath = None
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   699
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   700
        self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   701
        self.previous_mode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   702
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   703
        self.SimulationBuildPath = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   704
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   705
        self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   706
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   707
    def GetProjectInfos(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   708
        infos = PLCControler.GetProjectInfos(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   709
        configurations = infos["values"].pop(-1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   710
        resources = None
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   711
        for config_infos in configurations["values"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   712
            if resources is None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   713
                resources = config_infos["values"][0]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   714
            else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   715
                resources["values"].extend(config_infos["values"][0]["values"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   716
        if resources is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   717
            infos["values"].append(resources)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   718
        return infos
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   719
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   720
    def GetProjectName(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   721
        return self.Project.getname()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   722
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   723
    def GetDefaultTargetName(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   724
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   725
            return ProjectController.GetDefaultTargetName(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   726
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   727
            return "LPC"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   728
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   729
    def GetTarget(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   730
        target = ProjectController.GetTarget(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   731
        if self.CurrentMode != SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   732
            target.getcontent()["value"].setBuildPath(self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   733
        return target
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   734
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   735
    def _getBuildPath(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   736
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   737
            if self.SimulationBuildPath is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   738
                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
   739
            return self.SimulationBuildPath
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   740
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   741
            return ProjectController._getBuildPath(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   742
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   743
    def _Build(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   744
        save = self.ProjectTestModified()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   745
        if save:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   746
            self.SaveProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   747
            self.AppFrame._Refresh(TITLE, FILEMENU)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   748
        if self.BuildPath is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   749
            mycopytree(self.OrigBuildPath, self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   750
        ProjectController._Build(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   751
        if save:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   752
            wx.CallAfter(self.AppFrame.RefreshAll)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   753
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   754
    def SetProjectName(self, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   755
        return self.Project.setname(name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   756
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   757
    def SetOnlineMode(self, mode, path=None):
43
003a9ae0cf66 Cope with ne SetOnlineMode behaviour
Edouard Tisserant
parents: 40
diff changeset
   758
        mode = mode.upper()
003a9ae0cf66 Cope with ne SetOnlineMode behaviour
Edouard Tisserant
parents: 40
diff changeset
   759
        if self.OnlineMode != mode:
003a9ae0cf66 Cope with ne SetOnlineMode behaviour
Edouard Tisserant
parents: 40
diff changeset
   760
            if mode not in ["OFF", ""]:
003a9ae0cf66 Cope with ne SetOnlineMode behaviour
Edouard Tisserant
parents: 40
diff changeset
   761
                self.OnlineMode = mode
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   762
                self.ConnectorPath = path
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   763
                uri = "LPC://%s/%s" % (self.OnlineMode,path)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   764
                try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   765
                    self.LPCConnector = connectors.ConnectorFactory(uri, self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   766
                except Exception, msg:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   767
                    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
   768
                    self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   769
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   770
                # Did connection success ?
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   771
                if self.LPCConnector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   772
                    # Oups.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   773
                    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
   774
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   775
            else:
43
003a9ae0cf66 Cope with ne SetOnlineMode behaviour
Edouard Tisserant
parents: 40
diff changeset
   776
                self.OnlineMode = "OFF"
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   777
                self.LPCConnector = None
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   778
                self.ConnectorPath = None
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   779
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   780
            self.ApplyOnlineMode()
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
    def ApplyOnlineMode(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   783
        if self.CurrentMode != SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   784
            self.KillDebugThread()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   785
            
35
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   786
            self._SetConnector(self.LPCConnector)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   787
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   788
            # Init with actual PLC status and print it
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   789
            self.UpdateMethodsFromPLCStatus()
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.LPCConnector is not None and self.OnlineMode == "APPLICATION":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   792
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   793
                self.CompareLocalAndRemotePLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   794
                            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   795
                if self.previous_plcstate is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   796
                    status = _(self.previous_plcstate)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   797
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   798
                    status = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   799
                self.logger.write(_("PLC is %s\n")%status)
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.StatusTimer and not self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   802
                #    # Start the status Timer
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   803
                #    self.StatusTimer.Start(milliseconds=2000, oneShot=False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   804
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   805
                if self.previous_plcstate=="Started":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   806
                    if self.DebugAvailable() and self.GetIECProgramsAndVariables():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   807
                        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
   808
                        self._connect_debug()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   809
                    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   810
                        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
   811
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   812
            elif self.StatusTimer and self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   813
                self.StatusTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   814
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   815
            if self.CurrentMode == TRANSFER_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   816
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   817
                if self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   818
                    self.BeginTransfer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   819
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   820
                elif self.OnlineMode == "APPLICATION":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   821
                    self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   822
                    self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   823
                    self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   824
                    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   825
                    self.logger.write(_("PLC transferred successfully\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   826
    
21
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   827
    # 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
   828
    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
   829
        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
   830
        self.BufferProject()
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
   831
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   832
    # Update a PLCOpenEditor Pou variable name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   833
    def UpdateProjectVariableName(self, old_name, new_name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   834
        self.Project.updateElementName(old_name, new_name)
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 RemoveProjectVariableByAddress(self, address):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   838
        self.Project.removeVariableByAddress(address)
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
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   841
    def RemoveProjectVariableByFilter(self, leading):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   842
        self.Project.removeVariableByFilter(leading)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   843
        self.BufferProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   844
19
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   845
    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
   846
        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
   847
        
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   848
        self.SetEditedResourceInfos(
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   849
            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
   850
            [{"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
   851
              "Triggering": "Cyclic",
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   852
              "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
   853
              "Priority": 0}],
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   854
            [])
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   855
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   856
    def LoadProject(self, ProjectPath, BuildPath=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   857
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   858
        Load a project contained in a folder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   859
        @param ProjectPath: path of the project folder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   860
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   861
        if os.path.basename(ProjectPath) == "":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   862
            ProjectPath = os.path.dirname(ProjectPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   863
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   864
        # Verify that project contains a PLCOpen program
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   865
        plc_file = os.path.join(ProjectPath, "plc.xml")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   866
        if os.path.isfile(plc_file):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   867
            # Load PLCOpen file
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   868
            result = self.OpenXMLFile(plc_file)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   869
            if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   870
                return result
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   871
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   872
            self.CreateNewProject({"companyName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   873
                                   "productName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   874
                                   "productVersion": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   875
                                   "projectName": "",
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   876
                                   "pageSize": (0, 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   877
                                   "scaling": {}})
19
1ef6f6fddaa8 Adding support for creating default configuration to newly created project and project without one defined
Laurent Bessard
parents: 18
diff changeset
   878
        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
   879
            self.AddProjectDefaultConfiguration()
0
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
        # Change XSD into class members
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   882
        self._AddParamsMembers()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   883
        self.Children = {}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   884
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   885
        # 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
   886
        self.ProjectPath = ProjectPath
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
        self.BuildPath = self._getBuildPath()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   889
        if self.OrigBuildPath is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   890
            mycopytree(self.OrigBuildPath, self.BuildPath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   891
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   892
        # 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
   893
        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
   894
            #Load the confnode.xml file into parameters members
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   895
            result = self.LoadXMLParams()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   896
            if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   897
                return result
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   898
            #Load and init all the children
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   899
            self.LoadChildren()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   900
        
26
735464c8616a Added parameter in command line for defining main control module type (conditioning canopen interface availability)
Laurent Bessard
parents: 25
diff changeset
   901
        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
   902
        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
   903
            canopen = self.CTNAddChild("CanOpen", "CanOpen", 0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   904
            canopen.LoadChildren()
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
   905
            canopen.CTNRequestSave()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   906
        
26
735464c8616a Added parameter in command line for defining main control module type (conditioning canopen interface availability)
Laurent Bessard
parents: 25
diff changeset
   907
        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
   908
            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
   909
        
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   910
        if self.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   911
            self.SaveProject()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   912
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   913
        if wx.GetApp() is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   914
            self.RefreshConfNodesBlockLists()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   915
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   916
            wx.CallAfter(self.RefreshConfNodesBlockLists)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   917
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   918
        return None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   919
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   920
    def UpdateMethodsFromPLCStatus(self):
35
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   921
        simulating = self.CurrentMode == SIMULATION_MODE
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   922
        if self.OnlineMode == "OFF":
35
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   923
            if simulating:
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   924
                status, log_count = self._connector.GetPLCstatus()
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   925
                self.UpdatePLCLog(log_count)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   926
            status = "Disconnected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   927
        elif self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   928
            status = "Connected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   929
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   930
            if self._connector is not None:
30
9cd6bc93ed89 Fixed support for logging and simulation
Laurent Bessard
parents: 28
diff changeset
   931
                status, log_count = self._connector.GetPLCstatus()
35
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   932
                if status == "Disconnected":
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   933
                    self._SetConnector(None)
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   934
                else:
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
   935
                    self.UpdatePLCLog(log_count)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   936
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   937
                status = "Disconnected"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   938
        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
   939
            for args in {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   940
                     "Started" :     [("_Simulate", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   941
                                      ("_Run", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   942
                                      ("_Stop", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   943
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   944
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   945
                     "Stopped" :     [("_Simulate", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   946
                                      ("_Run", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   947
                                      ("_Stop", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   948
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   949
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   950
                     "Connected" :   [("_Simulate", not simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   951
                                      ("_Run", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   952
                                      ("_Stop", simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   953
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   954
                                      ("_Transfer", True)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   955
                     "Disconnected" :[("_Simulate", not simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   956
                                      ("_Run", False),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   957
                                      ("_Stop", simulating),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   958
                                      ("_Build", True),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   959
                                      ("_Transfer", False)],
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   960
                   }.get(status,[]):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   961
                self.ShowMethod(*args)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   962
            self.previous_plcstate = status
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   963
            self.previous_mode = self.CurrentMode
30
9cd6bc93ed89 Fixed support for logging and simulation
Laurent Bessard
parents: 28
diff changeset
   964
            if self.AppFrame is not None:
9cd6bc93ed89 Fixed support for logging and simulation
Laurent Bessard
parents: 28
diff changeset
   965
                self.AppFrame.RefreshStatusToolBar()
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   966
                connection_text = _("Connected to: ")
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   967
                status_text = ""
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   968
                if simulating:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   969
                    connection_text += _("Simulation")
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   970
                    status_text += _("ON")
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   971
                if status == "Disconnected":
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   972
                    if not simulating:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   973
                        self.AppFrame.ConnectionStatusBar.SetStatusText(_(status), 1)
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   974
                        self.AppFrame.ConnectionStatusBar.SetStatusText('', 2)
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   975
                    else:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   976
                        self.AppFrame.ConnectionStatusBar.SetStatusText(connection_text, 1)
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   977
                        self.AppFrame.ConnectionStatusBar.SetStatusText(status_text, 2)
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   978
                else:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   979
                    if simulating:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   980
                        connection_text += " (%s)"
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   981
                        status_text += " (%s)"
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   982
                    else:
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   983
                        connection_text += "%s"
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   984
                        status_text += "%s"
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   985
                    self.AppFrame.ConnectionStatusBar.SetStatusText(connection_text % self.ConnectorPath, 1)
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
   986
                    self.AppFrame.ConnectionStatusBar.SetStatusText(status_text % _(status), 2)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   987
            return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   988
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   989
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   990
    def Generate_plc_declare_locations(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   991
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   992
        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
   993
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   994
        return """#include "iec_types_all.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   995
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   996
#define __LOCATED_VAR(type, name, ...) \
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   997
type beremiz_##name;\
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
   998
type *name = &beremiz_##name;
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
#include "LOCATED_VARIABLES.h"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1001
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1002
#undef __LOCATED_VAR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1003
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1004
"""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1005
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1006
    def Generate_lpc_retain_array_sim(self):
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
        Support for retain array in Simulation
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
        return """/* Support for retain array */
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1011
#define USER_RETAIN_ARRAY_SIZE 2000
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1012
#define NUM_OF_COLS    3
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1013
unsigned char readOK = 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1014
unsigned int foundIndex = USER_RETAIN_ARRAY_SIZE;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1015
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
  1016
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1017
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
  1018
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1019
    if(READ == 1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1020
    {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1021
        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
  1022
        {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1023
            readOK = 1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1024
            return retainArray[INDEX][COLUMN];
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
    }
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
    readOK = 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1029
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1030
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1031
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1032
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
  1033
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1034
    if(WRITE == 1)
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
        if((0<=INDEX) && (INDEX<USER_RETAIN_ARRAY_SIZE))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1037
        {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1038
            retainArray[INDEX][0] = WORD1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1039
            retainArray[INDEX][1] = WORD2;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1040
            retainArray[INDEX][2] = WORD3;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1041
            return 1;
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
    }
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
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1046
}
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
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
  1049
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1050
    unsigned int i;
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
    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
  1053
    {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1054
        for(i=START_IDX;i<=END_IDX;i++)
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
            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
  1057
            {
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1058
                foundIndex = i;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1059
                return 1;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1060
            }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1061
        }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1062
    }
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1063
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1064
    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
  1065
    return 0;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1066
}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1067
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1068
/* 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
  1069
unsigned char __GetReadStatus(unsigned char dummy)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1070
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1071
    return readOK;
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1072
}
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
unsigned int __GetFoundIndex(unsigned char dummy)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1075
{
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1076
    return foundIndex;
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
"""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1079
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1080
    def _Simulate(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1081
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1082
        Method called by user to Simulate PLC
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1083
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1084
        self.CurrentMode = SIMULATION_MODE
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1085
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1086
        uri = "LOCAL://"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1087
        try:
35
cb9da964a178 Fixed bugs with pulling plc status and log count
Laurent Bessard
parents: 32
diff changeset
  1088
            self._SetConnector(connectors.ConnectorFactory(uri, self))
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1089
        except Exception, msg:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1090
            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
  1091
            self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1092
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1093
        # Did connection success ?
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1094
        if self._connector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1095
            # Oups.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1096
            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
  1097
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1098
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1099
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1100
        buildpath = self._getBuildPath()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1101
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1102
        # Eventually create build dir
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1103
        if not os.path.exists(buildpath):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1104
            os.makedirs(buildpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1105
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1106
        # Generate SoftPLC IEC code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1107
        IECGenRes = self._Generate_SoftPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1108
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1109
         # If IEC code gen fail, bail out.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1110
        if not IECGenRes:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1111
            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
  1112
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1113
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1114
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1115
        # 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
  1116
        # CSV file generated by IEC2C compiler.
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1117
        self.ResetIECProgramsAndVariables()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1118
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1119
        gen_result = self.CTNGenerate_C(buildpath, self.PLCGeneratedLocatedVars)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1120
        CTNCFilesAndCFLAGS, CTNLDFLAGS, DoCalls = gen_result[:3]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1121
        # 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
  1122
        if CTNCFilesAndCFLAGS:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1123
            self.LocationCFilesAndCFLAGS = [(self.GetCurrentLocation(), CTNCFilesAndCFLAGS, DoCalls)]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1124
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1125
            self.LocationCFilesAndCFLAGS = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1126
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1127
        # confnode asks for some LDFLAGS
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1128
        if CTNLDFLAGS:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1129
            # LDFLAGS can be either string
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1130
            if type(CTNLDFLAGS)==type(str()):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1131
                self.LDFLAGS=[CTNLDFLAGS]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1132
            #or list of strings
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1133
            elif type(CTNLDFLAGS)==type(list()):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1134
                self.LDFLAGS=CTNLDFLAGS[:]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1135
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1136
            self.LDFLAGS=[]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1137
        
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
  1138
        # Header file for extensions
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
  1139
        open(os.path.join(buildpath,"beremiz.h"), "w").write(targets.GetHeader())
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
  1140
        
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1141
        # Template based part of C code generation
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1142
        # 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
  1143
        for generator, filename, name in [
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1144
           # debugger code
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1145
           (self.Generate_plc_debugger, "plc_debugger.c", "Debugger"),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1146
           # init/cleanup/retrieve/publish, run and align code
30
9cd6bc93ed89 Fixed support for logging and simulation
Laurent Bessard
parents: 28
diff changeset
  1147
           (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
  1148
           # 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
  1149
           (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
  1150
           # 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
  1151
           (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
  1152
            try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1153
                # Do generate
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1154
                code = generator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1155
                if code is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1156
                     raise
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1157
                code_path = os.path.join(buildpath,filename)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1158
                open(code_path, "w").write(code)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1159
                # 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
  1160
                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
  1161
            except Exception, exc:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1162
                self.logger.write_error(name+_(" generation failed !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1163
                self.logger.write_error(traceback.format_exc())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1164
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1165
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1166
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1167
        # Get simulation builder
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1168
        builder = self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1169
        if builder is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1170
            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
  1171
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1172
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1173
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1174
        # Build
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1175
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1176
            if not builder.build() :
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1177
                self.logger.write_error(_("C Build failed.\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1178
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1179
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1180
        except Exception, exc:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1181
            self.logger.write_error(_("C Build crashed !\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1182
            self.logger.write_error(traceback.format_exc())
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
            return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1185
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1186
        data = builder.GetBinaryCode()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1187
        if data is not None :
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1188
            if self._connector.NewPLC(builder.GetBinaryCodeMD5(), data, []):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1189
                self.UnsubscribeAllDebugIECVariable()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1190
                self.ProgramTransferred()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1191
                if self.AppFrame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1192
                    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
  1193
                    self.AppFrame.RefreshPouInstanceVariablesPanel()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1194
                self.logger.write(_("Transfer completed successfully.\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1195
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1196
                self.logger.write_error(_("Transfer failed\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1197
                self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1198
                return False
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
        self._Run()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1201
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1202
        if not self.StatusTimer.IsRunning():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1203
            # Start the status Timer
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1204
            self.StatusTimer.Start(milliseconds=500, oneShot=False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1205
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1206
    def StopSimulation(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1207
        self.CurrentMode = None
39
38a01052693f Removed Beremiz service taskbar icon when simulating PLC
Laurent Bessard
parents: 37
diff changeset
  1208
        self._SetConnector(None)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1209
        self.ApplyOnlineMode()
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
    def _Stop(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1212
        ProjectController._Stop(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1213
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1214
        if self.CurrentMode == SIMULATION_MODE:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1215
            self.StopSimulation()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1216
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1217
    def CompareLocalAndRemotePLC(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1218
        if self.LPCConnector is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1219
            return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1220
        # We are now connected. Update button status
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1221
        MD5 = self.GetLastBuildMD5()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1222
        # Check remote target PLC correspondance to that md5
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1223
        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
  1224
            # warns controller that program match
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1225
            self.ProgramTransferred()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1226
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1227
    def ResetBuildMD5(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1228
        builder=self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1229
        if builder is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1230
            builder.ResetBinaryCodeMD5(self.OnlineMode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1231
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1232
    def GetLastBuildMD5(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1233
        builder=self.GetBuilder()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1234
        if builder is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1235
            return builder.GetBinaryCodeMD5(self.OnlineMode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1236
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1237
            return None
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
    def _Transfer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1240
        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
  1241
            self.CurrentMode = TRANSFER_MODE
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1242
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1243
            if ProjectController._Build(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1244
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1245
                ID_ABORTTRANSFERTIMER = wx.NewId()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1246
                self.AbortTransferTimer = wx.Timer(self.AppFrame, ID_ABORTTRANSFERTIMER)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1247
                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
  1248
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1249
                if self.OnlineMode == "BOOTLOADER":
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1250
                    self.BeginTransfer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1251
                
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(_("Resetting PLC\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1254
                    #self.StatusTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1255
                    self.LPCConnector.ResetPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1256
                    self.AbortTransferTimer.Start(milliseconds=5000, oneShot=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1257
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1258
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1259
                self.CurrentMode = 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
    def BeginTransfer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1262
        self.logger.write(_("Start PLC transfer\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1263
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1264
        self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1265
        ProjectController._Transfer(self)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1266
        self.AbortTransferTimer.Start(milliseconds=5000, oneShot=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1267
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1268
    def AbortTransfer(self, event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1269
        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
  1270
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1271
        self.CurrentMode = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1272
        self.AbortTransferTimer.Stop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1273
        self.AbortTransferTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1274
        event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1275
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1276
    def _Run(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1277
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1278
        Start PLC
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1279
        """
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1280
        if self.GetIECProgramsAndVariables():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1281
            self._connector.StartPLC()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1282
            self.logger.write(_("Starting PLC\n"))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1283
            self._connect_debug()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1284
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1285
            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
  1286
        self.UpdateMethodsFromPLCStatus()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1287
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1288
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1289
#                              LPCBeremiz Class
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1290
#-------------------------------------------------------------------------------
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1291
lpcberemiz_cmd=None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1292
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1293
class LPCBeremiz(Beremiz):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1294
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1295
    def _init_coll_FileMenu_Items(self, parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1296
        AppendMenu(parent, help='', id=wx.ID_SAVE,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1297
              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
  1298
        AppendMenu(parent, help='', id=wx.ID_CLOSE,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1299
              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
  1300
        parent.AppendSeparator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1301
        AppendMenu(parent, help='', id=wx.ID_PAGE_SETUP,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1302
              kind=wx.ITEM_NORMAL, text=_(u'Page Setup'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1303
        AppendMenu(parent, help='', id=wx.ID_PREVIEW,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1304
              kind=wx.ITEM_NORMAL, text=_(u'Preview'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1305
        AppendMenu(parent, help='', id=wx.ID_PRINT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1306
              kind=wx.ITEM_NORMAL, text=_(u'Print'))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1307
        parent.AppendSeparator()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1308
        AppendMenu(parent, help='', id=wx.ID_EXIT,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1309
              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
  1310
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1311
        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
  1312
        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
  1313
        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
  1314
        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
  1315
        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
  1316
        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
  1317
    
16
3eaac9927941 Fix bug in icon names for file menu toolbar items
Laurent Bessard
parents: 15
diff changeset
  1318
        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
  1319
                               (wx.ID_PRINT, "print", _(u'Print'), None)])
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1320
    
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1321
    def _init_coll_AddMenu_Items(self, parent):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1322
        IDEFrame._init_coll_AddMenu_Items(self, parent, False)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1323
        new_id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1324
        AppendMenu(parent, help='', id=new_id,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1325
                  kind=wx.ITEM_NORMAL, text=_(u'&Resource'))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1326
        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
  1327
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1328
    def _init_ctrls(self, prnt):
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1329
        Beremiz._init_ctrls(self, prnt)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1330
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1331
        self.PLCConfig = wx.ScrolledWindow(id=ID_BEREMIZPLCCONFIG,
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1332
              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
  1333
              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
  1334
        self.PLCConfig.SetBackgroundColour(wx.WHITE)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1335
        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
  1336
        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
  1337
        self.MainTabs["PLCConfig"] = (self.PLCConfig, _("Topology"))
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1338
        self.LeftNoteBook.InsertPage(0, self.PLCConfig, _("Topology"), True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1339
        
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1340
        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
  1341
        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
  1342
        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
  1343
        self.ConfNodeTreeSizer.AddGrowableCol(0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1344
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1345
        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
  1346
        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
  1347
        self.PLCConfigMainSizer.AddGrowableCol(0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1348
        self.PLCConfigMainSizer.AddGrowableRow(1)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1349
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1350
        self.PLCConfig.SetSizer(self.PLCConfigMainSizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1351
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1352
        self.AUIManager.Update()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1353
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1354
    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
  1355
        self.ConfNodeInfos = {}
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1356
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1357
        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
  1358
    
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1359
    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
  1360
        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
  1361
    
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1362
    def OnCloseFrame(self, event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1363
        global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1364
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1365
        if self.CheckSaveBeforeClosing(_("Close Application")):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1366
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1367
            frame.Hide()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1368
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1369
            self.CTR.ResetAppFrame(lpcberemiz_cmd.Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1370
            if self.CTR.OnlineMode == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1371
                self.CTR._connector = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1372
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1373
            self.CTR.KillDebugThread()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1374
            self.KillLocalRuntime()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1375
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1376
            self.SaveLastState()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1377
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1378
            lpcberemiz_cmd.Log.write("Closed\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1379
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1380
        event.Veto()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1381
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1382
    def OnMoveWindow(self, event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1383
        self.GetBestSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1384
        self.RefreshScrollBars()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1385
        event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1386
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1387
    def OnPanelLeftDown(self, event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1388
        focused = self.FindFocus()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1389
        if isinstance(focused, TextCtrlAutoComplete):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1390
            focused.DismissListBox()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1391
        event.Skip()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1392
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1393
    def RefreshFileMenu(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1394
        MenuToolBar = self.Panes["MenuToolBar"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1395
        if self.CTR is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1396
            selected = self.TabsOpened.GetSelection()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1397
            if selected >= 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1398
                graphic_viewer = isinstance(self.TabsOpened.GetPage(selected), Viewer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1399
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1400
                graphic_viewer = False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1401
            if self.TabsOpened.GetPageCount() > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1402
                self.FileMenu.Enable(wx.ID_CLOSE, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1403
                if graphic_viewer:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1404
                    self.FileMenu.Enable(wx.ID_PREVIEW, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1405
                    self.FileMenu.Enable(wx.ID_PRINT, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1406
                    MenuToolBar.EnableTool(wx.ID_PRINT, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1407
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1408
                    self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1409
                    self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1410
                    MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1411
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1412
                self.FileMenu.Enable(wx.ID_CLOSE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1413
                self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1414
                self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1415
                MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1416
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1417
            project_modified = self.CTR.ProjectTestModified()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1418
            self.FileMenu.Enable(wx.ID_SAVE, project_modified)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1419
            MenuToolBar.EnableTool(wx.ID_SAVE, project_modified)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1420
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1421
            self.FileMenu.Enable(wx.ID_CLOSE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1422
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1423
            self.FileMenu.Enable(wx.ID_PREVIEW, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1424
            self.FileMenu.Enable(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1425
            MenuToolBar.EnableTool(wx.ID_PRINT, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1426
            self.FileMenu.Enable(wx.ID_SAVE, False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1427
            MenuToolBar.EnableTool(wx.ID_SAVE, False)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1428
            
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1429
    def RefreshScrollBars(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1430
        xstart, ystart = self.PLCConfig.GetViewStart()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1431
        window_size = self.PLCConfig.GetClientSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1432
        sizer = self.PLCConfig.GetSizer()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1433
        if sizer:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1434
            maxx, maxy = sizer.GetMinSize()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1435
            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
  1436
            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
  1437
            self.PLCConfig.Scroll(posx, posy)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1438
            self.PLCConfig.SetScrollbars(SCROLLBAR_UNIT, SCROLLBAR_UNIT, 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1439
                maxx / SCROLLBAR_UNIT, maxy / SCROLLBAR_UNIT, posx, posy)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1440
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1441
    def RefreshPLCParams(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1442
        self.Freeze()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1443
        self.ClearSizer(self.PLCParamsSizer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1444
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1445
        if self.CTR is not None:    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1446
            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
  1447
            if self.CTR.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1448
                bkgdclr = CHANGED_TITLE_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1449
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1450
                bkgdclr = TITLE_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1451
                
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1452
            plcwindow.SetBackgroundColour(TITLE_COLOUR)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1453
            plcwindow.Bind(wx.EVT_LEFT_DOWN, self.OnPanelLeftDown)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1454
            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
  1455
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1456
            plcwindowsizer = wx.BoxSizer(wx.HORIZONTAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1457
            plcwindow.SetSizer(plcwindowsizer)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1458
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1459
            st = wx.StaticText(plcwindow, -1)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1460
            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
  1461
            st.SetLabel(self.CTR.GetProjectName())
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1462
            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
  1463
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1464
            plcwindowmainsizer = wx.BoxSizer(wx.VERTICAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1465
            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
  1466
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1467
            plcwindowbuttonsizer = wx.BoxSizer(wx.HORIZONTAL)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1468
            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
  1469
            
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
  1470
            msizer = self.GenerateMethodButtonSizer(self.CTR, plcwindow)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1471
            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
  1472
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1473
        self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1474
        self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1475
        self.Thaw()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1476
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
  1477
    def GenerateMethodButtonSizer(self, confnode, parent):
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1478
        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
  1479
        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
  1480
        msizer = wx.FlexGridSizer(cols=len(confnode.ConfNodeMethods))
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1481
        for confnode_method in confnode.ConfNodeMethods:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1482
            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
  1483
                id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1484
                label = confnode_method["name"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1485
                button = GenBitmapTextButton(id=id, parent=parent,
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1486
                    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
  1487
                    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
  1488
                button.SetFont(normal_bt_font)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1489
                button.SetToolTipString(confnode_method["tooltip"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1490
                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
  1491
                # a fancy underline on mouseover
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1492
                def setFontStyle(b, s):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1493
                    def fn(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1494
                        b.SetFont(s)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1495
                        b.Refresh()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1496
                        event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1497
                    return fn
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1498
                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
  1499
                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
  1500
                #hack to force size to mini
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1501
                if not confnode_method.get("enabled",True):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1502
                    button.Disable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1503
                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
  1504
        return msizer
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1505
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1506
    def GenerateEnableButton(self, parent, sizer, confnode):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1507
        enabled = confnode.CTNEnabled()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1508
        if enabled is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1509
            enablebutton_id = wx.NewId()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1510
            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
  1511
                  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
  1512
            enablebutton.SetToolTipString(_("Enable/Disable this confnode"))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1513
            make_genbitmaptogglebutton_flat(enablebutton)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1514
            enablebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'Enabled.png')))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1515
            enablebutton.SetToggle(enabled)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1516
            def toggleenablebutton(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1517
                res = self.SetConfNodeParamsAttribute(confnode, "BaseParams.Enabled", enablebutton.GetToggle())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1518
                enablebutton.SetToggle(res)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1519
                event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1520
            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
  1521
            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
  1522
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1523
            sizer.AddSpacer(wx.Size(16, 16))
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1524
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1525
    def RefreshConfNodeTree(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1526
        self.Freeze()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1527
        self.ClearSizer(self.ConfNodeTreeSizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1528
        if self.CTR is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1529
            for child in self.CTR.IECSortedChildren():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1530
                self.GenerateTreeBranch(child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1531
                if not self.ConfNodeInfos[child]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1532
                    self.CollapseConfNode(child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1533
        self.PLCConfigMainSizer.Layout()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1534
        self.RefreshScrollBars()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1535
        self.Thaw()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1536
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1537
    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
  1538
        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
  1539
        if confnode.CTNTestModified():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1540
            bkgdclr=CHANGED_WINDOW_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1541
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1542
            bkgdclr=WINDOW_COLOUR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1543
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
  1544
        nodewindow.SetBackgroundColour(bkgdclr)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1545
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1546
        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
  1547
            self.ConfNodeInfos[confnode] = {"expanded" : False, "visible" : False}
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1548
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1549
        self.ConfNodeInfos[confnode]["children"] = confnode.IECSortedChildren()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1550
        confnode_infos = confnode.GetVariableLocationTree()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1551
        confnode_locations = []
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
            confnode_locations = confnode_infos["children"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1554
            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
  1555
                self.ConfNodeInfos[confnode]["locations_infos"] = {"root": {"expanded" : False}}
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1556
            
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
  1557
            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
  1558
            self.ConfNodeInfos[confnode]["locations_infos"]["root"]["children"] = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1559
        
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
  1560
        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
  1561
        
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
  1562
        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
  1563
        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
  1564
        
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
  1565
        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
  1566
        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
  1567
        
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
  1568
        #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
  1569
        
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
  1570
        st = wx.StaticText(nodewindow, -1)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1571
        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
  1572
        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
  1573
        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
  1574
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1575
        expandbutton_id = wx.NewId()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1576
        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
  1577
              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
  1578
              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
  1579
        expandbutton.labelDelta = 0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1580
        expandbutton.SetBezelWidth(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1581
        expandbutton.SetUseFocusIndicator(False)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1582
        expandbutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'minus.png')))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1583
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1584
        if len(self.ConfNodeInfos[confnode]["children"]) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1585
            expandbutton.SetToggle(self.ConfNodeInfos[confnode]["expanded"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1586
            def togglebutton(event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1587
                if expandbutton.GetToggle():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1588
                    self.ExpandConfNode(confnode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1589
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1590
                    self.CollapseConfNode(confnode)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1591
                self.ConfNodeInfos[confnode]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1592
                self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1593
                self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1594
                event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1595
            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
  1596
        elif len(confnode_locations) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1597
            locations_infos = self.ConfNodeInfos[confnode]["locations_infos"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1598
            expandbutton.SetToggle(locations_infos["root"]["expanded"])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1599
            def togglebutton(event):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1600
                if expandbutton.GetToggle():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1601
                    self.ExpandLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1602
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1603
                    self.CollapseLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1604
                self.ConfNodeInfos[confnode]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1605
                locations_infos["root"]["expanded"] = expandbutton.GetToggle()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1606
                self.PLCConfigMainSizer.Layout()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1607
                self.RefreshScrollBars()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1608
                event.Skip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1609
            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
  1610
        else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1611
            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
  1612
        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
  1613
        
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
  1614
        sb = wx.StaticBitmap(nodewindow, -1)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1615
        icon = confnode_infos.get("icon", None)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1616
        if icon is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1617
            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
  1618
        else: 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1619
            icon_bitmap = wx.Bitmap(icon)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1620
        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
  1621
        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
  1622
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1623
        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
  1624
        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
  1625
        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
  1626
        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
  1627
        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
  1628
        
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
  1629
        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
  1630
        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
  1631
        
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
  1632
        self.ConfNodeInfos[confnode]["window"] = nodewindow
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1633
        for child in self.ConfNodeInfos[confnode]["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1634
            self.GenerateTreeBranch(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1635
            if not self.ConfNodeInfos[child]["expanded"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1636
                self.CollapseConfNode(child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1637
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1638
        if len(confnode_locations) > 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1639
            locations_infos = self.ConfNodeInfos[confnode]["locations_infos"]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1640
            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
  1641
                                   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
  1642
            treectrl.SetImageList(self.LocationImageList)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1643
            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
  1644
            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
  1645
            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
  1646
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1647
            treectrl.AddRoot("")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1648
            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
  1649
            
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
  1650
            locations_infos["root"]["window"] = treectrl
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1651
            for location in confnode_locations:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1652
                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
  1653
                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
  1654
            if locations_infos["root"]["expanded"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1655
                self.ExpandLocation(locations_infos, "root")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1656
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1657
    def ExpandConfNode(self, confnode, force = False):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1658
        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
  1659
            self.ConfNodeInfos[child]["window"].Show()
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1660
            if force or self.ConfNodeInfos[child]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1661
                self.ExpandConfNode(child, force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1662
                if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1663
                    self.ConfNodeInfos[child]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1664
        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
  1665
        if locations_infos is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1666
            if force or locations_infos["root"]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1667
                self.ExpandLocation(locations_infos, "root", force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1668
                if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1669
                    locations_infos["root"]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1670
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1671
    def CollapseConfNode(self, confnode, force = False):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1672
        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
  1673
            self.ConfNodeInfos[child]["window"].Hide()
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1674
            self.CollapseConfNode(child, force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1675
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1676
                self.ConfNodeInfos[child]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1677
        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
  1678
        if locations_infos is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1679
            self.CollapseLocation(locations_infos, "root", force)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1680
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1681
                locations_infos["root"]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1682
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1683
    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
  1684
        locations_infos[group]["expanded"] = True
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1685
        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
  1686
            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
  1687
                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
  1688
        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
  1689
            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
  1690
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1691
                for child in locations_infos[group]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1692
                    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
  1693
        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
  1694
            self.RefreshTreeCtrlSize(locations_infos["root"]["window"])
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1695
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1696
    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
  1697
        locations_infos[group]["expanded"] = False
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1698
        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
  1699
            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
  1700
                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
  1701
        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
  1702
            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
  1703
            if force:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1704
                for child in locations_infos[group]["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1705
                    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
  1706
        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
  1707
            self.RefreshTreeCtrlSize(locations_infos["root"]["window"])
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1708
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1709
    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
  1710
        location_name = "%s.%s" % (parent, location["name"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1711
        if not locations_infos.has_key(location_name):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1712
            locations_infos[location_name] = {"expanded" : False}
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1713
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1714
        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
  1715
            label = "%(name)s (%(location)s)" % location
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1716
        elif location["location"] != "":
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1717
            label = "%(location)s: %(name)s" % location
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1718
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1719
            label = location["name"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1720
        item = treectrl.AppendItem(root, label)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1721
        treectrl.SetPyData(item, location_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1722
        treectrl.SetItemImage(item, self.LocationImageDict[location["type"]])
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
        locations_infos[location_name]["item"] = item
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1725
        locations_infos[location_name]["children"] = []
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1726
        infos = location.copy()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1727
        infos.pop("children")
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1728
        locations_infos[location_name]["infos"] = infos
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1729
        for child in location["children"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1730
            child_name = "%s.%s" % (location_name, child["name"])
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1731
            locations_infos[location_name]["children"].append(child_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1732
            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
  1733
        if locations_infos[location_name]["expanded"]:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1734
            self.ExpandLocation(locations_infos, location_name)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1735
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1736
    def GenerateLocationBeginDragFunction(self, locations_infos):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1737
        def OnLocationBeginDragFunction(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1738
            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
  1739
            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
  1740
            if location_name is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1741
                infos = locations_infos[location_name]["infos"]
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1742
                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
  1743
                    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
  1744
                    dragSource = wx.DropSource(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1745
                    dragSource.SetData(data)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1746
                    dragSource.DoDragDrop()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1747
        return OnLocationBeginDragFunction
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1748
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1749
    def RefreshTreeCtrlSize(self, treectrl):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1750
        rect = self.GetTreeCtrlItemRect(treectrl, treectrl.GetRootItem())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1751
        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
  1752
        self.PLCConfigMainSizer.Layout()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1753
        self.PLCConfig.Refresh()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1754
        wx.CallAfter(self.RefreshScrollBars)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1755
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1756
    def GetTreeCtrlItemRect(self, treectrl, item):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1757
        item_rect = treectrl.GetBoundingRect(item, True)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1758
        if item_rect is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1759
            minx, miny = item_rect.x, item_rect.y
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1760
            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
  1761
        else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1762
            minx = miny = maxx = maxy = 0
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1763
        
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1764
        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
  1765
            if wx.VERSION >= (2, 6, 0):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1766
                child, item_cookie = treectrl.GetFirstChild(item)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1767
            else:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1768
                child, item_cookie = treectrl.GetFirstChild(item, 0)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1769
            while child.IsOk():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1770
                child_rect = self.GetTreeCtrlItemRect(treectrl, child)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1771
                minx = min(minx, child_rect.x)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1772
                miny = min(miny, child_rect.y)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1773
                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
  1774
                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
  1775
                child, item_cookie = treectrl.GetNextChild(item, item_cookie)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1776
                
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1777
        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
  1778
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1779
    def GenerateLocationExpandCollapseFunction(self, locations_infos, expand):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1780
        def OnLocationExpandedFunction(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1781
            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
  1782
            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
  1783
            if location_name is not None:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1784
                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
  1785
                self.RefreshTreeCtrlSize(locations_infos["root"]["window"])
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1786
            event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1787
        return OnLocationExpandedFunction
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1788
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1789
    def GetButtonCallBackFunction(self, confnode, method):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1790
        """ Generate the callbackfunc for a given confnode method"""
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1791
        def OnButtonClick(event):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1792
            # Disable button to prevent re-entrant call 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1793
            event.GetEventObject().Disable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1794
            # Call
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1795
            getattr(confnode,method)()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1796
            # Re-enable button 
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1797
            event.GetEventObject().Enable()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1798
            # Trigger refresh on Idle
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1799
            wx.CallAfter(self.RefreshAll)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1800
            event.Skip()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1801
        return OnButtonClick
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1802
    
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1803
    def ClearSizer(self, sizer):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1804
        staticboxes = []
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1805
        for item in sizer.GetChildren():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1806
            if item.IsSizer():
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1807
                item_sizer = item.GetSizer()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1808
                self.ClearSizer(item_sizer)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1809
                if isinstance(item_sizer, wx.StaticBoxSizer):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1810
                    staticboxes.append(item_sizer.GetStaticBox())
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1811
        sizer.Clear(True)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1812
        for staticbox in staticboxes:
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1813
            staticbox.Destroy()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1814
                
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1815
    def RefreshAll(self):
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1816
        Beremiz.RefreshAll(self)
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1817
        self.RefreshPLCParams()
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1818
        self.RefreshConfNodeTree()
39
38a01052693f Removed Beremiz service taskbar icon when simulating PLC
Laurent Bessard
parents: 37
diff changeset
  1819
    
38a01052693f Removed Beremiz service taskbar icon when simulating PLC
Laurent Bessard
parents: 37
diff changeset
  1820
    # Remove taskbar icon when simulating
38a01052693f Removed Beremiz service taskbar icon when simulating PLC
Laurent Bessard
parents: 37
diff changeset
  1821
    def StartLocalRuntime(self, taskbaricon = True):
38a01052693f Removed Beremiz service taskbar icon when simulating PLC
Laurent Bessard
parents: 37
diff changeset
  1822
        return Beremiz.StartLocalRuntime(self, taskbaricon = False)
2
0c697b8fc443 Fixing bugs introduced with the new Beremiz extension paradigm
Laurent Bessard
parents: 1
diff changeset
  1823
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1824
class StdoutPseudoFile:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1825
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1826
    def __init__(self, port):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1827
        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
  1828
        self.socket.connect(('localhost', port))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1829
        self.Buffer = ""
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 __del__(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1832
        self.socket.close()
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
    def readline(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1835
        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
  1836
        while idx == -1:
25
c5b5509bd224 Fixed bug non-closing socket client when connection is closed
Laurent Bessard
parents: 24
diff changeset
  1837
            text = self.socket.recv(2048)
c5b5509bd224 Fixed bug non-closing socket client when connection is closed
Laurent Bessard
parents: 24
diff changeset
  1838
            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
  1839
                return ""
25
c5b5509bd224 Fixed bug non-closing socket client when connection is closed
Laurent Bessard
parents: 24
diff changeset
  1840
            self.Buffer += text
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1841
            idx = self.Buffer.find("\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1842
        if idx != -1:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1843
            line = self.Buffer[:idx+1]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1844
            self.Buffer = self.Buffer[idx+1:]
24
04205032298b Fixed socket communication debugging mechanism
Laurent Bessard
parents: 23
diff changeset
  1845
            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
  1846
                print "command >"+line
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1847
            return line
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1848
        return ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1849
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1850
    """ 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
  1851
    def write(self, s, style = None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1852
        if s != '':
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1853
            self.socket.send(s.encode('utf8'))
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
    def writeyield(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1856
        self.write(s)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1857
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1858
    def write_warning(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1859
        self.write(s)
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
    def write_error(self, s):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1862
        self.write(s)
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 flush(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1865
        pass
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1866
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1867
    def isatty(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1868
        return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1869
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1870
if __name__ == '__main__':
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1871
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1872
    from threading import Thread, Timer, Semaphore
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1873
    import cmd
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1874
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1875
    wx_eval_lock = Semaphore(0)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1876
    eval_res = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1877
    def wx_evaluator(callable, *args, **kwargs):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1878
        global eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1879
        eval_res = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1880
        try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1881
            eval_res=callable(*args,**kwargs)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1882
        finally:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1883
            wx_eval_lock.release()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1884
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1885
    def evaluator(callable, *args, **kwargs):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1886
        global eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1887
        wx.CallAfter(wx_evaluator,callable,*args,**kwargs)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1888
        wx_eval_lock.acquire()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1889
        return eval_res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1890
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1891
    # Command log for debug, for viewing from wxInspector
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1892
    if BMZ_DBG:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1893
        __builtins__.cmdlog = []
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
    class LPCBeremiz_Cmd(cmd.Cmd):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1896
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1897
        prompt = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1898
        RefreshTimer = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1899
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1900
        def __init__(self, CTR, Log):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1901
            cmd.Cmd.__init__(self, stdin=Log, stdout=Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1902
            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
  1903
            self.restore_last_state = False
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1904
            self.Log = Log
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1905
            self.CTR = CTR
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1906
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1907
        def RestartTimer(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1908
            if self.RefreshTimer is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1909
                self.RefreshTimer.cancel()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1910
            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
  1911
            self.RefreshTimer.start()
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 Exit(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1914
            global frame, app
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1915
            self.Close()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1916
            app.ExitMainLoop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1917
            return True
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1918
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1919
        def do_EOF(self, line):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1920
            return self.Exit()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1921
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1922
        def Show(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1923
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1924
            if frame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1925
                self.CTR.SetAppFrame(frame, frame.Log)
37
6e36ecf3f622 Added support for Beremiz status bar
Laurent Bessard
parents: 35
diff changeset
  1926
                self.CTR.UpdateMethodsFromPLCStatus()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1927
                frame.Show()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1928
                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
  1929
                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
  1930
            self.RestartTimer()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1931
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1932
        def Refresh(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1933
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1934
            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
  1935
                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
  1936
                    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
  1937
                    frame.RestoreLastState()
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1938
                else:
06e42e229dd6 Delaying RestoreLastLayout mechanism to end of LPC specific modules loading procedure to prevent slow startup
Laurent Bessard
parents: 20
diff changeset
  1939
                    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
  1940
                frame._Refresh(TITLE, PROJECTTREE, POUINSTANCEVARIABLESPANEL, FILEMENU, EDITMENU)
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1941
                frame.RefreshAll()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1942
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1943
        def Close(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1944
            global frame
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1945
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1946
            self.CTR.ResetAppFrame(self.Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1947
            if frame is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1948
                frame.Hide()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1949
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1950
        def Compile(self):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1951
            self.CTR._Build()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1952
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1953
        def SetProjectProperties(self, projectname, productname, productversion, companyname):
6
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1954
            new_properties = {
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1955
                "projectName": projectname,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1956
                "productName": productname,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1957
                "productVersion": productversion,
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1958
                "companyName": companyname}
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1959
            self.CTR.SetProjectProperties(properties=new_properties, buffer=False)
8863b78144ee Fix bug when defining project properties from LPCComposer
Laurent Bessard
parents: 4
diff changeset
  1960
            self.RestartTimer()
0
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1961
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1962
        def SetOnlineMode(self, mode, path=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1963
            self.CTR.SetOnlineMode(mode, path)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1964
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1965
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1966
        def AddBus(self, iec_channel, name, icon=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1967
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1968
                if child.BaseParams.getName() == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1969
                    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
  1970
                elif child.BaseParams.getIEC_Channel() == iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1971
                    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
  1972
            bus = self.CTR.CTNAddChild(name, "LPCBus", iec_channel)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1973
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1974
                return "Error: Unable to create bus\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1975
            bus.SetIcon(icon)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1976
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1977
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1978
        def RenameBus(self, iec_channel, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1979
            bus = self.CTR.GetChildByIECLocation((iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1980
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1981
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1982
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1983
                if child != bus and child.BaseParams.getName() == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1984
                    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
  1985
            bus.BaseParams.setName(name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1986
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1987
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1988
        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
  1989
            bus = self.CTR.GetChildByIECLocation((old_iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1990
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1991
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1992
            for child in self.CTR.IterChildren():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1993
                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
  1994
                    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
  1995
            if wx.GetApp() is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1996
                self.CTR.UpdateProjectVariableLocation(str(old_iec_channel), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1997
                                                              str(new_iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1998
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  1999
                self.CTR.UpdateProjectVariableLocation(
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2000
                             str(old_iec_channel), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2001
                             str(new_iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2002
            bus.BaseParams.setIEC_Channel(new_iec_channel)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2003
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2004
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2005
        def RemoveBus(self, iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2006
            bus = self.CTR.GetChildByIECLocation((iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2007
            if bus is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2008
                return "Error: No bus found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2009
            self.CTR.RemoveProjectVariableByFilter(str(iec_channel))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2010
            self.CTR.Children["LPCBus"].remove(bus)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2011
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2012
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2013
        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
  2014
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2015
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2016
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2017
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2018
                if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2019
                    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
  2020
                elif child["IEC_Channel"] == iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2021
                    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
  2022
            _GetLastModuleGroup(module).append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2023
                                                "type": LOCATION_MODULE, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2024
                                                "IEC_Channel": iec_channel, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2025
                                                "icon": icon, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2026
                                                "init": icode, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2027
                                                "children": []})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2028
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2029
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2030
        def RenameModule(self, iec_location, name):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2031
            module = self.CTR.GetChildByIECLocation(iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2032
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2033
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2034
            parent = self.CTR.GetChildByIECLocation(iec_location[:-1])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2035
            if parent is self.CTR:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2036
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2037
            if module["name"] != name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2038
                for child in _GetModuleChildren(parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2039
                    if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2040
                        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
  2041
                module["name"] = name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2042
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2043
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2044
        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
  2045
            module = self.CTR.GetChildByIECLocation(old_iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2046
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2047
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2048
            parent = self.CTR.GetChildByIECLocation(old_iec_location[:-1])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2049
            if parent is self.CTR:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2050
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2051
            if module["IEC_Channel"] != new_iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2052
                for child in _GetModuleChildren(parent):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2053
                    if child["IEC_Channel"] == new_iec_channel:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2054
                        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
  2055
            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
  2056
            module["IEC_Channel"] = new_iec_channel
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2057
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2058
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2059
        def ChangeModuleInitCode(self, iec_location, icode):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2060
            module = self.CTR.GetChildByIECLocation(iec_location)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2061
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2062
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2063
            module["init"] = icode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2064
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2065
        def RemoveModule(self, parent, iec_channel):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2066
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2067
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2068
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2069
            child = _GetModuleBySomething(module, "IEC_Channel", (iec_channel,))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2070
            if child is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2071
                return "Error: No module found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2072
            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
  2073
            _RemoveModuleChild(module, child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2074
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2075
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2076
        def StartGroup(self, parent, name, icon=None):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2077
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2078
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2079
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2080
            for child in module["children"]:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2081
                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
  2082
                    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
  2083
            module["children"].append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2084
                                      "type": LOCATION_GROUP, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2085
                                      "icon": icon, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2086
                                      "children": []})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2087
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2088
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2089
        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
  2090
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2091
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2092
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2093
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2094
                if child["name"] == name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2095
                    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
  2096
                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
  2097
                    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
  2098
            _GetLastModuleGroup(module).append({"name": name, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2099
                                                "location": location, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2100
                                                "type": LOCATION_TYPES[direction], 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2101
                                                "IEC_type": type, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2102
                                                "description": description, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2103
                                                "retrieve": rcode, 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2104
                                                "publish": pcode})
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2105
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2106
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2107
        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
  2108
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2109
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2110
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2111
            variable = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2112
            for child in _GetModuleChildren(module):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2113
                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
  2114
                    variable = child
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2115
                elif child["name"] == new_name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2116
                    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
  2117
            if variable is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2118
                return "Error: No variable found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2119
            if variable["name"] != new_name:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2120
                self.CTR.UpdateProjectVariableName(variable["name"], new_name)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2121
                variable["name"] = new_name
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2122
            variable["type"] = LOCATION_TYPES[new_direction]
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2123
            variable["IEC_type"] = new_type
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2124
            variable["retrieve"] = new_rcode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2125
            variable["publish"] = new_pcode
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2126
            if new_description is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2127
                variable["description"] = new_description
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2128
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2129
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2130
        def RemoveVariable(self, parent, location, direction):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2131
            module = self.CTR.GetChildByIECLocation(parent)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2132
            if module is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2133
                return "Error: No parent found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2134
            child = _GetModuleVariable(module, location, direction)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2135
            if child is None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2136
                return "Error: No variable found\n"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2137
            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
  2138
            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
  2139
            self.CTR.RemoveProjectVariableByAddress(address)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2140
            _RemoveModuleChild(module, child)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2141
            self.RestartTimer()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2142
        
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2143
    def location(loc):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2144
        return tuple(map(int, loc.split(".")))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2145
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2146
    def GetCmdFunction(function, arg_types, opt=0):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2147
        arg_number = len(arg_types)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2148
        def CmdFunction(self, line):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2149
            args_toks = line.split('"')
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2150
            if len(args_toks) % 2 == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2151
                self.Log.write("Error: Invalid command\n")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2152
                sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2153
                return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2154
            args = []
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2155
            for num, arg in enumerate(args_toks):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2156
                if num % 2 == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2157
                    stripped = arg.strip()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2158
                    if stripped:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2159
                        args.extend(stripped.split(" "))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2160
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2161
                    args.append(arg)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2162
            number = None
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2163
            extra = ""
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2164
            if opt == 0 and len(args) != arg_number:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2165
                number = arg_number
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2166
            elif len(args) > arg_number:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2167
                number = arg_number
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2168
                extra = " at most"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2169
            elif len(args) < arg_number - opt:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2170
                number = arg_number - opt
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2171
                extra = " at least"
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2172
            if number is not None:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2173
                if number == 0:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2174
                    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
  2175
                elif number == 1:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2176
                    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
  2177
                else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2178
                    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
  2179
                sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2180
                return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2181
            for num, arg in enumerate(args):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2182
                try:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2183
                    args[num] = arg_types[num](arg)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2184
                except:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2185
                    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
  2186
                    sys.stdout.flush()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2187
                    return
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2188
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2189
            func = getattr(self, function)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2190
            res = evaluator(func,*args)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2191
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2192
            if BMZ_DBG:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2193
                cmdlog.append((function,line,res))
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2194
                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
  2195
                    cmdlog.pop(0) 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2196
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2197
            if isinstance(res, (StringType, UnicodeType)):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2198
                self.Log.write(res)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2199
                return False
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2200
            else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2201
                return res
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2202
        return CmdFunction
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
    def CmdThreadProc(CTR, Log):
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2205
        global lpcberemiz_cmd
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2206
        for function, (arg_types, opt) in {"Exit": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2207
                                           "Show": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2208
                                           "Refresh": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2209
                                           "Close": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2210
                                           "Compile": ([], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2211
                                           "SetProjectProperties": ([str, str, str, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2212
                                           "SetOnlineMode": ([str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2213
                                           "AddBus": ([int, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2214
                                           "RenameBus": ([int, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2215
                                           "ChangeBusIECChannel": ([int, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2216
                                           "RemoveBus": ([int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2217
                                           "AddModule": ([location, int, str, str, str], 1), 
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2218
                                           "RenameModule": ([location, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2219
                                           "ChangeModuleIECChannel": ([location, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2220
                                           "ChangeModuleInitCode": ([location, str], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2221
                                           "RemoveModule": ([location, int], 0),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2222
                                           "StartGroup": ([location, str, str], 1),
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2223
                                           "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
  2224
                                           "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
  2225
                                           "RemoveVariable": ([location, location], 0)}.iteritems():
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2226
            
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2227
            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
  2228
        lpcberemiz_cmd = LPCBeremiz_Cmd(CTR, Log)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2229
        lpcberemiz_cmd.cmdloop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2230
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2231
    Log = StdoutPseudoFile(port)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2232
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2233
    CTR = LPCProjectController(None, Log, buildpath)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2234
    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
  2235
        result = CTR.LoadProject(projectOpen)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2236
        if result:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2237
            Log.write("Error: Invalid project directory", result)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2238
    else:
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2239
        Log.write("Error: No such file or directory")
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2240
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2241
    cmd_thread=Thread(target=CmdThreadProc, args=[CTR, Log])
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2242
    cmd_thread.start()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2243
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2244
    # Install a exception handle for bug reports
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2245
    AddExceptHook(os.getcwd(),__version__)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2246
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2247
    frame = LPCBeremiz(None, ctr=CTR, debug=True)
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2248
    
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2249
    app.MainLoop()
51f5a3138405 Initial commit, LPC files taken out of beremiz revision 915be999f3f0
Edouard Tisserant
parents:
diff changeset
  2250