2 FreeRTOS V8.2.2 - Copyright (C) 2015 Real Time Engineers Ltd.
\r
5 VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
\r
7 This file is part of the FreeRTOS distribution.
\r
9 FreeRTOS is free software; you can redistribute it and/or modify it under
\r
10 the terms of the GNU General Public License (version 2) as published by the
\r
11 Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.
\r
13 ***************************************************************************
\r
14 >>! NOTE: The modification to the GPL is included to allow you to !<<
\r
15 >>! distribute a combined work that includes FreeRTOS without being !<<
\r
16 >>! obliged to provide the source code for proprietary components !<<
\r
17 >>! outside of the FreeRTOS kernel. !<<
\r
18 ***************************************************************************
\r
20 FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY
\r
21 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
\r
22 FOR A PARTICULAR PURPOSE. Full license text is available on the following
\r
23 link: http://www.freertos.org/a00114.html
\r
25 ***************************************************************************
\r
27 * FreeRTOS provides completely free yet professionally developed, *
\r
28 * robust, strictly quality controlled, supported, and cross *
\r
29 * platform software that is more than just the market leader, it *
\r
30 * is the industry's de facto standard. *
\r
32 * Help yourself get started quickly while simultaneously helping *
\r
33 * to support the FreeRTOS project by purchasing a FreeRTOS *
\r
34 * tutorial book, reference manual, or both: *
\r
35 * http://www.FreeRTOS.org/Documentation *
\r
37 ***************************************************************************
\r
39 http://www.FreeRTOS.org/FAQHelp.html - Having a problem? Start by reading
\r
40 the FAQ page "My application does not run, what could be wrong?". Have you
\r
41 defined configASSERT()?
\r
43 http://www.FreeRTOS.org/support - In return for receiving this top quality
\r
44 embedded software for free we request you assist our global community by
\r
45 participating in the support forum.
\r
47 http://www.FreeRTOS.org/training - Investing in training allows your team to
\r
48 be as productive as possible as early as possible. Now you can receive
\r
49 FreeRTOS training directly from Richard Barry, CEO of Real Time Engineers
\r
50 Ltd, and the world's leading authority on the world's leading RTOS.
\r
52 http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
\r
53 including FreeRTOS+Trace - an indispensable productivity tool, a DOS
\r
54 compatible FAT file system, and our tiny thread aware UDP/IP stack.
\r
56 http://www.FreeRTOS.org/labs - Where new FreeRTOS products go to incubate.
\r
57 Come and try FreeRTOS+TCP, our new open source TCP/IP stack for FreeRTOS.
\r
59 http://www.OpenRTOS.com - Real Time Engineers ltd. license FreeRTOS to High
\r
60 Integrity Systems ltd. to sell under the OpenRTOS brand. Low cost OpenRTOS
\r
61 licenses offer ticketed support, indemnification and commercial middleware.
\r
63 http://www.SafeRTOS.com - High Integrity Systems also provide a safety
\r
64 engineered and independently SIL3 certified version for use in safety and
\r
65 mission critical applications that require provable dependability.
\r
70 #include <FreeRTOSConfig.h>
\r
76 EXTERN ulRegTest1LoopCounter
\r
77 EXTERN ulRegTest2LoopCounter
\r
79 PUBLIC vRegTest1Task
\r
80 PUBLIC vRegTest2Task
\r
81 PUBLIC vRegTestClearFlopRegistersToParameterValue
\r
82 PUBLIC ulRegTestCheckFlopRegistersContainParameterValue
\r
84 /*-----------------------------------------------------------*/
\r
88 /* Fill the core registers with known values. */
\r
103 /* Fill the VFP registers with known values. */
\r
122 /* Check all the VFP registers still contain the values set above.
\r
123 First save registers that are clobbered by the test. */
\r
128 bne reg1_error_loopf
\r
130 bne reg1_error_loopf
\r
133 bne reg1_error_loopf
\r
135 bne reg1_error_loopf
\r
138 bne reg1_error_loopf
\r
140 bne reg1_error_loopf
\r
143 bne reg1_error_loopf
\r
145 bne reg1_error_loopf
\r
148 bne reg1_error_loopf
\r
150 bne reg1_error_loopf
\r
153 bne reg1_error_loopf
\r
155 bne reg1_error_loopf
\r
158 bne reg1_error_loopf
\r
160 bne reg1_error_loopf
\r
163 bne reg1_error_loopf
\r
165 bne reg1_error_loopf
\r
168 bne reg1_error_loopf
\r
170 bne reg1_error_loopf
\r
173 bne reg1_error_loopf
\r
175 bne reg1_error_loopf
\r
178 bne reg1_error_loopf
\r
180 bne reg1_error_loopf
\r
183 bne reg1_error_loopf
\r
185 bne reg1_error_loopf
\r
188 bne reg1_error_loopf
\r
190 bne reg1_error_loopf
\r
193 bne reg1_error_loopf
\r
195 bne reg1_error_loopf
\r
198 bne reg1_error_loopf
\r
200 bne reg1_error_loopf
\r
203 bne reg1_error_loopf
\r
205 bne reg1_error_loopf
\r
207 /* Restore the registers that were clobbered by the test. */
\r
210 /* VFP register test passed. Jump to the core register test. */
\r
214 /* If this line is hit then a VFP register value was found to be
\r
221 bne reg1_error_loop
\r
223 bne reg1_error_loop
\r
225 bne reg1_error_loop
\r
227 bne reg1_error_loop
\r
229 bne reg1_error_loop
\r
231 bne reg1_error_loop
\r
233 bne reg1_error_loop
\r
235 bne reg1_error_loop
\r
237 bne reg1_error_loop
\r
239 bne reg1_error_loop
\r
241 bne reg1_error_loop
\r
243 bne reg1_error_loop
\r
245 bne reg1_error_loop
\r
247 /* Everything passed, increment the loop counter. */
\r
249 ldr r0, =ulRegTest1LoopCounter
\r
259 /* If this line is hit then there was an error in a core register value.
\r
260 The loop ensures the loop counter stops incrementing. */
\r
263 /*-----------------------------------------------------------*/
\r
268 /* Set all the core registers to known values. */
\r
283 /* Set all the VFP to known values. */
\r
303 /* Check all the VFP registers still contain the values set above.
\r
304 First save registers that are clobbered by the test. */
\r
309 bne reg2_error_loopf
\r
311 bne reg2_error_loopf
\r
314 bne reg2_error_loopf
\r
316 bne reg2_error_loopf
\r
319 bne reg2_error_loopf
\r
321 bne reg2_error_loopf
\r
324 bne reg2_error_loopf
\r
326 bne reg2_error_loopf
\r
329 bne reg2_error_loopf
\r
331 bne reg2_error_loopf
\r
334 bne reg2_error_loopf
\r
336 bne reg2_error_loopf
\r
339 bne reg2_error_loopf
\r
341 bne reg2_error_loopf
\r
344 bne reg2_error_loopf
\r
346 bne reg2_error_loopf
\r
349 bne reg2_error_loopf
\r
351 bne reg2_error_loopf
\r
354 bne reg2_error_loopf
\r
356 bne reg2_error_loopf
\r
359 bne reg2_error_loopf
\r
361 bne reg2_error_loopf
\r
364 bne reg2_error_loopf
\r
366 bne reg2_error_loopf
\r
369 bne reg2_error_loopf
\r
371 bne reg2_error_loopf
\r
374 bne reg2_error_loopf
\r
376 bne reg2_error_loopf
\r
379 bne reg2_error_loopf
\r
381 bne reg2_error_loopf
\r
384 bne reg2_error_loopf
\r
386 bne reg2_error_loopf
\r
388 /* Restore the registers that were clobbered by the test. */
\r
391 /* VFP register test passed. Jump to the core register test. */
\r
395 /* If this line is hit then a VFP register value was found to be
\r
402 bne reg2_error_loop
\r
404 bne reg2_error_loop
\r
406 bne reg2_error_loop
\r
408 bne reg2_error_loop
\r
410 bne reg2_error_loop
\r
412 bne reg2_error_loop
\r
414 bne reg2_error_loop
\r
416 bne reg2_error_loop
\r
418 bne reg2_error_loop
\r
420 bne reg2_error_loop
\r
422 bne reg2_error_loop
\r
424 bne reg2_error_loop
\r
426 bne reg2_error_loop
\r
428 /* Increment the loop counter to indicate this test is still functioning
\r
431 ldr r0, =ulRegTest2LoopCounter
\r
436 /* Yield to increase test coverage. */
\r
438 ldr r1, =0xe000ed04 /*NVIC_INT_CTRL */
\r
439 lsl r0, r0, #28 /* Shift to PendSV bit */
\r
449 /* If this line is hit then there was an error in a core register value.
\r
450 This loop ensures the loop counter variable stops incrementing. */
\r
453 /*-----------------------------------------------------------*/
\r
455 vRegTestClearFlopRegistersToParameterValue
\r
457 /* Clobber the auto saved registers. */
\r
468 /*-----------------------------------------------------------*/
\r
470 ulRegTestCheckFlopRegistersContainParameterValue
\r