1

#!/usr/bin/env python

     2

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

     3

     4

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

     5

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

     6

#

     7

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

     8

#

     9

#See COPYING file for copyrights details.

    10

#

    11

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

    12

#modify it under the terms of the GNU General Public

    13

#License as published by the Free Software Foundation; either

    14

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

    15

#

    16

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

    17

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

    18

#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

    19

#General Public License for more details.

    20

#

    21

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

    22

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

    23

#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

    24

    25

import ctypes

    26

from LPCAppProto import *

    27

from LPCObject import *

    28

from targets.typemapping import SameEndianessTypeTranslator as TypeTranslator

    29

    30

class LPCAppObject(LPCObject):

    31

    def connect(self,comport):

    32

        self.SerialConnection = LPCAppProto(comport,#number

    33

                                         115200, #speed

    34

                                         2)      #timeout

    35

    36

    def StartPLC(self, debug=False):

    37

        self.HandleSerialTransaction(STARTTransaction())

    38

    39

    def StopPLC(self):

    40

        self.HandleSerialTransaction(STOPTransaction())

    41

        return True

    42

    43

    def ResetPLC(self):

    44

        self.HandleSerialTransaction(RESETTransaction())

    45

        return self.PLCStatus

    46

    47

    def GetPLCstatus(self):

    48

        strcounts = self.HandleSerialTransaction(GET_LOGCOUNTSTransaction())

    49

        ccounts = ctypes.cast(

    50

                      ctypes.c_char_p(strcounts),

    51

                      ctypes.POINTER(ctypes.c_uint32))

    53

    54

    def MatchMD5(self, MD5):

    55

        data = self.HandleSerialTransaction(GET_PLCIDTransaction())

    56

        if data is not None:

    57

            return data[:32] == MD5[:32]

    58

        return False

    59

    60

    def SetTraceVariablesList(self, idxs):

    61

        """

    62

        Call ctype imported function to append 

    63

        these indexes to registred variables in PLC debugger

    64

        """

    65

        if idxs:

    66

            buff = ""

    67

            # keep a copy of requested idx

    68

            self._Idxs = idxs[:]

    69

            for idx,iectype,force in idxs:

    70

                idxstr = ctypes.string_at(

    71

                          ctypes.pointer(

    72

                           ctypes.c_uint32(idx)),4)

    73

                if force !=None:

    74

                    c_type,unpack_func, pack_func = TypeTranslator.get(iectype, (None,None,None))

    75

                    forced_type_size = ctypes.sizeof(c_type)

    76

                    forced_type_size_str = chr(forced_type_size)

    77

                    forcestr = ctypes.string_at(

    78

                                ctypes.pointer(

    79

                                 pack_func(c_type,force)),

    80

                                 forced_type_size)

    81

                    buff += idxstr + forced_type_size_str + forcestr

    82

                else:

    83

                    buff += idxstr + chr(0)

    84

        else:

    85

            buff = ""

    86

            self._Idxs =  []

    87

    88

        self.HandleSerialTransaction(SET_TRACE_VARIABLETransaction(buff))

    89

    90

    def GetTraceVariables(self):

    91

        """

    92

        Return a list of variables, corresponding to the list of required idx

    93

        """

    94

        offset = 0

    95

        strbuf = self.HandleSerialTransaction(

    96

                                     GET_TRACE_VARIABLETransaction())

    97

        if strbuf is not None and len(strbuf) > 4 and self.PLCStatus == "Started":

    98

            res=[]

    99

            size = len(strbuf) - 4

   100

            tick = ctypes.cast(

   101

                    ctypes.c_char_p(strbuf[:4]),

   102

                    ctypes.POINTER(ctypes.c_int)).contents

   103

            buff = ctypes.cast(

   104

                      ctypes.c_char_p(strbuf[4:]),

   105

                      ctypes.c_void_p)

   106

            for idx, iectype, forced in self._Idxs:

   107

                cursor = ctypes.c_void_p(buff.value + offset)

   108

                c_type,unpack_func, pack_func = TypeTranslator.get(iectype, (None,None,None))

   109

                if c_type is not None and offset < size:

   110

                    res.append(unpack_func(ctypes.cast(cursor,

   111

                                                       ctypes.POINTER(c_type)).contents))

   112

                    offset += ctypes.sizeof(c_type)

   113

                else:

   114

                    #if c_type is None:

   115

                        #PLCprint("Debug error - " + iectype + " not supported !")

   116

                    #if offset >= size:

   117

                        #PLCprint("Debug error - buffer too small !")

   118

                    break

   119

            if offset and offset == size:

   120

                return self.PLCStatus, tick.value, res

   121

            #PLCprint("Debug error - wrong buffer unpack !")

   122

        return self.PLCStatus, None, [] 

   123

   124

    def GetLogMessage(self, level, msgid):

   125

        strbuf = self.HandleSerialTransaction(GET_LOGMSGTransaction(level, msgid))

   126

        if len(strbuf) > 12:

   127

            cbuf = ctypes.cast(

   128

                          ctypes.c_char_p(strbuf[:12]),

   129

                          ctypes.POINTER(ctypes.c_uint32))

   130

            return (strbuf[12:],)+tuple(int(cbuf[idx]) for idx in range(3))

   131

        return None