src/dcf.c
author etisserant
Sat, 12 May 2007 22:43:30 +0200
changeset 192 9dd6f17ef7e5
parent 191 1e6e3d261b8f
child 200 930be51ddc24
permissions -rw-r--r--
Wolfgang enhancements for RT-socket-CAN support
178
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     1
/*
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     2
This file is part of CanFestival, a library implementing CanOpen Stack. 
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     3
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     4
Copyright (C): Edouard TISSERANT and Francis DUPIN
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     5
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     6
See COPYING file for copyrights details.
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     7
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     8
This library is free software; you can redistribute it and/or
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
     9
modify it under the terms of the GNU Lesser General Public
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    10
License as published by the Free Software Foundation; either
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    11
version 2.1 of the License, or (at your option) any later version.
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    12
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    13
This library is distributed in the hope that it will be useful,
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    14
but WITHOUT ANY WARRANTY; without even the implied warranty of
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    15
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    16
Lesser General Public License for more details.
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    17
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    18
You should have received a copy of the GNU Lesser General Public
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    19
License along with this library; if not, write to the Free Software
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    20
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    21
*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    22
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    23
#include "objacces.h"
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    24
#include "sdo.h"
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    25
#include "dcf.h"
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    26
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    27
const indextable *ptrTable;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    28
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    29
static void CheckSDOAndContinue(CO_Data* d, UNS8 nodeId)
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    30
{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    31
	UNS32 abortCode;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    32
	
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    33
	if(getWriteResultNetworkDict (d, nodeId, &abortCode) != SDO_FINISHED)
191
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    34
	{
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    35
		MSG_ERR(0x1A01, "SDO error in consise DCF", abortCode);
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    36
		MSG_WAR(0x2A02, "server node : ", nodeId);
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    37
	}
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    38
178
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    39
	closeSDOtransfer(d, nodeId, SDO_CLIENT);
191
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    40
	decompo_dcf(d,nodeId);
178
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    41
}
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    42
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    43
UNS32 decompo_dcf(CO_Data* d,UNS8 nodeId)
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    44
{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    45
		UNS32 errorCode;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    46
		UNS16 target_Index;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    47
		UNS8 target_Subindex;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    48
		UNS32 target_Size;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    49
		UNS32 res;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    50
  		ODCallback_t *Callback;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    51
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    52
		ptrTable = (*d->scanIndexOD)(0x1F22, &errorCode, &Callback);
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    53
		if (errorCode != OD_SUCCESSFUL)
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    54
		{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    55
    		return errorCode;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    56
		}
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    57
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    58
		/*Loop on all Nodes supported in DCF subindexes*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    59
		while (nodeId < ptrTable->bSubCount){
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    60
			UNS32 nb_targets;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    61
	  		
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    62
	  		UNS8 szData = ptrTable->pSubindex[nodeId].size;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    63
	  		void* dcfend;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    64
	  		
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    65
		  	{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    66
			  	void* dcf = *((void**)ptrTable->pSubindex[nodeId].pObject);
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    67
		  		dcfend = dcf + szData;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    68
				if (!d->dcf_cursor)	{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    69
					d->dcf_cursor = dcf + 4;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    70
					d->dcf_count_targets = 0;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    71
				}
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    72
	#ifdef CANOPEN_BIG_ENDIAN
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    73
				nb_targets = ((UNS8*)d->dcf++) | ((UNS8*)d->dcf++) << 8 | ((UNS8*)d->dcf++) << 16 | ((UNS8*)d->dcf++) << 24;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    74
	#else
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    75
				nb_targets = *((UNS32*)dcf);
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    76
	#endif
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    77
		  	}
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    78
			
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    79
			// condition on consise DCF string for NodeID, if big enough
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    80
			if(d->dcf_cursor + 7 < dcfend && d->dcf_count_targets < nb_targets)
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    81
			{
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    82
				// pointer to the DCF string for NodeID
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    83
	#ifdef CANOPEN_BIG_ENDIAN
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    84
				target_Index = ((UNS8*)d->dcf_cursor++) | ((UNS8*)d->dcf_cursor++) << 8;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    85
				target_Subindex = ((UNS8*)d->dcf_cursor++);
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    86
				target_Size = ((UNS8*)d->dcf_cursor++) | ((UNS8*)d->dcf_cursor++) << 8 | ((UNS8*)d->dcf_cursor++) << 16 | ((UNS8*)d->dcf_cursor++) << 24;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    87
	#else
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    88
				target_Index = *((UNS16*)(d->dcf_cursor)); d->dcf_cursor += 2;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    89
				target_Subindex = *((UNS8*)(d->dcf_cursor++));
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    90
				target_Size = *((UNS32*)(d->dcf_cursor)); d->dcf_cursor += 4;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    91
	#endif
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    92
				
191
1e6e3d261b8f CleanUp and minor fixes
etisserant
parents: 178
diff changeset
    93
					/*printf("Master : ConfigureSlaveNode %2.2x (Concise DCF)\n",nodeId);*/
178
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    94
					res = writeNetworkDictCallBack(d, /*CO_Data* d*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    95
							nodeId, /*UNS8 nodeId*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    96
							target_Index, /*UNS16 index*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    97
							target_Subindex, /*UNS8 subindex*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    98
							target_Size, /*UNS8 count*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
    99
							0, /*UNS8 dataType*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   100
							d->dcf_cursor,/*void *data*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   101
							CheckSDOAndContinue); /*SDOCallback_t Callback*/					
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   102
					/*Push d->dcf_cursor to the end of data*/
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   103
					
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   104
					d->dcf_cursor += target_Size;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   105
					d->dcf_count_targets++;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   106
					
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   107
					return ;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   108
			}			
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   109
				nodeId++;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   110
				d->dcf_cursor = NULL;
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   111
		}
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   112
		/* Switch Master to preOperational state */
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   113
		(*d->preOperational)();
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   114
		
01d81faa3350 Add concise DCF support
greg
parents:
diff changeset
   115
}