objdictgen/gen_cfile.py
author gabriele at naustech dot com
Thu, 12 Jun 2014 14:07:16 +0200
changeset 791 7740ac6fdedc
parent 765 90b738e4ede5
child 792 2b9fd5086704
permissions -rw-r--r--
Fix : libcanfestival_unix.a not built if examples are not compiled

Problem: when building Canfestival with unix timers 'libcanfestiva_unix.a'
is built only if you build examples too.

Test case:

$ ./configure --timers=unix --can=socket --target=unix
$ make canfestival

...

no errors but 'libcanfestival_unix.a' is not built:
$ find . -name "*.a"
./src/libcanfestival.a

Changing line 90 of 'drivers/unix/Makefile.in' to:
#driver: $(OBJS)
driver: libcanfestival_$(TARGET).a

solves the problem:

$ ./configure --timers=unix --can=socket --target=unix
$ make canfestival

...

$ find . -name "*.a"
./drivers/unix/libcanfestival_unix.a
./src/libcanfestival.a
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     1
#!/usr/bin/env python
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
73
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     3
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     4
#This file is part of CanFestival, a library implementing CanOpen Stack. 
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     5
#
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     6
#Copyright (C): Edouard TISSERANT and Francis DUPIN
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     7
#
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     8
#See COPYING file for copyrights details.
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
     9
#
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    10
#This library is free software; you can redistribute it and/or
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    11
#modify it under the terms of the GNU Lesser General Public
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    12
#License as published by the Free Software Foundation; either
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    13
#version 2.1 of the License, or (at your option) any later version.
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    14
#
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    15
#This library is distributed in the hope that it will be useful,
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    16
#but WITHOUT ANY WARRANTY; without even the implied warranty of
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    17
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    18
#Lesser General Public License for more details.
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    19
#
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    20
#You should have received a copy of the GNU Lesser General Public
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    21
#License along with this library; if not, write to the Free Software
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
    22
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    23
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    24
from node import *
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    25
from types import *
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    26
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    27
import re, os
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    28
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    29
word_model = re.compile('([a-zA-Z_0-9]*)')
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    30
type_model = re.compile('([\_A-Z]*)([0-9]*)')
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    31
range_model = re.compile('([\_A-Z]*)([0-9]*)\[([\-0-9]*)-([\-0-9]*)\]')
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    32
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    33
categories = [("SDO_SVR", 0x1200, 0x127F), ("SDO_CLT", 0x1280, 0x12FF),
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    34
              ("PDO_RCV", 0x1400, 0x15FF), ("PDO_RCV_MAP", 0x1600, 0x17FF),
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    35
              ("PDO_TRS", 0x1800, 0x19FF), ("PDO_TRS_MAP", 0x1A00, 0x1BFF)]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    36
index_categories = ["firstIndex", "lastIndex"]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    37
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    38
generated_tag = """\n/* File generated by gen_cfile.py. Should not be modified. */\n"""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    39
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    40
internal_types = {}
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    41
default_string_size = 10
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    42
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    43
#Verify that the name does not start with a digit
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    44
def UnDigitName(name):
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    45
    start_with_digit = re.compile(r'^(\d.*)')
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    46
    if start_with_digit.match(name):
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    47
        return start_with_digit.sub(r'_\1', name)
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    48
    return name
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    49
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
    50
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    51
# Format a string for making a C++ variable
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    52
def FormatName(name):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    53
    wordlist = [word for word in word_model.findall(name) if word != '']
227
f76c64f66097 Bugs on cfile generation fixed
lbessard
parents: 224
diff changeset
    54
    return "_".join(wordlist)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    55
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    56
# Extract the informations from a given type name
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    57
def GetValidTypeInfos(typename, items=[]):
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    58
    if typename in internal_types:
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    59
        return internal_types[typename]
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    60
    else:
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    61
        result = type_model.match(typename)
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    62
        if result:
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    63
            values = result.groups()
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    64
            if values[0] == "UNSIGNED" and int(values[1]) in [i * 8 for i in xrange(1, 9)]:
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    65
                typeinfos = ("UNS%s"%values[1], None, "uint%s"%values[1], True)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    66
            elif values[0] == "INTEGER" and int(values[1]) in [i * 8 for i in xrange(1, 9)]:
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    67
                typeinfos = ("INTEGER%s"%values[1], None, "int%s"%values[1], False)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    68
            elif values[0] == "REAL" and int(values[1]) in (32, 64):
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    69
                typeinfos = ("%s%s"%(values[0], values[1]), None, "real%s"%values[1], False)
581
dc35cf4ed127 Adding support for octet string
laurent
parents: 580
diff changeset
    70
            elif values[0] in ["VISIBLE_STRING", "OCTET_STRING"]:
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    71
                size = default_string_size
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    72
                for item in items:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    73
                    size = max(size, len(item))
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    74
                if values[1] != "":
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    75
                    size = max(size, int(values[1]))
765
90b738e4ede5 Fixed warnings when compiling generated Object Dictionary
Laurent Bessard
parents: 750
diff changeset
    76
                typeinfos = ("UNS8", size, "visible_string", False)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    77
            elif values[0] == "DOMAIN":
