1

# -*- coding: utf-8 -*-

     2

     3

# This file is part of Beremiz, a Integrated Development Environment for

     4

# programming IEC 61131-3 automates supporting plcopen standard and CanFestival.

     5

#

     6

# Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD

     7

#

     8

# See COPYING file for copyrights details.

     9

#

    10

# This program is free software; you can redistribute it and/or

    11

# modify it under the terms of the GNU General Public License

    12

# as published by the Free Software Foundation; either version 2

    13

# of the License, or (at your option) any later version.

    14

#

    15

# This program is distributed in the hope that it will be useful,

    16

# but WITHOUT ANY WARRANTY; without even the implied warranty of

    17

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    18

# GNU General Public License for more details.

    19

#

    20

# You should have received a copy of the GNU General Public License

    21

# along with this program; if not, write to the Free Software

    22

# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

    23

    24

import re

    25

import datetime

    26

    27

import wx

    28

    29

#-------------------------------------------------------------------------------

    30

#                                Helpers

    31

#-------------------------------------------------------------------------------

    32

    33

LOCATIONDATATYPES = {"X": ["BOOL"],

    34

                     "B": ["SINT", "USINT", "BYTE", "STRING"],

    35

                     "W": ["INT", "UINT", "WORD", "WSTRING"],

    36

                     "D": ["DINT", "UDINT", "REAL", "DWORD"],

    37

                     "L": ["LINT", "ULINT", "LREAL", "LWORD"]}

    38

    39

    40

def gen_get_function(f):

    41

    def get_function(v):

    42

        try:

    43

            return f(v)

    44

        except:

    45

            return None

    46

    return get_function

    47

    48

    49

def gen_get_string(delimiter):

    50

    STRING_MODEL = re.compile("%(delimiter)s([^%(delimiter)s]*)%(delimiter)s$" % {"delimiter": delimiter})

    51

    def get_string(v):

    52

        result = STRING_MODEL.match(v)

    53

        if result is not None:

    54

            return result.group(1)

    55

        return None

    56

    return get_string

    57

    59

getinteger = gen_get_function(int)

    60

getfloat = gen_get_function(float)

    61

getstring = gen_get_string("'")

    62

getwstring = gen_get_string('"')

    63

    64

SECOND = 1000000

    65

MINUTE = 60 * SECOND

    66

HOUR = 60 * MINUTE

    67

DAY = 24 * HOUR

    68

    69

IEC_TIME_MODEL = re.compile("(?:(?:T|TIME)#)?(-)?(?:(%(float)s)D_?)?(?:(%(float)s)H_?)?(?:(%(float)s)M(?!S)_?)?(?:(%(float)s)S_?)?(?:(%(float)s)MS)?$" % {"float": "[0-9]+(?:\.[0-9]+)?"})

    70

IEC_DATE_MODEL = re.compile("(?:(?:D|DATE)#)?([0-9]{4})-([0-9]{2})-([0-9]{2})$")

    71

IEC_DATETIME_MODEL = re.compile("(?:(?:DT|DATE_AND_TIME)#)?([0-9]{4})-([0-9]{2})-([0-9]{2})-([0-9]{2}):([0-9]{2}):([0-9]{2}(?:\.[0-9]+)?)$")

    72

IEC_TIMEOFDAY_MODEL = re.compile("(?:(?:TOD|TIME_OF_DAY)#)?([0-9]{2}):([0-9]{2}):([0-9]{2}(?:\.[0-9]+)?)$")

    73

    74

    75

def gettime(v):

    76

    result = IEC_TIME_MODEL.match(v.upper())

    77

    if result is not None:

    78

        negative, days, hours, minutes, seconds, milliseconds = result.groups()

    79

        microseconds = 0

    80

        not_null = False

    81

        for value, factor in [(days, DAY),

    82

                              (hours, HOUR),

    83

                              (minutes, MINUTE),

    84

                              (seconds, SECOND),

    85

                              (milliseconds, 1000)]:

    86

            if value is not None:

    87

                microseconds += float(value) * factor

    88

                not_null = True

    89

        if not not_null:

    90

            return None

    91

        if negative is not None:

    92

            microseconds = -microseconds

    93

        return datetime.timedelta(microseconds=microseconds)

    94

    95

    else:

    96

        return None

    97

    98

    99

def getdate(v):

   100

    result = IEC_DATE_MODEL.match(v.upper())

   101

    if result is not None:

   102

        year, month, day = result.groups()

   103

        try:

   104

            date = datetime.datetime(int(year), int(month), int(day))

   105

        except ValueError, e:

   106

            return None

   107

        base_date = datetime.datetime(1970, 1, 1)

   108

        return date - base_date

   109

    else:

   110

        return None

   111

   112

   113

