/*\r
- FreeRTOS V7.3.0 - Copyright (C) 2012 Real Time Engineers Ltd.\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
-\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
- * *\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
- * *\r
- * >>> See http://www.FreeRTOS.org/Documentation for details. <<< *\r
- * *\r
- * Thank you for using FreeRTOS, and thank you for your support! *\r
- * *\r
- ***************************************************************************\r
+ FreeRTOS V9.0.0rc1 - Copyright (C) 2016 Real Time Engineers Ltd.\r
+ All rights reserved\r
\r
+ VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\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
- >>>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. FreeRTOS is distributed in the hope that it will be useful, but\r
- WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY\r
- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for\r
- more details. You should have received a copy of the GNU General Public\r
- License and the FreeRTOS license exception along with FreeRTOS; if not it\r
- can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
- by writing to Richard Barry, contact details for whom are available on the\r
- FreeRTOS WEB site.\r
+ Free Software Foundation >>>> AND MODIFIED BY <<<< the FreeRTOS exception.\r
\r
- 1 tab == 4 spaces!\r
+ ***************************************************************************\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
+\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. Full license text is available on the following\r
+ link: http://www.freertos.org/a00114.html\r
\r
***************************************************************************\r
* *\r
- * Having a problem? Start by reading the FAQ "My application does *\r
- * not run, what could be wrong?" *\r
+ * FreeRTOS provides completely free yet professionally developed, *\r
+ * robust, strictly quality controlled, supported, and cross *\r
+ * platform software that is more than just the market leader, it *\r
+ * is the industry's de facto standard. *\r
* *\r
- * http://www.FreeRTOS.org/FAQHelp.html *\r
+ * Help yourself get started quickly while simultaneously helping *\r
+ * to support the FreeRTOS project by purchasing a FreeRTOS *\r
+ * tutorial book, reference manual, or both: *\r
+ * http://www.FreeRTOS.org/Documentation *\r
* *\r
***************************************************************************\r
\r
+ http://www.FreeRTOS.org/FAQHelp.html - Having a problem? Start by reading\r
+ the FAQ page "My application does not run, what could be wrong?". Have you\r
+ defined configASSERT()?\r
+\r
+ http://www.FreeRTOS.org/support - In return for receiving this top quality\r
+ embedded software for free we request you assist our global community by\r
+ participating in the support forum.\r
\r
- http://www.FreeRTOS.org - Documentation, training, latest versions, license\r
- and contact details.\r
+ http://www.FreeRTOS.org/training - Investing in training allows your team to\r
+ be as productive as possible as early as possible. Now you can receive\r
+ FreeRTOS training directly from Richard Barry, CEO of Real Time Engineers\r
+ Ltd, and the world's leading authority on the world's leading RTOS.\r
\r
http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
- including FreeRTOS+Trace - an indispensable productivity tool.\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.FreeRTOS.org/labs - Where new FreeRTOS products go to incubate.\r
+ Come and try FreeRTOS+TCP, our new open source TCP/IP stack for FreeRTOS.\r
\r
- Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell\r
- the code with commercial support, indemnification, and middleware, under\r
- the OpenRTOS brand: http://www.OpenRTOS.com. High Integrity Systems also\r
- provide a safety engineered and independently SIL3 certified version under\r
- the SafeRTOS brand: http://www.SafeRTOS.com.\r
+ http://www.OpenRTOS.com - Real Time Engineers ltd. license FreeRTOS to High\r
+ Integrity Systems ltd. to sell under the OpenRTOS brand. Low cost OpenRTOS\r
+ licenses offer ticketed support, indemnification and commercial 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
+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
-\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
+static unsigned long ulLastCounterValue = 0UL, ulOverflows = 0;\r
+unsigned long ulValueNow;\r
\r
+ ulValueNow = rtsDWT_CYCCNT;\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
projects / freertos / blobdiff