527
7d5c74cc8f91 - Fix bug with relative path when node opened from command line
greg
parents: 526
diff changeset
    78
                size = 0
420
a42335b39bf4 Bug on domain size calculation fixed
lbessard
parents: 418
diff changeset
    79
                for item in items:
a42335b39bf4 Bug on domain size calculation fixed
lbessard
parents: 418
diff changeset
    80
                    size = max(size, len(item))
765
90b738e4ede5 Fixed warnings when compiling generated Object Dictionary
Laurent Bessard
parents: 750
diff changeset
    81
                typeinfos = ("UNS8", size, "domain", False)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    82
            elif values[0] == "BOOLEAN":
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
    83
                typeinfos = ("UNS8", None, "boolean", False)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    84
            else:
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
    85
                raise ValueError, _("""!!! %s isn't a valid type for CanFestival.""")%typename
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
    86
            if typeinfos[2] not in ["visible_string", "domain"]:
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
    87
                internal_types[typename] = typeinfos
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    88
        else:
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
    89
            raise ValueError, _("""!!! %s isn't a valid type for CanFestival.""")%typename
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
    90
    return typeinfos
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    91
453
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    92
def ComputeValue(type, value):
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    93
    if type == "visible_string":
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    94
        return "\"%s\""%value, ""
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    95
    elif type == "domain":
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    96
        return "\"%s\""%''.join(["\\x%2.2x"%ord(char) for char in value]), ""
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    97
    elif type.startswith("real"):
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    98
        return "%f"%value, ""
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
    99
    else:
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   100
        return "0x%X"%value, "\t/* %s */"%str(value)
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   101
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   102
def WriteFile(filepath, content):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   103
    cfile = open(filepath,"w")
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   104
    cfile.write(content)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   105
    cfile.close()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   106
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   107
def GetTypeName(Node, typenumber):
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   108
    typename = Node.GetTypeName(typenumber)
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   109
    if typename is None:
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   110
        raise ValueError, _("""!!! Datatype with value "0x%4.4X" isn't defined in CanFestival.""")%typenumber
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   111
    return typename
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   112
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   113
def GenerateFileContent(Node, headerfilepath, pointers_dict = {}):
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   114
    """
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   115
    pointers_dict = {(Idx,Sidx):"VariableName",...}
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   116
    """
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   117
    global type
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   118
    global internal_types
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   119
    global default_string_size
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   120
    
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   121
    texts = {}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   122
    texts["maxPDOtransmit"] = 0
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   123
    texts["NodeName"] = Node.GetNodeName()
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   124
    texts["NodeID"] = Node.GetNodeID()
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   125
    texts["NodeType"] = Node.GetNodeType()
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   126
    texts["Description"] = Node.GetNodeDescription()
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   127
    texts["iam_a_slave"] = 0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   128
    if (texts["NodeType"] == "slave"):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   129
        texts["iam_a_slave"] = 1
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   130
    
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   131
    default_string_size = Node.GetDefaultStringSize()
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   132
    
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   133
    # Compiling lists of indexes
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   134
    rangelist = [idx for idx in Node.GetIndexes() if 0 <= idx <= 0x260]
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   135
    listIndex = [idx for idx in Node.GetIndexes() if 0x1000 <= idx <= 0xFFFF]
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   136
    communicationlist = [idx for idx in Node.GetIndexes() if 0x1000 <= idx <= 0x11FF]
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   137
    sdolist = [idx for idx in Node.GetIndexes() if 0x1200 <= idx <= 0x12FF]
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   138
    pdolist = [idx for idx in Node.GetIndexes() if 0x1400 <= idx <= 0x1BFF]
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   139
    variablelist = [idx for idx in Node.GetIndexes() if 0x2000 <= idx <= 0xBFFF]
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   140
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   141
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   142
#                       Declaration of the value range types
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   143
#-------------------------------------------------------------------------------    
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   144
    
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   145
    valueRangeContent = ""
286
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   146
    strDefine = "\n#define valueRange_EMC 0x9F /* Type for index 0x1003 subindex 0x00 (only set of value 0 is possible) */"
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   147
    strSwitch = """    case valueRange_EMC:
288
26015ee2c2c9 Modified codes in MSG_ERR and MSG_WAR in emcy.c
luis
parents: 287
diff changeset
   148
      if (*(UNS8*)value != (UNS8)0) return OD_VALUE_RANGE_EXCEEDED;
286
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   149
      break;\n"""
313
fed411af774a Adding standard default value to index 0x1014
lbessard
parents: 289
diff changeset
   150
    internal_types["valueRange_EMC"] = ("UNS8", "", "valueRange_EMC", True)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   151
    num = 0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   152
    for index in rangelist:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   153
        rangename = Node.GetEntryName(index)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   154
        result = range_model.match(rangename)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   155
        if result:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   156
            num += 1
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   157
            typeindex = Node.GetEntry(index, 1)
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   158
            typename = Node.GetTypeName(typeindex)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   159
            typeinfos = GetValidTypeInfos(typename)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   160
            internal_types[rangename] = (typeinfos[0], typeinfos[1], "valueRange_%d"%num)