def getdatetime(v):

   114

    result = IEC_DATETIME_MODEL.match(v.upper())

   115

    if result is not None:

   116

        year, month, day, hours, minutes, seconds = result.groups()

   117

        try:

   118

            date = datetime.datetime(int(year), int(month), int(day), int(hours), int(minutes), int(float(seconds)), int((float(seconds) * SECOND) % SECOND))

   119

        except ValueError, e:

   120

            return None

   121

        base_date = datetime.datetime(1970, 1, 1)

   122

        return date - base_date

   123

    else:

   124

        return None

   125

   126

   127

def gettimeofday(v):

   128

    result = IEC_TIMEOFDAY_MODEL.match(v.upper())

   129

    if result is not None:

   130

        hours, minutes, seconds = result.groups()

   131

        microseconds = 0

   132

        for value, factor in [(hours, HOUR),

   133

                              (minutes, MINUTE),

   134

                              (seconds, SECOND)]:

   135

            microseconds += float(value) * factor

   136

        return datetime.timedelta(microseconds=microseconds)

   137

    else:

   138

        return None

   139

   141

GetTypeValue = {"BOOL": lambda x: {"TRUE": True, "FALSE": False, "0": False, "1": True}.get(x.upper(), None),

   142

                "SINT": getinteger,

   143

                "INT": getinteger,

   144

                "DINT": getinteger,

   145

                "LINT": getinteger,

   146

                "USINT": getinteger,

   147

                "UINT": getinteger,

   148

                "UDINT": getinteger,

   149

                "ULINT": getinteger,

   150

                "BYTE": getinteger,

   151

                "WORD": getinteger,

   152

                "DWORD": getinteger,

   153

                "LWORD": getinteger,

   154

                "REAL": getfloat,

   155

                "LREAL": getfloat,

   156

                "STRING": getstring,

   157

                "WSTRING": getwstring,

   158

                "TIME": gettime,

   159

                "DATE": getdate,

   160

                "DT": getdatetime,

   161

                "TOD": gettimeofday}

   162

   163

#-------------------------------------------------------------------------------

   164

#                            Force Variable Dialog

   165

#-------------------------------------------------------------------------------

   166

   167

   168

class ForceVariableDialog(wx.TextEntryDialog):

   169

   170

    def __init__(self, parent, iec_type, defaultValue=""):

   171

        wx.TextEntryDialog.__init__(self, parent, message=_("Forcing Variable Value"),

   172

                caption=_("Please enter value for a \"%s\" variable:") % iec_type, defaultValue=defaultValue,

   173

                style=wx.OK | wx.CANCEL | wx.CENTRE, pos=wx.DefaultPosition)

   174

   175

        self.IEC_Type = iec_type

   176

   177

        self.Bind(wx.EVT_BUTTON, self.OnOK,

   178

              self.GetSizer().GetItem(2).GetSizer().GetItem(1).GetSizer().GetAffirmativeButton())

   179

        self.ValueTextCtrl = self.GetSizer().GetItem(1).GetWindow()

   180

        if self.IEC_Type == "BOOL":

   181

            self.ToggleButton = wx.ToggleButton(self, label=_("Toggle value"))

   182

            value = GetTypeValue[self.IEC_Type](defaultValue)

   183

            if value is not None:

   184

                self.ToggleButton.SetValue(value)

   185

   186

            border = self.GetSizer().GetItem(1).GetBorder()

   187

            self.GetSizer().Insert(before=2, item=self.ToggleButton,

   188

                                   border=border,

   189

                                   flag=wx.LEFT | wx.RIGHT | wx.EXPAND)

   190

            self.Bind(wx.EVT_TOGGLEBUTTON, self.ToggleBoolValue, self.ToggleButton)

   191

   192

        self.Fit()

   193

   194

    def ToggleBoolValue(self, event):

   195

        value = self.ToggleButton.GetValue()

   196

        self.ValueTextCtrl.SetValue(unicode(value))

   197

   198

    def OnOK(self, event):

   199

        message = None

   200

        value = self.ValueTextCtrl.GetValue()

   201

        if value == "":

   202

            message = _("You must type a value!")

   203

        elif GetTypeValue[self.IEC_Type](value) is None:

   204

            message = _("Invalid value \"{a1}\" for \"{a2}\" variable!").format(a1=value, a2=self.IEC_Type)

   205

        if message is not None:

   206

            dialog = wx.MessageDialog(self, message, _("Error"), wx.OK | wx.ICON_ERROR)

   207

            dialog.ShowModal()

   208

            dialog.Destroy()

   209

        else:

   210

            self.EndModal(wx.ID_OK)

   211

        event.Skip()

   212

   213

    def GetValue(self):

   214

        return GetTypeValue[self.IEC_Type](wx.TextEntryDialog.GetValue(self))