ModbusTCP - Modbus RTU/ASCII/TCP with lwip TCP working parti…

Users » tmav123 » Code » ModbusTCP

Athanassios Mavrogeorgiadis / Mbed 2 deprecated ModbusTCP

Modbus RTU/ASCII/TCP with lwip TCP working partial, but with errors (retransmitions)

ModBus/mbfunccoils.cpp@0:f54e9507171b, 2011-12-05 (annotated)

Committer:: tmav123
Date:: Mon Dec 05 22:49:02 2011 +0000
Revision:: 0:f54e9507171b

Who changed what in which revision?

User	Revision	Line number	New contents of line
tmav123	0:f54e9507171b	1	/*
tmav123	0:f54e9507171b	2	* FreeModbus Libary: A portable Modbus implementation for Modbus ASCII/RTU.
tmav123	0:f54e9507171b	3	* Copyright (c) 2006 Christian Walter <wolti@sil.at>
tmav123	0:f54e9507171b	4	* All rights reserved.
tmav123	0:f54e9507171b	5	*
tmav123	0:f54e9507171b	6	* Redistribution and use in source and binary forms, with or without
tmav123	0:f54e9507171b	7	* modification, are permitted provided that the following conditions
tmav123	0:f54e9507171b	8	* are met:
tmav123	0:f54e9507171b	9	* 1. Redistributions of source code must retain the above copyright
tmav123	0:f54e9507171b	10	* notice, this list of conditions and the following disclaimer.
tmav123	0:f54e9507171b	11	* 2. Redistributions in binary form must reproduce the above copyright
tmav123	0:f54e9507171b	12	* notice, this list of conditions and the following disclaimer in the
tmav123	0:f54e9507171b	13	* documentation and/or other materials provided with the distribution.
tmav123	0:f54e9507171b	14	* 3. The name of the author may not be used to endorse or promote products
tmav123	0:f54e9507171b	15	* derived from this software without specific prior written permission.
tmav123	0:f54e9507171b	16	*
tmav123	0:f54e9507171b	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
tmav123	0:f54e9507171b	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
tmav123	0:f54e9507171b	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
tmav123	0:f54e9507171b	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
tmav123	0:f54e9507171b	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
tmav123	0:f54e9507171b	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
tmav123	0:f54e9507171b	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
tmav123	0:f54e9507171b	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
tmav123	0:f54e9507171b	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
tmav123	0:f54e9507171b	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
tmav123	0:f54e9507171b	27	*
tmav123	0:f54e9507171b	28	* File: $Id: mbfunccoils.c,v 1.8 2007/02/18 23:47:16 wolti Exp $
tmav123	0:f54e9507171b	29	*/
tmav123	0:f54e9507171b	30
tmav123	0:f54e9507171b	31	/* ----------------------- System includes ----------------------------------*/
tmav123	0:f54e9507171b	32	#include "stdlib.h"
tmav123	0:f54e9507171b	33	#include "string.h"
tmav123	0:f54e9507171b	34
tmav123	0:f54e9507171b	35	/* ----------------------- Platform includes --------------------------------*/
tmav123	0:f54e9507171b	36	#include "port.h"
tmav123	0:f54e9507171b	37
tmav123	0:f54e9507171b	38	/* ----------------------- Modbus includes ----------------------------------*/
tmav123	0:f54e9507171b	39	#include "mb.h"
tmav123	0:f54e9507171b	40	#include "mbframe.h"
tmav123	0:f54e9507171b	41	#include "mbproto.h"
tmav123	0:f54e9507171b	42	#include "mbconfig.h"
tmav123	0:f54e9507171b	43
tmav123	0:f54e9507171b	44	/* ----------------------- Defines ------------------------------------------*/
tmav123	0:f54e9507171b	45	#define MB_PDU_FUNC_READ_ADDR_OFF ( MB_PDU_DATA_OFF )
tmav123	0:f54e9507171b	46	#define MB_PDU_FUNC_READ_COILCNT_OFF ( MB_PDU_DATA_OFF + 2 )
tmav123	0:f54e9507171b	47	#define MB_PDU_FUNC_READ_SIZE ( 4 )
tmav123	0:f54e9507171b	48	#define MB_PDU_FUNC_READ_COILCNT_MAX ( 0x07D0 )
tmav123	0:f54e9507171b	49
tmav123	0:f54e9507171b	50	#define MB_PDU_FUNC_WRITE_ADDR_OFF ( MB_PDU_DATA_OFF )
tmav123	0:f54e9507171b	51	#define MB_PDU_FUNC_WRITE_VALUE_OFF ( MB_PDU_DATA_OFF + 2 )
tmav123	0:f54e9507171b	52	#define MB_PDU_FUNC_WRITE_SIZE ( 4 )
tmav123	0:f54e9507171b	53
tmav123	0:f54e9507171b	54	#define MB_PDU_FUNC_WRITE_MUL_ADDR_OFF ( MB_PDU_DATA_OFF )
tmav123	0:f54e9507171b	55	#define MB_PDU_FUNC_WRITE_MUL_COILCNT_OFF ( MB_PDU_DATA_OFF + 2 )
tmav123	0:f54e9507171b	56	#define MB_PDU_FUNC_WRITE_MUL_BYTECNT_OFF ( MB_PDU_DATA_OFF + 4 )
tmav123	0:f54e9507171b	57	#define MB_PDU_FUNC_WRITE_MUL_VALUES_OFF ( MB_PDU_DATA_OFF + 5 )
tmav123	0:f54e9507171b	58	#define MB_PDU_FUNC_WRITE_MUL_SIZE_MIN ( 5 )
tmav123	0:f54e9507171b	59	#define MB_PDU_FUNC_WRITE_MUL_COILCNT_MAX ( 0x07B0 )
tmav123	0:f54e9507171b	60
tmav123	0:f54e9507171b	61	/* ----------------------- Static functions ---------------------------------*/
tmav123	0:f54e9507171b	62	eMBException prveMBError2Exception( eMBErrorCode eErrorCode );
tmav123	0:f54e9507171b	63
tmav123	0:f54e9507171b	64	/* ----------------------- Start implementation -----------------------------*/
tmav123	0:f54e9507171b	65
tmav123	0:f54e9507171b	66	#if MB_FUNC_READ_COILS_ENABLED > 0
tmav123	0:f54e9507171b	67
tmav123	0:f54e9507171b	68	eMBException
tmav123	0:f54e9507171b	69	eMBFuncReadCoils( UCHAR * pucFrame, USHORT * usLen )
tmav123	0:f54e9507171b	70	{
tmav123	0:f54e9507171b	71	USHORT usRegAddress;
tmav123	0:f54e9507171b	72	USHORT usCoilCount;
tmav123	0:f54e9507171b	73	UCHAR ucNBytes;
tmav123	0:f54e9507171b	74	UCHAR *pucFrameCur;
tmav123	0:f54e9507171b	75
tmav123	0:f54e9507171b	76	eMBException eStatus = MB_EX_NONE;
tmav123	0:f54e9507171b	77	eMBErrorCode eRegStatus;
tmav123	0:f54e9507171b	78
tmav123	0:f54e9507171b	79	if( *usLen == ( MB_PDU_FUNC_READ_SIZE + MB_PDU_SIZE_MIN ) )
tmav123	0:f54e9507171b	80	{
tmav123	0:f54e9507171b	81	usRegAddress = ( USHORT )( pucFrame[MB_PDU_FUNC_READ_ADDR_OFF] << 8 );
tmav123	0:f54e9507171b	82	usRegAddress \|= ( USHORT )( pucFrame[MB_PDU_FUNC_READ_ADDR_OFF + 1] );
tmav123	0:f54e9507171b	83	usRegAddress++;
tmav123	0:f54e9507171b	84
tmav123	0:f54e9507171b	85	usCoilCount = ( USHORT )( pucFrame[MB_PDU_FUNC_READ_COILCNT_OFF] << 8 );
tmav123	0:f54e9507171b	86	usCoilCount \|= ( USHORT )( pucFrame[MB_PDU_FUNC_READ_COILCNT_OFF + 1] );
tmav123	0:f54e9507171b	87
tmav123	0:f54e9507171b	88	/* Check if the number of registers to read is valid. If not
tmav123	0:f54e9507171b	89	* return Modbus illegal data value exception.
tmav123	0:f54e9507171b	90	*/
tmav123	0:f54e9507171b	91	if( ( usCoilCount >= 1 ) &&
tmav123	0:f54e9507171b	92	( usCoilCount < MB_PDU_FUNC_READ_COILCNT_MAX ) )
tmav123	0:f54e9507171b	93	{
tmav123	0:f54e9507171b	94	/* Set the current PDU data pointer to the beginning. */
tmav123	0:f54e9507171b	95	pucFrameCur = &pucFrame[MB_PDU_FUNC_OFF];
tmav123	0:f54e9507171b	96	*usLen = MB_PDU_FUNC_OFF;
tmav123	0:f54e9507171b	97
tmav123	0:f54e9507171b	98	/* First byte contains the function code. */
tmav123	0:f54e9507171b	99	*pucFrameCur++ = MB_FUNC_READ_COILS;
tmav123	0:f54e9507171b	100	*usLen += 1;
tmav123	0:f54e9507171b	101
tmav123	0:f54e9507171b	102	/* Test if the quantity of coils is a multiple of 8. If not last
tmav123	0:f54e9507171b	103	* byte is only partially field with unused coils set to zero. */
tmav123	0:f54e9507171b	104	if( ( usCoilCount & 0x0007 ) != 0 )
tmav123	0:f54e9507171b	105	{
tmav123	0:f54e9507171b	106	ucNBytes = ( UCHAR )( usCoilCount / 8 + 1 );
tmav123	0:f54e9507171b	107	}
tmav123	0:f54e9507171b	108	else
tmav123	0:f54e9507171b	109	{
tmav123	0:f54e9507171b	110	ucNBytes = ( UCHAR )( usCoilCount / 8 );
tmav123	0:f54e9507171b	111	}
tmav123	0:f54e9507171b	112	*pucFrameCur++ = ucNBytes;
tmav123	0:f54e9507171b	113	*usLen += 1;
tmav123	0:f54e9507171b	114
tmav123	0:f54e9507171b	115	eRegStatus =
tmav123	0:f54e9507171b	116	eMBRegCoilsCB( pucFrameCur, usRegAddress, usCoilCount,
tmav123	0:f54e9507171b	117	MB_REG_READ );
tmav123	0:f54e9507171b	118
tmav123	0:f54e9507171b	119	/* If an error occured convert it into a Modbus exception. */
tmav123	0:f54e9507171b	120	if( eRegStatus != MB_ENOERR )
tmav123	0:f54e9507171b	121	{
tmav123	0:f54e9507171b	122	eStatus = prveMBError2Exception( eRegStatus );
tmav123	0:f54e9507171b	123	}
tmav123	0:f54e9507171b	124	else
tmav123	0:f54e9507171b	125	{
tmav123	0:f54e9507171b	126	/* The response contains the function code, the starting address
tmav123	0:f54e9507171b	127	* and the quantity of registers. We reuse the old values in the
tmav123	0:f54e9507171b	128	* buffer because they are still valid. */
tmav123	0:f54e9507171b	129	*usLen += ucNBytes;;
tmav123	0:f54e9507171b	130	}
tmav123	0:f54e9507171b	131	}
tmav123	0:f54e9507171b	132	else
tmav123	0:f54e9507171b	133	{
tmav123	0:f54e9507171b	134	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	135	}
tmav123	0:f54e9507171b	136	}
tmav123	0:f54e9507171b	137	else
tmav123	0:f54e9507171b	138	{
tmav123	0:f54e9507171b	139	/* Can't be a valid read coil register request because the length
tmav123	0:f54e9507171b	140	* is incorrect. */
tmav123	0:f54e9507171b	141	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	142	}
tmav123	0:f54e9507171b	143	return eStatus;
tmav123	0:f54e9507171b	144	}
tmav123	0:f54e9507171b	145
tmav123	0:f54e9507171b	146	#if MB_FUNC_WRITE_COIL_ENABLED > 0
tmav123	0:f54e9507171b	147	eMBException
tmav123	0:f54e9507171b	148	eMBFuncWriteCoil( UCHAR * pucFrame, USHORT * usLen )
tmav123	0:f54e9507171b	149	{
tmav123	0:f54e9507171b	150	USHORT usRegAddress;
tmav123	0:f54e9507171b	151	UCHAR ucBuf[2];
tmav123	0:f54e9507171b	152
tmav123	0:f54e9507171b	153	eMBException eStatus = MB_EX_NONE;
tmav123	0:f54e9507171b	154	eMBErrorCode eRegStatus;
tmav123	0:f54e9507171b	155
tmav123	0:f54e9507171b	156	if( *usLen == ( MB_PDU_FUNC_WRITE_SIZE + MB_PDU_SIZE_MIN ) )
tmav123	0:f54e9507171b	157	{
tmav123	0:f54e9507171b	158	usRegAddress = ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_ADDR_OFF] << 8 );
tmav123	0:f54e9507171b	159	usRegAddress \|= ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_ADDR_OFF + 1] );
tmav123	0:f54e9507171b	160	usRegAddress++;
tmav123	0:f54e9507171b	161
tmav123	0:f54e9507171b	162	if( ( pucFrame[MB_PDU_FUNC_WRITE_VALUE_OFF + 1] == 0x00 ) &&
tmav123	0:f54e9507171b	163	( ( pucFrame[MB_PDU_FUNC_WRITE_VALUE_OFF] == 0xFF ) \|\|
tmav123	0:f54e9507171b	164	( pucFrame[MB_PDU_FUNC_WRITE_VALUE_OFF] == 0x00 ) ) )
tmav123	0:f54e9507171b	165	{
tmav123	0:f54e9507171b	166	ucBuf[1] = 0;
tmav123	0:f54e9507171b	167	if( pucFrame[MB_PDU_FUNC_WRITE_VALUE_OFF] == 0xFF )
tmav123	0:f54e9507171b	168	{
tmav123	0:f54e9507171b	169	ucBuf[0] = 1;
tmav123	0:f54e9507171b	170	}
tmav123	0:f54e9507171b	171	else
tmav123	0:f54e9507171b	172	{
tmav123	0:f54e9507171b	173	ucBuf[0] = 0;
tmav123	0:f54e9507171b	174	}
tmav123	0:f54e9507171b	175	eRegStatus =
tmav123	0:f54e9507171b	176	eMBRegCoilsCB( &ucBuf[0], usRegAddress, 1, MB_REG_WRITE );
tmav123	0:f54e9507171b	177
tmav123	0:f54e9507171b	178	/* If an error occured convert it into a Modbus exception. */
tmav123	0:f54e9507171b	179	if( eRegStatus != MB_ENOERR )
tmav123	0:f54e9507171b	180	{
tmav123	0:f54e9507171b	181	eStatus = prveMBError2Exception( eRegStatus );
tmav123	0:f54e9507171b	182	}
tmav123	0:f54e9507171b	183	}
tmav123	0:f54e9507171b	184	else
tmav123	0:f54e9507171b	185	{
tmav123	0:f54e9507171b	186	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	187	}
tmav123	0:f54e9507171b	188	}
tmav123	0:f54e9507171b	189	else
tmav123	0:f54e9507171b	190	{
tmav123	0:f54e9507171b	191	/* Can't be a valid write coil register request because the length
tmav123	0:f54e9507171b	192	* is incorrect. */
tmav123	0:f54e9507171b	193	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	194	}
tmav123	0:f54e9507171b	195	return eStatus;
tmav123	0:f54e9507171b	196	}
tmav123	0:f54e9507171b	197
tmav123	0:f54e9507171b	198	#endif
tmav123	0:f54e9507171b	199
tmav123	0:f54e9507171b	200	#if MB_FUNC_WRITE_MULTIPLE_COILS_ENABLED > 0
tmav123	0:f54e9507171b	201	eMBException
tmav123	0:f54e9507171b	202	eMBFuncWriteMultipleCoils( UCHAR * pucFrame, USHORT * usLen )
tmav123	0:f54e9507171b	203	{
tmav123	0:f54e9507171b	204	USHORT usRegAddress;
tmav123	0:f54e9507171b	205	USHORT usCoilCnt;
tmav123	0:f54e9507171b	206	UCHAR ucByteCount;
tmav123	0:f54e9507171b	207	UCHAR ucByteCountVerify;
tmav123	0:f54e9507171b	208
tmav123	0:f54e9507171b	209	eMBException eStatus = MB_EX_NONE;
tmav123	0:f54e9507171b	210	eMBErrorCode eRegStatus;
tmav123	0:f54e9507171b	211
tmav123	0:f54e9507171b	212	if( *usLen > ( MB_PDU_FUNC_WRITE_SIZE + MB_PDU_SIZE_MIN ) )
tmav123	0:f54e9507171b	213	{
tmav123	0:f54e9507171b	214	usRegAddress = ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_MUL_ADDR_OFF] << 8 );
tmav123	0:f54e9507171b	215	usRegAddress \|= ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_MUL_ADDR_OFF + 1] );
tmav123	0:f54e9507171b	216	usRegAddress++;
tmav123	0:f54e9507171b	217
tmav123	0:f54e9507171b	218	usCoilCnt = ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_MUL_COILCNT_OFF] << 8 );
tmav123	0:f54e9507171b	219	usCoilCnt \|= ( USHORT )( pucFrame[MB_PDU_FUNC_WRITE_MUL_COILCNT_OFF + 1] );
tmav123	0:f54e9507171b	220
tmav123	0:f54e9507171b	221	ucByteCount = pucFrame[MB_PDU_FUNC_WRITE_MUL_BYTECNT_OFF];
tmav123	0:f54e9507171b	222
tmav123	0:f54e9507171b	223	/* Compute the number of expected bytes in the request. */
tmav123	0:f54e9507171b	224	if( ( usCoilCnt & 0x0007 ) != 0 )
tmav123	0:f54e9507171b	225	{
tmav123	0:f54e9507171b	226	ucByteCountVerify = ( UCHAR )( usCoilCnt / 8 + 1 );
tmav123	0:f54e9507171b	227	}
tmav123	0:f54e9507171b	228	else
tmav123	0:f54e9507171b	229	{
tmav123	0:f54e9507171b	230	ucByteCountVerify = ( UCHAR )( usCoilCnt / 8 );
tmav123	0:f54e9507171b	231	}
tmav123	0:f54e9507171b	232
tmav123	0:f54e9507171b	233	if( ( usCoilCnt >= 1 ) &&
tmav123	0:f54e9507171b	234	( usCoilCnt <= MB_PDU_FUNC_WRITE_MUL_COILCNT_MAX ) &&
tmav123	0:f54e9507171b	235	( ucByteCountVerify == ucByteCount ) )
tmav123	0:f54e9507171b	236	{
tmav123	0:f54e9507171b	237	eRegStatus =
tmav123	0:f54e9507171b	238	eMBRegCoilsCB( &pucFrame[MB_PDU_FUNC_WRITE_MUL_VALUES_OFF],
tmav123	0:f54e9507171b	239	usRegAddress, usCoilCnt, MB_REG_WRITE );
tmav123	0:f54e9507171b	240
tmav123	0:f54e9507171b	241	/* If an error occured convert it into a Modbus exception. */
tmav123	0:f54e9507171b	242	if( eRegStatus != MB_ENOERR )
tmav123	0:f54e9507171b	243	{
tmav123	0:f54e9507171b	244	eStatus = prveMBError2Exception( eRegStatus );
tmav123	0:f54e9507171b	245	}
tmav123	0:f54e9507171b	246	else
tmav123	0:f54e9507171b	247	{
tmav123	0:f54e9507171b	248	/* The response contains the function code, the starting address
tmav123	0:f54e9507171b	249	* and the quantity of registers. We reuse the old values in the
tmav123	0:f54e9507171b	250	* buffer because they are still valid. */
tmav123	0:f54e9507171b	251	*usLen = MB_PDU_FUNC_WRITE_MUL_BYTECNT_OFF;
tmav123	0:f54e9507171b	252	}
tmav123	0:f54e9507171b	253	}
tmav123	0:f54e9507171b	254	else
tmav123	0:f54e9507171b	255	{
tmav123	0:f54e9507171b	256	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	257	}
tmav123	0:f54e9507171b	258	}
tmav123	0:f54e9507171b	259	else
tmav123	0:f54e9507171b	260	{
tmav123	0:f54e9507171b	261	/* Can't be a valid write coil register request because the length
tmav123	0:f54e9507171b	262	* is incorrect. */
tmav123	0:f54e9507171b	263	eStatus = MB_EX_ILLEGAL_DATA_VALUE;
tmav123	0:f54e9507171b	264	}
tmav123	0:f54e9507171b	265	return eStatus;
tmav123	0:f54e9507171b	266	}
tmav123	0:f54e9507171b	267
tmav123	0:f54e9507171b	268	#endif
tmav123	0:f54e9507171b	269
tmav123	0:f54e9507171b	270	#endif

Repository toolbox

Export to desktop IDE

Build repository

Repository details

Type:	Program
Mbed OS support:	Mbed 2 deprecated
Created:	05 Dec 2011
Imports:	271
Forks:	0
Commits:	1
Dependents:	0
Dependencies:	2
Followers:	17

ModBus/mbfunccoils.cpp@0:f54e9507171b, 2011-12-05 (annotated)

Who changed what in which revision?

Repository toolbox

Repository details

Important Information for this Arm website

Access Warning