289
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   161
            minvalue = Node.GetEntry(index, 2)
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   162
            maxvalue = Node.GetEntry(index, 3)
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   163
            strDefine += "\n#define valueRange_%d 0x%02X /* Type %s, %s < value < %s */"%(num,index,typeinfos[0],str(minvalue),str(maxvalue))
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   164
            strSwitch += "    case valueRange_%d:\n"%(num)
313
fed411af774a Adding standard default value to index 0x1014
lbessard
parents: 289
diff changeset
   165
            if typeinfos[3] and minvalue <= 0:
289
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   166
                strSwitch += "      /* Negative or null low limit ignored because of unsigned type */;\n"
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   167
            else:
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   168
                strSwitch += "      if (*(%s*)value < (%s)%s) return OD_VALUE_TOO_LOW;\n"%(typeinfos[0],typeinfos[0],str(minvalue))
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   169
            strSwitch += "      if (*(%s*)value > (%s)%s) return OD_VALUE_TOO_HIGH;\n"%(typeinfos[0],typeinfos[0],str(maxvalue))
a22ce0314063 Removed warning with lower boundary <= 0 in Valuerange test wuth unsigned types
etisserant
parents: 288
diff changeset
   170
            strSwitch += "    break;\n"
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   171
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   172
    valueRangeContent += strDefine
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   173
    valueRangeContent += "\nUNS32 %(NodeName)s_valueRangeTest (UNS8 typeValue, void * value)\n{"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   174
    valueRangeContent += "\n  switch (typeValue) {\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   175
    valueRangeContent += strSwitch
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   176
    valueRangeContent += "  }\n  return 0;\n}\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   177
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   178
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   179
#            Creation of the mapped variables and object dictionary
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   180
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   181
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   182
    mappedVariableContent = ""
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   183
    pointedVariableContent = ""
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   184
    strDeclareHeader = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   185
    strDeclareCallback = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   186
    indexContents = {}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   187
    indexCallbacks = {}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   188
    for index in listIndex:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   189
        texts["index"] = index
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   190
        strIndex = ""
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   191
        entry_infos = Node.GetEntryInfos(index)
229
b24906340673 Fixed unicode encoding in gen_cfile.py
etisserant
parents: 227
diff changeset
   192
        texts["EntryName"] = entry_infos["name"].encode('ascii','replace')
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   193
        values = Node.GetEntry(index)
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   194
        callbacks = Node.HasEntryCallbacks(index)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   195
        if index in variablelist:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   196
            strIndex += "\n/* index 0x%(index)04X :   Mapped variable %(EntryName)s */\n"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   197
        else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   198
            strIndex += "\n/* index 0x%(index)04X :   %(EntryName)s. */\n"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   199
        
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   200
        # Entry type is VAR
515
62b6520332e9 Some instance type test improved
lbessard
parents: 512
diff changeset
   201
        if not isinstance(values, ListType):
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   202
            subentry_infos = Node.GetSubentryInfos(index, 0)
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   203
            typename = GetTypeName(Node, subentry_infos["type"])
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   204
            typeinfos = GetValidTypeInfos(typename, [values])
527
7d5c74cc8f91 - Fix bug with relative path when node opened from command line
greg
parents: 526
diff changeset
   205
            if typename is "DOMAIN" and index in variablelist:
7d5c74cc8f91 - Fix bug with relative path when node opened from command line
greg
parents: 526
diff changeset
   206
                if not typeinfos[1]:
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   207
                    raise ValueError, _("\nDomain variable not initialized\nindex : 0x%04X\nsubindex : 0x00")%index
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   208
            texts["subIndexType"] = typeinfos[0]
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   209
            if typeinfos[1] is not None:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   210
                texts["suffixe"] = "[%d]"%typeinfos[1]
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   211
            else:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   212
                texts["suffixe"] = ""
453
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   213
            texts["value"], texts["comment"] = ComputeValue(typeinfos[2], values)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   214
            if index in variablelist:
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
   215
                texts["name"] = UnDigitName(FormatName(subentry_infos["name"]))
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   216
                strDeclareHeader += "extern %(subIndexType)s %(name)s%(suffixe)s;\t\t/* Mapped at index 0x%(index)04X, subindex 0x00*/\n"%texts
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   217
                mappedVariableContent += "%(subIndexType)s %(name)s%(suffixe)s = %(value)s;\t\t/* Mapped at index 0x%(index)04X, subindex 0x00 */\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   218
            else:
5
e4365e7d47f0 Bug on number in hexa computed by gen_cfile corrected
lbessard
parents: 0
diff changeset
   219
                strIndex += "                    %(subIndexType)s %(NodeName)s_obj%(index)04X%(suffixe)s = %(value)s;%(comment)s\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   220
            values = [values]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   221
        else:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   222
            subentry_infos = Node.GetSubentryInfos(index, 0)
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   223
            typename = GetTypeName(Node, subentry_infos["type"])
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   224
            typeinfos = GetValidTypeInfos(typename)
