/*\r
- FreeRTOS V7.4.2 - Copyright (C) 2013 Real Time Engineers Ltd.\r
+ FreeRTOS V8.1.2 - Copyright (C) 2014 Real Time Engineers Ltd. \r
+ All rights reserved\r
\r
- FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME. PLEASE VISIT\r
- http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
+ VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
\r
***************************************************************************\r
* *\r
- * FreeRTOS tutorial books are available in pdf and paperback. *\r
- * Complete, revised, and edited pdf reference manuals are also *\r
- * available. *\r
+ * FreeRTOS provides completely free yet professionally developed, *\r
+ * robust, strictly quality controlled, supported, and cross *\r
+ * platform software that has become a de facto standard. *\r
* *\r
- * Purchasing FreeRTOS documentation will not only help you, by *\r
- * ensuring you get running as quickly as possible and with an *\r
- * in-depth knowledge of how to use FreeRTOS, it will also help *\r
- * the FreeRTOS project to continue with its mission of providing *\r
- * professional grade, cross platform, de facto standard solutions *\r
- * for microcontrollers - completely free of charge! *\r
+ * Help yourself get started quickly and support the FreeRTOS *\r
+ * project by purchasing a FreeRTOS tutorial book, reference *\r
+ * manual, or both from: http://www.FreeRTOS.org/Documentation *\r
* *\r
- * >>> See http://www.FreeRTOS.org/Documentation for details. <<< *\r
- * *\r
- * Thank you for using FreeRTOS, and thank you for your support! *\r
+ * Thank you! *\r
* *\r
***************************************************************************\r
\r
-\r
This file is part of the FreeRTOS distribution.\r
\r
FreeRTOS is free software; you can redistribute it and/or modify it under\r
the terms of the GNU General Public License (version 2) as published by the\r
- Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
+ Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.\r
\r
- >>>>>>NOTE<<<<<< The modification to the GPL is included to allow you to\r
- distribute a combined work that includes FreeRTOS without being obliged to\r
- provide the source code for proprietary components outside of the FreeRTOS\r
- kernel.\r
+ >>! NOTE: The modification to the GPL is included to allow you to !<<\r
+ >>! distribute a combined work that includes FreeRTOS without being !<<\r
+ >>! obliged to provide the source code for proprietary components !<<\r
+ >>! outside of the FreeRTOS kernel. !<<\r
\r
FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
- FOR A PARTICULAR PURPOSE. See the GNU General Public License for more\r
- details. You should have received a copy of the GNU General Public License\r
- and the FreeRTOS license exception along with FreeRTOS; if not it can be\r
- viewed here: http://www.freertos.org/a00114.html and also obtained by\r
- writing to Real Time Engineers Ltd., contact details for whom are available\r
- on the FreeRTOS WEB site.\r
+ FOR A PARTICULAR PURPOSE. Full license text is available from the following\r
+ link: http://www.freertos.org/a00114.html\r
\r
1 tab == 4 spaces!\r
\r
* *\r
***************************************************************************\r
\r
-\r
http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
license and Real Time Engineers Ltd. contact details.\r
\r
http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
- including FreeRTOS+Trace - an indispensable productivity tool, and our new\r
- fully thread aware and reentrant UDP/IP stack.\r
+ including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
+ compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
\r
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
- Integrity Systems, who sell the code with commercial support,\r
- indemnification and middleware, under the OpenRTOS brand.\r
+ Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS\r
+ licenses offer ticketed support, indemnification and middleware.\r
\r
http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
engineered and independently SIL3 certified version for use in safety and\r
mission critical applications that require provable dependability.\r
+\r
+ 1 tab == 4 spaces!\r
*/\r
\r
/* FreeRTOS includes. */\r
#include "FreeRTOS.h"\r
-#include "task.h"\r
\r
/* Utility functions to implement run time stats on Cortex-M CPUs. The collected\r
run time data can be viewed through the CLI interface. See the following URL for\r
more information on run time stats:\r
http://www.freertos.org/rtos-run-time-stats.html */\r
\r
-/* Used in the run time stats calculations. */\r
-static uint32_t ulClocksPer10thOfAMilliSecond = 0UL;\r
+/* Addresses of registers in the Cortex-M debug hardware. */\r
+#define rtsDWT_CYCCNT ( *( ( unsigned long * ) 0xE0001004 ) )\r
+#define rtsDWT_CONTROL ( *( ( unsigned long * ) 0xE0001000 ) )\r
+#define rtsSCB_DEMCR ( *( ( unsigned long * ) 0xE000EDFC ) )\r
+#define rtsTRCENA_BIT ( 0x01000000UL )\r
+#define rtsCOUNTER_ENABLE_BIT ( 0x01UL )\r
+\r
+/* Simple shift divide for scaling to avoid an overflow occurring too soon. The\r
+number of bits to shift depends on the clock speed. */\r
+#define runtimeSLOWER_CLOCK_SPEEDS ( 70000000UL )\r
+#define runtimeSHIFT_13 13\r
+#define runtimeOVERFLOW_BIT_13 ( 1UL << ( 32UL - runtimeSHIFT_13 ) )\r
+#define runtimeSHIFT_14 14\r
+#define runtimeOVERFLOW_BIT_14 ( 1UL << ( 32UL - runtimeSHIFT_14 ) )\r
\r
+/*-----------------------------------------------------------*/\r
\r
void vMainConfigureTimerForRunTimeStats( void )\r
{\r
- /* How many clocks are there per tenth of a millisecond? */\r
- ulClocksPer10thOfAMilliSecond = configCPU_CLOCK_HZ / 10000UL;\r
+ /* Enable TRCENA. */\r
+ rtsSCB_DEMCR = rtsSCB_DEMCR | rtsTRCENA_BIT;\r
+\r
+ /* Reset counter. */\r
+ rtsDWT_CYCCNT = 0;\r
+\r
+ /* Enable counter. */\r
+ rtsDWT_CONTROL = rtsDWT_CONTROL | rtsCOUNTER_ENABLE_BIT;\r
}\r
/*-----------------------------------------------------------*/\r
\r
uint32_t ulMainGetRunTimeCounterValue( void )\r
{\r
-uint32_t ulSysTickCounts, ulTickCount, ulReturn;\r
-const uint32_t ulSysTickReloadValue = ( configCPU_CLOCK_HZ / configTICK_RATE_HZ ) - 1UL;\r
-volatile uint32_t * const pulCurrentSysTickCount = ( ( volatile uint32_t *) 0xe000e018 );\r
-volatile uint32_t * const pulInterruptCTRLState = ( ( volatile uint32_t *) 0xe000ed04 );\r
-const uint32_t ulSysTickPendingBit = 0x04000000UL;\r
+static unsigned long ulLastCounterValue = 0UL, ulOverflows = 0;\r
+unsigned long ulValueNow;\r
\r
- /* NOTE: There are potentially race conditions here. However, it is used\r
- anyway to keep the examples simple, and to avoid reliance on a separate\r
- timer peripheral. */\r
+ ulValueNow = rtsDWT_CYCCNT;\r
\r
-\r
- /* The SysTick is a down counter. How many clocks have passed since it was\r
- last reloaded? */\r
- ulSysTickCounts = ulSysTickReloadValue - *pulCurrentSysTickCount;\r
-\r
- /* How many times has it overflowed? */\r
- ulTickCount = xTaskGetTickCountFromISR();\r
-\r
- /* Is there a SysTick interrupt pending? */\r
- if( ( *pulInterruptCTRLState & ulSysTickPendingBit ) != 0UL )\r
+ /* Has the value overflowed since it was last read. */\r
+ if( ulValueNow < ulLastCounterValue )\r
{\r
- /* There is a SysTick interrupt pending, so the SysTick has overflowed\r
- but the tick count not yet incremented. */\r
- ulTickCount++;\r
-\r
- /* Read the SysTick again, as the overflow might have occurred since\r
- it was read last. */\r
- ulSysTickCounts = ulSysTickReloadValue - *pulCurrentSysTickCount;\r
+ ulOverflows++;\r
}\r
+ ulLastCounterValue = ulValueNow;\r
\r
- /* Convert the tick count into tenths of a millisecond. THIS ASSUMES\r
- configTICK_RATE_HZ is 1000! */\r
- ulReturn = ( ulTickCount * 10UL ) ;\r
+ /* Cannot use configCPU_CLOCK_HZ directly as it may itself not be a constant\r
+ but instead map to a variable that holds the clock speed. */\r
\r
- /* Add on the number of tenths of a millisecond that have passed since the\r
- tick count last got updated. */\r
- ulReturn += ( ulSysTickCounts / ulClocksPer10thOfAMilliSecond );\r
+ /* There is no prescale on the counter, so simulate in software. */\r
+ if( configCPU_CLOCK_HZ < runtimeSLOWER_CLOCK_SPEEDS )\r
+ {\r
+ ulValueNow >>= runtimeSHIFT_13;\r
+ ulValueNow += ( runtimeOVERFLOW_BIT_13 * ulOverflows );\r
+ }\r
+ else\r
+ {\r
+ ulValueNow >>= runtimeSHIFT_14;\r
+ ulValueNow += ( runtimeOVERFLOW_BIT_14 * ulOverflows );\r
+ }\r
\r
- return ulReturn;\r
+ return ulValueNow;\r
}\r
/*-----------------------------------------------------------*/\r
\r