src/objacces.c
author lbessard
Mon, 21 Apr 2008 16:54:01 +0200
changeset 445 666f2cf93f06
parent 437 129bbe0504e4
child 450 dff8cc600cba
permissions -rw-r--r--
Bug on Boolean values parsing while importing EDS fixed
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     1
/*
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     2
  This file is part of CanFestival, a library implementing CanOpen
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     3
  Stack.
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     4
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     5
  Copyright (C): Edouard TISSERANT and Francis DUPIN
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     6
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     7
  See COPYING file for copyrights details.
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     8
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
     9
  This library is free software; you can redistribute it and/or
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    10
  modify it under the terms of the GNU Lesser General Public
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    11
  License as published by the Free Software Foundation; either
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    12
  version 2.1 of the License, or (at your option) any later version.
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    13
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    14
  This library is distributed in the hope that it will be useful,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    15
  but WITHOUT ANY WARRANTY; without even the implied warranty of
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    16
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    17
  Lesser General Public License for more details.
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    18
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    19
  You should have received a copy of the GNU Lesser General Public
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    20
  License along with this library; if not, write to the Free Software
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    21
  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    22
  USA
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    23
*/
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    24
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    25
** @file   objacces.c
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    26
** @author Edouard TISSERANT and Francis DUPIN
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    27
** @date   Tue Jun  5 08:55:23 2007
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    28
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    29
** @brief
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    30
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    31
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    32
*/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    33
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    34
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    35
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    36
71
95cd3376cc9f compilator compatitibility
frdupin
parents: 55
diff changeset
    37
/* #define DEBUG_WAR_CONSOLE_ON */
95cd3376cc9f compilator compatitibility
frdupin
parents: 55
diff changeset
    38
/* #define DEBUG_ERR_CONSOLE_ON */
11
64ed038bdc74 Bogue:big endian
dejoigny
parents: 10
diff changeset
    39
1
b3dc740b4b04 Commit some Fix from Francis on sdo.c and abjacces.c. Fix endianisation problems while accessing OD. Also fix SDO abord handling bug.
etisserant
parents: 0
diff changeset
    40
378
d2abf6c8c27b As requested long ago, added CoData* parameter to all this applications callback, let application designer use identical callback for multiple nodes, and reduce source code length.
etisserant
parents: 215
diff changeset
    41