286
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   225
            if index == 0x1003:
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   226
                texts["value"] = 0
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   227
            else:
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   228
                texts["value"] = values[0]
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   229
            texts["subIndexType"] = typeinfos[0]
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   230
            strIndex += "                    %(subIndexType)s %(NodeName)s_highestSubIndex_obj%(index)04X = %(value)d; /* number of subindex - 1*/\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   231
            
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   232
            # Entry type is RECORD
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   233
            if entry_infos["struct"] & OD_IdenticalSubindexes:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   234
                subentry_infos = Node.GetSubentryInfos(index, 1)
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   235
                typename = Node.GetTypeName(subentry_infos["type"])
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   236
                typeinfos = GetValidTypeInfos(typename, values[1:])
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   237
                texts["subIndexType"] = typeinfos[0]
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   238
                if typeinfos[1] is not None:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   239
                    texts["suffixe"] = "[%d]"%typeinfos[1]
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
   240
                    texts["type_suffixe"] = "*"
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   241
                else:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   242
                    texts["suffixe"] = ""
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
   243
                    texts["type_suffixe"] = ""
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   244
                texts["length"] = values[0]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   245
                if index in variablelist:
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
   246
                    texts["name"] = UnDigitName(FormatName(entry_infos["name"]))
547
79a24eb3ba28 Added size information in generated object dictionnary header files (Objdictgen/gen_cfile.py)
etisserant
parents: 527
diff changeset
   247
                    texts["values_count"] =  str(len(values)-1)
79a24eb3ba28 Added size information in generated object dictionnary header files (Objdictgen/gen_cfile.py)
etisserant
parents: 527
diff changeset
   248
                    strDeclareHeader += "extern %(subIndexType)s%(type_suffixe)s %(name)s[%(values_count)s];\t\t/* Mapped at index 0x%(index)04X, subindex 0x01 - 0x%(length)02X */\n"%texts
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
   249
                    mappedVariableContent += "%(subIndexType)s%(type_suffixe)s %(name)s[] =\t\t/* Mapped at index 0x%(index)04X, subindex 0x01 - 0x%(length)02X */\n  {\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   250
                    for subIndex, value in enumerate(values):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   251
                        sep = ","
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   252
                        if subIndex > 0:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   253
                            if subIndex == len(values)-1:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   254
                                sep = ""
453
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   255
                            value, comment = ComputeValue(typeinfos[2], value)
527
7d5c74cc8f91 - Fix bug with relative path when node opened from command line
greg
parents: 526
diff changeset
   256
                            if len(value) is 2 and typename is "DOMAIN":
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   257
                                raise ValueError("\nDomain variable not initialized\nindex : 0x%04X\nsubindex : 0x%02X"%(index, subIndex))
5
e4365e7d47f0 Bug on number in hexa computed by gen_cfile corrected
lbessard
parents: 0
diff changeset
   258
                            mappedVariableContent += "    %s%s%s\n"%(value, sep, comment)
28
e169fe15521b *** empty log message ***
lbessard
parents: 5
diff changeset
   259
                    mappedVariableContent += "  };\n"
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   260
                else:
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
   261
                    strIndex += "                    %(subIndexType)s%(type_suffixe)s %(NodeName)s_obj%(index)04X[] = \n                    {\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   262
                    for subIndex, value in enumerate(values):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   263
                        sep = ","
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   264
                        if subIndex > 0:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   265
                            if subIndex == len(values)-1:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   266
                                sep = ""
453
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   267
                            value, comment = ComputeValue(typeinfos[2], value)
5
e4365e7d47f0 Bug on number in hexa computed by gen_cfile corrected
lbessard
parents: 0
diff changeset
   268
                            strIndex += "                      %s%s%s\n"%(value, sep, comment)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   269
                    strIndex += "                    };\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   270
            else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   271
                
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
   272
                texts["parent"] = UnDigitName(FormatName(entry_infos["name"]))
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   273
                # Entry type is ARRAY
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   274
                for subIndex, value in enumerate(values):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   275
                    texts["subIndex"] = subIndex
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   276
                    if subIndex > 0:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   277
                        subentry_infos = Node.GetSubentryInfos(index, subIndex)
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   278
                        typename = GetTypeName(Node, subentry_infos["type"])
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   279
                        typeinfos = GetValidTypeInfos(typename, [values[subIndex]])
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   280
                        texts["subIndexType"] = typeinfos[0]
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   281
                        if typeinfos[1] is not None:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   282
                            texts["suffixe"] = "[%d]"%typeinfos[1]
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   283
                        else:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   284
                            texts["suffixe"] = ""
453
c74a73474cce Problem with Real types unsupported fixed
lbessard
parents: 432
diff changeset
   285
                        texts["value"], texts["comment"] = ComputeValue(typeinfos[2], value)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   286
                        texts["name"] = FormatName(subentry_infos["name"])
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   287
                        if index in variablelist:
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   288
                            strDeclareHeader += "extern %(subIndexType)s %(parent)s_%(name)s%(suffixe)s;\t\t/* Mapped at index 0x%(index)04X, subindex 0x%(subIndex)02X */\n"%texts
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   289
                            mappedVariableContent += "%(subIndexType)s %(parent)s_%(name)s%(suffixe)s = %(value)s;\t\t/* Mapped at index 0x%(index)04X, subindex 0x%(subIndex)02X */\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   290
                        else:
