author | Edouard Tisserant |
Thu, 12 Jun 2014 17:50:30 +0200 | |
changeset 1418 | c97dc5281419 |
parent 1413 | dd89016a5028 |
child 1424 | 0f2ced10db48 |
permissions | -rw-r--r-- |
14
eb9fdd316a40
More precise design for plugins.... to be continued...
etisserant
parents:
13
diff
changeset
|
1 |
""" |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
2 |
Beremiz Project Controller |
14
eb9fdd316a40
More precise design for plugins.... to be continued...
etisserant
parents:
13
diff
changeset
|
3 |
""" |
178
2390b409eb93
Added PLC tick alignement on external synchronization source feature.
etisserant
parents:
176
diff
changeset
|
4 |
import os,sys,traceback |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
5 |
import time |
721 | 6 |
import features |
14
eb9fdd316a40
More precise design for plugins.... to be continued...
etisserant
parents:
13
diff
changeset
|
7 |
import shutil |
22 | 8 |
import wx |
725 | 9 |
import re, tempfile |
1366
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
10 |
from math import ceil |
1282
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
11 |
from types import ListType |
725 | 12 |
from threading import Timer, Lock, Thread |
20 | 13 |
from time import localtime |
14 |
from datetime import datetime |
|
725 | 15 |
from weakref import WeakKeyDictionary |
16 |
||
17 |
import targets |
|
18 |
import connectors |
|
815
e4f24593a758
Adding support for extending internationalization to extensions
laurent
parents:
814
diff
changeset
|
19 |
from util.misc import CheckPathPerm, GetClassImporter |
742
41a4a560406c
Fixed runtime problems with python 2.6 without wx installed
Edouard Tisserant
parents:
740
diff
changeset
|
20 |
from util.MiniTextControler import MiniTextControler |
726 | 21 |
from util.ProcessLogger import ProcessLogger |
814 | 22 |
from util.BitmapLibrary import GetBitmap |
23 |
from editors.FileManagementPanel import FileManagementPanel |
|
24 |
from editors.ProjectNodeEditor import ProjectNodeEditor |
|
815
e4f24593a758
Adding support for extending internationalization to extensions
laurent
parents:
814
diff
changeset
|
25 |
from editors.IECCodeViewer import IECCodeViewer |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
26 |
from editors.DebugViewer import DebugViewer, REFRESH_PERIOD |
814 | 27 |
from dialogs import DiscoveryDialog |
738 | 28 |
from PLCControler import PLCControler |
725 | 29 |
from plcopen.structures import IEC_KEYWORDS |
917 | 30 |
from targets.typemapping import DebugTypesSize, LogLevelsCount, LogLevels |
1330
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
31 |
from ConfigTreeNode import ConfigTreeNode, XSDSchemaErrorMessage |
725 | 32 |
|
33 |
base_folder = os.path.split(sys.path[0])[0] |
|
20 | 34 |
|
813
1460273f40ed
Adding support for printing matiec warnings report in log console
laurent
parents:
806
diff
changeset
|
35 |
MATIEC_ERROR_MODEL = re.compile(".*\.st:(\d+)-(\d+)\.\.(\d+)-(\d+): (?:error)|(?:warning) : (.*)$") |
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
36 |
|
578 | 37 |
DEBUG_RETRIES_WARN = 3 |
38 |
DEBUG_RETRIES_REREGISTER = 4 |
|
39 |
||
738 | 40 |
ITEM_CONFNODE = 25 |
41 |
||
1282
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
42 |
def ExtractChildrenTypesFromCatalog(catalog): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
43 |
children_types = [] |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
44 |
for n,d,h,c in catalog: |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
45 |
if isinstance(c, ListType): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
46 |
children_types.extend(ExtractChildrenTypesFromCatalog(c)) |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
47 |
else: |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
48 |
children_types.append((n, GetClassImporter(c), d)) |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
49 |
return children_types |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
50 |
|
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
51 |
def ExtractMenuItemsFromCatalog(catalog): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
52 |
menu_items = [] |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
53 |
for n,d,h,c in catalog: |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
54 |
if isinstance(c, ListType): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
55 |
children = ExtractMenuItemsFromCatalog(c) |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
56 |
else: |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
57 |
children = [] |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
58 |
menu_items.append((n, d, h, children)) |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
59 |
return menu_items |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
60 |
|
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
61 |
def GetAddMenuItems(): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
62 |
return ExtractMenuItemsFromCatalog(features.catalog) |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
63 |
|
725 | 64 |
class ProjectController(ConfigTreeNode, PLCControler): |
20 | 65 |
""" |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
66 |
This class define Root object of the confnode tree. |
20 | 67 |
It is responsible of : |
68 |
- Managing project directory |
|
69 |
- Building project |
|
70 |
- Handling PLCOpenEditor controler and view |
|
718 | 71 |
- Loading user confnodes and instanciante them as children |
20 | 72 |
- ... |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
73 |
|
20 | 74 |
""" |
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
75 |
|
718 | 76 |
# For root object, available Children Types are modules of the confnode packages. |
1282
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
77 |
CTNChildrenTypes = ExtractChildrenTypesFromCatalog(features.catalog) |
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
78 |
|
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
79 |
XSD = """<?xml version="1.0" encoding="ISO-8859-1" ?> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
80 |
<xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema"> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
81 |
<xsd:element name="BeremizRoot"> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
82 |
<xsd:complexType> |
86 | 83 |
<xsd:sequence> |
84 |
<xsd:element name="TargetType"> |
|
85 |
<xsd:complexType> |
|
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
86 |
<xsd:choice minOccurs="0"> |
733
915be999f3f0
targets and connectors are nor extensible
Edouard Tisserant
parents:
732
diff
changeset
|
87 |
"""+targets.GetTargetChoices()+""" |
106
9810689febb0
Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents:
105
diff
changeset
|
88 |
</xsd:choice> |
9810689febb0
Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents:
105
diff
changeset
|
89 |
</xsd:complexType> |
1413
dd89016a5028
Fixed crash at project load when features.libraries is empty (i.e. no libraries are provided).
Edouard Tisserant
parents:
1407
diff
changeset
|
90 |
</xsd:element>"""+((""" |
dd89016a5028
Fixed crash at project load when features.libraries is empty (i.e. no libraries are provided).
Edouard Tisserant
parents:
1407
diff
changeset
|
91 |
<xsd:element name="Libraries" minOccurs="0"> |
730 | 92 |
<xsd:complexType> |
734 | 93 |
"""+"\n".join(['<xsd:attribute name='+ |
94 |
'"Enable_'+ libname + '_Library" '+ |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
95 |
'type="xsd:boolean" use="optional" default="true"/>' |
731 | 96 |
for libname,lib in features.libraries])+""" |
1413
dd89016a5028
Fixed crash at project load when features.libraries is empty (i.e. no libraries are provided).
Edouard Tisserant
parents:
1407
diff
changeset
|
97 |
</xsd:complexType> |
dd89016a5028
Fixed crash at project load when features.libraries is empty (i.e. no libraries are provided).
Edouard Tisserant
parents:
1407
diff
changeset
|
98 |
</xsd:element>""") if len(features.libraries)>0 else '') + """ |
86 | 99 |
</xsd:sequence> |
204
f572ab819769
remove URI_location from XSD targets and add to pluginroot XSD
greg
parents:
203
diff
changeset
|
100 |
<xsd:attribute name="URI_location" type="xsd:string" use="optional" default=""/> |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
101 |
<xsd:attribute name="Disable_Extensions" type="xsd:boolean" use="optional" default="false"/> |
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
102 |
</xsd:complexType> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
103 |
</xsd:element> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
104 |
</xsd:schema> |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
105 |
""" |
738 | 106 |
EditorType = ProjectNodeEditor |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
107 |
|
290
3bd617ae7a05
Local Runtime (LOCAL://) now launched "on demand"
etisserant
parents:
288
diff
changeset
|
108 |
def __init__(self, frame, logger): |
41
1608a434fb8c
Adding support for refreshing PLCOpenEditor block list
lbessard
parents:
40
diff
changeset
|
109 |
PLCControler.__init__(self) |
227
48c13b84505c
- Some improovements in debug data feedback data
etisserant
parents:
222
diff
changeset
|
110 |
|
20 | 111 |
self.MandatoryParams = None |
203 | 112 |
self._builder = None |
113 |
self._connector = None |
|
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
114 |
self.DispatchDebugValuesTimer = None |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
115 |
self.DebugValuesBuffers = [] |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
116 |
self.DebugTicks = [] |
978 | 117 |
self.SetAppFrame(frame, logger) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
118 |
|
725 | 119 |
self.iec2c_path = os.path.join(base_folder, "matiec", "iec2c"+(".exe" if wx.Platform == '__WXMSW__' else "")) |
418 | 120 |
self.ieclib_path = os.path.join(base_folder, "matiec", "lib") |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
121 |
|
203 | 122 |
# Setup debug information |
227
48c13b84505c
- Some improovements in debug data feedback data
etisserant
parents:
222
diff
changeset
|
123 |
self.IECdebug_datas = {} |
48c13b84505c
- Some improovements in debug data feedback data
etisserant
parents:
222
diff
changeset
|
124 |
self.IECdebug_lock = Lock() |
222
d0f7d36bf241
Added lock to avoid variable subsciption concurrent to transmission to PLC
etisserant
parents:
217
diff
changeset
|
125 |
|
235 | 126 |
self.DebugTimer=None |
203 | 127 |
self.ResetIECProgramsAndVariables() |
128 |
||
118 | 129 |
# In both new or load scenario, no need to save |
350
a3a5561bde1d
- now call load, start, free PLC from the python Thread
greg
parents:
348
diff
changeset
|
130 |
self.ChangesToSave = False |
23 | 131 |
# root have no parent |
718 | 132 |
self.CTNParent = None |
717 | 133 |
# Keep track of the confnode type name |
718 | 134 |
self.CTNType = "Beremiz" |
135 |
self.Children = {} |
|
738 | 136 |
self._View = None |
717 | 137 |
# After __init__ root confnode is not valid |
20 | 138 |
self.ProjectPath = None |
427 | 139 |
self._setBuildPath(None) |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
140 |
self.DebugThread = None |
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
141 |
self.debug_break = False |
350
a3a5561bde1d
- now call load, start, free PLC from the python Thread
greg
parents:
348
diff
changeset
|
142 |
self.previous_plcstate = None |
717 | 143 |
# copy ConfNodeMethods so that it can be later customized |
754
a8c258f7bdcf
Fix bug in StatusToolBar items state when close and opening another project
laurent
parents:
746
diff
changeset
|
144 |
self.StatusMethods = [dic.copy() for dic in self.StatusMethods] |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
145 |
|
1282
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
146 |
def __del__(self): |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
147 |
if self.DebugTimer: |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
148 |
self.DebugTimer.cancel() |
f427352f9727
Added support for left panel add menu with multiple levels
laurent
parents:
1262
diff
changeset
|
149 |
self.KillDebugThread() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
150 |
|
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
151 |
def LoadLibraries(self): |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
152 |
self.Libraries = [] |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
153 |
TypeStack=[] |
731 | 154 |
for libname,clsname in features.libraries: |
155 |
if self.BeremizRoot.Libraries is None or getattr(self.BeremizRoot.Libraries, "Enable_"+libname+"_Library"): |
|
732 | 156 |
Lib = GetClassImporter(clsname)()(self, libname, TypeStack) |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
157 |
TypeStack.append(Lib.GetTypes()) |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
158 |
self.Libraries.append(Lib) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
159 |
|
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
160 |
def SetAppFrame(self, frame, logger): |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
161 |
self.AppFrame = frame |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
162 |
self.logger = logger |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
163 |
self.StatusTimer = None |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
164 |
if self.DispatchDebugValuesTimer is not None: |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
165 |
self.DispatchDebugValuesTimer.Stop() |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
166 |
self.DispatchDebugValuesTimer = None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
167 |
|
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
168 |
if frame is not None: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
169 |
|
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
170 |
# Timer to pull PLC status |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
171 |
self.StatusTimer = wx.Timer(self.AppFrame, -1) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
172 |
self.AppFrame.Bind(wx.EVT_TIMER, |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
173 |
self.PullPLCStatusProc, self.StatusTimer) |
1395
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
174 |
|
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
175 |
if self._connector is not None: |
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
176 |
frame.LogViewer.SetLogSource(self._connector) |
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
177 |
self.StatusTimer.Start(milliseconds=500, oneShot=False) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
178 |
|
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
179 |
# Timer to dispatch debug values to consumers |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
180 |
self.DispatchDebugValuesTimer = wx.Timer(self.AppFrame, -1) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
181 |
self.AppFrame.Bind(wx.EVT_TIMER, |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
182 |
self.DispatchDebugValuesProc, self.DispatchDebugValuesTimer) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
183 |
|
717 | 184 |
self.RefreshConfNodesBlockLists() |
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
185 |
|
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
186 |
def ResetAppFrame(self, logger): |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
187 |
if self.AppFrame is not None: |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
188 |
self.AppFrame.Unbind(wx.EVT_TIMER, self.StatusTimer) |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
189 |
self.StatusTimer = None |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
190 |
self.AppFrame = None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
191 |
|
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
192 |
self.logger = logger |
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
193 |
|
738 | 194 |
def CTNName(self): |
195 |
return "Project" |
|
196 |
||
718 | 197 |
def CTNTestModified(self): |
118 | 198 |
return self.ChangesToSave or not self.ProjectIsSaved() |
199 |
||
718 | 200 |
def CTNFullName(self): |
656
c1792dfc8c7e
Fixing bug integrated plugin editors not closed when removing corresponding plugin
laurent
parents:
655
diff
changeset
|
201 |
return "" |
c1792dfc8c7e
Fixing bug integrated plugin editors not closed when removing corresponding plugin
laurent
parents:
655
diff
changeset
|
202 |
|
718 | 203 |
def GetCTRoot(self): |
23 | 204 |
return self |
205 |
||
418 | 206 |
def GetIECLibPath(self): |
207 |
return self.ieclib_path |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
208 |
|
418 | 209 |
def GetIEC2cPath(self): |
210 |
return self.iec2c_path |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
211 |
|
23 | 212 |
def GetCurrentLocation(self): |
213 |
return () |
|
47
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
214 |
|
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
215 |
def GetCurrentName(self): |
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
216 |
return "" |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
217 |
|
47
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
218 |
def _GetCurrentName(self): |
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
219 |
return "" |
fd45c291fed0
PLC and plugins compilation with gcc now starts (and fail).
etisserant
parents:
41
diff
changeset
|
220 |
|
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
221 |
def GetProjectPath(self): |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
222 |
return self.ProjectPath |
51
c31c55601556
Added project linking, and plugin init,cleanup,retrive and publish method calls in main
etisserant
parents:
49
diff
changeset
|
223 |
|
c31c55601556
Added project linking, and plugin init,cleanup,retrive and publish method calls in main
etisserant
parents:
49
diff
changeset
|
224 |
def GetProjectName(self): |
c31c55601556
Added project linking, and plugin init,cleanup,retrive and publish method calls in main
etisserant
parents:
49
diff
changeset
|
225 |
return os.path.split(self.ProjectPath)[1] |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
226 |
|
781
cdc6393705ce
Adding support using plcopeneditor bitmap library for icon request
laurent
parents:
774
diff
changeset
|
227 |
def GetIconName(self): |
cdc6393705ce
Adding support using plcopeneditor bitmap library for icon request
laurent
parents:
774
diff
changeset
|
228 |
return "PROJECT" |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
229 |
|
510
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
230 |
def GetDefaultTargetName(self): |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
231 |
if wx.Platform == '__WXMSW__': |
510
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
232 |
return "Win32" |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
233 |
else: |
510
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
234 |
return "Linux" |
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
235 |
|
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
236 |
def GetTarget(self): |
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
237 |
target = self.BeremizRoot.getTargetType() |
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
238 |
if target.getcontent() is None: |
1315
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
239 |
temp_root = self.Parser.CreateRoot() |
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
240 |
target = self.Parser.CreateElement("TargetType", "BeremizRoot") |
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
241 |
temp_root.setTargetType(target) |
510
8038c08b9874
Getting default target when no target defined fixed
laurent
parents:
506
diff
changeset
|
242 |
target_name = self.GetDefaultTargetName() |
1315
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
243 |
target.setcontent(self.Parser.CreateElement(target_name, "TargetType")) |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
244 |
return target |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
245 |
|
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
246 |
def GetParamsAttributes(self, path = None): |
717 | 247 |
params = ConfigTreeNode.GetParamsAttributes(self, path) |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
248 |
if params[0]["name"] == "BeremizRoot": |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
249 |
for child in params[0]["children"]: |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
250 |
if child["name"] == "TargetType" and child["value"] == '': |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
251 |
child.update(self.GetTarget().getElementInfos("TargetType")) |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
252 |
return params |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
253 |
|
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
254 |
def SetParamsAttribute(self, path, value): |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
255 |
if path.startswith("BeremizRoot.TargetType.") and self.BeremizRoot.getTargetType().getcontent() is None: |
607
c68b662e0c2a
Bug when changing parameters in TargetType section in Beremiz project configuration fixed
laurent
parents:
604
diff
changeset
|
256 |
self.BeremizRoot.setTargetType(self.GetTarget()) |
1080
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
257 |
res = ConfigTreeNode.SetParamsAttribute(self, path, value) |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
258 |
if path.startswith("BeremizRoot.Libraries."): |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
259 |
wx.CallAfter(self.RefreshConfNodesBlockLists) |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
260 |
return res |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
261 |
|
427 | 262 |
# helper func to check project path write permission |
263 |
def CheckProjectPathPerm(self, dosave=True): |
|
264 |
if CheckPathPerm(self.ProjectPath): |
|
265 |
return True |
|
1080
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
266 |
if self.AppFrame is not None: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
267 |
dialog = wx.MessageDialog(self.AppFrame, |
1080
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
268 |
_('You must have permission to work on the project\nWork on a project copy ?'), |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
269 |
_('Error'), |
1080
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
270 |
wx.YES_NO | wx.NO_DEFAULT | wx.ICON_QUESTION) |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
271 |
answer = dialog.ShowModal() |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
272 |
dialog.Destroy() |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
273 |
if answer == wx.ID_YES: |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
274 |
if self.SaveProjectAs(): |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
275 |
self.AppFrame.RefreshTitle() |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
276 |
self.AppFrame.RefreshFileMenu() |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
277 |
self.AppFrame.RefreshPageTitles() |
5ec20f56b1d2
Fixed bug list of ConfNodes blocks not refreshed when a library was enable or disable
Laurent Bessard
parents:
1072
diff
changeset
|
278 |
return True |
427 | 279 |
return False |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
280 |
|
1061 | 281 |
def _getProjectFilesPath(self, project_path=None): |
282 |
if project_path is not None: |
|
283 |
return os.path.join(project_path, "project_files") |
|
757
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
284 |
projectfiles_path = os.path.join(self.GetProjectPath(), "project_files") |
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
285 |
if not os.path.exists(projectfiles_path): |
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
286 |
os.mkdir(projectfiles_path) |
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
287 |
return projectfiles_path |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
288 |
|
839
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
289 |
def AddProjectDefaultConfiguration(self, config_name="config", res_name="resource1"): |
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
290 |
self.ProjectAddConfiguration(config_name) |
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
291 |
self.ProjectAddConfigurationResource(config_name, res_name) |
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
292 |
|
256 | 293 |
def NewProject(self, ProjectPath, BuildPath=None): |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
294 |
""" |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
295 |
Create a new project in an empty folder |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
296 |
@param ProjectPath: path of the folder where project have to be created |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
297 |
@param PLCParams: properties of the PLCOpen program created |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
298 |
""" |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
299 |
# Verify that chosen folder is empty |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
300 |
if not os.path.isdir(ProjectPath) or len(os.listdir(ProjectPath)) > 0: |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
301 |
return _("Chosen folder isn't empty. You can't use it for a new project!") |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
302 |
|
41
1608a434fb8c
Adding support for refreshing PLCOpenEditor block list
lbessard
parents:
40
diff
changeset
|
303 |
# Create PLCOpen program |
738 | 304 |
self.CreateNewProject( |
305 |
{"projectName": _("Unnamed"), |
|
306 |
"productName": _("Unnamed"), |
|
801
435e49e80832
Update list of messages to be translated for internationalization and french translations
laurent
parents:
796
diff
changeset
|
307 |
"productVersion": "1", |
738 | 308 |
"companyName": _("Unknown"), |
309 |
"creationDateTime": datetime(*localtime()[:6])}) |
|
839
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
310 |
self.AddProjectDefaultConfiguration() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
311 |
|
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
312 |
# Change XSD into class members |
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
313 |
self._AddParamsMembers() |
718 | 314 |
self.Children = {} |
717 | 315 |
# Keep track of the root confnode (i.e. project path) |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
316 |
self.ProjectPath = ProjectPath |
427 | 317 |
self._setBuildPath(BuildPath) |
717 | 318 |
# get confnodes bloclist (is that usefull at project creation?) |
319 |
self.RefreshConfNodesBlockLists() |
|
114
2e3d8d4480e7
Now .xml files are automatically created when creating a new project no need to save explicitely.
etisserant
parents:
113
diff
changeset
|
320 |
# this will create files base XML files |
2e3d8d4480e7
Now .xml files are automatically created when creating a new project no need to save explicitely.
etisserant
parents:
113
diff
changeset
|
321 |
self.SaveProject() |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
322 |
return None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
323 |
|
256 | 324 |
def LoadProject(self, ProjectPath, BuildPath=None): |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
325 |
""" |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
326 |
Load a project contained in a folder |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
327 |
@param ProjectPath: path of the project folder |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
328 |
""" |
190 | 329 |
if os.path.basename(ProjectPath) == "": |
330 |
ProjectPath = os.path.dirname(ProjectPath) |
|
978 | 331 |
# Verify that project contains a PLCOpen program |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
332 |
plc_file = os.path.join(ProjectPath, "plc.xml") |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
333 |
if not os.path.isfile(plc_file): |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
334 |
return _("Chosen folder doesn't contain a program. It's not a valid project!") |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
335 |
# Load PLCOpen file |
1330
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
336 |
error = self.OpenXMLFile(plc_file) |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
337 |
if error is not None: |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
338 |
if self.Project is not None: |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
339 |
self.logger.write_warning( |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
340 |
XSDSchemaErrorMessage % (("PLC",) + error)) |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
341 |
else: |
96b242e4c59d
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
Laurent Bessard
parents:
1315
diff
changeset
|
342 |
return error |
839
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
343 |
if len(self.GetProjectConfigNames()) == 0: |
25ba9d74afb1
Adding support for adding default configuration on opened project without any
Laurent Bessard
parents:
815
diff
changeset
|
344 |
self.AddProjectDefaultConfiguration() |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
345 |
# Change XSD into class members |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
346 |
self._AddParamsMembers() |
718 | 347 |
self.Children = {} |
717 | 348 |
# Keep track of the root confnode (i.e. project path) |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
349 |
self.ProjectPath = ProjectPath |
427 | 350 |
self._setBuildPath(BuildPath) |
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
351 |
# If dir have already be made, and file exist |
718 | 352 |
if os.path.isdir(self.CTNPath()) and os.path.isfile(self.ConfNodeXmlFilePath()): |
717 | 353 |
#Load the confnode.xml file into parameters members |
203 | 354 |
result = self.LoadXMLParams() |
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
355 |
if result: |
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
356 |
return result |
718 | 357 |
#Load and init all the children |
358 |
self.LoadChildren() |
|
717 | 359 |
self.RefreshConfNodesBlockLists() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
360 |
|
203 | 361 |
if os.path.exists(self._getBuildPath()): |
362 |
self.EnableMethod("_Clean", True) |
|
363 |
||
1064
44318b45aab9
Fixed bug Show IEC code button not available
Laurent Bessard
parents:
1062
diff
changeset
|
364 |
if os.path.isfile(self._getIECcodepath()): |
203 | 365 |
self.ShowMethod("_showIECcode", True) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
366 |
|
1000 | 367 |
self.UpdateMethodsFromPLCStatus() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
368 |
|
17
ee8cb104dbe0
First commit of Beremiz new version with plugin support
lbessard
parents:
16
diff
changeset
|
369 |
return None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
370 |
|
738 | 371 |
def RecursiveConfNodeInfos(self, confnode): |
372 |
values = [] |
|
373 |
for CTNChild in confnode.IECSortedChildren(): |
|
374 |
values.append( |
|
375 |
{"name": "%s: %s" % (CTNChild.GetFullIEC_Channel(), |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
376 |
CTNChild.CTNName()), |
1105
f0e5b475a074
Fixed bug when modifying ConfTreeNode IEC Channel
Laurent Bessard
parents:
1089
diff
changeset
|
377 |
"tagname": CTNChild.CTNFullName(), |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
378 |
"type": ITEM_CONFNODE, |
738 | 379 |
"confnode": CTNChild, |
781
cdc6393705ce
Adding support using plcopeneditor bitmap library for icon request
laurent
parents:
774
diff
changeset
|
380 |
"icon": CTNChild.GetIconName(), |
738 | 381 |
"values": self.RecursiveConfNodeInfos(CTNChild)}) |
382 |
return values |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
383 |
|
738 | 384 |
def GetProjectInfos(self): |
385 |
infos = PLCControler.GetProjectInfos(self) |
|
386 |
configurations = infos["values"].pop(-1) |
|
387 |
resources = None |
|
388 |
for config_infos in configurations["values"]: |
|
389 |
if resources is None: |
|
390 |
resources = config_infos["values"][0] |
|
391 |
else: |
|
392 |
resources["values"].extend(config_infos["values"][0]["values"]) |
|
393 |
if resources is not None: |
|
394 |
infos["values"].append(resources) |
|
395 |
infos["values"].extend(self.RecursiveConfNodeInfos(self)) |
|
396 |
return infos |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
397 |
|
403 | 398 |
def CloseProject(self): |
718 | 399 |
self.ClearChildren() |
417
a895ae50b737
Adding support for declaring PluginRoot outside of Beremiz
laurent
parents:
415
diff
changeset
|
400 |
self.ResetAppFrame(None) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
401 |
|
1061 | 402 |
def SaveProject(self, from_project_path=None): |
427 | 403 |
if self.CheckProjectPathPerm(False): |
1061 | 404 |
if from_project_path is not None: |
405 |
old_projectfiles_path = self._getProjectFilesPath(from_project_path) |
|
406 |
if os.path.isdir(old_projectfiles_path): |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
407 |
shutil.copytree(old_projectfiles_path, |
1061 | 408 |
self._getProjectFilesPath(self.ProjectPath)) |
41
1608a434fb8c
Adding support for refreshing PLCOpenEditor block list
lbessard
parents:
40
diff
changeset
|
409 |
self.SaveXMLFile(os.path.join(self.ProjectPath, 'plc.xml')) |
1061 | 410 |
result = self.CTNRequestSave(from_project_path) |
427 | 411 |
if result: |
412 |
self.logger.write_error(result) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
413 |
|
1061 | 414 |
def SaveProjectAs(self): |
427 | 415 |
# Ask user to choose a path with write permissions |
529 | 416 |
if wx.Platform == '__WXMSW__': |
417 |
path = os.getenv("USERPROFILE") |
|
418 |
else: |
|
419 |
path = os.getenv("HOME") |
|
420 |
dirdialog = wx.DirDialog(self.AppFrame , _("Choose a directory to save project"), path, wx.DD_NEW_DIR_BUTTON) |
|
427 | 421 |
answer = dirdialog.ShowModal() |
422 |
dirdialog.Destroy() |
|
423 |
if answer == wx.ID_OK: |
|
424 |
newprojectpath = dirdialog.GetPath() |
|
425 |
if os.path.isdir(newprojectpath): |
|
1061 | 426 |
self.ProjectPath, old_project_path = newprojectpath, self.ProjectPath |
427 |
self.SaveProject(old_project_path) |
|
427 | 428 |
self._setBuildPath(self.BuildPath) |
429 |
return True |
|
430 |
return False |
|
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
431 |
|
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
432 |
def GetLibrariesTypes(self): |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
433 |
self.LoadLibraries() |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
434 |
return [ lib.GetTypes() for lib in self.Libraries ] |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
435 |
|
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
436 |
def GetLibrariesSTCode(self): |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
437 |
return "\n".join([ lib.GetSTCode() for lib in self.Libraries ]) |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
438 |
|
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
439 |
def GetLibrariesCCode(self, buildpath): |
770
131110501214
Fixed loading projects with no libraries at all
Edouard Tisserant
parents:
769
diff
changeset
|
440 |
if len(self.Libraries)==0: |
131110501214
Fixed loading projects with no libraries at all
Edouard Tisserant
parents:
769
diff
changeset
|
441 |
return [],[],() |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
442 |
self.GetIECProgramsAndVariables() |
1401
611fded24ce4
Pair with matiec a51a3bb4d613. Re-enable resource add/remove, updated CFLAGS, disabled broken global FG test in tests/python
Edouard Tisserant
parents:
1398
diff
changeset
|
443 |
LibIECCflags = '"-I%s" -Wno-unused-function'%os.path.abspath(self.GetIECLibPath()) |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
444 |
LocatedCCodeAndFlags=[] |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
445 |
Extras=[] |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
446 |
for lib in self.Libraries: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
447 |
res=lib.Generate_C(buildpath,self._VariablesList,LibIECCflags) |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
448 |
LocatedCCodeAndFlags.append(res[:2]) |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
449 |
if len(res)>2: |
869
abf90a44c265
Fix bug when more than one block library add extra python file
Laurent Bessard
parents:
842
diff
changeset
|
450 |
Extras.extend(res[2:]) |
abf90a44c265
Fix bug when more than one block library add extra python file
Laurent Bessard
parents:
842
diff
changeset
|
451 |
return map(list,zip(*LocatedCCodeAndFlags))+[tuple(Extras)] |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
452 |
|
717 | 453 |
# Update PLCOpenEditor ConfNode Block types from loaded confnodes |
454 |
def RefreshConfNodesBlockLists(self): |
|
718 | 455 |
if getattr(self, "Children", None) is not None: |
717 | 456 |
self.ClearConfNodeTypes() |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
457 |
self.AddConfNodeTypesList(self.GetLibrariesTypes()) |
395 | 458 |
if self.AppFrame is not None: |
716
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
459 |
self.AppFrame.RefreshLibraryPanel() |
395 | 460 |
self.AppFrame.RefreshEditor() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
461 |
|
443
34c9788bd933
Adding support for updating located variables when changing plugin IEC_Channel
laurent
parents:
440
diff
changeset
|
462 |
# Update a PLCOpenEditor Pou variable location |
34c9788bd933
Adding support for updating located variables when changing plugin IEC_Channel
laurent
parents:
440
diff
changeset
|
463 |
def UpdateProjectVariableLocation(self, old_leading, new_leading): |
34c9788bd933
Adding support for updating located variables when changing plugin IEC_Channel
laurent
parents:
440
diff
changeset
|
464 |
self.Project.updateElementAddress(old_leading, new_leading) |
34c9788bd933
Adding support for updating located variables when changing plugin IEC_Channel
laurent
parents:
440
diff
changeset
|
465 |
self.BufferProject() |
34c9788bd933
Adding support for updating located variables when changing plugin IEC_Channel
laurent
parents:
440
diff
changeset
|
466 |
if self.AppFrame is not None: |
468 | 467 |
self.AppFrame.RefreshTitle() |
730 | 468 |
self.AppFrame.RefreshPouInstanceVariablesPanel() |
468 | 469 |
self.AppFrame.RefreshFileMenu() |
470 |
self.AppFrame.RefreshEditMenu() |
|
842 | 471 |
wx.CallAfter(self.AppFrame.RefreshEditor) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
472 |
|
401
8106a853a7c7
Adding support for displaying plugins available variable into Beremiz plugin tree
laurent
parents:
396
diff
changeset
|
473 |
def GetVariableLocationTree(self): |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
474 |
''' |
717 | 475 |
This function is meant to be overridden by confnodes. |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
476 |
|
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
477 |
It should returns an list of dictionaries |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
478 |
|
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
479 |
- IEC_type is an IEC type like BOOL/BYTE/SINT/... |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
480 |
- location is a string of this variable's location, like "%IX0.0.0" |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
481 |
''' |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
482 |
children = [] |
718 | 483 |
for child in self.IECSortedChildren(): |
411
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
484 |
children.append(child.GetVariableLocationTree()) |
8261c8f1e365
Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
403
diff
changeset
|
485 |
return children |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
486 |
|
717 | 487 |
def ConfNodePath(self): |
721 | 488 |
return os.path.split(__file__)[0] |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
489 |
|
718 | 490 |
def CTNPath(self, CTNName=None): |
13
f1f0edbeb313
More precise design for plugins.... to be continued...
etisserant
parents:
diff
changeset
|
491 |
return self.ProjectPath |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
492 |
|
718 | 493 |
def ConfNodeXmlFilePath(self, CTNName=None): |
494 |
return os.path.join(self.CTNPath(CTNName), "beremiz.xml") |
|
18 | 495 |
|
669
472469f4d5ad
Adding support for loading datatypes defined in plugins to allow to use them in PLC program
laurent
parents:
661
diff
changeset
|
496 |
def ParentsTypesFactory(self): |
717 | 497 |
return self.ConfNodeTypesFactory() |
363
e0c4d3549369
Adding support for recursively generate STLibrary and BlockLibrary according to plugin tree
laurent
parents:
361
diff
changeset
|
498 |
|
427 | 499 |
def _setBuildPath(self, buildpath): |
500 |
self.BuildPath = buildpath |
|
501 |
self.DefaultBuildPath = None |
|
502 |
if self._builder is not None: |
|
503 |
self._builder.SetBuildPath(self._getBuildPath()) |
|
504 |
||
20 | 505 |
def _getBuildPath(self): |
427 | 506 |
# BuildPath is defined by user |
507 |
if self.BuildPath is not None: |
|
508 |
return self.BuildPath |
|
509 |
# BuildPath isn't defined by user but already created by default |
|
510 |
if self.DefaultBuildPath is not None: |
|
511 |
return self.DefaultBuildPath |
|
512 |
# Create a build path in project folder if user has permissions |
|
513 |
if CheckPathPerm(self.ProjectPath): |
|
514 |
self.DefaultBuildPath = os.path.join(self.ProjectPath, "build") |
|
515 |
# Create a build path in temp folder |
|
516 |
else: |
|
517 |
self.DefaultBuildPath = os.path.join(tempfile.mkdtemp(), os.path.basename(self.ProjectPath), "build") |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
518 |
|
427 | 519 |
if not os.path.exists(self.DefaultBuildPath): |
520 |
os.makedirs(self.DefaultBuildPath) |
|
521 |
return self.DefaultBuildPath |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
522 |
|
203 | 523 |
def _getExtraFilesPath(self): |
524 |
return os.path.join(self._getBuildPath(), "extra_files") |
|
525 |
||
20 | 526 |
def _getIECcodepath(self): |
527 |
# define name for IEC code file |
|
528 |
return os.path.join(self._getBuildPath(), "plc.st") |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
529 |
|
65 | 530 |
def _getIECgeneratedcodepath(self): |
531 |
# define name for IEC generated code file |
|
532 |
return os.path.join(self._getBuildPath(), "generated_plc.st") |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
533 |
|
65 | 534 |
def _getIECrawcodepath(self): |
535 |
# define name for IEC raw code file |
|
718 | 536 |
return os.path.join(self.CTNPath(), "raw_plc.st") |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
537 |
|
97 | 538 |
def GetLocations(self): |
539 |
locations = [] |
|
540 |
filepath = os.path.join(self._getBuildPath(),"LOCATED_VARIABLES.h") |
|
541 |
if os.path.isfile(filepath): |
|
542 |
# IEC2C compiler generate a list of located variables : LOCATED_VARIABLES.h |
|
543 |
location_file = open(os.path.join(self._getBuildPath(),"LOCATED_VARIABLES.h")) |
|
544 |
# each line of LOCATED_VARIABLES.h declares a located variable |
|
545 |
lines = [line.strip() for line in location_file.readlines()] |
|
546 |
# This regular expression parses the lines genereated by IEC2C |
|
348
054fbf1ae0f8
Bug while parsing long located variables in GetLocations fixed
lbessard
parents:
338
diff
changeset
|
547 |
LOCATED_MODEL = re.compile("__LOCATED_VAR\((?P<IEC_TYPE>[A-Z]*),(?P<NAME>[_A-Za-z0-9]*),(?P<DIR>[QMI])(?:,(?P<SIZE>[XBWDL]))?,(?P<LOC>[,0-9]*)\)") |
97 | 548 |
for line in lines: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
549 |
# If line match RE, |
97 | 550 |
result = LOCATED_MODEL.match(line) |
551 |
if result: |
|
552 |
# Get the resulting dict |
|
553 |
resdict = result.groupdict() |
|
554 |
# rewrite string for variadic location as a tuple of integers |
|
555 |
resdict['LOC'] = tuple(map(int,resdict['LOC'].split(','))) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
556 |
# set located size to 'X' if not given |
97 | 557 |
if not resdict['SIZE']: |
558 |
resdict['SIZE'] = 'X' |
|
559 |
# finally store into located variable list |
|
560 |
locations.append(resdict) |
|
561 |
return locations |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
562 |
|
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
563 |
def GetConfNodeGlobalInstances(self): |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
564 |
return self._GlobalInstances() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
565 |
|
203 | 566 |
def _Generate_SoftPLC(self): |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
567 |
if self._Generate_PLC_ST(): |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
568 |
return self._Compile_ST_to_SoftPLC() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
569 |
return False |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
570 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
571 |
def _Generate_PLC_ST(self): |
20 | 572 |
""" |
64 | 573 |
Generate SoftPLC ST/IL/SFC code out of PLCOpenEditor controller, and compile it with IEC2C |
20 | 574 |
@param buildpath: path where files should be created |
575 |
""" |
|
576 |
||
717 | 577 |
# Update PLCOpenEditor ConfNode Block types before generate ST code |
578 |
self.RefreshConfNodesBlockLists() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
579 |
|
361 | 580 |
self.logger.write(_("Generating SoftPLC IEC-61131 ST/IL/SFC code...\n")) |
20 | 581 |
# ask PLCOpenEditor controller to write ST/IL/SFC code file |
309
6eb074f0dae9
Adding support for cancelling code generation of function with no input connected
lbessard
parents:
304
diff
changeset
|
582 |
program, errors, warnings = self.GenerateProgram(self._getIECgeneratedcodepath()) |
6eb074f0dae9
Adding support for cancelling code generation of function with no input connected
lbessard
parents:
304
diff
changeset
|
583 |
if len(warnings) > 0: |
361 | 584 |
self.logger.write_warning(_("Warnings in ST/IL/SFC code generator :\n")) |
309
6eb074f0dae9
Adding support for cancelling code generation of function with no input connected
lbessard
parents:
304
diff
changeset
|
585 |
for warning in warnings: |
6eb074f0dae9
Adding support for cancelling code generation of function with no input connected
lbessard
parents:
304
diff
changeset
|
586 |
self.logger.write_warning("%s\n"%warning) |
6eb074f0dae9
Adding support for cancelling code generation of function with no input connected
lbessard
parents:
304
diff
changeset
|
587 |
if len(errors) > 0: |
20 | 588 |
# Failed ! |
361 | 589 |
self.logger.write_error(_("Error in ST/IL/SFC code generator :\n%s\n")%errors[0]) |
20 | 590 |
return False |
65 | 591 |
plc_file = open(self._getIECcodepath(), "w") |
717 | 592 |
# Add ST Library from confnodes |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
593 |
plc_file.write(self.GetLibrariesSTCode()) |
65 | 594 |
if os.path.isfile(self._getIECrawcodepath()): |
595 |
plc_file.write(open(self._getIECrawcodepath(), "r").read()) |
|
596 |
plc_file.write("\n") |
|
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
597 |
plc_file.close() |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
598 |
plc_file = open(self._getIECcodepath(), "r") |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
599 |
self.ProgramOffset = 0 |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
600 |
for line in plc_file.xreadlines(): |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
601 |
self.ProgramOffset += 1 |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
602 |
plc_file.close() |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
603 |
plc_file = open(self._getIECcodepath(), "a") |
65 | 604 |
plc_file.write(open(self._getIECgeneratedcodepath(), "r").read()) |
605 |
plc_file.close() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
606 |
return True |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
607 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
608 |
def _Compile_ST_to_SoftPLC(self): |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
609 |
self.logger.write(_("Compiling IEC Program into C code...\n")) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
610 |
buildpath = self._getBuildPath() |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
611 |
|
20 | 612 |
# Now compile IEC code into many C files |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
613 |
# files are listed to stdout, and errors to stderr. |
110
a05e8b30c024
Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents:
109
diff
changeset
|
614 |
status, result, err_result = ProcessLogger( |
203 | 615 |
self.logger, |
351 | 616 |
"\"%s\" -f -I \"%s\" -T \"%s\" \"%s\""%( |
418 | 617 |
self.iec2c_path, |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
618 |
self.ieclib_path, |
351 | 619 |
buildpath, |
620 |
self._getIECcodepath()), |
|
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
621 |
no_stdout=True, no_stderr=True).spin() |
20 | 622 |
if status: |
623 |
# Failed ! |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
624 |
|
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
625 |
# parse iec2c's error message. if it contains a line number, |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
626 |
# then print those lines from the generated IEC file. |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
627 |
for err_line in err_result.split('\n'): |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
628 |
self.logger.write_warning(err_line + "\n") |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
629 |
|
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
630 |
m_result = MATIEC_ERROR_MODEL.match(err_line) |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
631 |
if m_result is not None: |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
632 |
first_line, first_column, last_line, last_column, error = m_result.groups() |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
633 |
first_line, last_line = int(first_line), int(last_line) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
634 |
|
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
635 |
last_section = None |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
636 |
f = open(self._getIECcodepath()) |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
637 |
|
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
638 |
for i, line in enumerate(f.readlines()): |
661
5d3da49e8029
Fixing bug in displaying lines of code at the origin of matiec errors
laurent
parents:
656
diff
changeset
|
639 |
i = i + 1 |
356
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
640 |
if line[0] not in '\t \r\n': |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
641 |
last_section = line |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
642 |
|
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
643 |
if first_line <= i <= last_line: |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
644 |
if last_section is not None: |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
645 |
self.logger.write_warning("In section: " + last_section) |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
646 |
last_section = None # only write section once |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
647 |
self.logger.write_warning("%04d: %s" % (i, line)) |
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
648 |
|
e9698d0ee5f3
Adding support for printing lines where matiec failed in Log console (thanks to Brendan)
lbessard
parents:
355
diff
changeset
|
649 |
f.close() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
650 |
|
361 | 651 |
self.logger.write_error(_("Error : IEC to C compiler returned %d\n")%status) |
20 | 652 |
return False |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
653 |
|
20 | 654 |
# Now extract C files of stdout |
113 | 655 |
C_files = [ fname for fname in result.splitlines() if fname[-2:]==".c" or fname[-2:]==".C" ] |
20 | 656 |
# remove those that are not to be compiled because included by others |
657 |
C_files.remove("POUS.c") |
|
115 | 658 |
if not C_files: |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
659 |
self.logger.write_error(_("Error : At least one configuration and one resource must be declared in PLC !\n")) |
115 | 660 |
return False |
20 | 661 |
# transform those base names to full names with path |
23 | 662 |
C_files = map(lambda filename:os.path.join(buildpath, filename), C_files) |
1050
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
663 |
|
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
664 |
# prepend beremiz include to configuration header |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
665 |
H_files = [ fname for fname in result.splitlines() if fname[-2:]==".h" or fname[-2:]==".H" ] |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
666 |
H_files.remove("LOCATED_VARIABLES.h") |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
667 |
H_files = map(lambda filename:os.path.join(buildpath, filename), H_files) |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
668 |
for H_file in H_files: |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
669 |
with file(H_file, 'r') as original: data = original.read() |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
670 |
with file(H_file, 'w') as modified: modified.write('#include "beremiz.h"\n' + data) |
56bef276055e
Made declaration from beremiz.h available to C pragmas in POUs. Added AtomicCompareExchange to beremiz.h
Edouard Tisserant
parents:
1006
diff
changeset
|
671 |
|
361 | 672 |
self.logger.write(_("Extracting Located Variables...\n")) |
97 | 673 |
# Keep track of generated located variables for later use by self._Generate_C |
674 |
self.PLCGeneratedLocatedVars = self.GetLocations() |
|
718 | 675 |
# Keep track of generated C files for later use by self.CTNGenerate_C |
18 | 676 |
self.PLCGeneratedCFiles = C_files |
49
45dc6a944ab6
On the long wat towards generated code comilation...
etisserant
parents:
47
diff
changeset
|
677 |
# compute CFLAGS for plc |
1401
611fded24ce4
Pair with matiec a51a3bb4d613. Re-enable resource add/remove, updated CFLAGS, disabled broken global FG test in tests/python
Edouard Tisserant
parents:
1398
diff
changeset
|
678 |
self.plcCFLAGS = '"-I%s" -Wno-unused-function'%self.ieclib_path |
18 | 679 |
return True |
680 |
||
203 | 681 |
def GetBuilder(self): |
682 |
""" |
|
683 |
Return a Builder (compile C code into machine code) |
|
684 |
""" |
|
685 |
# Get target, module and class name |
|
1315
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
686 |
targetname = self.GetTarget().getcontent().getLocalTag() |
733
915be999f3f0
targets and connectors are nor extensible
Edouard Tisserant
parents:
732
diff
changeset
|
687 |
targetclass = targets.GetBuilder(targetname) |
203 | 688 |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
689 |
# if target already |
203 | 690 |
if self._builder is None or not isinstance(self._builder,targetclass): |
691 |
# Get classname instance |
|
692 |
self._builder = targetclass(self) |
|
693 |
return self._builder |
|
694 |
||
677
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
695 |
def ResetBuildMD5(self): |
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
696 |
builder=self.GetBuilder() |
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
697 |
if builder is not None: |
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
698 |
builder.ResetBinaryCodeMD5() |
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
699 |
self.EnableMethod("_Transfer", False) |
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
700 |
|
203 | 701 |
def GetLastBuildMD5(self): |
702 |
builder=self.GetBuilder() |
|
703 |
if builder is not None: |
|
704 |
return builder.GetBinaryCodeMD5() |
|
705 |
else: |
|
706 |
return None |
|
707 |
||
708 |
####################################################################### |
|
709 |
# |
|
710 |
# C CODE GENERATION METHODS |
|
711 |
# |
|
712 |
####################################################################### |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
713 |
|
718 | 714 |
def CTNGenerate_C(self, buildpath, locations): |
203 | 715 |
""" |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
716 |
Return C code generated by iec2c compiler |
203 | 717 |
when _generate_softPLC have been called |
718 |
@param locations: ignored |
|
719 |
@return: [(C_file_name, CFLAGS),...] , LDFLAGS_TO_APPEND |
|
720 |
""" |
|
283
d0e6fc0701fb
Added "runtime.py", a file that is executed in python thread in runtime, before handling python_eval FBs requests. Added small python editor taken from wxPython demo, and appropriate icon and button to launch it.
etisserant
parents:
280
diff
changeset
|
721 |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
722 |
return ([(C_file_name, self.plcCFLAGS) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
723 |
for C_file_name in self.PLCGeneratedCFiles ], |
283
d0e6fc0701fb
Added "runtime.py", a file that is executed in python thread in runtime, before handling python_eval FBs requests. Added small python editor taken from wxPython demo, and appropriate icon and button to launch it.
etisserant
parents:
280
diff
changeset
|
724 |
"", # no ldflags |
d0e6fc0701fb
Added "runtime.py", a file that is executed in python thread in runtime, before handling python_eval FBs requests. Added small python editor taken from wxPython demo, and appropriate icon and button to launch it.
etisserant
parents:
280
diff
changeset
|
725 |
False) # do not expose retreive/publish calls |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
726 |
|
203 | 727 |
def ResetIECProgramsAndVariables(self): |
728 |
""" |
|
729 |
Reset variable and program list that are parsed from |
|
730 |
CSV file generated by IEC2C compiler. |
|
731 |
""" |
|
732 |
self._ProgramList = None |
|
733 |
self._VariablesList = None |
|
532
a822b0b64252
Fixed startin debugger with non empty debug variable list
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
529
diff
changeset
|
734 |
self._IECPathToIdx = {} |
670
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
735 |
self._Ticktime = 0 |
235 | 736 |
self.TracedIECPath = [] |
737 |
||
203 | 738 |
def GetIECProgramsAndVariables(self): |
739 |
""" |
|
740 |
Parse CSV-like file VARIABLES.csv resulting from IEC2C compiler. |
|
741 |
Each section is marked with a line staring with '//' |
|
742 |
list of all variables used in various POUs |
|
743 |
""" |
|
744 |
if self._ProgramList is None or self._VariablesList is None: |
|
745 |
try: |
|
746 |
csvfile = os.path.join(self._getBuildPath(),"VARIABLES.csv") |
|
747 |
# describes CSV columns |
|
748 |
ProgramsListAttributeName = ["num", "C_path", "type"] |
|
749 |
VariablesListAttributeName = ["num", "vartype", "IEC_path", "C_path", "type"] |
|
750 |
self._ProgramList = [] |
|
751 |
self._VariablesList = [] |
|
752 |
self._IECPathToIdx = {} |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
753 |
|
203 | 754 |
# Separate sections |
755 |
ListGroup = [] |
|
756 |
for line in open(csvfile,'r').xreadlines(): |
|
757 |
strippedline = line.strip() |
|
758 |
if strippedline.startswith("//"): |
|
759 |
# Start new section |
|
760 |
ListGroup.append([]) |
|
761 |
elif len(strippedline) > 0 and len(ListGroup) > 0: |
|
762 |
# append to this section |
|
763 |
ListGroup[-1].append(strippedline) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
764 |
|
203 | 765 |
# first section contains programs |
766 |
for line in ListGroup[0]: |
|
767 |
# Split and Maps each field to dictionnary entries |
|
768 |
attrs = dict(zip(ProgramsListAttributeName,line.strip().split(';'))) |
|
769 |
# Truncate "C_path" to remove conf an ressources names |
|
770 |
attrs["C_path"] = '__'.join(attrs["C_path"].split(".",2)[1:]) |
|
771 |
# Push this dictionnary into result. |
|
772 |
self._ProgramList.append(attrs) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
773 |
|
203 | 774 |
# second section contains all variables |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
775 |
config_FBs = {} |
203 | 776 |
for line in ListGroup[1]: |
777 |
# Split and Maps each field to dictionnary entries |
|
778 |
attrs = dict(zip(VariablesListAttributeName,line.strip().split(';'))) |
|
779 |
# Truncate "C_path" to remove conf an ressources names |
|
639
85dad46ae0f6
Fixing bug that prevent to use global variables in configuration
laurent
parents:
630
diff
changeset
|
780 |
parts = attrs["C_path"].split(".",2) |
85dad46ae0f6
Fixing bug that prevent to use global variables in configuration
laurent
parents:
630
diff
changeset
|
781 |
if len(parts) > 2: |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
782 |
config_FB = config_FBs.get(tuple(parts[:2])) |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
783 |
if config_FB: |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
784 |
parts = [config_FB] + parts[2:] |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
785 |
attrs["C_path"] = '.'.join(parts) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
786 |
else: |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
787 |
attrs["C_path"] = '__'.join(parts[1:]) |
639
85dad46ae0f6
Fixing bug that prevent to use global variables in configuration
laurent
parents:
630
diff
changeset
|
788 |
else: |
85dad46ae0f6
Fixing bug that prevent to use global variables in configuration
laurent
parents:
630
diff
changeset
|
789 |
attrs["C_path"] = '__'.join(parts) |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
790 |
if attrs["vartype"] == "FB": |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
791 |
config_FBs[tuple(parts)] = attrs["C_path"] |
203 | 792 |
# Push this dictionnary into result. |
793 |
self._VariablesList.append(attrs) |
|
794 |
# Fill in IEC<->C translation dicts |
|
795 |
IEC_path=attrs["IEC_path"] |
|
796 |
Idx=int(attrs["num"]) |
|
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
797 |
self._IECPathToIdx[IEC_path]=(Idx, attrs["type"]) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
798 |
|
670
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
799 |
# third section contains ticktime |
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
800 |
if len(ListGroup) > 2: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
801 |
self._Ticktime = int(ListGroup[2][0]) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
802 |
|
203 | 803 |
except Exception,e: |
361 | 804 |
self.logger.write_error(_("Cannot open/parse VARIABLES.csv!\n")) |
203 | 805 |
self.logger.write_error(traceback.format_exc()) |
806 |
self.ResetIECProgramsAndVariables() |
|
807 |
return False |
|
808 |
||
809 |
return True |
|
810 |
||
811 |
def Generate_plc_debugger(self): |
|
812 |
""" |
|
813 |
Generate trace/debug code out of PLC variable list |
|
814 |
""" |
|
815 |
self.GetIECProgramsAndVariables() |
|
816 |
||
817 |
# prepare debug code |
|
733
915be999f3f0
targets and connectors are nor extensible
Edouard Tisserant
parents:
732
diff
changeset
|
818 |
debug_code = targets.GetCode("plc_debug") % { |
335
c5f3f71e7260
fixed bug : buffer overflow when debugging PLC with python blocks
greg
parents:
334
diff
changeset
|
819 |
"buffer_size": reduce(lambda x, y: x + y, [DebugTypesSize.get(v["type"], 0) for v in self._VariablesList], 0), |
203 | 820 |
"programs_declarations": |
821 |
"\n".join(["extern %(type)s %(C_path)s;"%p for p in self._ProgramList]), |
|
822 |
"extern_variables_declarations":"\n".join([ |
|
506
24629d4fc805
Adding support for making distinction between external variables and located variables for forcing
laurent
parents:
496
diff
changeset
|
823 |
{"EXT":"extern __IEC_%(type)s_p %(C_path)s;", |
24629d4fc805
Adding support for making distinction between external variables and located variables for forcing
laurent
parents:
496
diff
changeset
|
824 |
"IN":"extern __IEC_%(type)s_p %(C_path)s;", |
601
d0e3fc4b9951
Fix bug when debugging located variables of type memory (%M)
laurent
parents:
592
diff
changeset
|
825 |
"MEM":"extern __IEC_%(type)s_p %(C_path)s;", |
506
24629d4fc805
Adding support for making distinction between external variables and located variables for forcing
laurent
parents:
496
diff
changeset
|
826 |
"OUT":"extern __IEC_%(type)s_p %(C_path)s;", |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
827 |
"VAR":"extern __IEC_%(type)s_t %(C_path)s;", |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
828 |
"FB":"extern %(type)s %(C_path)s;"}[v["vartype"]]%v |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
829 |
for v in self._VariablesList if v["C_path"].find('.')<0]), |
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
830 |
"for_each_variable_do_code":"\n".join([ |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
831 |
{"EXT":" (*fp)((void*)&(%(C_path)s),%(type)s_P_ENUM);\n", |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
832 |
"IN":" (*fp)((void*)&(%(C_path)s),%(type)s_P_ENUM);\n", |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
833 |
"MEM":" (*fp)((void*)&(%(C_path)s),%(type)s_O_ENUM);\n", |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
834 |
"OUT":" (*fp)((void*)&(%(C_path)s),%(type)s_O_ENUM);\n", |
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
835 |
"VAR":" (*fp)((void*)&(%(C_path)s),%(type)s_ENUM);\n"}[v["vartype"]]%v |
592 | 836 |
for v in self._VariablesList if v["vartype"] != "FB" and v["type"] in DebugTypesSize ]), |
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
837 |
"find_variable_case_code":"\n".join([ |
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
838 |
" case %(num)s:\n"%v+ |
883
235a9ec83b95
Adding support for defining specific global variables for ConfTreeNodes
Laurent Bessard
parents:
869
diff
changeset
|
839 |
" *varp = (void*)&(%(C_path)s);\n"%v+ |
506
24629d4fc805
Adding support for making distinction between external variables and located variables for forcing
laurent
parents:
496
diff
changeset
|
840 |
{"EXT":" return %(type)s_P_ENUM;\n", |
24629d4fc805
Adding support for making distinction between external variables and located variables for forcing
laurent
parents:
496
diff
changeset
|
841 |
"IN":" return %(type)s_P_ENUM;\n", |
604
5b1c92060fc2
memory located variables no behave like outputs, when forced
Edouard Tisserant
parents:
601
diff
changeset
|
842 |
"MEM":" return %(type)s_O_ENUM;\n", |
511 | 843 |
"OUT":" return %(type)s_O_ENUM;\n", |
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
844 |
"VAR":" return %(type)s_ENUM;\n"}[v["vartype"]]%v |
592 | 845 |
for v in self._VariablesList if v["vartype"] != "FB" and v["type"] in DebugTypesSize ])} |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
846 |
|
203 | 847 |
return debug_code |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
848 |
|
985
cd8dadcef426
Re-organized C code templates for plc_main. Moved logging out of plc_debug. Factorized redundant _common_ticktime external declaration
Edouard Tisserant
parents:
978
diff
changeset
|
849 |
def Generate_plc_main(self): |
203 | 850 |
""" |
717 | 851 |
Use confnodes layout given in LocationCFilesAndCFLAGS to |
852 |
generate glue code that dispatch calls to all confnodes |
|
203 | 853 |
""" |
854 |
# filter location that are related to code that will be called |
|
855 |
# in retreive, publish, init, cleanup |
|
856 |
locstrs = map(lambda x:"_".join(map(str,x)), |
|
857 |
[loc for loc,Cfiles,DoCalls in self.LocationCFilesAndCFLAGS if loc and DoCalls]) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
858 |
|
203 | 859 |
# Generate main, based on template |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
860 |
if not self.BeremizRoot.getDisable_Extensions(): |
985
cd8dadcef426
Re-organized C code templates for plc_main. Moved logging out of plc_debug. Factorized redundant _common_ticktime external declaration
Edouard Tisserant
parents:
978
diff
changeset
|
861 |
plc_main_code = targets.GetCode("plc_main_head") % { |
338 | 862 |
"calls_prototypes":"\n".join([( |
863 |
"int __init_%(s)s(int argc,char **argv);\n"+ |
|
418 | 864 |
"void __cleanup_%(s)s(void);\n"+ |
865 |
"void __retrieve_%(s)s(void);\n"+ |
|
866 |
"void __publish_%(s)s(void);")%{'s':locstr} for locstr in locstrs]), |
|
338 | 867 |
"retrieve_calls":"\n ".join([ |
1072
83b0815b8812
Fixed retrieve and publish call order in PLC generated code
Laurent Bessard
parents:
1064
diff
changeset
|
868 |
"__retrieve_%s();"%locstr for locstr in locstrs]), |
338 | 869 |
"publish_calls":"\n ".join([ #Call publish in reverse order |
1072
83b0815b8812
Fixed retrieve and publish call order in PLC generated code
Laurent Bessard
parents:
1064
diff
changeset
|
870 |
"__publish_%s();"%locstrs[i-1] for i in xrange(len(locstrs), 0, -1)]), |
338 | 871 |
"init_calls":"\n ".join([ |
872 |
"init_level=%d; "%(i+1)+ |
|
423 | 873 |
"if((res = __init_%s(argc,argv))){"%locstr + |
338 | 874 |
#"printf(\"%s\"); "%locstr + #for debug |
875 |
"return res;}" for i,locstr in enumerate(locstrs)]), |
|
876 |
"cleanup_calls":"\n ".join([ |
|
877 |
"if(init_level >= %d) "%i+ |
|
878 |
"__cleanup_%s();"%locstrs[i-1] for i in xrange(len(locstrs), 0, -1)]) |
|
879 |
} |
|
880 |
else: |
|
985
cd8dadcef426
Re-organized C code templates for plc_main. Moved logging out of plc_debug. Factorized redundant _common_ticktime external declaration
Edouard Tisserant
parents:
978
diff
changeset
|
881 |
plc_main_code = targets.GetCode("plc_main_head") % { |
338 | 882 |
"calls_prototypes":"\n", |
883 |
"retrieve_calls":"\n", |
|
884 |
"publish_calls":"\n", |
|
885 |
"init_calls":"\n", |
|
886 |
"cleanup_calls":"\n" |
|
887 |
} |
|
1315
ff14a66bbd12
Fixed Beremiz for working with new xmlclass support using lxml
Laurent Bessard
parents:
1282
diff
changeset
|
888 |
plc_main_code += targets.GetTargetCode(self.GetTarget().getcontent().getLocalTag()) |
985
cd8dadcef426
Re-organized C code templates for plc_main. Moved logging out of plc_debug. Factorized redundant _common_ticktime external declaration
Edouard Tisserant
parents:
978
diff
changeset
|
889 |
plc_main_code += targets.GetCode("plc_main_tail") |
203 | 890 |
return plc_main_code |
891 |
||
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
892 |
|
623
8cdb533c3c7a
A few new keyboard shortcuts : F4=stop, F5=run, F5=transfer, F7=connect
Edouard Tisserant
parents:
619
diff
changeset
|
893 |
def _Build(self): |
20 | 894 |
""" |
717 | 895 |
Method called by user to (re)build SoftPLC and confnode tree |
20 | 896 |
""" |
395 | 897 |
if self.AppFrame is not None: |
898 |
self.AppFrame.ClearErrors() |
|
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
899 |
self._CloseView(self._IECCodeView) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
900 |
|
20 | 901 |
buildpath = self._getBuildPath() |
902 |
||
903 |
# Eventually create build dir |
|
18 | 904 |
if not os.path.exists(buildpath): |
905 |
os.mkdir(buildpath) |
|
203 | 906 |
# There is something to clean |
110
a05e8b30c024
Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents:
109
diff
changeset
|
907 |
self.EnableMethod("_Clean", True) |
203 | 908 |
|
909 |
self.logger.flush() |
|
361 | 910 |
self.logger.write(_("Start build in %s\n") % buildpath) |
203 | 911 |
|
912 |
# Generate SoftPLC IEC code |
|
913 |
IECGenRes = self._Generate_SoftPLC() |
|
914 |
self.ShowMethod("_showIECcode", True) |
|
915 |
||
916 |
# If IEC code gen fail, bail out. |
|
917 |
if not IECGenRes: |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
918 |
self.logger.write_error(_("PLC code generation failed !\n")) |
677
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
919 |
self.ResetBuildMD5() |
20 | 920 |
return False |
921 |
||
203 | 922 |
# Reset variable and program list that are parsed from |
923 |
# CSV file generated by IEC2C compiler. |
|
924 |
self.ResetIECProgramsAndVariables() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
925 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
926 |
# Collect platform specific C code |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
927 |
# Code and other files from extension |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
928 |
if not self._Generate_runtime(): |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
929 |
return False |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
930 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
931 |
# Get current or fresh builder |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
932 |
builder = self.GetBuilder() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
933 |
if builder is None: |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
934 |
self.logger.write_error(_("Fatal : cannot get builder.\n")) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
935 |
self.ResetBuildMD5() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
936 |
return False |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
937 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
938 |
# Build |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
939 |
try: |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
940 |
if not builder.build() : |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
941 |
self.logger.write_error(_("C Build failed.\n")) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
942 |
return False |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
943 |
except Exception, exc: |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
944 |
self.logger.write_error(_("C Build crashed !\n")) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
945 |
self.logger.write_error(traceback.format_exc()) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
946 |
self.ResetBuildMD5() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
947 |
return False |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
948 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
949 |
self.logger.write(_("Successfully built.\n")) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
950 |
# Update GUI status about need for transfer |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
951 |
self.CompareLocalAndRemotePLC() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
952 |
return True |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
953 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
954 |
def _Generate_runtime(self): |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
955 |
buildpath = self._getBuildPath() |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
956 |
|
717 | 957 |
# Generate C code and compilation params from confnode hierarchy |
24 | 958 |
try: |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
959 |
CTNLocationCFilesAndCFLAGS, CTNLDFLAGS, CTNExtraFiles = self._Generate_C( |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
960 |
buildpath, |
203 | 961 |
self.PLCGeneratedLocatedVars) |
178
2390b409eb93
Added PLC tick alignement on external synchronization source feature.
etisserant
parents:
176
diff
changeset
|
962 |
except Exception, exc: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
963 |
self.logger.write_error(_("Runtime IO extensions C code generation failed !\n")) |
203 | 964 |
self.logger.write_error(traceback.format_exc()) |
677
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
965 |
self.ResetBuildMD5() |
24 | 966 |
return False |
18 | 967 |
|
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
968 |
# Generate C code and compilation params from liraries |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
969 |
try: |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
970 |
LibCFilesAndCFLAGS, LibLDFLAGS, LibExtraFiles = self.GetLibrariesCCode(buildpath) |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
971 |
except Exception, exc: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
972 |
self.logger.write_error(_("Runtime library extensions C code generation failed !\n")) |
728
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
973 |
self.logger.write_error(traceback.format_exc()) |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
974 |
self.ResetBuildMD5() |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
975 |
return False |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
976 |
|
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
977 |
self.LocationCFilesAndCFLAGS = CTNLocationCFilesAndCFLAGS + LibCFilesAndCFLAGS |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
978 |
self.LDFLAGS = CTNLDFLAGS + LibLDFLAGS |
e0424e96e3fd
refactoring - library support is not anymore attached to configtree nodes, but handles by project controller
Edouard Tisserant
parents:
726
diff
changeset
|
979 |
ExtraFiles = CTNExtraFiles + LibExtraFiles |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
980 |
|
361 | 981 |
# Get temporary directory path |
203 | 982 |
extrafilespath = self._getExtraFilesPath() |
983 |
# Remove old directory |
|
984 |
if os.path.exists(extrafilespath): |
|
985 |
shutil.rmtree(extrafilespath) |
|
986 |
# Recreate directory |
|
987 |
os.mkdir(extrafilespath) |
|
988 |
# Then write the files |
|
989 |
for fname,fobject in ExtraFiles: |
|
990 |
fpath = os.path.join(extrafilespath,fname) |
|
991 |
open(fpath, "wb").write(fobject.read()) |
|
992 |
# Now we can forget ExtraFiles (will close files object) |
|
993 |
del ExtraFiles |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
994 |
|
1001
3f966bbb3fba
Added beremiz.h header file for extensions
Edouard Tisserant
parents:
1000
diff
changeset
|
995 |
# Header file for extensions |
3f966bbb3fba
Added beremiz.h header file for extensions
Edouard Tisserant
parents:
1000
diff
changeset
|
996 |
open(os.path.join(buildpath,"beremiz.h"), "w").write(targets.GetHeader()) |
3f966bbb3fba
Added beremiz.h header file for extensions
Edouard Tisserant
parents:
1000
diff
changeset
|
997 |
|
203 | 998 |
# Template based part of C code generation |
717 | 999 |
# files are stacked at the beginning, as files of confnode tree root |
203 | 1000 |
for generator, filename, name in [ |
1001 |
# debugger code |
|
1002 |
(self.Generate_plc_debugger, "plc_debugger.c", "Debugger"), |
|
1003 |
# init/cleanup/retrieve/publish, run and align code |
|
985
cd8dadcef426
Re-organized C code templates for plc_main. Moved logging out of plc_debug. Factorized redundant _common_ticktime external declaration
Edouard Tisserant
parents:
978
diff
changeset
|
1004 |
(self.Generate_plc_main,"plc_main.c","Common runtime")]: |
203 | 1005 |
try: |
1006 |
# Do generate |
|
1007 |
code = generator() |
|
335
c5f3f71e7260
fixed bug : buffer overflow when debugging PLC with python blocks
greg
parents:
334
diff
changeset
|
1008 |
if code is None: |
c5f3f71e7260
fixed bug : buffer overflow when debugging PLC with python blocks
greg
parents:
334
diff
changeset
|
1009 |
raise |
203 | 1010 |
code_path = os.path.join(buildpath,filename) |
1011 |
open(code_path, "w").write(code) |
|
717 | 1012 |
# Insert this file as first file to be compiled at root confnode |
203 | 1013 |
self.LocationCFilesAndCFLAGS[0][1].insert(0,(code_path, self.plcCFLAGS)) |
1014 |
except Exception, exc: |
|
361 | 1015 |
self.logger.write_error(name+_(" generation failed !\n")) |
203 | 1016 |
self.logger.write_error(traceback.format_exc()) |
677
607731b33026
Fix 'Transfer" button state according to last build result
laurent
parents:
676
diff
changeset
|
1017 |
self.ResetBuildMD5() |
203 | 1018 |
return False |
361 | 1019 |
self.logger.write(_("C code generated successfully.\n")) |
49
45dc6a944ab6
On the long wat towards generated code comilation...
etisserant
parents:
47
diff
changeset
|
1020 |
return True |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1021 |
|
202
cd81a7a6e55c
Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents:
199
diff
changeset
|
1022 |
def ShowError(self, logger, from_location, to_location): |
cd81a7a6e55c
Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents:
199
diff
changeset
|
1023 |
chunk_infos = self.GetChunkInfos(from_location, to_location) |
cd81a7a6e55c
Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents:
199
diff
changeset
|
1024 |
for infos, (start_row, start_col) in chunk_infos: |
cd81a7a6e55c
Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents:
199
diff
changeset
|
1025 |
start = (from_location[0] - start_row, from_location[1] - start_col) |
cd81a7a6e55c
Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents:
199
diff
changeset
|
1026 |
end = (to_location[0] - start_row, to_location[1] - start_col) |
396 | 1027 |
if self.AppFrame is not None: |
1028 |
self.AppFrame.ShowError(infos, start, end) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1029 |
|
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1030 |
_IECCodeView = None |
203 | 1031 |
def _showIECcode(self): |
716
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1032 |
self._OpenView("IEC code") |
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1033 |
|
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1034 |
_IECRawCodeView = None |
716
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1035 |
def _editIECrawcode(self): |
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1036 |
self._OpenView("IEC raw code") |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1037 |
|
782 | 1038 |
_ProjectFilesView = None |
1039 |
def _OpenProjectFiles(self): |
|
815
e4f24593a758
Adding support for extending internationalization to extensions
laurent
parents:
814
diff
changeset
|
1040 |
self._OpenView("Project Files") |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1041 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1042 |
_FileEditors = {} |
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1043 |
def _OpenFileEditor(self, filepath): |
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1044 |
self._OpenView(filepath) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1045 |
|
782 | 1046 |
def _OpenView(self, name=None, onlyopened=False): |
716
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1047 |
if name == "IEC code": |
782 | 1048 |
if self._IECCodeView is None: |
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1049 |
plc_file = self._getIECcodepath() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1050 |
|
1262
7b9259945453
Fixed bug with Copy/Paste in generated ST code Viewer
Laurent Bessard
parents:
1255
diff
changeset
|
1051 |
self._IECCodeView = IECCodeViewer(self.AppFrame.TabsOpened, "", self.AppFrame, None, instancepath=name) |
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1052 |
self._IECCodeView.SetTextSyntax("ALL") |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1053 |
self._IECCodeView.SetKeywords(IEC_KEYWORDS) |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1054 |
try: |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1055 |
text = file(plc_file).read() |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1056 |
except: |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1057 |
text = '(* No IEC code have been generated at that time ! *)' |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1058 |
self._IECCodeView.SetText(text = text) |
782 | 1059 |
self._IECCodeView.SetIcon(GetBitmap("ST")) |
806
abf1afc1f04d
Fix bug when closing IECCodeView and IECRawCodeView, reopening them was impossible
laurent
parents:
801
diff
changeset
|
1060 |
setattr(self._IECCodeView, "_OnClose", self.OnCloseEditor) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1061 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1062 |
if self._IECCodeView is not None: |
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1063 |
self.AppFrame.EditProjectElement(self._IECCodeView, name) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1064 |
|
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1065 |
return self._IECCodeView |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1066 |
|
716
180e4a7d945c
Adding search field for finding function or function block in library tree
laurent
parents:
715
diff
changeset
|
1067 |
elif name == "IEC raw code": |
782 | 1068 |
if self._IECRawCodeView is None: |
806
abf1afc1f04d
Fix bug when closing IECCodeView and IECRawCodeView, reopening them was impossible
laurent
parents:
801
diff
changeset
|
1069 |
controler = MiniTextControler(self._getIECrawcodepath(), self) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1070 |
|
1262
7b9259945453
Fixed bug with Copy/Paste in generated ST code Viewer
Laurent Bessard
parents:
1255
diff
changeset
|
1071 |
self._IECRawCodeView = IECCodeViewer(self.AppFrame.TabsOpened, "", self.AppFrame, controler, instancepath=name) |
782 | 1072 |
self._IECRawCodeView.SetTextSyntax("ALL") |
1073 |
self._IECRawCodeView.SetKeywords(IEC_KEYWORDS) |
|
1074 |
self._IECRawCodeView.RefreshView() |
|
1075 |
self._IECRawCodeView.SetIcon(GetBitmap("ST")) |
|
806
abf1afc1f04d
Fix bug when closing IECCodeView and IECRawCodeView, reopening them was impossible
laurent
parents:
801
diff
changeset
|
1076 |
setattr(self._IECRawCodeView, "_OnClose", self.OnCloseEditor) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1077 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1078 |
if self._IECRawCodeView is not None: |
782 | 1079 |
self.AppFrame.EditProjectElement(self._IECRawCodeView, name) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1080 |
|
782 | 1081 |
return self._IECRawCodeView |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1082 |
|
815
e4f24593a758
Adding support for extending internationalization to extensions
laurent
parents:
814
diff
changeset
|
1083 |
elif name == "Project Files": |
782 | 1084 |
if self._ProjectFilesView is None: |
1085 |
self._ProjectFilesView = FileManagementPanel(self.AppFrame.TabsOpened, self, name, self._getProjectFilesPath(), True) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1086 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1087 |
extensions = [] |
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1088 |
for extension, name, editor in features.file_editors: |
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1089 |
if extension not in extensions: |
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1090 |
extensions.append(extension) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1091 |
self._ProjectFilesView.SetEditableFileExtensions(extensions) |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1092 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1093 |
if self._ProjectFilesView is not None: |
782 | 1094 |
self.AppFrame.EditProjectElement(self._ProjectFilesView, name) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1095 |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1096 |
return self._ProjectFilesView |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1097 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1098 |
elif name is not None and name.find("::") != -1: |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1099 |
filepath, editor_name = name.split("::") |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1100 |
if not self._FileEditors.has_key(filepath): |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1101 |
if os.path.isfile(filepath): |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1102 |
file_extension = os.path.splitext(filepath)[1] |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1103 |
|
796 | 1104 |
editors = dict([(edit_name, edit_class) |
1105 |
for extension, edit_name, edit_class in features.file_editors |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1106 |
if extension == file_extension]) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1107 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1108 |
if editor_name == "": |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1109 |
if len(editors) == 1: |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1110 |
editor_name = editors.keys()[0] |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1111 |
elif len(editors) > 0: |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1112 |
names = editors.keys() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1113 |
dialog = wx.SingleChoiceDialog(self.AppFrame, |
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1114 |
_("Select an editor:"), _("Editor selection"), |
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1115 |
names, wx.DEFAULT_DIALOG_STYLE|wx.OK|wx.CANCEL) |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1116 |
if dialog.ShowModal() == wx.ID_OK: |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1117 |
editor_name = names[dialog.GetSelection()] |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1118 |
dialog.Destroy() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1119 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1120 |
if editor_name != "": |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1121 |
name = "::".join([filepath, editor_name]) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1122 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1123 |
editor = editors[editor_name]() |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1124 |
self._FileEditors[filepath] = editor(self.AppFrame.TabsOpened, self, name, self.AppFrame) |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1125 |
self._FileEditors[filepath].SetIcon(GetBitmap("FILE")) |
897
3cd39bc7dbad
Added support for defining extension file editor as DebugViewer
Laurent Bessard
parents:
883
diff
changeset
|
1126 |
if isinstance(self._FileEditors[filepath], DebugViewer): |
3cd39bc7dbad
Added support for defining extension file editor as DebugViewer
Laurent Bessard
parents:
883
diff
changeset
|
1127 |
self._FileEditors[filepath].SetDataProducer(self) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1128 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1129 |
if self._FileEditors.has_key(filepath): |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1130 |
editor = self._FileEditors[filepath] |
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1131 |
self.AppFrame.EditProjectElement(editor, editor.GetTagName()) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1132 |
|
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1133 |
return self._FileEditors.get(filepath) |
738 | 1134 |
else: |
786 | 1135 |
return ConfigTreeNode._OpenView(self, self.CTNName(), onlyopened) |
20 | 1136 |
|
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1137 |
def OnCloseEditor(self, view): |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1138 |
ConfigTreeNode.OnCloseEditor(self, view) |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1139 |
if self._IECCodeView == view: |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1140 |
self._IECCodeView = None |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1141 |
if self._IECRawCodeView == view: |
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1142 |
self._IECRawCodeView = None |
782 | 1143 |
if self._ProjectFilesView == view: |
1144 |
self._ProjectFilesView = None |
|
784
a1d970365e41
Adding support for beremiz extensions to define custom file editors for project files
laurent
parents:
782
diff
changeset
|
1145 |
if view in self._FileEditors.values(): |
792 | 1146 |
self._FileEditors.pop(view.GetFilePath()) |
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1147 |
|
203 | 1148 |
def _Clean(self): |
774
78b5fa92dd1c
Fix bug when opening and closing confnode extra viewers
laurent
parents:
770
diff
changeset
|
1149 |
self._CloseView(self._IECCodeView) |
108 | 1150 |
if os.path.isdir(os.path.join(self._getBuildPath())): |
361 | 1151 |
self.logger.write(_("Cleaning the build directory\n")) |
108 | 1152 |
shutil.rmtree(os.path.join(self._getBuildPath())) |
1153 |
else: |
|
361 | 1154 |
self.logger.write_error(_("Build directory already clean\n")) |
203 | 1155 |
self.ShowMethod("_showIECcode", False) |
110
a05e8b30c024
Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents:
109
diff
changeset
|
1156 |
self.EnableMethod("_Clean", False) |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1157 |
# kill the builder |
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1158 |
self._builder = None |
203 | 1159 |
self.CompareLocalAndRemotePLC() |
1160 |
||
911
ffa24427396a
Log redirected to console, dump of all available log to console when connecting to PLC
Edouard Tisserant
parents:
906
diff
changeset
|
1161 |
def UpdatePLCLog(self, log_count): |
978 | 1162 |
if log_count: |
1163 |
if self.AppFrame is not None: |
|
1164 |
self.AppFrame.LogViewer.SetLogCounters(log_count) |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1165 |
|
203 | 1166 |
def UpdateMethodsFromPLCStatus(self): |
486
2e0fe44044b3
Catch Pyro exception when connection closed and print message
laurent
parents:
483
diff
changeset
|
1167 |
status = None |
203 | 1168 |
if self._connector is not None: |
923
6ef6e0b3a908
Fixed crash (segfault) when logging debug messages
Edouard Tisserant
parents:
922
diff
changeset
|
1169 |
PLCstatus = self._connector.GetPLCstatus() |
6ef6e0b3a908
Fixed crash (segfault) when logging debug messages
Edouard Tisserant
parents:
922
diff
changeset
|
1170 |
if PLCstatus is not None: |
6ef6e0b3a908
Fixed crash (segfault) when logging debug messages
Edouard Tisserant
parents:
922
diff
changeset
|
1171 |
status, log_count = PLCstatus |
6ef6e0b3a908
Fixed crash (segfault) when logging debug messages
Edouard Tisserant
parents:
922
diff
changeset
|
1172 |
self.UpdatePLCLog(log_count) |
486
2e0fe44044b3
Catch Pyro exception when connection closed and print message
laurent
parents:
483
diff
changeset
|
1173 |
if status is None: |
1116
300f98a8d4c6
Fixed bug connector not resetted when connection is lost
Laurent Bessard
parents:
1105
diff
changeset
|
1174 |
self._SetConnector(None, False) |
203 | 1175 |
status = "Disconnected" |
446
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1176 |
if(self.previous_plcstate != status): |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1177 |
for args in { |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1178 |
"Started" : [("_Run", False), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1179 |
("_Stop", True)], |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1180 |
"Stopped" : [("_Run", True), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1181 |
("_Stop", False)], |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1182 |
"Empty" : [("_Run", False), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1183 |
("_Stop", False)], |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1184 |
"Broken" : [], |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1185 |
"Disconnected" :[("_Run", False), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1186 |
("_Stop", False), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1187 |
("_Transfer", False), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1188 |
("_Connect", True), |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1189 |
("_Disconnect", False)], |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1190 |
}.get(status,[]): |
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1191 |
self.ShowMethod(*args) |
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1192 |
self.previous_plcstate = status |
918 | 1193 |
if self.AppFrame is not None: |
1194 |
self.AppFrame.RefreshStatusToolBar() |
|
1000 | 1195 |
if status == "Disconnected": |
1196 |
self.AppFrame.ConnectionStatusBar.SetStatusText(_(status), 1) |
|
1197 |
self.AppFrame.ConnectionStatusBar.SetStatusText('', 2) |
|
1198 |
else: |
|
1199 |
self.AppFrame.ConnectionStatusBar.SetStatusText( |
|
1200 |
_("Connected to URI: %s") % self.BeremizRoot.getURI_location().strip(), 1) |
|
1006
0302f9ab7e9a
Fixed PLC status not translated in status bar when connected
Laurent Bessard
parents:
1001
diff
changeset
|
1201 |
self.AppFrame.ConnectionStatusBar.SetStatusText(_(status), 2) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1202 |
|
446
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1203 |
def PullPLCStatusProc(self, event): |
918 | 1204 |
self.UpdateMethodsFromPLCStatus() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1205 |
|
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1206 |
def SnapshotAndResetDebugValuesBuffers(self): |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1207 |
buffers, self.DebugValuesBuffers = (self.DebugValuesBuffers, |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1208 |
[list() for iec_path in self.TracedIECPath]) |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1209 |
ticks, self.DebugTicks = self.DebugTicks, [] |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1210 |
return ticks, buffers |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1211 |
|
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1212 |
def RegisterDebugVarToConnector(self): |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1213 |
self.DebugTimer=None |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1214 |
Idxs = [] |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1215 |
self.TracedIECPath = [] |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1216 |
if self._connector is not None: |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1217 |
self.IECdebug_lock.acquire() |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1218 |
IECPathsToPop = [] |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1219 |
for IECPath,data_tuple in self.IECdebug_datas.iteritems(): |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1220 |
WeakCallableDict, data_log, status, fvalue, buffer_list = data_tuple |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1221 |
if len(WeakCallableDict) == 0: |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1222 |
# Callable Dict is empty. |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1223 |
# This variable is not needed anymore! |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1224 |
IECPathsToPop.append(IECPath) |
355 | 1225 |
elif IECPath != "__tick__": |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1226 |
# Convert |
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
1227 |
Idx, IEC_Type = self._IECPathToIdx.get(IECPath,(None,None)) |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1228 |
if Idx is not None: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1229 |
if IEC_Type in DebugTypesSize: |
592 | 1230 |
Idxs.append((Idx, IEC_Type, fvalue, IECPath)) |
1231 |
else: |
|
801
435e49e80832
Update list of messages to be translated for internationalization and french translations
laurent
parents:
796
diff
changeset
|
1232 |
self.logger.write_warning(_("Debug: Unsupported type to debug '%s'\n")%IEC_Type) |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1233 |
else: |
801
435e49e80832
Update list of messages to be translated for internationalization and french translations
laurent
parents:
796
diff
changeset
|
1234 |
self.logger.write_warning(_("Debug: Unknown variable '%s'\n")%IECPath) |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1235 |
for IECPathToPop in IECPathsToPop: |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1236 |
self.IECdebug_datas.pop(IECPathToPop) |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1237 |
|
457 | 1238 |
if Idxs: |
1239 |
Idxs.sort() |
|
475 | 1240 |
self.TracedIECPath = zip(*Idxs)[3] |
474 | 1241 |
self._connector.SetTraceVariablesList(zip(*zip(*Idxs)[0:3])) |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1242 |
else: |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1243 |
self.TracedIECPath = [] |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1244 |
self._connector.SetTraceVariablesList([]) |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1245 |
self.SnapshotAndResetDebugValuesBuffers() |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1246 |
self.IECdebug_lock.release() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1247 |
|
1146 | 1248 |
def IsPLCStarted(self): |
1249 |
return self.previous_plcstate == "Started" |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1250 |
|
243 | 1251 |
def ReArmDebugRegisterTimer(self): |
1252 |
if self.DebugTimer is not None: |
|
1253 |
self.DebugTimer.cancel() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1254 |
|
1089
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1255 |
# Prevent to call RegisterDebugVarToConnector when PLC is not started |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1256 |
# If an output location var is forced it's leads to segmentation fault in runtime |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1257 |
# Links between PLC located variables and real variables are not ready |
1146 | 1258 |
if self.IsPLCStarted(): |
1089
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1259 |
# Timer to prevent rapid-fire when registering many variables |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1260 |
# use wx.CallAfter use keep using same thread. TODO : use wx.Timer instead |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1261 |
self.DebugTimer=Timer(0.5,wx.CallAfter,args = [self.RegisterDebugVarToConnector]) |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1262 |
# Rearm anti-rapid-fire timer |
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1263 |
self.DebugTimer.start() |
243 | 1264 |
|
463
961bddcfc913
Adding support for forcing PLC variable (still command to PLC to implement)
laurent
parents:
462
diff
changeset
|
1265 |
def GetDebugIECVariableType(self, IECPath): |
961bddcfc913
Adding support for forcing PLC variable (still command to PLC to implement)
laurent
parents:
462
diff
changeset
|
1266 |
Idx, IEC_Type = self._IECPathToIdx.get(IECPath,(None,None)) |
961bddcfc913
Adding support for forcing PLC variable (still command to PLC to implement)
laurent
parents:
462
diff
changeset
|
1267 |
return IEC_Type |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1268 |
|
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1269 |
def SubscribeDebugIECVariable(self, IECPath, callableobj, buffer_list=False, *args, **kwargs): |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1270 |
""" |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1271 |
Dispatching use a dictionnary linking IEC variable paths |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1272 |
to a WeakKeyDictionary linking |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1273 |
weakly referenced callables to optionnal args |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1274 |
""" |
450
18583d13f0fa
Preliminary accessor support for debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
447
diff
changeset
|
1275 |
if IECPath != "__tick__" and not self._IECPathToIdx.has_key(IECPath): |
246 | 1276 |
return None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1277 |
|
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1278 |
self.IECdebug_lock.acquire() |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1279 |
# If no entry exist, create a new one with a fresh WeakKeyDictionary |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1280 |
IECdebug_data = self.IECdebug_datas.get(IECPath, None) |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1281 |
if IECdebug_data is None: |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1282 |
IECdebug_data = [ |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1283 |
WeakKeyDictionary(), # Callables |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1284 |
[], # Data storage [(tick, data),...] |
474 | 1285 |
"Registered", # Variable status |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1286 |
None, |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1287 |
buffer_list] # Forced value |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1288 |
self.IECdebug_datas[IECPath] = IECdebug_data |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1289 |
else: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1290 |
IECdebug_data[4] |= buffer_list |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1291 |
|
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1292 |
IECdebug_data[0][callableobj]=(buffer_list, args, kwargs) |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1293 |
|
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1294 |
self.IECdebug_lock.release() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1295 |
|
243 | 1296 |
self.ReArmDebugRegisterTimer() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1297 |
|
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1298 |
return IECdebug_data[1] |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1299 |
|
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1300 |
def UnsubscribeDebugIECVariable(self, IECPath, callableobj): |
243 | 1301 |
self.IECdebug_lock.acquire() |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1302 |
IECdebug_data = self.IECdebug_datas.get(IECPath, None) |
243 | 1303 |
if IECdebug_data is not None: |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1304 |
IECdebug_data[0].pop(callableobj,None) |
1255
ff59c6a8b793
Fixed bug forced debug variable not released when unsubscribed and re-subscribed while PLC is stopped
Laurent Bessard
parents:
1176
diff
changeset
|
1305 |
if len(IECdebug_data[0]) == 0: |
ff59c6a8b793
Fixed bug forced debug variable not released when unsubscribed and re-subscribed while PLC is stopped
Laurent Bessard
parents:
1176
diff
changeset
|
1306 |
self.IECdebug_datas.pop(IECPath) |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1307 |
else: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1308 |
IECdebug_data[4] = reduce( |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1309 |
lambda x, y: x|y, |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1310 |
[buffer_list for buffer_list,args,kwargs |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1311 |
in IECdebug_data[0].itervalues()], |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1312 |
False) |
243 | 1313 |
self.IECdebug_lock.release() |
1314 |
||
1315 |
self.ReArmDebugRegisterTimer() |
|
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1316 |
|
334
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1317 |
def UnsubscribeAllDebugIECVariable(self): |
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1318 |
self.IECdebug_lock.acquire() |
1089
5cd1f8df71aa
Fixed bug when transferring program and a output located variable is forced
Laurent Bessard
parents:
1080
diff
changeset
|
1319 |
self.IECdebug_datas = {} |
334
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1320 |
self.IECdebug_lock.release() |
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1321 |
|
355 | 1322 |
self.ReArmDebugRegisterTimer() |
1323 |
||
474 | 1324 |
def ForceDebugIECVariable(self, IECPath, fvalue): |
1325 |
if not self.IECdebug_datas.has_key(IECPath): |
|
1326 |
return |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1327 |
|
474 | 1328 |
self.IECdebug_lock.acquire() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1329 |
|
474 | 1330 |
# If no entry exist, create a new one with a fresh WeakKeyDictionary |
1331 |
IECdebug_data = self.IECdebug_datas.get(IECPath, None) |
|
1332 |
IECdebug_data[2] = "Forced" |
|
1333 |
IECdebug_data[3] = fvalue |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1334 |
|
474 | 1335 |
self.IECdebug_lock.release() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1336 |
|
474 | 1337 |
self.ReArmDebugRegisterTimer() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1338 |
|
463
961bddcfc913
Adding support for forcing PLC variable (still command to PLC to implement)
laurent
parents:
462
diff
changeset
|
1339 |
def ReleaseDebugIECVariable(self, IECPath): |
474 | 1340 |
if not self.IECdebug_datas.has_key(IECPath): |
1341 |
return |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1342 |
|
474 | 1343 |
self.IECdebug_lock.acquire() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1344 |
|
474 | 1345 |
# If no entry exist, create a new one with a fresh WeakKeyDictionary |
1346 |
IECdebug_data = self.IECdebug_datas.get(IECPath, None) |
|
1347 |
IECdebug_data[2] = "Registered" |
|
1348 |
IECdebug_data[3] = None |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1349 |
|
474 | 1350 |
self.IECdebug_lock.release() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1351 |
|
474 | 1352 |
self.ReArmDebugRegisterTimer() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1353 |
|
355 | 1354 |
def CallWeakcallables(self, IECPath, function_name, *cargs): |
1355 |
data_tuple = self.IECdebug_datas.get(IECPath, None) |
|
1356 |
if data_tuple is not None: |
|
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1357 |
WeakCallableDict, data_log, status, fvalue, buffer_list = data_tuple |
355 | 1358 |
#data_log.append((debug_tick, value)) |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1359 |
for weakcallable,(buffer_list,args,kwargs) in WeakCallableDict.iteritems(): |
355 | 1360 |
function = getattr(weakcallable, function_name, None) |
1361 |
if function is not None: |
|
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1362 |
if buffer_list: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1363 |
function(*(cargs + args), **kwargs) |
474 | 1364 |
else: |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1365 |
function(*(tuple([lst[-1] for lst in cargs]) + args), **kwargs) |
334
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1366 |
|
670
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
1367 |
def GetTicktime(self): |
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
1368 |
return self._Ticktime |
fb03cb6da95c
Adding support for extracting Common_Ticktime from VARIABLES.csv
laurent
parents:
669
diff
changeset
|
1369 |
|
699
6ff64cadb1ff
Adding support for executing python scripts on remote runtime
laurent
parents:
696
diff
changeset
|
1370 |
def RemoteExec(self, script, **kwargs): |
6ff64cadb1ff
Adding support for executing python scripts on remote runtime
laurent
parents:
696
diff
changeset
|
1371 |
if self._connector is None: |
703
2f7b3d1de278
Adding support for selecting plugin parameter value from a tree of available values
laurent
parents:
699
diff
changeset
|
1372 |
return -1, "No runtime connected!" |
699
6ff64cadb1ff
Adding support for executing python scripts on remote runtime
laurent
parents:
696
diff
changeset
|
1373 |
return self._connector.RemoteExec(script, **kwargs) |
6ff64cadb1ff
Adding support for executing python scripts on remote runtime
laurent
parents:
696
diff
changeset
|
1374 |
|
235 | 1375 |
def DebugThreadProc(self): |
239
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1376 |
""" |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1377 |
This thread waid PLC debug data, and dispatch them to subscribers |
112b4bc523b3
Fixed bad IPC choice for debugger/PLC/control thread collaboration
etisserant
parents:
236
diff
changeset
|
1378 |
""" |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1379 |
self.debug_break = False |
461
bcbc472c0ba8
Safer debug
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
460
diff
changeset
|
1380 |
debug_getvar_retry = 0 |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1381 |
while (not self.debug_break) and (self._connector is not None): |
674
761de581cf7a
Changed GetTraceVariables results unpack to something more robust in debug thread proc.
Edouard Tisserant
parents:
673
diff
changeset
|
1382 |
Trace = self._connector.GetTraceVariables() |
761de581cf7a
Changed GetTraceVariables results unpack to something more robust in debug thread proc.
Edouard Tisserant
parents:
673
diff
changeset
|
1383 |
if(Trace): |
917 | 1384 |
plc_status, debug_tick, debug_vars = Trace |
674
761de581cf7a
Changed GetTraceVariables results unpack to something more robust in debug thread proc.
Edouard Tisserant
parents:
673
diff
changeset
|
1385 |
else: |
761de581cf7a
Changed GetTraceVariables results unpack to something more robust in debug thread proc.
Edouard Tisserant
parents:
673
diff
changeset
|
1386 |
plc_status = None |
578 | 1387 |
debug_getvar_retry += 1 |
978 | 1388 |
#print [dict.keys() for IECPath, (dict, log, status, fvalue) in self.IECdebug_datas.items()] |
578 | 1389 |
if plc_status == "Started": |
1390 |
self.IECdebug_lock.acquire() |
|
1376
f8acd48e0342
Fixed bug in debugger when debug tick received is None
Laurent Bessard
parents:
1366
diff
changeset
|
1391 |
if (debug_tick is not None and |
f8acd48e0342
Fixed bug in debugger when debug tick received is None
Laurent Bessard
parents:
1366
diff
changeset
|
1392 |
len(debug_vars) == len(self.DebugValuesBuffers) and |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1393 |
len(debug_vars) == len(self.TracedIECPath)): |
578 | 1394 |
if debug_getvar_retry > DEBUG_RETRIES_WARN: |
689 | 1395 |
self.logger.write(_("... debugger recovered\n")) |
578 | 1396 |
debug_getvar_retry = 0 |
1365
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1397 |
for IECPath, values_buffer, value in zip(self.TracedIECPath, self.DebugValuesBuffers, debug_vars): |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1398 |
IECdebug_data = self.IECdebug_datas.get(IECPath, None) |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1399 |
if IECdebug_data is not None and value is not None: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1400 |
forced = IECdebug_data[2:4] == ["Forced", value] |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1401 |
if not IECdebug_data[4] and len(values_buffer) > 0: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1402 |
values_buffer[-1] = (value, forced) |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1403 |
else: |
debc97102b23
Added support for optimizing debug, preventing to filling buffers with only the last value for debug data consumers that only show the current state
Laurent Bessard
parents:
1364
diff
changeset
|
1404 |
values_buffer.append((value, forced)) |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1405 |
self.DebugTicks.append(debug_tick) |
578 | 1406 |
self.IECdebug_lock.release() |
1407 |
if debug_getvar_retry == DEBUG_RETRIES_WARN: |
|
689 | 1408 |
self.logger.write(_("Waiting debugger to recover...\n")) |
578 | 1409 |
if debug_getvar_retry == DEBUG_RETRIES_REREGISTER: |
1410 |
# re-register debug registry to PLC |
|
1411 |
wx.CallAfter(self.RegisterDebugVarToConnector) |
|
1412 |
if debug_getvar_retry != 0: |
|
446
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1413 |
# Be patient, tollerate PLC to come up before debugging |
460
73a53278833b
Safer debug unpack result checking, more verbose error message, slower retry when waiting PLC startup
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
459
diff
changeset
|
1414 |
time.sleep(0.1) |
578 | 1415 |
else: |
1416 |
self.debug_break = True |
|
689 | 1417 |
self.logger.write(_("Debugger disabled\n")) |
1418 |
self.DebugThread = None |
|
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1419 |
if self.DispatchDebugValuesTimer is not None: |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1420 |
self.DispatchDebugValuesTimer.Stop() |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1421 |
|
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1422 |
def DispatchDebugValuesProc(self, event): |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1423 |
self.IECdebug_lock.acquire() |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1424 |
debug_ticks, buffers = self.SnapshotAndResetDebugValuesBuffers() |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1425 |
self.IECdebug_lock.release() |
1366
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1426 |
start_time = time.time() |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1427 |
if len(self.TracedIECPath) == len(buffers): |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1428 |
for IECPath, values in zip(self.TracedIECPath, buffers): |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1429 |
if len(values) > 0: |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1430 |
self.CallWeakcallables(IECPath, "NewValues", debug_ticks, values) |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1431 |
if len(debug_ticks) > 0: |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1432 |
self.CallWeakcallables("__tick__", "NewDataAvailable", debug_ticks) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1433 |
|
1366
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1434 |
delay = time.time() - start_time |
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1435 |
next_refresh = max(REFRESH_PERIOD - delay, 0.2 * delay) |
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1436 |
if self.DispatchDebugValuesTimer is not None and self.DebugThread is not None: |
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1437 |
self.DispatchDebugValuesTimer.Start( |
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1438 |
int(next_refresh * 1000), oneShot=True) |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1439 |
event.Skip() |
235 | 1440 |
|
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1441 |
def KillDebugThread(self): |
703
2f7b3d1de278
Adding support for selecting plugin parameter value from a tree of available values
laurent
parents:
699
diff
changeset
|
1442 |
tmp_debugthread = self.DebugThread |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1443 |
self.debug_break = True |
703
2f7b3d1de278
Adding support for selecting plugin parameter value from a tree of available values
laurent
parents:
699
diff
changeset
|
1444 |
if tmp_debugthread is not None: |
624
8e74266033f8
Updated console messages for build and stop
Edouard Tisserant
parents:
623
diff
changeset
|
1445 |
self.logger.writeyield(_("Stopping debugger...\n")) |
703
2f7b3d1de278
Adding support for selecting plugin parameter value from a tree of available values
laurent
parents:
699
diff
changeset
|
1446 |
tmp_debugthread.join(timeout=5) |
2f7b3d1de278
Adding support for selecting plugin parameter value from a tree of available values
laurent
parents:
699
diff
changeset
|
1447 |
if tmp_debugthread.isAlive() and self.logger: |
624
8e74266033f8
Updated console messages for build and stop
Edouard Tisserant
parents:
623
diff
changeset
|
1448 |
self.logger.write_warning(_("Couldn't stop debugger.\n")) |
578 | 1449 |
else: |
624
8e74266033f8
Updated console messages for build and stop
Edouard Tisserant
parents:
623
diff
changeset
|
1450 |
self.logger.write(_("Debugger stopped.\n")) |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1451 |
self.DebugThread = None |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1452 |
if self.DispatchDebugValuesTimer is not None: |
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1453 |
self.DispatchDebugValuesTimer.Stop() |
286
a2a8a52b0d4f
Minor changes to get better cleanup of debug and python_eval threads, accross multiple debug sessions and PLC runs.
etisserant
parents:
283
diff
changeset
|
1454 |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1455 |
def _connect_debug(self): |
914
94436558f0ce
More stable logging. Added small one-entry log for loading errors. Test now include python side concurrent logging
Edouard Tisserant
parents:
911
diff
changeset
|
1456 |
self.previous_plcstate = None |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1457 |
if self.AppFrame: |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1458 |
self.AppFrame.ResetGraphicViewers() |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1459 |
self.RegisterDebugVarToConnector() |
1363
e87e0166d0a7
Added new debug process separating non-wx thread extracting debug values from connector and 10 Hz wx timer refreshing Beremiz debug Viewers and communicating throw double-buffering, to avoid segmentation faults and optimize CPU usage
Laurent Bessard
parents:
1330
diff
changeset
|
1460 |
if self.DispatchDebugValuesTimer is not None: |
1366
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1461 |
self.DispatchDebugValuesTimer.Start( |
3756ae754713
Fixed refresh speed so that interface is not blocked when debugging
Laurent Bessard
parents:
1365
diff
changeset
|
1462 |
int(REFRESH_PERIOD * 1000), oneShot=True) |
578 | 1463 |
if self.DebugThread is None: |
1464 |
self.DebugThread = Thread(target=self.DebugThreadProc) |
|
1465 |
self.DebugThread.start() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1466 |
|
462
274e83a5534e
Now debug is not a button anymore
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
461
diff
changeset
|
1467 |
def _Run(self): |
203 | 1468 |
""" |
464
46dd4358e8a8
Fixes in run : messages and refresh
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
463
diff
changeset
|
1469 |
Start PLC |
203 | 1470 |
""" |
350
a3a5561bde1d
- now call load, start, free PLC from the python Thread
greg
parents:
348
diff
changeset
|
1471 |
if self.GetIECProgramsAndVariables(): |
462
274e83a5534e
Now debug is not a button anymore
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
461
diff
changeset
|
1472 |
self._connector.StartPLC() |
464
46dd4358e8a8
Fixes in run : messages and refresh
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
463
diff
changeset
|
1473 |
self.logger.write(_("Starting PLC\n")) |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1474 |
self._connect_debug() |
203 | 1475 |
else: |
464
46dd4358e8a8
Fixes in run : messages and refresh
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
463
diff
changeset
|
1476 |
self.logger.write_error(_("Couldn't start PLC !\n")) |
675
44b35c27e9ff
Adding support for quickly open recent projects in file menu
laurent
parents:
674
diff
changeset
|
1477 |
wx.CallAfter(self.UpdateMethodsFromPLCStatus) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1478 |
|
203 | 1479 |
def _Stop(self): |
1480 |
""" |
|
1481 |
Stop PLC |
|
1482 |
""" |
|
483
bc26c42d2eec
fixed greg's crap in win32, enhanced debug stability, implemented preliminary retain
edouard
parents:
481
diff
changeset
|
1483 |
if self._connector is not None and not self._connector.StopPLC(): |
bc26c42d2eec
fixed greg's crap in win32, enhanced debug stability, implemented preliminary retain
edouard
parents:
481
diff
changeset
|
1484 |
self.logger.write_error(_("Couldn't stop PLC !\n")) |
bc26c42d2eec
fixed greg's crap in win32, enhanced debug stability, implemented preliminary retain
edouard
parents:
481
diff
changeset
|
1485 |
|
689 | 1486 |
# debugthread should die on his own |
1487 |
#self.KillDebugThread() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1488 |
|
675
44b35c27e9ff
Adding support for quickly open recent projects in file menu
laurent
parents:
674
diff
changeset
|
1489 |
wx.CallAfter(self.UpdateMethodsFromPLCStatus) |
203 | 1490 |
|
1116
300f98a8d4c6
Fixed bug connector not resetted when connection is lost
Laurent Bessard
parents:
1105
diff
changeset
|
1491 |
def _SetConnector(self, connector, update_status=True): |
978 | 1492 |
self._connector = connector |
1493 |
if self.AppFrame is not None: |
|
1494 |
self.AppFrame.LogViewer.SetLogSource(connector) |
|
992 | 1495 |
if connector is not None: |
1396
bc14b43bd27f
Fixed non initialized timer causing exception in some rare cases (continued)
Edouard Tisserant
parents:
1395
diff
changeset
|
1496 |
if self.StatusTimer is not None: |
bc14b43bd27f
Fixed non initialized timer causing exception in some rare cases (continued)
Edouard Tisserant
parents:
1395
diff
changeset
|
1497 |
# Start the status Timer |
bc14b43bd27f
Fixed non initialized timer causing exception in some rare cases (continued)
Edouard Tisserant
parents:
1395
diff
changeset
|
1498 |
self.StatusTimer.Start(milliseconds=500, oneShot=False) |
992 | 1499 |
else: |
1395
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
1500 |
if self.StatusTimer is not None: |
1396
bc14b43bd27f
Fixed non initialized timer causing exception in some rare cases (continued)
Edouard Tisserant
parents:
1395
diff
changeset
|
1501 |
# Stop the status Timer |
1395
bcd1e909076c
Fixed non initialized timer causing exception in some rare cases
Edouard Tisserant
parents:
1387
diff
changeset
|
1502 |
self.StatusTimer.Stop() |
1116
300f98a8d4c6
Fixed bug connector not resetted when connection is lost
Laurent Bessard
parents:
1105
diff
changeset
|
1503 |
if update_status: |
300f98a8d4c6
Fixed bug connector not resetted when connection is lost
Laurent Bessard
parents:
1105
diff
changeset
|
1504 |
wx.CallAfter(self.UpdateMethodsFromPLCStatus) |
992 | 1505 |
|
203 | 1506 |
def _Connect(self): |
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1507 |
# don't accept re-connetion if already connected |
203 | 1508 |
if self._connector is not None: |
361 | 1509 |
self.logger.write_error(_("Already connected. Please disconnect\n")) |
203 | 1510 |
return |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1511 |
|
203 | 1512 |
# Get connector uri |
1513 |
uri = self.\ |
|
1514 |
BeremizRoot.\ |
|
1515 |
getURI_location().\ |
|
1516 |
strip() |
|
1517 |
||
1518 |
# if uri is empty launch discovery dialog |
|
1519 |
if uri == "": |
|
740
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1520 |
try: |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1521 |
# Launch Service Discovery dialog |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1522 |
dialog = DiscoveryDialog(self.AppFrame) |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1523 |
answer = dialog.ShowModal() |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1524 |
uri = dialog.GetURI() |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1525 |
dialog.Destroy() |
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1526 |
except: |
801
435e49e80832
Update list of messages to be translated for internationalization and french translations
laurent
parents:
796
diff
changeset
|
1527 |
self.logger.write_error(_("Local service discovery failed!\n")) |
763
c1104099c151
Now, PYRO:// locations also accept MDNS service names
Edouard Tisserant
parents:
758
diff
changeset
|
1528 |
self.logger.write_error(traceback.format_exc()) |
740
cee825fbe9b3
fixed exception when launching discovery dialog without network
Edouard Tisserant
parents:
738
diff
changeset
|
1529 |
uri = None |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1530 |
|
203 | 1531 |
# Nothing choosed or cancel button |
392
6617d3fb43e2
Redesign DiscoveryDialog class to conform to others dialogs
laurent
parents:
382
diff
changeset
|
1532 |
if uri is None or answer == wx.ID_CANCEL: |
6617d3fb43e2
Redesign DiscoveryDialog class to conform to others dialogs
laurent
parents:
382
diff
changeset
|
1533 |
self.logger.write_error(_("Connection canceled!\n")) |
203 | 1534 |
return |
1535 |
else: |
|
1536 |
self.\ |
|
1537 |
BeremizRoot.\ |
|
1538 |
setURI_location(uri) |
|
764
f338651eca36
Fix bug project not marked as modified when changing URI_Location using discovery dialog
laurent
parents:
758
diff
changeset
|
1539 |
self.ChangesToSave = True |
746
2e09777a40d3
Fix refresh of ConfTreeNodeEditors content when values change
laurent
parents:
742
diff
changeset
|
1540 |
if self._View is not None: |
2e09777a40d3
Fix refresh of ConfTreeNodeEditors content when values change
laurent
parents:
742
diff
changeset
|
1541 |
self._View.RefreshView() |
789
b1b1a8f85e2f
Adding support for saving editor choosen when editing project file for reloading project layout
laurent
parents:
786
diff
changeset
|
1542 |
if self.AppFrame is not None: |
764
f338651eca36
Fix bug project not marked as modified when changing URI_Location using discovery dialog
laurent
parents:
758
diff
changeset
|
1543 |
self.AppFrame.RefreshTitle() |
f338651eca36
Fix bug project not marked as modified when changing URI_Location using discovery dialog
laurent
parents:
758
diff
changeset
|
1544 |
self.AppFrame.RefreshFileMenu() |
f338651eca36
Fix bug project not marked as modified when changing URI_Location using discovery dialog
laurent
parents:
758
diff
changeset
|
1545 |
self.AppFrame.RefreshEditMenu() |
f338651eca36
Fix bug project not marked as modified when changing URI_Location using discovery dialog
laurent
parents:
758
diff
changeset
|
1546 |
self.AppFrame.RefreshPageTitles() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1547 |
|
203 | 1548 |
# Get connector from uri |
1549 |
try: |
|
978 | 1550 |
self._SetConnector(connectors.ConnectorFactory(uri, self)) |
203 | 1551 |
except Exception, msg: |
361 | 1552 |
self.logger.write_error(_("Exception while connecting %s!\n")%uri) |
203 | 1553 |
self.logger.write_error(traceback.format_exc()) |
1554 |
||
1555 |
# Did connection success ? |
|
1556 |
if self._connector is None: |
|
1557 |
# Oups. |
|
361 | 1558 |
self.logger.write_error(_("Connection failed to %s!\n")%uri) |
203 | 1559 |
else: |
1560 |
self.ShowMethod("_Connect", False) |
|
1561 |
self.ShowMethod("_Disconnect", True) |
|
1562 |
self.ShowMethod("_Transfer", True) |
|
1563 |
||
1564 |
self.CompareLocalAndRemotePLC() |
|
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1565 |
|
350
a3a5561bde1d
- now call load, start, free PLC from the python Thread
greg
parents:
348
diff
changeset
|
1566 |
# Init with actual PLC status and print it |
446
1edde533db19
Some cleanup in PLC status - removed that \"Starting\" state ...
ed
parents:
440
diff
changeset
|
1567 |
self.UpdateMethodsFromPLCStatus() |
361 | 1568 |
if self.previous_plcstate is not None: |
1569 |
status = _(self.previous_plcstate) |
|
1570 |
else: |
|
1571 |
status = "" |
|
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1572 |
|
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1573 |
#self.logger.write(_("PLC is %s\n")%status) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1574 |
|
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1575 |
if self.previous_plcstate in ["Started","Stopped"]: |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1576 |
if self.DebugAvailable() and self.GetIECProgramsAndVariables(): |
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1577 |
self.logger.write(_("Debugger ready\n")) |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1578 |
self._connect_debug() |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1579 |
else: |
922
60fafd828a30
Better PLC log message time stamp display. Better console information when connecting.
Edouard Tisserant
parents:
921
diff
changeset
|
1580 |
self.logger.write_warning(_("Debug does not match PLC - stop/transfert/start to re-enable\n")) |
203 | 1581 |
|
1582 |
def CompareLocalAndRemotePLC(self): |
|
1583 |
if self._connector is None: |
|
1584 |
return |
|
1585 |
# We are now connected. Update button status |
|
1586 |
MD5 = self.GetLastBuildMD5() |
|
1587 |
# Check remote target PLC correspondance to that md5 |
|
1588 |
if MD5 is not None: |
|
1589 |
if not self._connector.MatchMD5(MD5): |
|
544 | 1590 |
# self.logger.write_warning( |
1591 |
# _("Latest build does not match with target, please transfer.\n")) |
|
203 | 1592 |
self.EnableMethod("_Transfer", True) |
1593 |
else: |
|
544 | 1594 |
# self.logger.write( |
1595 |
# _("Latest build matches target, no transfer needed.\n")) |
|
203 | 1596 |
self.EnableMethod("_Transfer", True) |
465
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1597 |
# warns controller that program match |
67d32a91d70b
Fixes in debug + reconnect to running PLC
Edouard TISSERANT <edouard.tisserant@gmail.com>
parents:
464
diff
changeset
|
1598 |
self.ProgramTransferred() |
203 | 1599 |
#self.EnableMethod("_Transfer", False) |
1600 |
else: |
|
544 | 1601 |
# self.logger.write_warning( |
1602 |
# _("Cannot compare latest build to target. Please build.\n")) |
|
203 | 1603 |
self.EnableMethod("_Transfer", False) |
1604 |
||
1605 |
||
1606 |
def _Disconnect(self): |
|
978 | 1607 |
self._SetConnector(None) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1608 |
|
203 | 1609 |
def _Transfer(self): |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1610 |
# Get the last build PLC's |
203 | 1611 |
MD5 = self.GetLastBuildMD5() |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1612 |
|
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1613 |
# Check if md5 file is empty : ask user to build PLC |
203 | 1614 |
if MD5 is None : |
361 | 1615 |
self.logger.write_error(_("Failed : Must build before transfer.\n")) |
203 | 1616 |
return False |
1617 |
||
1618 |
# Compare PLC project with PLC on target |
|
1619 |
if self._connector.MatchMD5(MD5): |
|
1620 |
self.logger.write( |
|
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
1621 |
_("Latest build already matches current target. Transfering anyway...\n")) |
203 | 1622 |
|
1623 |
# Get temprary directory path |
|
757
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
1624 |
extrafiles = [] |
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
1625 |
for extrafilespath in [self._getExtraFilesPath(), |
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
1626 |
self._getProjectFilesPath()]: |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1627 |
|
757
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
1628 |
extrafiles.extend( |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1629 |
[(name, open(os.path.join(extrafilespath, name), |
203 | 1630 |
'rb').read()) \ |
757
3151495ae5bb
Adding support for importing into project some files to be transfered with PLC
laurent
parents:
754
diff
changeset
|
1631 |
for name in os.listdir(extrafilespath)]) |
1407
cf3d2b53dd68
Organized controller's _Build sub-methods layout. Many (unwanted) white space changes.
Edouard Tisserant
parents:
1401
diff
changeset
|
1632 |
|
203 | 1633 |
# Send PLC on target |
1634 |
builder = self.GetBuilder() |
|
1635 |
if builder is not None: |
|
1636 |
data = builder.GetBinaryCode() |
|
1637 |
if data is not None : |
|
707
6880c88e499e
Fix bug in debugger when transfer without having build before and and opening debug view before running PLC
laurent
parents:
703
diff
changeset
|
1638 |
if self._connector.NewPLC(MD5, data, extrafiles) and self.GetIECProgramsAndVariables(): |
334
b4131e5d10a4
Adding support for unsubscribe all variables while transferring
lbessard
parents:
328
diff
changeset
|
1639 |
self.UnsubscribeAllDebugIECVariable() |
246 | 1640 |
self.ProgramTransferred() |
692
8b1ed486f374
Adding support for not closing debug tabs and remove variable in variable debug panel if instance still exist in newly transfered program
laurent
parents:
689
diff
changeset
|
1641 |
if self.AppFrame is not None: |
8b1ed486f374
Adding support for not closing debug tabs and remove variable in variable debug panel if instance still exist in newly transfered program
laurent
parents:
689
diff
changeset
|
1642 |
self.AppFrame.CloseObsoleteDebugTabs() |
746
2e09777a40d3
Fix refresh of ConfTreeNodeEditors content when values change
laurent
parents:
742
diff
changeset
|
1643 |
self.AppFrame.RefreshPouInstanceVariablesPanel() |
361 | 1644 |
self.logger.write(_("Transfer completed successfully.\n")) |
203 | 1645 |
else: |
361 | 1646 |
self.logger.write_error(_("Transfer failed\n")) |
203 | 1647 |
else: |
415
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
1648 |
self.logger.write_error(_("No PLC to transfer (did build succeed ?)\n")) |
339fa2542481
improved english spelling and grammar and internationalization updated
laurent
parents:
414
diff
changeset
|
1649 |
|
675
44b35c27e9ff
Adding support for quickly open recent projects in file menu
laurent
parents:
674
diff
changeset
|
1650 |
wx.CallAfter(self.UpdateMethodsFromPLCStatus) |
105
434aed8dc58d
Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents:
97
diff
changeset
|
1651 |
|
738 | 1652 |
StatusMethods = [ |
734 | 1653 |
{"bitmap" : "Build", |
361 | 1654 |
"name" : _("Build"), |
1655 |
"tooltip" : _("Build project into build folder"), |
|
623
8cdb533c3c7a
A few new keyboard shortcuts : F4=stop, F5=run, F5=transfer, F7=connect
Edouard Tisserant
parents:
619
diff
changeset
|
1656 |
"method" : "_Build"}, |
734 | 1657 |
{"bitmap" : "Clean", |
361 | 1658 |
"name" : _("Clean"), |
203 | 1659 |
"enabled" : False, |
361 | 1660 |
"tooltip" : _("Clean project build folder"), |
105
434aed8dc58d
Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents:
97
diff
changeset
|
1661 |
"method" : "_Clean"}, |
734 | 1662 |
{"bitmap" : "Run", |
361 | 1663 |
"name" : _("Run"), |
203 | 1664 |
"shown" : False, |
361 | 1665 |
"tooltip" : _("Start PLC"), |
105
434aed8dc58d
Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents:
97
diff
changeset
|
1666 |
"method" : "_Run"}, |
734 | 1667 |
{"bitmap" : "Stop", |
361 | 1668 |
"name" : _("Stop"), |
203 | 1669 |
"shown" : False, |
361 | 1670 |
"tooltip" : _("Stop Running PLC"), |
105
434aed8dc58d
Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents:
97
diff
changeset
|
1671 |
"method" : "_Stop"}, |
734 | 1672 |
{"bitmap" : "Connect", |
361 | 1673 |
"name" : _("Connect"), |
1674 |
"tooltip" : _("Connect to the target PLC"), |
|
203 | 1675 |
"method" : "_Connect"}, |
734 | 1676 |
{"bitmap" : "Transfer", |
361 | 1677 |
"name" : _("Transfer"), |
203 | 1678 |
"shown" : False, |
361 | 1679 |
"tooltip" : _("Transfer PLC"), |
203 | 1680 |
"method" : "_Transfer"}, |
734 | 1681 |
{"bitmap" : "Disconnect", |
361 | 1682 |
"name" : _("Disconnect"), |
203 | 1683 |
"shown" : False, |
361 | 1684 |
"tooltip" : _("Disconnect from PLC"), |
203 | 1685 |
"method" : "_Disconnect"}, |
734 | 1686 |
{"bitmap" : "ShowIECcode", |
361 | 1687 |
"name" : _("Show code"), |
203 | 1688 |
"shown" : False, |
361 | 1689 |
"tooltip" : _("Show IEC code generated by PLCGenerator"), |
105
434aed8dc58d
Added ability to override plugin methods with arbitrary python code (methods.py) when loading plugins
etisserant
parents:
97
diff
changeset
|
1690 |
"method" : "_showIECcode"}, |
738 | 1691 |
] |
1692 |
||
1693 |
ConfNodeMethods = [ |
|
734 | 1694 |
{"bitmap" : "editIECrawcode", |
361 | 1695 |
"name" : _("Raw IEC code"), |
1696 |
"tooltip" : _("Edit raw IEC code added to code generated by PLCGenerator"), |
|
203 | 1697 |
"method" : "_editIECrawcode"}, |
782 | 1698 |
{"bitmap" : "ManageFolder", |
1699 |
"name" : _("Project Files"), |
|
1700 |
"tooltip" : _("Open a file explorer to manage project files"), |
|
1701 |
"method" : "_OpenProjectFiles"}, |
|
65 | 1702 |
] |
738 | 1703 |
|
1704 |
||
1705 |
def EnableMethod(self, method, value): |
|
1706 |
for d in self.StatusMethods: |
|
1707 |
if d["method"]==method: |
|
1708 |
d["enabled"]=value |
|
1709 |
return True |
|
1710 |
return False |
|
1711 |
||
1712 |
def ShowMethod(self, method, value): |
|
1713 |
for d in self.StatusMethods: |
|
1714 |
if d["method"]==method: |
|
1715 |
d["shown"]=value |
|
1716 |
return True |
|
1717 |
return False |
|
1718 |
||
1719 |
def CallMethod(self, method): |
|
1720 |
for d in self.StatusMethods: |
|
1721 |
if d["method"]==method and d.get("enabled", True) and d.get("shown", True): |
|
1722 |
getattr(self, method)() |