#include "data.h"
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    42
8
eee2b0c89213 correction bogue pour BIG_ENDIAN
dejoigny
parents: 2
diff changeset
    43
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    44
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    45
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    46
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    47
** @param index
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    48
** @param subIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    49
** @param sizeDataDict
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    50
** @param sizeDataGiven
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    51
** @param code
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    52
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    53
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    54
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    55
UNS8 accessDictionaryError(UNS16 index, UNS8 subIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    56
                           UNS8 sizeDataDict, UNS8 sizeDataGiven, UNS32 code)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    57
{
75
debc68b124b7 compiler compatibility : accessDictionaryError contains nothing out of debogue mode
frdupin
parents: 71
diff changeset
    58
#ifdef DEBUG_WAR_CONSOLE_ON
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    59
  MSG_WAR(0x2B09,"Dictionary index : ", index);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    60
  MSG_WAR(0X2B10,"           subindex : ", subIndex);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    61
  switch (code) {
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    62
  case  OD_NO_SUCH_OBJECT:
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    63
    MSG_WAR(0x2B11,"Index not found ", index);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    64
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    65
  case OD_NO_SUCH_SUBINDEX :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    66
    MSG_WAR(0x2B12,"SubIndex not found ", subIndex);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    67
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    68
  case OD_WRITE_NOT_ALLOWED :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    69
    MSG_WAR(0x2B13,"Write not allowed, data is read only ", index);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    70
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    71
  case OD_LENGTH_DATA_INVALID :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    72
    MSG_WAR(0x2B14,"Conflict size data. Should be (bytes)  : ", sizeDataDict);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    73
    MSG_WAR(0x2B15,"But you have given the size  : ", sizeDataGiven);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    74
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    75
  case OD_NOT_MAPPABLE :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    76
    MSG_WAR(0x2B16,"Not mappable data in a PDO at index    : ", index);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    77
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    78
  case OD_VALUE_TOO_LOW :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    79
    MSG_WAR(0x2B17,"Value range error : value too low. SDOabort : ", code);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    80
    break;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    81
  case OD_VALUE_TOO_HIGH :
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    82
    MSG_WAR(0x2B18,"Value range error : value too high. SDOabort : ", code);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    83
    break;
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    84
  default :
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    85
    MSG_WAR(0x2B20, "Unknown error code : ", code);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    86
  }
75
debc68b124b7 compiler compatibility : accessDictionaryError contains nothing out of debogue mode
frdupin
parents: 71
diff changeset
    87
#endif
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    88
  return 0;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    89
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    90
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    91
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    92
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    93
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    94
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    95
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    96
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    97
** @param pDestData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    98
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
    99
** @param pDataType
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   100
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   101
** @param endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   102
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   103
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   104
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   105
UNS32 _getODentry( CO_Data* d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   106
                   UNS16 wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   107
                   UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   108
                   void * pDestData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   109
                   UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   110
                   UNS8 * pDataType,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   111
                   UNS8 checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   112
                   UNS8 endianize)
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   113
{ /* DO NOT USE MSG_ERR because the macro may send a PDO -> infinite
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   114
    loop if it fails. */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   115
  UNS32 errorCode;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   116
  UNS8 szData;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   117
  const indextable *ptrTable;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   118
  ODCallback_t *Callback;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   119
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   120
  ptrTable = (*d->scanIndexOD)(wIndex, &errorCode, &Callback);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   121
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   122
  if (errorCode != OD_SUCCESSFUL)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   123
    return errorCode;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   124
  if( ptrTable->bSubCount <= bSubindex ) {
71
95cd3376cc9f compilator compatitibility
frdupin
parents: 55
diff changeset
   125
    /* Subindex not found */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   126
    accessDictionaryError(wIndex, bSubindex, 0, 0, OD_NO_SUCH_SUBINDEX);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   127
    return OD_NO_SUCH_SUBINDEX;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   128
  }
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   129
402
77f875d45250 Fixed faulty read access checking on OD access. Added read acces s checking in SDO (was disabled)
etisserant
parents: 378
diff changeset
   130
  if (checkAccess && (ptrTable->pSubindex[bSubindex].bAccessType & WO)) {
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   131
    MSG_WAR(0x2B30, "Access Type : ", ptrTable->pSubindex[bSubindex].bAccessType);
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   132
    accessDictionaryError(wIndex, bSubindex, 0, 0, OD_WRITE_NOT_ALLOWED);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   133
    return OD_READ_NOT_ALLOWED;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   134
  }
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   135
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   136
  *pDataType = ptrTable->pSubindex[bSubindex].bDataType;
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   137
  szData = ptrTable->pSubindex[bSubindex].size;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   138
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   139
  if(*pExpectedSize == 0 ||
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   140
     *pExpectedSize == szData ||
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   141
     /* allow to fetch a shorter string than expected */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   142
     (*pDataType >= visible_string && *pExpectedSize < szData)) { 
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   143
12
1d3b9ad366c8 CANOPEN_BIG_ENDIAN :
dejoigny
parents: 11
diff changeset
   144
#  ifdef CANOPEN_BIG_ENDIAN
430
61a24423589c Fixed typo in objacces.c bigendian side.
etisserant
parents: 429
diff changeset
   145
     if(endianize && *pDataType > boolean && !(
61a24423589c Fixed typo in objacces.c bigendian side.
etisserant
parents: 429
diff changeset
   146
            *pDataType >= visible_string && 
431
166037b8f2ed Fixed typo in objacces.c bigendian side.
etisserant
parents: 430
diff changeset
   147
            *pDataType <= domain)) {
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   148
      /* data must be transmited with low byte first */
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   149
      UNS8 i, j = 0;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   150
      MSG_WAR(boolean, "data type ", *pDataType);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   151
      MSG_WAR(visible_string, "data type ", *pDataType);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   152
      for ( i = szData ; i > 0 ; i--) {
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   153
        MSG_WAR(i," ", j);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   154
        ((UNS8*)pDestData)[j++] =
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   155
          ((UNS8*)ptrTable->pSubindex[bSubindex].pObject)[i-1];
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   156
      }
431
166037b8f2ed Fixed typo in objacces.c bigendian side.
etisserant
parents: 430
diff changeset
   157
      *pExpectedSize = szData;
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   158
    }
419
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   159
    else /* no endianisation change */
12
1d3b9ad366c8 CANOPEN_BIG_ENDIAN :
dejoigny
parents: 11
diff changeset
   160
#  endif
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   161
    if(*pDataType != visible_string) {
419
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   162
        memcpy(pDestData, ptrTable->pSubindex[bSubindex].pObject,szData);
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   163
        *pExpectedSize = szData;
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   164
    }else{
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   165
        /* TODO : CONFORM TO DS-301 : 
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   166
         *  - stop using NULL terminated strings
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   167
         *  - store string size in td_subindex 
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   168
         * */
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   169
        /* Copy null terminated string to user, and return discovered size */
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   170
        UNS8 *ptr = (UNS8*)ptrTable->pSubindex[bSubindex].pObject;
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   171
        UNS8 *ptr_start = ptr;
431
166037b8f2ed Fixed typo in objacces.c bigendian side.
etisserant
parents: 430
diff changeset
   172
        /* *pExpectedSize IS < szData . if null, use szData */
166037b8f2ed Fixed typo in objacces.c bigendian side.
etisserant
parents: 430
diff changeset
   173
        UNS8 *ptr_end = ptr + (*pExpectedSize ? *pExpectedSize : szData) ; 
429
7cba38279f98 Fixed not so ANSI code in objaccess.c
etisserant
parents: 421
diff changeset
   174
        UNS8 *ptr_dest = (UNS8*)pDestData;
419
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   175
        while( *ptr && ptr < ptr_end){
429
7cba38279f98 Fixed not so ANSI code in objaccess.c
etisserant
parents: 421
diff changeset
   176
            *(ptr_dest++) = *(ptr++);
419
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   177
        } 
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   178
         
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   179
        *pExpectedSize = ptr - ptr_start;
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   180
        /* terminate string if not maximum length */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   181
        if (*pExpectedSize < szData) 
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   182
            *(ptr) = 0; 
419
f63ce68a8239 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 402
diff changeset
   183
    }
402
77f875d45250 Fixed faulty read access checking on OD access. Added read acces s checking in SDO (was disabled)
etisserant
parents: 378
diff changeset
   184
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   185
    return OD_SUCCESSFUL;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   186
  }
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   187
  else { /* Error ! */
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   188
    *pExpectedSize = szData;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   189
    accessDictionaryError(wIndex, bSubindex, szData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   190
                          *pExpectedSize, OD_LENGTH_DATA_INVALID);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   191
    return OD_LENGTH_DATA_INVALID;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   192
  }
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   193
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   194
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   195
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   196
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   197
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   198
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   199
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   200
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   201
** @param pDestData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   202
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   203
** @param pDataType
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   204
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   205
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   206
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   207
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   208
UNS32 getODentry( CO_Data* d,
175
e255529b6f7d Added writeLocalDict and readLocalDict, that have to be called from application instead of getODEntry and setODEntry. Fix potential endianization problem.
etisserant
parents: 161
diff changeset
   209
                  UNS16 wIndex,
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   210
                  UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   211
                  void * pDestData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   212
                  UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   213
                  UNS8 * pDataType,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   214
                  UNS8 checkAccess)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   215
{
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   216
  return _getODentry( d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   217
                      wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   218
                      bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   219
                      pDestData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   220
                      pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   221
                      pDataType,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   222
                      checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   223
                      1);//endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   224
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   225
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   226
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   227
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   228
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   229
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   230
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   231
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   232
** @param pDestData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   233
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   234
** @param pDataType
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   235
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   236
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   237
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   238
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   239
UNS32 readLocalDict( CO_Data* d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   240
                     UNS16 wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   241
                     UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   242
                     void * pDestData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   243
                     UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   244
                     UNS8 * pDataType,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   245
                     UNS8 checkAccess)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   246
{
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   247
  return _getODentry( d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   248
                      wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   249
                      bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   250
                      pDestData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   251
                      pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   252
                      pDataType,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   253
                      checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   254
                      0);//do not endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   255
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   256
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   257
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   258
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   259
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   260
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   261
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   262
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   263
** @param pSourceData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   264
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   265
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   266
** @param endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   267
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   268
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   269
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   270
UNS32 _setODentry( CO_Data* d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   271
                   UNS16 wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   272
                   UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   273
                   void * pSourceData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   274
                   UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   275
                   UNS8 checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   276
                   UNS8 endianize)
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   277
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   278
  UNS8 szData;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   279
  UNS8 dataType;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   280
  UNS32 errorCode;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   281
  const indextable *ptrTable;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   282
  ODCallback_t *Callback;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   283
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   284
  ptrTable =(*d->scanIndexOD)(wIndex, &errorCode, &Callback);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   285
  if (errorCode != OD_SUCCESSFUL)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   286
    return errorCode;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   287
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   288
  if( ptrTable->bSubCount <= bSubindex ) {
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   289
    /* Subindex not found */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   290
    accessDictionaryError(wIndex, bSubindex, 0, *pExpectedSize, OD_NO_SUCH_SUBINDEX);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   291
    return OD_NO_SUCH_SUBINDEX;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   292
  }
1
b3dc740b4b04 Commit some Fix from Francis on sdo.c and abjacces.c. Fix endianisation problems while accessing OD. Also fix SDO abord handling bug.
etisserant
parents: 0
diff changeset
   293
  if (checkAccess && (ptrTable->pSubindex[bSubindex].bAccessType == RO)) {
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   294
    MSG_WAR(0x2B25, "Access Type : ", ptrTable->pSubindex[bSubindex].bAccessType);
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   295
    accessDictionaryError(wIndex, bSubindex, 0, *pExpectedSize, OD_WRITE_NOT_ALLOWED);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   296
    return OD_WRITE_NOT_ALLOWED;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   297
  }
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   298
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   299
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   300
  dataType = ptrTable->pSubindex[bSubindex].bDataType;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   301
  szData = ptrTable->pSubindex[bSubindex].size;
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   302
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   303
  if( *pExpectedSize == 0 ||
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   304
      *pExpectedSize == szData ||
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   305
      /* allow to store a shorter string than entry size */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   306
      (dataType == visible_string && *pExpectedSize < szData))
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   307
    {
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   308
#ifdef CANOPEN_BIG_ENDIAN
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   309
      /* re-endianize do not occur for bool, strings time and domains */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   310
      if(endianize && dataType > boolean && !(
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   311
            dataType >= visible_string && 
431
166037b8f2ed Fixed typo in objacces.c bigendian side.
etisserant
parents: 430
diff changeset
   312
            dataType <= domain))
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   313
        {
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   314
          /* we invert the data source directly. This let us do range
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   315
            testing without */
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   316
          /* additional temp variable */
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   317
          UNS8 i;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   318
          for ( i = 0 ; i < ( ptrTable->pSubindex[bSubindex].size >> 1)  ; i++)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   319
            {
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   320
              UNS8 tmp =((UNS8 *)pSourceData) [(ptrTable->pSubindex[bSubindex].size - 1) - i];
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   321
              ((UNS8 *)pSourceData) [(ptrTable->pSubindex[bSubindex].size - 1) - i] = ((UNS8 *)pSourceData)[i];
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   322
              ((UNS8 *)pSourceData)[i] = tmp;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   323
            }
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   324
        }
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   325
#endif
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   326
      errorCode = (*d->valueRangeTest)(dataType, pSourceData);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   327
      if (errorCode) {
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   328
        accessDictionaryError(wIndex, bSubindex, szData, *pExpectedSize, errorCode);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   329
        return errorCode;
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   330
      }
2
8d4a822f95e4 Fixed Endianisation/ValueRange order in SetODentry
etisserant
parents: 1
diff changeset
   331
      memcpy(ptrTable->pSubindex[bSubindex].pObject,pSourceData, *pExpectedSize);
421
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   332
     /* TODO : CONFORM TO DS-301 : 
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   333
      *  - stop using NULL terminated strings
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   334
      *  - store string size in td_subindex 
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   335
      * */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   336
      /* terminate visible_string with '\0' */
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   337
      if(dataType == visible_string && *pExpectedSize < szData)
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   338
        ((UNS8*)ptrTable->pSubindex[bSubindex].pObject)[*pExpectedSize] = 0;
6221b4db8c42 Added support for null terminated strings as VISIBLE_STRING.
etisserant
parents: 419
diff changeset
   339
      
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   340
      *pExpectedSize = szData;
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   341
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   342
      /* Callbacks */
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   343
      if(Callback && Callback[bSubindex]){
437
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   344
        errorCode = (Callback[bSubindex])(d, ptrTable, bSubindex);
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   345
        if(errorCode != OD_SUCCESSFUL)
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   346
        {
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   347
            return errorCode;
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   348
        }
129bbe0504e4 Now OD callback return val ahev influance on SDO transmission (if callback fall, SDO abord may be signaled)
etisserant
parents: 431
diff changeset
   349
       }
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   350
215
f49e5a6b7804 Manual and Documentation finish
nico
parents: 208
diff changeset
   351
      /* TODO : Store dans NVRAM */
161
c4908cc776a9 SetODEntry now call CO_data->storeODSubEntry(Index,SubIndex) for variables to be Stored (when column Save==True in GUI)
etisserant
parents: 75
diff changeset
   352
      if (ptrTable->pSubindex[bSubindex].bAccessType & TO_BE_SAVE){
378
d2abf6c8c27b As requested long ago, added CoData* parameter to all this applications callback, let application designer use identical callback for multiple nodes, and reduce source code length.
etisserant
parents: 215
diff changeset
   353
        (*d->storeODSubIndex)(d, wIndex, bSubindex);
161
c4908cc776a9 SetODEntry now call CO_data->storeODSubEntry(Index,SubIndex) for variables to be Stored (when column Save==True in GUI)
etisserant
parents: 75
diff changeset
   354
      }
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   355
      return OD_SUCCESSFUL;
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   356
    }else{
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   357
      *pExpectedSize = szData;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   358
      accessDictionaryError(wIndex, bSubindex, szData, *pExpectedSize, OD_LENGTH_DATA_INVALID);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   359
      return OD_LENGTH_DATA_INVALID;
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   360
    }
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   361
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   362
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   363
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   364
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   365
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   366
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   367
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   368
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   369
** @param pSourceData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   370
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   371
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   372
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   373
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   374
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   375
UNS32 setODentry( CO_Data* d,
175
e255529b6f7d Added writeLocalDict and readLocalDict, that have to be called from application instead of getODEntry and setODEntry. Fix potential endianization problem.
etisserant
parents: 161
diff changeset
   376
                  UNS16 wIndex,
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   377
                  UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   378
                  void * pSourceData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   379
                  UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   380
                  UNS8 checkAccess)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   381
{
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   382
  return _setODentry( d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   383
                      wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   384
                      bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   385
                      pSourceData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   386
                      pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   387
                      checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   388
                      1);//endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   389
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   390
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   391
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   392
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   393
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   394
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   395
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   396
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   397
** @param pSourceData
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   398
** @param pExpectedSize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   399
** @param checkAccess
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   400
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   401
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   402
**/
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   403
UNS32 writeLocalDict( CO_Data* d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   404
                      UNS16 wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   405
                      UNS8 bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   406
                      void * pSourceData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   407
                      UNS8 * pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   408
                      UNS8 checkAccess)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   409
{
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   410
  return _setODentry( d,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   411
                      wIndex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   412
                      bSubindex,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   413
                      pSourceData,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   414
                      pExpectedSize,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   415
                      checkAccess,
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   416
                      0);//do not endianize
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   417
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   418
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   419
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   420
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   421
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   422
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   423
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   424
** @param errorCode
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   425
** @param Callback
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   426
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   427
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   428
**/
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   429
const indextable * scanIndexOD (CO_Data* d, UNS16 wIndex, UNS32 *errorCode, ODCallback_t **Callback)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   430
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   431
  return (*d->scanIndexOD)(wIndex, errorCode, Callback);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   432
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   433
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   434
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   435
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   436
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   437
** @param d
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   438
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   439
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   440
** @param Callback
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   441
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   442
** @return
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   443
**/
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   444
UNS32 RegisterSetODentryCallBack(CO_Data* d, UNS16 wIndex, UNS8 bSubindex, ODCallback_t Callback)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   445
{
208
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   446
  UNS32 errorCode;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   447
  ODCallback_t *CallbackList;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   448
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   449
  scanIndexOD (d, wIndex, &errorCode, &CallbackList);
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   450
  if(errorCode == OD_SUCCESSFUL && CallbackList)
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   451
    CallbackList[bSubindex] = Callback;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   452
  return errorCode;
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   453
}
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   454
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   455
/*!
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   456
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   457
**
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   458
** @param wIndex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   459
** @param bSubindex
05d95c45b388 Manual convertion -> latex -> pdf
nico
parents: 175
diff changeset
   460
**/
378
d2abf6c8c27b As requested long ago, added CoData* parameter to all this applications callback, let application designer use identical callback for multiple nodes, and reduce source code length.
etisserant
parents: 215
diff changeset
   461
void _storeODSubIndex (CO_Data* d, UNS16 wIndex, UNS8 bSubindex){}