5
e4365e7d47f0 Bug on number in hexa computed by gen_cfile corrected
lbessard
parents: 0
diff changeset
   291
                            strIndex += "                    %(subIndexType)s %(NodeName)s_obj%(index)04X_%(name)s%(suffixe)s = %(value)s;%(comment)s\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   292
        
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   293
        # Generating Dictionary C++ entry
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   294
        if callbacks:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   295
            if index in variablelist:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   296
                name = FormatName(entry_infos["name"])
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   297
            else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   298
                name = "%(NodeName)s_Index%(index)04X"%texts
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
   299
            name=UnDigitName(name);
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   300
            strIndex += "                    ODCallback_t %s_callbacks[] = \n                     {\n"%name
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   301
            for subIndex in xrange(len(values)):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   302
                strIndex += "                       NULL,\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   303
            strIndex += "                     };\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   304
            indexCallbacks[index] = "*callbacks = %s_callbacks; "%name
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   305
        else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   306
            indexCallbacks[index] = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   307
        strIndex += "                    subindex %(NodeName)s_Index%(index)04X[] = \n                     {\n"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   308
        for subIndex in xrange(len(values)):
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   309
            subentry_infos = Node.GetSubentryInfos(index, subIndex)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   310
            if subIndex < len(values) - 1:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   311
                sep = ","
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   312
            else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   313
                sep = ""
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   314
            typename = Node.GetTypeName(subentry_infos["type"])
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   315
            if entry_infos["struct"] & OD_IdenticalSubindexes:
526
1607d4afce20 Fix bug when generate od cfile with a table of visible_string
greg
parents: 515
diff changeset
   316
                typeinfos = GetValidTypeInfos(typename, values[1:])
418
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   317
            else:
64a8c24b61a5 Problem with String size in C file generated fixed
lbessard
parents: 366
diff changeset
   318
                typeinfos = GetValidTypeInfos(typename, [values[subIndex]])
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   319
            if subIndex == 0:
286
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   320
                if index == 0x1003:
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   321
                    typeinfos = GetValidTypeInfos("valueRange_EMC")
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   322
                if entry_infos["struct"] & OD_MultipleSubindexes:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   323
                    name = "%(NodeName)s_highestSubIndex_obj%(index)04X"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   324
                elif index in variablelist:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   325
                    name = FormatName(subentry_infos["name"])
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   326
                else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   327
                    name = FormatName("%s_obj%04X"%(texts["NodeName"], texts["index"]))
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   328
            elif entry_infos["struct"] & OD_IdenticalSubindexes:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   329
                if index in variablelist:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   330
                    name = "%s[%d]"%(FormatName(entry_infos["name"]), subIndex - 1)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   331
                else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   332
                    name = "%s_obj%04X[%d]"%(texts["NodeName"], texts["index"], subIndex - 1)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   333
            else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   334
                if index in variablelist:
70
f36f09f08b62 Bug corrected on gen_cfile
lbessard
parents: 66
diff changeset
   335
                    name = FormatName("%s_%s"%(entry_infos["name"],subentry_infos["name"]))
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   336
                else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   337
                    name = "%s_obj%04X_%s"%(texts["NodeName"], texts["index"], FormatName(subentry_infos["name"]))
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 420
diff changeset
   338
            if typeinfos[2] == "visible_string":
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 420
diff changeset
   339
                sizeof = str(max(len(values[subIndex]), default_string_size))
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 420
diff changeset
   340
            elif typeinfos[2] == "domain":
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 420
diff changeset
   341
                sizeof = str(len(values[subIndex]))
176
5d57fe1e3a5b Support for DCF (DS-302)
greg
parents: 160
diff changeset
   342
            else:
5d57fe1e3a5b Support for DCF (DS-302)
greg
parents: 160
diff changeset
   343
                sizeof = "sizeof (%s)"%typeinfos[0]
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   344
            params = Node.GetParamsEntry(index, subIndex)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   345
            if params["save"]:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   346
                save = "|TO_BE_SAVE"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   347
            else:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   348
                save = ""
639
27c0a025acf3 CHANGED: - if variable starts with a digit, add a "_" at the beginning
Christian Taedcke <Christian.Taedcke@ica-traffic.de>
parents: 619
diff changeset
   349
            strIndex += "                       { %s%s, %s, %s, (void*)&%s }%s\n"%(subentry_infos["access"].upper(),save,typeinfos[2],sizeof,UnDigitName(name),sep)
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   350
            pointer_name = pointers_dict.get((index, subIndex), None)
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   351
            if pointer_name is not None:
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   352
                pointedVariableContent += "%s* %s = &%s;\n"%(typeinfos[0], pointer_name, name)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   353
        strIndex += "                     };\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   354
        indexContents[index] = strIndex
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   355
        
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   356
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   357
#                     Declaration of Particular Parameters
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   358
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   359
284
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   360
    if 0x1003 not in communicationlist:
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   361
        entry_infos = Node.GetEntryInfos(0x1003)
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   362
        texts["EntryName"] = entry_infos["name"]
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   363
        indexContents[0x1003] = """\n/* index 0x1003 :   %(EntryName)s */
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   364
                    UNS8 %(NodeName)s_highestSubIndex_obj1003 = 0; /* number of subindex - 1*/
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   365
                    UNS32 %(NodeName)s_obj1003[] = 
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   366
                    {
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   367
                      0x0	/* 0 */
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   368
                    };
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   369
                    ODCallback_t %(NodeName)s_Index1003_callbacks[] = 
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   370
                     {
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   371
                       NULL,
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   372
                       NULL,
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   373
                     };
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   374
                    subindex %(NodeName)s_Index1003[] = 
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   375
                     {
286
85d5361179f3 Adding support for restricting user to only dynamically set 0 to index 0x1003 subindex 0x00 in gen_cfile.py
lbessard
parents: 284
diff changeset
   376
                       { RW, valueRange_EMC, sizeof (UNS8), (void*)&%(NodeName)s_highestSubIndex_obj1003 },
284
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   377
                       { RO, uint32, sizeof (UNS32), (void*)&%(NodeName)s_obj1003[0] }
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   378
                     };
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   379
"""%texts
24bf3d692993 Implemented EMCY objects.
luis
parents: 261
diff changeset
   380
