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