TextViewer.py
author edouard
Tue, 05 Apr 2011 18:58:15 +0200
changeset 523 99ba2e3949ed
parent 485 d5ebb8eac934
child 543 2f660878c2a7
permissions -rw-r--r--
Added drag'n'drop of functions and function blocks
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     1
#!/usr/bin/env python
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     3
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     5
#based on the plcopen standard. 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     6
#
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
     7
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     8
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     9
#See COPYING file for copyrights details.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    10
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    12
#modify it under the terms of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    15
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
    19
#General Public License for more details.
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    20
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    21
#You should have received a copy of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    24
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    25
import wx
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    26
import wx.stc
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    27
from types import *
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    28
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    29
import re
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    30
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    31
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    32
#                         Textual programs Viewer class
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    33
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    34
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    35
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    36
NEWLINE = "\n"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    37
NUMBERS = [str(i) for i in xrange(10)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    38
LETTERS = ['_']
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    39
for i in xrange(26):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    40
    LETTERS.append(chr(ord('a') + i))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    41
    LETTERS.append(chr(ord('A') + i))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    42
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    43
[STC_PLC_WORD, STC_PLC_COMMENT, STC_PLC_NUMBER, STC_PLC_VARIABLE, 
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
    44
 STC_PLC_FUNCTION, STC_PLC_JUMP, STC_PLC_ERROR] = range(7)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    45
[SPACE, WORD, NUMBER, COMMENT] = range(4)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    46
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    47
[ID_TEXTVIEWER,
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    48
] = [wx.NewId() for _init_ctrls in range(1)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    49
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    50
if wx.Platform == '__WXMSW__':
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    51
    faces = { 'times': 'Times New Roman',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    52
              'mono' : 'Courier New',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    53
              'helv' : 'Arial',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    54
              'other': 'Comic Sans MS',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    55
              'size' : 10,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    56
             }
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    57
else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    58
    faces = { 'times': 'Times',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    59
              'mono' : 'Courier',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    60
              'helv' : 'Helvetica',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    61
              'other': 'new century schoolbook',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    62
              'size' : 12,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    63
             }
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    64
re_texts = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    65
re_texts["letter"] = "[A-Za-z]"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    66
re_texts["digit"] = "[0-9]"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    67
re_texts["identifier"] = "((?:%(letter)s|(?:_(?:%(letter)s|%(digit)s)))(?:_?(?:%(letter)s|%(digit)s))*)"%re_texts
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    68
IDENTIFIER_MODEL = re.compile(re_texts["identifier"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    69
LABEL_MODEL = re.compile("[ \t\n]%(identifier)s:[ \t\n]"%re_texts)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    70
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    71
def GetCursorPos(old, new):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    72
    old_length = len(old)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    73
    new_length = len(new)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    74
    common_length = min(old_length, new_length)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    75
    i = 0
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    76
    for i in xrange(common_length):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    77
        if old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    78
            break
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    79
    if old_length < new_length:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    80
        if common_length > 0 and old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    81
            return i + new_length - old_length
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    82
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    83
            return i + new_length - old_length + 1
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    84
    elif old_length > new_length or i < min(old_length, new_length) - 1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    85
        if common_length > 0 and old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    86
            return i
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    87
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    88
            return i + 1
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    89
    else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    90
        return None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    91
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
    92
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    93
class TextViewer(wx.stc.StyledTextCtrl):
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    94
    
113
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
    95
    if wx.VERSION < (2, 6, 0):
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
    96
        def Bind(self, event, function, id = None):
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
    97
            if id is not None:
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
    98
                event(self, id, function)
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
    99
            else:
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
   100
                event(self, function)
9eeaebd867aa Adding support for wxpython 2.4
lbessard
parents: 98
diff changeset
   101
    
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   102
    def __init__(self, parent, tagname, window, controler, debug = False, instancepath = ""):
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 79
diff changeset
   103
        wx.stc.StyledTextCtrl.__init__(self, parent, ID_TEXTVIEWER, size=wx.Size(0, 0), style=0)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   104
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   105
        self.CmdKeyAssign(ord('+'), wx.stc.STC_SCMOD_CTRL, wx.stc.STC_CMD_ZOOMIN)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   106
        self.CmdKeyAssign(ord('-'), wx.stc.STC_SCMOD_CTRL, wx.stc.STC_CMD_ZOOMOUT)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   107
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   108
        self.SetViewWhiteSpace(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   109
        
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   110
        self.SetLexer(wx.stc.STC_LEX_CONTAINER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   111
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   112
        # Global default styles for all languages
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   113
        self.StyleSetSpec(wx.stc.STC_STYLE_DEFAULT, "face:%(mono)s,size:%(size)d" % faces)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   114
        self.StyleClearAll()  # Reset all to be like the default
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   115
        
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   116
        self.StyleSetSpec(wx.stc.STC_STYLE_LINENUMBER,  "back:#C0C0C0,size:%(size)d" % faces)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   117
        self.SetSelBackground(1, "#E0E0E0")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   118
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   119
        # Highlighting styles
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   120
        self.StyleSetSpec(STC_PLC_WORD, "fore:#00007F,bold,size:%(size)d" % faces)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   121
        self.StyleSetSpec(STC_PLC_VARIABLE, "fore:#7F0000,size:%(size)d" % faces)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   122
        self.StyleSetSpec(STC_PLC_FUNCTION, "fore:#7F7F00,size:%(size)d" % faces)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   123
        self.StyleSetSpec(STC_PLC_COMMENT, "fore:#7F7F7F,size:%(size)d" % faces)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   124
        self.StyleSetSpec(STC_PLC_NUMBER, "fore:#007F7F,size:%(size)d" % faces)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   125
        self.StyleSetSpec(STC_PLC_JUMP, "fore:#007F00,size:%(size)d" % faces)
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   126
        self.StyleSetSpec(STC_PLC_ERROR, "fore:#FF0000,back:#FFFF00,size:%(size)d" % faces)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   127
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   128
        # Indicators styles
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   129
        self.IndicatorSetStyle(0, wx.stc.STC_INDIC_SQUIGGLE)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 80
diff changeset
   130
        if window and controler:
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 80
diff changeset
   131
            self.IndicatorSetForeground(0, wx.RED)
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 80
diff changeset
   132
        else:
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 80
diff changeset
   133
            self.IndicatorSetForeground(0, wx.WHITE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   134
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   135
        # Line numbers in the margin
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   136
        self.SetMarginType(1, wx.stc.STC_MARGIN_NUMBER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   137
        self.SetMarginWidth(1, 50)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   138
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   139
        # Indentation size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   140
        self.SetTabWidth(2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   141
        self.SetUseTabs(0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   142
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   143
        self.Keywords = []
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   144
        self.Variables = {}
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   145
        self.Functions = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   146
        self.Jumps = []
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   147
        self.EnumeratedValues = []
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   148
        self.DisableEvents = True
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   149
        self.TextSyntax = "ST"
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   150
        self.CurrentAction = None
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   151
        self.TagName = tagname
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   152
        self.Errors = []
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   153
        self.Debug = debug
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   154
        self.InstancePath = instancepath
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   155
        self.StructElementsStack = []
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   156
        
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 80
diff changeset
   157
        self.ParentWindow = window
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   158
        self.Controler = controler
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   159
411
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   160
        self.SetModEventMask(wx.stc.STC_MOD_BEFOREINSERT|
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   161
                             wx.stc.STC_MOD_BEFOREDELETE|
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   162
                             wx.stc.STC_PERFORMED_USER)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   163
79
b22f661cbcfb Fixed ws indent problem
etisserant
parents: 73
diff changeset
   164
        self.Bind(wx.stc.EVT_STC_STYLENEEDED, self.OnStyleNeeded, id=ID_TEXTVIEWER)
116
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   165
        if controler:
73
f2529e34e4b7 Prevent problems showing ST code after failed build
etisserant
parents: 68
diff changeset
   166
            self.Bind(wx.EVT_KEY_DOWN, self.OnKeyDown)
f2529e34e4b7 Prevent problems showing ST code after failed build
etisserant
parents: 68
diff changeset
   167
            self.Bind(wx.stc.EVT_STC_DO_DROP, self.OnDoDrop, id=ID_TEXTVIEWER)
f2529e34e4b7 Prevent problems showing ST code after failed build
etisserant
parents: 68
diff changeset
   168
            self.Bind(wx.EVT_KILL_FOCUS, self.OnKillFocus)
f2529e34e4b7 Prevent problems showing ST code after failed build
etisserant
parents: 68
diff changeset
   169
            self.Bind(wx.stc.EVT_STC_MODIFIED, self.OnModification, id=ID_TEXTVIEWER)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   170
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   171
    def SetTagName(self, tagname):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   172
        self.TagName = tagname
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   173
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   174
    def GetTagName(self):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   175
        return self.TagName
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   176
    
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   177
    def GetInstancePath(self):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   178
        return self.InstancePath
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   179
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   180
    def IsViewing(self, tagname):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   181
        if self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   182
            return self.InstancePath == tagname
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   183
        else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   184
            return self.TagName == tagname
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   185
    
407
0a324a874981 Adding support for integrating PLCOpenEditor in Beremiz frame
laurent
parents: 391
diff changeset
   186
    def IsDebugging(self):
0a324a874981 Adding support for integrating PLCOpenEditor in Beremiz frame
laurent
parents: 391
diff changeset
   187
        return self.Debug
0a324a874981 Adding support for integrating PLCOpenEditor in Beremiz frame
laurent
parents: 391
diff changeset
   188
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   189
    def SetMode(self, mode):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   190
        pass
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   191
    
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   192
    def OnModification(self, event):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   193
        if not self.DisableEvents:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   194
            mod_type = event.GetModificationType()
411
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   195
            if mod_type&wx.stc.STC_MOD_BEFOREINSERT:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   196
                if self.CurrentAction == None:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   197
                    self.StartBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   198
                elif self.CurrentAction[0] != "Add" or self.CurrentAction[1] != event.GetPosition() - 1:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   199
                    self.Controler.EndBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   200
                    self.StartBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   201
                self.CurrentAction = ("Add", event.GetPosition())
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   202
                wx.CallAfter(self.RefreshModel)
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   203
            elif mod_type&wx.stc.STC_MOD_BEFOREDELETE:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   204
                if self.CurrentAction == None:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   205
                    self.StartBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   206
                elif self.CurrentAction[0] != "Delete" or self.CurrentAction[1] != event.GetPosition() + 1:
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   207
                    self.Controler.EndBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   208
                    self.StartBuffering()
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   209
                self.CurrentAction = ("Delete", event.GetPosition())
9ab97d517ae8 Many bugs on PLCOpenEditor integration fixed
laurent
parents: 407
diff changeset
   210
                wx.CallAfter(self.RefreshModel)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   211
        event.Skip()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   212
    
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   213
    def OnDoDrop(self, event):
50
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   214
        try:
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   215
            values = eval(event.GetDragText())
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   216
        except:
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   217
            values = event.GetDragText()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   218
        if isinstance(values, tuple):
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   219
            message = None
523
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   220
            if values[1] in ["program", "debug"]:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   221
                event.SetDragText("")
523
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   222
            elif values[1] in ["functionBlock", "function"]:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   223
                blockname = values[2]
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   224
                if len(values) > 3:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   225
                    blockinputs = values[3]
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   226
                else:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   227
                    blockinputs = None
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   228
                if values[1] != "function": 
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   229
                    if  blockname == "":
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   230
                        dialog = wx.TextEntryDialog(self.ParentWindow, "Block name", "Please enter a block name", "", wx.OK|wx.CANCEL|wx.CENTRE)
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   231
                        if dialog.ShowModal() == wx.ID_OK:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   232
                            blockname = dialog.GetValue()
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   233
                        else:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   234
                            return
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   235
                        dialog.Destroy()
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   236
                    if blockname.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   237
                        message = _("\"%s\" pou already exists!")%blockname
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   238
                    elif blockname.upper() in [name.upper() for name in self.Controler.GetEditedElementVariables(self.TagName, self.Debug)]:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   239
                        message = _("\"%s\" element for this pou already exists!")%blockname
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   240
                    else:
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   241
                        self.Controler.AddEditedElementPouVar(self.TagName, values[0], blockname)
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   242
                        self.ParentWindow.RefreshVariablePanel(self.TagName)
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   243
                        self.RefreshVariableTree()
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   244
                blockinfo = self.Controler.GetBlockType(values[0], blockinputs, self.Debug)
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   245
                hint = ',\n    '.join(
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   246
                            [ " " + fctdecl[0]+" := (*"+fctdecl[1]+"*)" for fctdecl in blockinfo["inputs"]] +
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   247
                            [ " " + fctdecl[0]+" => (*"+fctdecl[1]+"*)" for fctdecl in blockinfo["outputs"]])
99ba2e3949ed Added drag'n'drop of functions and function blocks
edouard
parents: 485
diff changeset
   248
                event.SetDragText(blockname+"(\n    "+hint+")")
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   249
            elif values[1] == "location":
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   250
                pou_name, pou_type = self.Controler.GetEditedElementType(self.TagName, self.Debug)
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   251
                if len(values) > 2 and pou_type == "program":
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   252
                    var_name = values[3]
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   253
                    if var_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
448
93a2f2034f98 Bug with location Drag'n Drop on TextViewer fixed
laurent
parents: 437
diff changeset
   254
                        message = _("\"%s\" pou already exists!")%var_name
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   255
                    elif var_name.upper() in [name.upper() for name in self.Controler.GetEditedElementVariables(self.TagName, self.Debug)]:
448
93a2f2034f98 Bug with location Drag'n Drop on TextViewer fixed
laurent
parents: 437
diff changeset
   256
                        message = _("\"%s\" element for this pou already exists!")%var_name
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   257
                    else:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   258
                        if values[2] is not None:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   259
                            var_type = values[2]
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   260
                        else:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   261
                            var_type = LOCATIONDATATYPES.get(values[0][2], ["BOOL"])[0]
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   262
                        self.Controler.AddEditedElementPouVar(self.TagName, var_type, var_name, values[0], values[4])
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   263
                        self.ParentWindow.RefreshVariablePanel(self.TagName)
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   264
                        self.RefreshVariableTree()
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   265
                        event.SetDragText(var_name)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   266
                else:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   267
                    event.SetDragText("")
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   268
            elif values[3] == self.TagName:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   269
                self.ResetBuffer()
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   270
                event.SetDragText(values[0])
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   271
                wx.CallAfter(self.RefreshModel)
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   272
            else:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   273
                message = _("Variable don't belong to this POU!")
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   274
            if message is not None:
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   275
                dialog = wx.MessageDialog(self, message, _("Error"), wx.OK|wx.ICON_ERROR)
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   276
                dialog.ShowModal()
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   277
                dialog.Destroy()
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   278
                event.SetDragText("")
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   279
        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   280
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   281
    def SetTextSyntax(self, syntax):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   282
        self.TextSyntax = syntax
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   283
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   284
    def SetKeywords(self, keywords):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   285
        self.Keywords = [keyword.upper() for keyword in keywords]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   286
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   287
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   288
    def RefreshJumpList(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   289
        self.Jumps = [jump.upper() for jump in LABEL_MODEL.findall(self.GetText())]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   290
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   291
    
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   292
    # Buffer the last model state
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   293
    def RefreshBuffer(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   294
        self.Controler.BufferProject()
116
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   295
        if self.ParentWindow:
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   296
            self.ParentWindow.RefreshTitle()
485
d5ebb8eac934 Bug on TextViewer fixed : FileMenu not refreshed when text modified
laurent
parents: 448
diff changeset
   297
            self.ParentWindow.RefreshFileMenu()
116
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   298
            self.ParentWindow.RefreshEditMenu()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   299
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   300
    def StartBuffering(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   301
        self.Controler.StartBuffering()
116
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   302
        if self.ParentWindow:
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   303
            self.ParentWindow.RefreshTitle()
485
d5ebb8eac934 Bug on TextViewer fixed : FileMenu not refreshed when text modified
laurent
parents: 448
diff changeset
   304
            self.ParentWindow.RefreshFileMenu()
116
58b9b84e385f Adding support in xmlclass for timezone in datetime and for not paying attention to xml comments
lbessard
parents: 113
diff changeset
   305
            self.ParentWindow.RefreshEditMenu()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   306
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   307
    def ResetBuffer(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   308
        if self.CurrentAction != None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   309
            self.Controler.EndBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   310
            self.CurrentAction = None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   311
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   312
    def RefreshView(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   313
        self.ResetBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   314
        self.DisableEvents = True
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   315
        old_cursor_pos = self.GetCurrentPos()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   316
        old_text = self.GetText()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   317
        new_text = self.Controler.GetEditedElementText(self.TagName, self.Debug)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   318
        self.SetText(new_text)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   319
        new_cursor_pos = GetCursorPos(old_text, new_text)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   320
        if new_cursor_pos != None:
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 79
diff changeset
   321
            self.GotoPos(new_cursor_pos)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 79
diff changeset
   322
        else:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 79
diff changeset
   323
            self.GotoPos(old_cursor_pos)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 79
diff changeset
   324
        self.ScrollToColumn(0)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   325
        self.RefreshJumpList()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   326
        self.EmptyUndoBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   327
        self.DisableEvents = False
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   328
        
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   329
        self.RefreshVariableTree()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   330
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   331
        self.Functions = []
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 235
diff changeset
   332
        for category in self.Controler.GetBlockTypes(self.TagName, self.Debug):
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   333
            for blocktype in category["list"]:
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   334
                if blocktype["type"] == "function" and blocktype["name"] not in self.Keywords and blocktype["name"] not in self.Variables.keys():
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   335
                    self.Functions.append(blocktype["name"].upper())
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   336
        
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   337
        self.EnumeratedValues = []
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   338
        for value in self.Controler.GetEnumeratedDataValues():
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   339
            self.EnumeratedValues.append(value.upper())
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   340
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   341
        self.Colourise(0, -1)
297
e837b67cb184 Adding help menu for inserting complex variable in graphical viewer
lbessard
parents: 295
diff changeset
   342
    
437
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   343
    def RefreshVariableTree(self):
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   344
        words = self.TagName.split("::")
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   345
        self.Variables = self.GenerateVariableTree([(variable["Name"], variable["Type"], variable["Tree"]) for variable in self.Controler.GetEditedElementInterfaceVars(self.TagName, self.Debug)])
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   346
        if self.Controler.GetEditedElementType(self.TagName, self.Debug)[1] == "function" or words[0] == "T" and self.TextSyntax == "IL":
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   347
            self.Variables[words[-1].upper()] = {}
59e33406eea8 Adding support for dropping Beremiz plugin variable locations into PLCOpenEditor viewers and adding corresponding variable into POU interface
laurent
parents: 411
diff changeset
   348
    
297
e837b67cb184 Adding help menu for inserting complex variable in graphical viewer
lbessard
parents: 295
diff changeset
   349
    def GenerateVariableTree(self, list):
e837b67cb184 Adding help menu for inserting complex variable in graphical viewer
lbessard
parents: 295
diff changeset
   350
        tree = {}
299
15669fe26e56 Adding support for generating real array dimension in variable blocks
lbessard
parents: 297
diff changeset
   351
        for var_name, var_type, (var_tree, var_dimension) in list:
300
34d1402c0e24 Bug with variable tree generation fixed
lbessard
parents: 299
diff changeset
   352
            tree[var_name.upper()] = self.GenerateVariableTree(var_tree)
297
e837b67cb184 Adding help menu for inserting complex variable in graphical viewer
lbessard
parents: 295
diff changeset
   353
        return tree
e837b67cb184 Adding help menu for inserting complex variable in graphical viewer
lbessard
parents: 295
diff changeset
   354
    
145
4fb225afddf4 Adding scaling
lbessard
parents: 136
diff changeset
   355
    def RefreshScaling(self, refresh=True):
4fb225afddf4 Adding scaling
lbessard
parents: 136
diff changeset
   356
        pass
4fb225afddf4 Adding scaling
lbessard
parents: 136
diff changeset
   357
    
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   358
    def IsValidVariable(self, name_list, var_tree):
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   359
        if len(name_list) == 0:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   360
            return True
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   361
        else:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   362
            sub_tree = var_tree.get(name_list[0].upper(), None)
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   363
            if sub_tree is not None:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   364
                return self.IsValidVariable(name_list[1:], sub_tree)
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   365
        return False
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   366
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   367
    def OnStyleNeeded(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   368
        self.TextChanged = True
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   369
        line = self.LineFromPosition(self.GetEndStyled())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   370
        if line == 0:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   371
            start_pos = last_styled_pos = 0
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   372
        else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   373
            start_pos = last_styled_pos = self.GetLineEndPosition(line - 1) + 1
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   374
        end_pos = event.GetPosition()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   375
        self.StartStyling(start_pos, 0xff)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   376
        
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   377
        struct_elements = []
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   378
        
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   379
        current_pos = last_styled_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   380
        state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   381
        line = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   382
        word = ""
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   383
        while current_pos < end_pos:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   384
            char = chr(self.GetCharAt(current_pos)).upper()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   385
            line += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   386
            if char == NEWLINE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   387
                if state == COMMENT:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   388
                    self.SetStyling(current_pos - last_styled_pos + 1, STC_PLC_COMMENT)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   389
                elif state == NUMBER:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   390
                    self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   391
                elif state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   392
                    if word in self.Keywords:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   393
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_WORD)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   394
                    elif self.IsValidVariable(struct_elements + [word], self.Variables):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   395
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_VARIABLE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   396
                    elif word in self.Functions:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   397
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_FUNCTION)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   398
                    elif word in self.Jumps:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   399
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_JUMP)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   400
                    elif word in self.EnumeratedValues:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   401
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   402
                    else:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   403
                        self.SetStyling(current_pos - last_styled_pos, 31)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   404
                        if word != "]" and (self.GetCurrentPos() < last_styled_pos or self.GetCurrentPos() > current_pos):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   405
                            self.StartStyling(last_styled_pos, wx.stc.STC_INDICS_MASK)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   406
                            self.SetStyling(current_pos - last_styled_pos, wx.stc.STC_INDIC0_MASK)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   407
                            self.StartStyling(current_pos, 0xff)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   408
                    struct_elements = []
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   409
                else:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   410
                    self.SetStyling(current_pos - last_styled_pos, 31)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   411
                last_styled_pos = current_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   412
                state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   413
                line = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   414
            elif line.endswith("(*") and state != COMMENT:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   415
                self.SetStyling(current_pos - last_styled_pos - 1, 31)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   416
                last_styled_pos = current_pos
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   417
                if state == WORD:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   418
                    struct_elements = []
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   419
                state = COMMENT
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   420
            elif state == COMMENT:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   421
                if line.endswith("*)"):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   422
                    self.SetStyling(current_pos - last_styled_pos + 2, STC_PLC_COMMENT)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   423
                    last_styled_pos = current_pos + 1
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   424
                    state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   425
            elif char in LETTERS:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   426
                if state == NUMBER:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   427
                    word = "#"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   428
                    state = WORD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   429
                elif state == SPACE:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   430
                    self.SetStyling(current_pos - last_styled_pos, 31)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   431
                    word = char
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   432
                    last_styled_pos = current_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   433
                    state = WORD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   434
                else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   435
                    word += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   436
            elif char in NUMBERS or char == '.' and state != WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   437
                if state == SPACE:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   438
                    self.SetStyling(current_pos - last_styled_pos, 31)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   439
                    last_styled_pos = current_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   440
                    state = NUMBER
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   441
                if state == WORD and char != '.':
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   442
                    word += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   443
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   444
                if state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   445
                    if word in self.Keywords:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   446
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_WORD)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   447
                    elif self.IsValidVariable(struct_elements + [word], self.Variables):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   448
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_VARIABLE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   449
                    elif word in self.Functions:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   450
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_FUNCTION)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   451
                    elif word in self.Jumps:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   452
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_JUMP)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   453
                    elif word in self.EnumeratedValues:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   454
                        self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   455
                    else:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   456
                        self.SetStyling(current_pos - last_styled_pos, 31)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   457
                        if word != "]" and (self.GetCurrentPos() < last_styled_pos or self.GetCurrentPos() > current_pos):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   458
                            self.StartStyling(last_styled_pos, wx.stc.STC_INDICS_MASK)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   459
                            self.SetStyling(current_pos - last_styled_pos, wx.stc.STC_INDIC0_MASK)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   460
                            self.StartStyling(current_pos, 0xff)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   461
                    if char == '.':
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   462
                        if word != "]":
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   463
                            struct_elements.append(word)
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   464
                    else:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   465
                        if char == '[':
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   466
                            self.StructElementsStack.append(struct_elements + [word])
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   467
                        struct_elements = []
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   468
                    word = ""
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   469
                    last_styled_pos = current_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   470
                    state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   471
                elif state == NUMBER:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   472
                    self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   473
                    last_styled_pos = current_pos
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   474
                    state = SPACE
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   475
                if char == ']':
308
bf1facfd1d36 Bug on TextViewer when no block types defined fixed
lbessard
parents: 300
diff changeset
   476
                    if len(self.StructElementsStack) > 0:
bf1facfd1d36 Bug on TextViewer when no block types defined fixed
lbessard
parents: 300
diff changeset
   477
                        struct_elements = self.StructElementsStack.pop()
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   478
                    word = char
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   479
                    state = WORD
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   480
            current_pos += 1
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   481
        if state == COMMENT:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   482
            self.SetStyling(current_pos - last_styled_pos + 2, STC_PLC_COMMENT)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   483
        elif state == NUMBER:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   484
            self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   485
        elif state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   486
            if word in self.Keywords:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   487
                self.SetStyling(current_pos - last_styled_pos, STC_PLC_WORD)
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   488
            elif self.IsValidVariable(struct_elements + [word], self.Variables):
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   489
                self.SetStyling(current_pos - last_styled_pos, STC_PLC_VARIABLE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   490
            elif word in self.Functions:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   491
                self.SetStyling(current_pos - last_styled_pos, STC_PLC_FUNCTION)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   492
            elif word in self.Jumps:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   493
                self.SetStyling(current_pos - last_styled_pos, STC_PLC_JUMP)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
   494
            elif word in self.EnumeratedValues:
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   495
                self.SetStyling(current_pos - last_styled_pos, STC_PLC_NUMBER)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   496
            else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   497
                self.SetStyling(current_pos - last_styled_pos, 31)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   498
        else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   499
            self.SetStyling(current_pos - start_pos, 31)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   500
        self.ShowErrors(start_pos, end_pos)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   501
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   502
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   503
    def Cut(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   504
        self.ResetBuffer()
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   505
        self.CmdKeyExecute(wx.stc.STC_CMD_CUT)
136
858ff1a52d20 Bugs on TextViewer fixed
lbessard
parents: 125
diff changeset
   506
        self.RefreshModel()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   507
        self.RefreshBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   508
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   509
    def Copy(self):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   510
        self.CmdKeyExecute(wx.stc.STC_CMD_COPY)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   511
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   512
    def Paste(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   513
        self.ResetBuffer()
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   514
        self.CmdKeyExecute(wx.stc.STC_CMD_PASTE)
136
858ff1a52d20 Bugs on TextViewer fixed
lbessard
parents: 125
diff changeset
   515
        self.RefreshModel()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   516
        self.RefreshBuffer()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   517
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   518
    def RefreshModel(self):
136
858ff1a52d20 Bugs on TextViewer fixed
lbessard
parents: 125
diff changeset
   519
        self.RefreshJumpList()
858ff1a52d20 Bugs on TextViewer fixed
lbessard
parents: 125
diff changeset
   520
        self.Controler.SetEditedElementText(self.TagName, self.GetText())
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   521
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   522
    def OnKeyDown(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   523
        if self.CallTipActive():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   524
            self.CallTipCancel()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 116
diff changeset
   525
        key = event.GetKeyCode()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   526
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   527
        # Code completion
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   528
        if key == wx.WXK_SPACE and event.ControlDown():
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   529
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   530
            line = self.GetCurrentLine()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   531
            if line == 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   532
                start_pos = 0
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   533
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   534
                start_pos = self.GetLineEndPosition(line - 1) + 1
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   535
            end_pos = self.GetCurrentPos()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   536
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   537
            lineText = self.GetTextRange(start_pos, end_pos).replace("\t", " ")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   538
            words = lineText.split(" ")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   539
            words = [word for i, word in enumerate(words) if word != '' or i == len(words) - 1]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   540
                        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   541
            kw = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   542
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   543
            if self.TextSyntax == "IL":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   544
                if len(words) == 1:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   545
                    kw = self.Keywords
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   546
                elif len(words) == 2:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   547
                    if words[0].upper() in ["CAL", "CALC", "CALNC"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   548
                        kw = self.Functions
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   549
                    elif words[0].upper() in ["JMP", "JMPC", "JMPNC"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   550
                        kw = self.Jumps
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   551
                    else:
295
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   552
                        kw = self.Variables.keys()
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   553
            else:
c6ef6d92ce16 Adding support for editing and using struct data types
lbessard
parents: 249
diff changeset
   554
                kw = self.Keywords + self.Variables.keys() + self.Functions
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   555
            if len(kw) > 0:
312
eab54dae434d Adding filted in Auto-completion of TextViewer
lbessard
parents: 308
diff changeset
   556
                if len(words[-1]) > 0:
eab54dae434d Adding filted in Auto-completion of TextViewer
lbessard
parents: 308
diff changeset
   557
                    kw = [keyword for keyword in kw if keyword.startswith(words[-1])]
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   558
                kw.sort()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   559
                self.AutoCompSetIgnoreCase(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   560
                self.AutoCompShow(len(words[-1]), " ".join(kw))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   561
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   562
            event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   563
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   564
    def OnKillFocus(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   565
        self.AutoCompCancel()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   566
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   567
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   568
#-------------------------------------------------------------------------------
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   569
#                        Errors showing functions
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   570
#-------------------------------------------------------------------------------
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   571
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   572
    def ClearErrors(self):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   573
        self.Errors = []
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   574
        self.RefreshView()
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   575
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   576
    def AddShownError(self, infos, start, end):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   577
        if infos[0] == "body":
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   578
            self.Errors.append((infos[1], start, end))
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   579
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   580
    def ShowErrors(self, start_pos, end_pos):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   581
        for indent, start, end in self.Errors:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   582
            if start[0] == 0:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   583
                error_start_pos = start[1] - indent
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   584
            else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   585
                error_start_pos = self.GetLineEndPosition(start[0] - 1) + start[1] - indent + 1
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   586
            if end[0] == 0:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   587
                error_end_pos = end[1] - indent + 1
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   588
            else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   589
                error_end_pos = self.GetLineEndPosition(end[0] - 1) + end[1] - indent + 2
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   590
            if start_pos <= error_start_pos <= end_pos or start_pos <= error_end_pos <= end_pos:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   591
                self.StartStyling(error_start_pos, 0xff)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 145
diff changeset
   592
                self.SetStyling(error_end_pos - error_start_pos, STC_PLC_ERROR)