261
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   381
    if 0x1005 not in communicationlist:
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   382
        entry_infos = Node.GetEntryInfos(0x1005)
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   383
        texts["EntryName"] = entry_infos["name"]
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   384
        indexContents[0x1005] = """\n/* index 0x1005 :   %(EntryName)s */
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   385
                    UNS32 %(NodeName)s_obj1005 = 0x0;   /* 0 */
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   386
"""%texts
dbcd80bcab82 Prevent potential problem with missing 0x1005 OD entry
etisserant
parents: 245
diff changeset
   387
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   388
    if 0x1006 not in communicationlist:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   389
        entry_infos = Node.GetEntryInfos(0x1006)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   390
        texts["EntryName"] = entry_infos["name"]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   391
        indexContents[0x1006] = """\n/* index 0x1006 :   %(EntryName)s */
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   392
                    UNS32 %(NodeName)s_obj1006 = 0x0;   /* 0 */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   393
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   394
314
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   395
    if 0x1014 not in communicationlist:
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   396
        entry_infos = Node.GetEntryInfos(0x1014)
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   397
        texts["EntryName"] = entry_infos["name"]
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   398
        indexContents[0x1014] = """\n/* index 0x1014 :   %(EntryName)s */
493
a204a86a71f1 Modified initial value of 1014h to 0x80 + nodeid when 1014 is not included explicitly in the OD.
luis
parents: 484
diff changeset
   399
                    UNS32 %(NodeName)s_obj1014 = 0x80 + 0x%(NodeID)02X;   /* 128 + NodeID */
314
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   400
"""%texts
68e83c3ffbb5 Better EMCY support. Now EMCY COB-ID depend on OD 1014h entry, as told in DS-301.
etisserant
parents: 313
diff changeset
   401
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   402
    if 0x1016 in communicationlist:
325
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   403
        texts["heartBeatTimers_number"] = Node.GetEntry(0x1016, 0)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   404
    else:
325
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   405
        texts["heartBeatTimers_number"] = 0
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   406
        entry_infos = Node.GetEntryInfos(0x1016)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   407
        texts["EntryName"] = entry_infos["name"]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   408
        indexContents[0x1016] = """\n/* index 0x1016 :   %(EntryName)s */
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   409
                    UNS8 %(NodeName)s_highestSubIndex_obj1016 = 0;
91
ed2612282988 - Better array initialization in data.h CANOPEN_NODE_DATA_INITIALIZER macro. Use a little hack with configure and config.h to create the "pure Ansi C" initializer.
etisserant
parents: 76
diff changeset
   410
                    UNS32 %(NodeName)s_obj1016[]={0};
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   411
"""%texts
325
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   412
    
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   413
    if 0x1017 not in communicationlist:
245
d43ebbed895f Modifying gen_cfile.py for generating C file from a node as data rather than a manager
lbessard
parents: 235
diff changeset
   414
        entry_infos = Node.GetEntryInfos(0x1017)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   415
        texts["EntryName"] = entry_infos["name"]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   416
        indexContents[0x1017] = """\n/* index 0x1017 :   %(EntryName)s */ 
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   417
                    UNS16 %(NodeName)s_obj1017 = 0x0;   /* 0 */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   418
"""%texts
750
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   419
    
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   420
    if 0x100C not in communicationlist:
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   421
        entry_infos = Node.GetEntryInfos(0x100C)
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   422
        texts["EntryName"] = entry_infos["name"]
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   423
        indexContents[0x100C] = """\n/* index 0x100C :   %(EntryName)s */ 
765
90b738e4ede5 Fixed warnings when compiling generated Object Dictionary
Laurent Bessard
parents: 750
diff changeset
   424
                    UNS16 %(NodeName)s_obj100C = 0x0;   /* 0 */
750
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   425
"""%texts
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   426
    
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   427
    if 0x100D not in communicationlist:
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   428
        entry_infos = Node.GetEntryInfos(0x100D)
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   429
        texts["EntryName"] = entry_infos["name"]
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   430
        indexContents[0x100D] = """\n/* index 0x100D :   %(EntryName)s */ 
