add modbus slave support

2020-02-24 21:40:06 +08:00
parent 79be128f5f
commit ef82dbfc6d
1129 changed files with 295648 additions and 1776 deletions
--- a/components/connectivity/Modbus/3rdparty/freemodbus-v1.6/demo/STR71XTCP/freertos/croutine.c
+++ b/components/connectivity/Modbus/3rdparty/freemodbus-v1.6/demo/STR71XTCP/freertos/croutine.c
@@ -0,0 +1,342 @@
+/*
+
+	FreeRTOS.org V4.1.0 - Copyright (C) 2003-2006 Richard Barry.
+
+
+
+	This file is part of the FreeRTOS.org distribution.
+
+
+
+	FreeRTOS.org is free software; you can redistribute it and/or modify
+
+	it under the terms of the GNU General Public License as published by
+
+	the Free Software Foundation; either version 2 of the License, or
+
+	(at your option) any later version.
+
+
+
+	FreeRTOS.org is distributed in the hope that it will be useful,
+
+	but WITHOUT ANY WARRANTY; without even the implied warranty of
+
+	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+
+	GNU General Public License for more details.
+
+
+
+	You should have received a copy of the GNU General Public License
+
+	along with FreeRTOS.org; if not, write to the Free Software
+
+	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+
+	A special exception to the GPL can be applied should you wish to distribute
+
+	a combined work that includes FreeRTOS.org, without being obliged to provide
+
+	the source code for any proprietary components.  See the licensing section
+
+	of http://www.FreeRTOS.org for full details of how and when the exception
+
+	can be applied.
+
+
+
+	***************************************************************************
+
+	See http://www.FreeRTOS.org for documentation, latest information, license
+
+	and contact details.  Please ensure to read the configuration and relevant
+
+	port sections of the online documentation.
+
+	***************************************************************************
+
+*/
+
+
+
+#include "FreeRTOS.h"
+
+#include "task.h"
+
+#include "croutine.h"
+
+
+
+/* Lists for ready and blocked co-routines. --------------------*/
+
+static xList pxReadyCoRoutineLists[ configMAX_CO_ROUTINE_PRIORITIES ];	/*< Prioritised ready co-routines. */
+
+static xList xDelayedCoRoutineList1;									/*< Delayed co-routines. */
+
+static xList xDelayedCoRoutineList2;									/*< Delayed co-routines (two lists are used - one for delays that have overflowed the current tick count. */
+
+static xList * pxDelayedCoRoutineList;									/*< Points to the delayed co-routine list currently being used. */
+
+static xList * pxOverflowDelayedCoRoutineList;							/*< Points to the delayed co-routine list currently being used to hold co-routines that have overflowed the current tick count. */
+
+static xList xPendingReadyList;											/*< Holds co-routines that have been readied by an external event.  They cannot be added directly to the ready lists as the ready lists cannot be accessed by interrupts. */
+
+
+
+/* Other file private variables. --------------------------------*/
+
+corCRCB * pxCurrentCoRoutine = NULL;
+
+static unsigned portBASE_TYPE uxTopCoRoutineReadyPriority = 0;
+
+static portTickType xCoRoutineTickCount = 0;
+
+
+
+/* The initial state of the co-routine when it is created. */
+
+#define corINITIAL_STATE	( 0 )
+
+
+
+/*
+
+ * Place the co-routine represented by pxCRCB into the appropriate ready queue
+
+ * for the priority.  It is inserted at the end of the list.
+
+ *
+
+ * This macro accesses the co-routine ready lists and therefore must not be
+
+ * used from within an ISR.
+
+ */
+
+#define prvAddCoRoutineToReadyQueue( pxCRCB )																		\
+
+{																													\
+
+	if( pxCRCB->uxPriority > uxTopCoRoutineReadyPriority )															\
+
+	{																												\
+
+		uxTopCoRoutineReadyPriority = pxCRCB->uxPriority;															\
+
+	}																												\
+
+	vListInsertEnd( ( xList * ) &( pxReadyCoRoutineLists[ pxCRCB->uxPriority ] ), &( pxCRCB->xGenericListItem ) );	\
+
+}	
+
+
+
+/*
+
+ * Utility to ready all the lists used by the scheduler.  This is called
+
+ * automatically upon the creation of the first co-routine.
+
+ */
+
+static void prvInitialiseCoRoutineLists( void );
+
+
+
+/*
+
+ * Co-routines that are readied by an interrupt cannot be placed directly into
+
+ * the ready lists (there is no mutual exclusion).  Instead they are placed in
+
+ * in the pending ready list in order that they can later be moved to the ready
+
+ * list by the co-routine scheduler.
+
+ */
+
+static inline void prvCheckPendingReadyList( void );
+
+
+
+/*
+
+ * Macro that looks at the list of co-routines that are currently delayed to
+
+ * see if any require waking.
+
+ *
+
+ * Co-routines are stored in the queue in the order of their wake time -
+
+ * meaning once one co-routine has been found whose timer has not expired
+
+ * we need not look any further down the list.
+
+ */
+
+static inline void prvCheckDelayedList( void );
+
+
+
+/*-----------------------------------------------------------*/
+
+
+
+signed portBASE_TYPE xCoRoutineCreate( crCOROUTINE_CODE pxCoRoutineCode, unsigned portBASE_TYPE uxPriority, unsigned portBASE_TYPE uxIndex )
+
+{
+
+signed portBASE_TYPE xReturn;
+
+corCRCB *pxCoRoutine;
+
+
+
+	/* Allocate the memory that will store the co-routine control block. */
+
+	pxCoRoutine = ( corCRCB * ) pvPortMalloc( sizeof( corCRCB ) );
+
+	if( pxCoRoutine )
+
+	{
+
+		/* If pxCurrentCoRoutine is NULL then this is the first co-routine to
+
+		be created and the co-routine data structures need initialising. */
+
+		if( pxCurrentCoRoutine == NULL )
+
+		{
+
+			pxCurrentCoRoutine = pxCoRoutine;
+
+			prvInitialiseCoRoutineLists();
+
+		}
+
+
+
+		/* Check the priority is within limits. */
+
+		if( uxPriority >= configMAX_CO_ROUTINE_PRIORITIES )
+
+		{
+
+			uxPriority = configMAX_CO_ROUTINE_PRIORITIES - 1;
+
+		}
+
+
+
+		/* Fill out the co-routine control block from the function parameters. */
+
+		pxCoRoutine->uxState = corINITIAL_STATE;
+
+		pxCoRoutine->uxPriority = uxPriority;
+
+		pxCoRoutine->uxIndex = uxIndex;
+
+		pxCoRoutine->pxCoRoutineFunction = pxCoRoutineCode;
+
+
+
+		/* Initialise all the other co-routine control block parameters. */
+
+		vListInitialiseItem( &( pxCoRoutine->xGenericListItem ) );
+
+		vListInitialiseItem( &( pxCoRoutine->xEventListItem ) );
+
+
+
+		/* Set the co-routine control block as a link back from the xListItem.
+
+		This is so we can get back to the containing CRCB from a generic item
+
+		in a list. */
+
+		listSET_LIST_ITEM_OWNER( &( pxCoRoutine->xGenericListItem ), pxCoRoutine );
+
+		listSET_LIST_ITEM_OWNER( &( pxCoRoutine->xEventListItem ), pxCoRoutine );
+
+	
+
+		/* Event lists are always in priority order. */
+
+		listSET_LIST_ITEM_VALUE( &( pxCoRoutine->xEventListItem ), configMAX_PRIORITIES - ( portTickType ) uxPriority );
+
+		
+
+		/* Now the co-routine has been initialised it can be added to the ready
+
+		list at the correct priority. */
+
+		prvAddCoRoutineToReadyQueue( pxCoRoutine );
+
+
+
+		xReturn = pdPASS;
+
+	}
+
+	else
+
+	{		
+
+		xReturn = errCOULD_NOT_ALLOCATE_REQUIRED_MEMORY;
+
+	}
+
+	
+
+	return xReturn;	
+
+}
+
+/*-----------------------------------------------------------*/
+
+
+
+void vCoRoutineAddToDelayedList( portTickType xTicksToDelay, xList *pxEventList )
+
+{
+
+portTickType xTimeToWake;
+
+
+
+	/* Calculate the time to wake - this may overflow but this is
+
+	not a problem. */
+
+	xTimeToWake = xCoRoutineTickCount + xTicksToDelay;
+
+
+
+	/* We must remove ourselves from the ready list before adding
+
+	ourselves to the blocked list as the same list item is used for
+
+	both lists. */
+
+	vListRemove( ( xListItem * ) &( pxCurrentCoRoutine->xGenericListItem ) );
+
+
+
+	/* The list item will be inserted in wake time order. */
+
+	listSET_LIST_ITEM_VALUE( &( pxCurrentCoRoutine->xGenericListItem ), xTimeToWake );
+
+
+
+	if( xTimeToWake < xCoRoutineTickCount )
+
+	{
+
+		/* Wake time has overflowed.  Place this item in the
+
+		overflow list. */
+