examples/TestMasterSlave/Master.c
author etisserant
Mon, 19 Jun 2006 14:19:23 +0200
changeset 33 c767eabbaaac
parent 0 4472ee7c6c3e
child 149 fe50ada8020b
permissions -rw-r--r--
Fixed some bugs with Xenomai and CAN/peak
0
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     1
/*
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     2
This file is part of CanFestival, a library implementing CanOpen Stack. 
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     3
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     4
Copyright (C): Edouard TISSERANT and Francis DUPIN
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     5
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     6
See COPYING file for copyrights details.
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     7
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     8
This library is free software; you can redistribute it and/or
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
     9
modify it under the terms of the GNU Lesser General Public
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    10
License as published by the Free Software Foundation; either
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    11
version 2.1 of the License, or (at your option) any later version.
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    12
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    13
This library is distributed in the hope that it will be useful,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    14
but WITHOUT ANY WARRANTY; without even the implied warranty of
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    15
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    16
Lesser General Public License for more details.
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    17
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    18
You should have received a copy of the GNU Lesser General Public
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    19
License along with this library; if not, write to the Free Software
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    20
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    21
*/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    22
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    23
#include "Master.h"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    24
#include "Slave.h"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    25
#include "TestMasterSlave.h"
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    26
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    27
/*****************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    28
void TestMaster_heartbeatError(UNS8 heartbeatID)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    29
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    30
	eprintf("TestMaster_heartbeatError %d\n", heartbeatID);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    31
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    32
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    33
/*****************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    34
void TestMaster_SDOtimeoutError (UNS8 line)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    35
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    36
	eprintf("TestMaster_SDOtimeoutError %d\n", line);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    37
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    38
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    39
/*****************************************************************************/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    40
// CanSend store message in a FIFO, for Slave
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    41
UNS8 TestMaster_canSend(Message *m)
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    42
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    43
	eprintf("M->S ");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    44
	print_message(m);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    45
	canSend(MasterCanHandle, m);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    46
	return 0;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    47
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    48
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    49
void TestMaster_initialisation()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    50
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    51
	eprintf("TestMaster_initialisation\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    52
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    53
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    54
void TestMaster_preOperational()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    55
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    56
	eprintf("TestMaster_preOperational\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    57
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    58
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    59
void TestMaster_operational()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    60
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    61
	eprintf("TestMaster_operational\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    62
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    63
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    64
void TestMaster_stopped()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    65
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    66
	eprintf("TestMaster_stopped\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    67
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    68
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    69
void TestMaster_post_sync()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    70
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    71
	eprintf("TestMaster_post_sync\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    72
	eprintf("Master: %d %d %d %d\n",MasterMap1, MasterMap2, MasterMap3, MasterMap4);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    73
}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    74
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    75
char query_result = 0;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    76
char waiting_answer = 0;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    77
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    78
void TestMaster_post_TPDO()
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    79
{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    80
	eprintf("TestMaster_post_TPDO\n");
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    81
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    82
//	{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    83
//		char zero = 0;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    84
//		if(MasterMap4 > 0x80){
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    85
//			writeNetworkDict (
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    86
//				&TestMaster_Data,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    87
//				TestSlave_Data->bDeviceNodeId,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    88
//				0x2002,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    89
//				0x00,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    90
//				1,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    91
//				0,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    92
//				&zero); 
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    93
//		}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    94
//	}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    95
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    96
	if(waiting_answer){
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    97
		UNS32 abortCode;			
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    98
		UNS8 size;			
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
    99
		switch(getReadResultNetworkDict (
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   100
			&TestMaster_Data, 
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   101
			*TestSlave_Data.bDeviceNodeId,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   102
			&query_result,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   103
			&size,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   104
			&abortCode))
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   105
		{
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   106
			case SDO_FINISHED:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   107
				/* Do something with result here !!*/
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   108
				eprintf("Got SDO answer (0x2002, 0x00), %d %d\n",query_result,size);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   109
			case SDO_ABORTED_RCV:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   110
			case SDO_ABORTED_INTERNAL:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   111
			case SDO_RESET:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   112
				waiting_answer = 0;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   113
				closeSDOtransfer(
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   114
					&TestMaster_Data,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   115
					*TestSlave_Data.	bDeviceNodeId,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   116
					SDO_CLIENT);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   117
			break;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   118
			case SDO_DOWNLOAD_IN_PROGRESS:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   119
			case SDO_UPLOAD_IN_PROGRESS:
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   120
			break;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   121
		}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   122
	}else if(MasterMap1 % 10 == 0){
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   123
		readNetworkDict (
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   124
			&TestMaster_Data,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   125
			*TestSlave_Data.bDeviceNodeId,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   126
			0x2002,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   127
			0x00,
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   128
			0);
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   129
		waiting_answer = 1;
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   130
	}
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   131
		
4472ee7c6c3e Commit a new cvs repo.
etisserant
parents:
diff changeset
   132
}