765
90b738e4ede5 Fixed warnings when compiling generated Object Dictionary
Laurent Bessard
parents: 750
diff changeset
   431
                    UNS8 %(NodeName)s_obj100D = 0x0;   /* 0 */
750
bfb63ff7106e Implementation of a basic working node-guarding
mwildbolz
parents: 639
diff changeset
   432
"""%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   433
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   434
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   435
#               Declaration of navigation in the Object Dictionary
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   436
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   437
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   438
    strDeclareIndex = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   439
    strDeclareSwitch = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   440
    strQuickIndex = ""
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   441
    quick_index = {}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   442
    for index_cat in index_categories:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   443
        quick_index[index_cat] = {}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   444
        for cat, idx_min, idx_max in categories:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   445
            quick_index[index_cat][cat] = 0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   446
    maxPDOtransmit = 0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   447
    for i, index in enumerate(listIndex):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   448
        texts["index"] = index
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   449
        strDeclareIndex += "  { (subindex*)%(NodeName)s_Index%(index)04X,sizeof(%(NodeName)s_Index%(index)04X)/sizeof(%(NodeName)s_Index%(index)04X[0]), 0x%(index)04X},\n"%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   450
        strDeclareSwitch += "		case 0x%04X: i = %d;%sbreak;\n"%(index, i, indexCallbacks[index])
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   451
        for cat, idx_min, idx_max in categories:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   452
            if idx_min <= index <= idx_max:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   453
                quick_index["lastIndex"][cat] = i
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   454
                if quick_index["firstIndex"][cat] == 0:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   455
                    quick_index["firstIndex"][cat] = i
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   456
                if cat == "PDO_TRS":
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   457
                    maxPDOtransmit += 1
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   458
    texts["maxPDOtransmit"] = max(1, maxPDOtransmit)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   459
    for index_cat in index_categories:
479
92891f53630b Defining quick_index structures and ObjdictSize as constants
lbessard
parents: 453
diff changeset
   460
        strQuickIndex += "\nconst quick_index %s_%s = {\n"%(texts["NodeName"], index_cat)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   461
        sep = ","
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   462
        for i, (cat, idx_min, idx_max) in enumerate(categories):
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   463
            if i == len(categories) - 1:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   464
                sep = ""
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   465
            strQuickIndex += "  %d%s /* %s */\n"%(quick_index[index_cat][cat],sep,cat)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   466
        strQuickIndex += "};\n"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   467
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   468
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   469
#                            Write File Content
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   470
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   471
73
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
   472
    fileContent = generated_tag + """
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   473
#include "%s"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   474
"""%(headerfilepath)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   475
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   476
    fileContent += """
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   477
/**************************************************************************/
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   478
/* Declaration of mapped variables                                        */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   479
/**************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   480
""" + mappedVariableContent
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   481
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   482
    fileContent += """
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   483
/**************************************************************************/
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   484
/* Declaration of value range types                                       */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   485
/**************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   486
""" + valueRangeContent
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   487
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   488
    fileContent += """
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   489
/**************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   490
/* The node id                                                            */
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   491
/**************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   492
/* node_id default value.*/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   493
UNS8 %(NodeName)s_bDeviceNodeId = 0x%(NodeID)02X;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   494
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   495
/**************************************************************************/
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   496
/* Array of message processing information */
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   497
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   498
const UNS8 %(NodeName)s_iam_a_slave = %(iam_a_slave)d;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   499
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   500
"""%texts
325
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   501
    if texts["heartBeatTimers_number"] > 0:
422
43a4d6deb007 Fixed herbeat timer array partial initialization in generated OD code.
etisserant
parents: 421
diff changeset
   502
        declaration = "TIMER_HANDLE %(NodeName)s_heartBeatTimers[%(heartBeatTimers_number)d]"%texts
43a4d6deb007 Fixed herbeat timer array partial initialization in generated OD code.
etisserant
parents: 421
diff changeset
   503
        initializer = "{TIMER_NONE" + ",TIMER_NONE" * (texts["heartBeatTimers_number"] - 1) + "}"
43a4d6deb007 Fixed herbeat timer array partial initialization in generated OD code.
etisserant
parents: 421
diff changeset
   504
        fileContent += declaration + " = " + initializer + ";\n"
325
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   505
    else:
65b1b2d9e20b Modification of 0x1016 index c code generation
lbessard
parents: 314
diff changeset
   506
        fileContent += "TIMER_HANDLE %(NodeName)s_heartBeatTimers[1];\n"%texts
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   507
    
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   508
    fileContent += """
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   509
/*
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   510
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   511
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   512
                               OBJECT DICTIONARY
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   513
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   514
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   515
*/
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   516
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   517
    contentlist = indexContents.keys()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   518
    contentlist.sort()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   519
    for index in contentlist:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   520
        fileContent += indexContents[index]
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   521
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   522
    fileContent += """
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   523
/**************************************************************************/
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   524
/* Declaration of pointed variables                                       */
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   525
/**************************************************************************/
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   526
""" + pointedVariableContent
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   527
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   528
    fileContent += """
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   529
const indextable %(NodeName)s_objdict[] = 
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   530
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   531
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   532
    fileContent += strDeclareIndex
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   533
    fileContent += """};
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   534
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   535
const indextable * %(NodeName)s_scanIndexOD (UNS16 wIndex, UNS32 * errorCode, ODCallback_t **callbacks)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   536
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   537
	int i;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   538
	*callbacks = NULL;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   539
	switch(wIndex){
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   540
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   541
    fileContent += strDeclareSwitch
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   542
    fileContent += """		default:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   543
			*errorCode = OD_NO_SUCH_OBJECT;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   544
			return NULL;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   545
	}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   546
	*errorCode = OD_SUCCESSFUL;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   547
	return &%(NodeName)s_objdict[i];
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   548
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   549
235
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   550
/* 
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   551
 * To count at which received SYNC a PDO must be sent.
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   552
 * Even if no pdoTransmit are defined, at least one entry is computed
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   553
 * for compilations issues.
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   554
 */
235
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   555
s_PDO_status %(NodeName)s_PDO_status[%(maxPDOtransmit)d] = {"""%texts
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   556
366
47763dd15e00 Fixed Peter Christen remarks as regards typo
etisserant
parents: 325
diff changeset
   557
    fileContent += ",".join(["s_PDO_status_Initializer"]*texts["maxPDOtransmit"]) + """};
235
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   558
"""
f812bf6b7237 Preliminary implementation of Event Timer and Inhibit Timer driven TPDO
etisserant
parents: 229
diff changeset
   559
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   560
    fileContent += strQuickIndex
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   561
    fileContent += """
479
92891f53630b Defining quick_index structures and ObjdictSize as constants
lbessard
parents: 453
diff changeset
   562
const UNS16 %(NodeName)s_ObjdictSize = sizeof(%(NodeName)s_objdict)/sizeof(%(NodeName)s_objdict[0]); 
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   563
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   564
CO_Data %(NodeName)s_Data = CANOPEN_NODE_DATA_INITIALIZER(%(NodeName)s);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   565
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   566
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   567
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   568
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   569
#                          Write Header File Content
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   570
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   571
223
461f5516176b Bug on Domain data writing in gen_cfile fixed
lbessard
parents: 188
diff changeset
   572
    texts["file_include_name"] = headerfilepath.replace(".", "_").upper()
73
60441122e121 LGPL copyright on generated files removed
lbessard
parents: 70
diff changeset
   573
    HeaderFileContent = generated_tag + """
224
ae7edca3b7c4 Bug on header file writing in gen_cfile fixed
lbessard
parents: 223
diff changeset
   574
#ifndef %(file_include_name)s
223
461f5516176b Bug on Domain data writing in gen_cfile fixed
lbessard
parents: 188
diff changeset
   575
#define %(file_include_name)s
461f5516176b Bug on Domain data writing in gen_cfile fixed
lbessard
parents: 188
diff changeset
   576
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   577
#include "data.h"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   578
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   579
/* Prototypes of function provided by object dictionnary */
63
2be18e405e40 Bug on map variable type changing and on comments with special characters corrected
lbessard
parents: 60
diff changeset
   580
UNS32 %(NodeName)s_valueRangeTest (UNS8 typeValue, void * value);
2be18e405e40 Bug on map variable type changing and on comments with special characters corrected
lbessard
parents: 60
diff changeset
   581
const indextable * %(NodeName)s_scanIndexOD (UNS16 wIndex, UNS32 * errorCode, ODCallback_t **callbacks);
2be18e405e40 Bug on map variable type changing and on comments with special characters corrected
lbessard
parents: 60
diff changeset
   582
76
68e1c52d603d compilers compatibility
frdupin
parents: 73
diff changeset
   583
/* Master node data struct */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   584
extern CO_Data %(NodeName)s_Data;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   585
"""%texts
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   586
    HeaderFileContent += strDeclareHeader
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   587
    
223
461f5516176b Bug on Domain data writing in gen_cfile fixed
lbessard
parents: 188
diff changeset
   588
    HeaderFileContent += "\n#endif // %(file_include_name)s\n"%texts
461f5516176b Bug on Domain data writing in gen_cfile fixed
lbessard
parents: 188
diff changeset
   589
    
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   590
    return fileContent,HeaderFileContent
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   591
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   592
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   593
#                             Main Function
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   594
#-------------------------------------------------------------------------------
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   595
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   596
def GenerateFile(filepath, node, pointers_dict = {}):
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   597
    try:
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   598
        headerfilepath = os.path.splitext(filepath)[0]+".h"
484
f59d1cdde42b Added pointer variable list in GenCfile.py, for use with Beremiz's generated code.
etisserant
parents: 479
diff changeset
   599
        content, header = GenerateFileContent(node, os.path.split(headerfilepath)[1], pointers_dict)
188
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   600
        WriteFile(filepath, content)
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   601
        WriteFile(headerfilepath, header)
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   602
        return None
00245bc2e6fe Bugs on C File generating corrected
lbessard
parents: 182
diff changeset
   603
    except ValueError, message:
580
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   604
        return _("Unable to Generate C File\n%s")%message
2ae92a99ac10 Adding support for internationalization
laurent
parents: 547
diff changeset
   605