You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
384 lines
12 KiB
C
384 lines
12 KiB
C
/*
|
|
FreeRTOS V7.0.2 - Copyright (C) 2011 Real Time Engineers Ltd.
|
|
|
|
|
|
***************************************************************************
|
|
* *
|
|
* FreeRTOS tutorial books are available in pdf and paperback. *
|
|
* Complete, revised, and edited pdf reference manuals are also *
|
|
* available. *
|
|
* *
|
|
* Purchasing FreeRTOS documentation will not only help you, by *
|
|
* ensuring you get running as quickly as possible and with an *
|
|
* in-depth knowledge of how to use FreeRTOS, it will also help *
|
|
* the FreeRTOS project to continue with its mission of providing *
|
|
* professional grade, cross platform, de facto standard solutions *
|
|
* for microcontrollers - completely free of charge! *
|
|
* *
|
|
* >>> See http://www.FreeRTOS.org/Documentation for details. <<< *
|
|
* *
|
|
* Thank you for using FreeRTOS, and thank you for your support! *
|
|
* *
|
|
***************************************************************************
|
|
|
|
|
|
This file is part of the FreeRTOS distribution.
|
|
|
|
FreeRTOS is free software; you can redistribute it and/or modify it under
|
|
the terms of the GNU General Public License (version 2) as published by the
|
|
Free Software Foundation AND MODIFIED BY the FreeRTOS exception.
|
|
>>>NOTE<<< The modification to the GPL is included to allow you to
|
|
distribute a combined work that includes FreeRTOS without being obliged to
|
|
provide the source code for proprietary components outside of the FreeRTOS
|
|
kernel. FreeRTOS 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 and the FreeRTOS license exception along with FreeRTOS; if not it
|
|
can be viewed here: http://www.freertos.org/a00114.html and also obtained
|
|
by writing to Richard Barry, contact details for whom are available on the
|
|
FreeRTOS WEB site.
|
|
|
|
1 tab == 4 spaces!
|
|
|
|
http://www.FreeRTOS.org - Documentation, latest information, license and
|
|
contact details.
|
|
|
|
http://www.SafeRTOS.com - A version that is certified for use in safety
|
|
critical systems.
|
|
|
|
http://www.OpenRTOS.com - Commercial support, development, porting,
|
|
licensing and training services.
|
|
*/
|
|
|
|
/* Scheduler include files. */
|
|
#include "FreeRTOS.h"
|
|
#include "task.h"
|
|
|
|
/* Demo file headers. */
|
|
#include "regtest.h"
|
|
|
|
/*
|
|
* Test tasks that sets registers to known values, then checks to ensure the
|
|
* values remain as expected. Test 1 and test 2 use different values.
|
|
*/
|
|
static void prvRegisterCheck1( void *pvParameters );
|
|
static void prvRegisterCheck2( void *pvParameters );
|
|
|
|
/* Set to a non zero value should an error be found. */
|
|
portBASE_TYPE xRegTestError = pdFALSE;
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
void vStartRegTestTasks( void )
|
|
{
|
|
xTaskCreate( prvRegisterCheck1, "Reg1", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );
|
|
xTaskCreate( prvRegisterCheck2, "Reg2", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
portBASE_TYPE xAreRegTestTasksStillRunning( void )
|
|
{
|
|
portBASE_TYPE xReturn;
|
|
|
|
/* If a register was found to contain an unexpected value then the
|
|
xRegTestError variable would have been set to a non zero value. */
|
|
if( xRegTestError == pdFALSE )
|
|
{
|
|
xReturn = pdTRUE;
|
|
}
|
|
else
|
|
{
|
|
xReturn = pdFALSE;
|
|
}
|
|
|
|
return xReturn;
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
static void prvRegisterCheck1( void *pvParameters )
|
|
{
|
|
( void ) pvParameters;
|
|
|
|
for( ;; )
|
|
{
|
|
asm( "LDI r31, 5" );
|
|
asm( "MOV r0, r31" );
|
|
asm( "LDI r31, 6" );
|
|
asm( "MOV r1, r31" );
|
|
asm( "LDI r31, 7" );
|
|
asm( "MOV r2, r31" );
|
|
asm( "LDI r31, 8" );
|
|
asm( "MOV r3, r31" );
|
|
asm( "LDI r31, 9" );
|
|
asm( "MOV r4, r31" );
|
|
asm( "LDI r31, 10" );
|
|
asm( "MOV r5, r31" );
|
|
asm( "LDI r31, 11" );
|
|
asm( "MOV r6, r31" );
|
|
asm( "LDI r31, 12" );
|
|
asm( "MOV r7, r31" );
|
|
asm( "LDI r31, 13" );
|
|
asm( "MOV r8, r31" );
|
|
asm( "LDI r31, 14" );
|
|
asm( "MOV r9, r31" );
|
|
asm( "LDI r31, 15" );
|
|
asm( "MOV r10, r31" );
|
|
asm( "LDI r31, 16" );
|
|
asm( "MOV r11, r31" );
|
|
asm( "LDI r31, 17" );
|
|
asm( "MOV r12, r31" );
|
|
asm( "LDI r31, 18" );
|
|
asm( "MOV r13, r31" );
|
|
asm( "LDI r31, 19" );
|
|
asm( "MOV r14, r31" );
|
|
asm( "LDI r31, 20" );
|
|
asm( "MOV r15, r31" );
|
|
asm( "LDI r16, 21" );
|
|
asm( "LDI r17, 22" );
|
|
asm( "LDI r18, 23" );
|
|
asm( "LDI r19, 24" );
|
|
asm( "LDI r20, 25" );
|
|
asm( "LDI r21, 26" );
|
|
asm( "LDI r22, 27" );
|
|
asm( "LDI r23, 28" );
|
|
asm( "LDI r24, 29" );
|
|
asm( "LDI r25, 30" );
|
|
asm( "LDI r26, 31" );
|
|
asm( "LDI r27, 32" );
|
|
asm( "LDI r30, 33" );
|
|
|
|
asm( "LDI r31, 5" );
|
|
asm( "CPSE r31, r0" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 6" );
|
|
asm( "CPSE r31, r1" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 7" );
|
|
asm( "CPSE r31, r2" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 8" );
|
|
asm( "CPSE r31, r3" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 9" );
|
|
asm( "CPSE r31, r4" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 10" );
|
|
asm( "CPSE r31, r5" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 11" );
|
|
asm( "CPSE r31, r6" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 12" );
|
|
asm( "CPSE r31, r7" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 13" );
|
|
asm( "CPSE r31, r8" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 14" );
|
|
asm( "CPSE r31, r9" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 15" );
|
|
asm( "CPSE r31, r10" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 16" );
|
|
asm( "CPSE r31, r11" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 17" );
|
|
asm( "CPSE r31, r12" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 18" );
|
|
asm( "CPSE r31, r13" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 19" );
|
|
asm( "CPSE r31, r14" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 20" );
|
|
asm( "CPSE r31, r15" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 21" );
|
|
asm( "CPSE r31, r16" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 22" );
|
|
asm( "CPSE r31, r17" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 23" );
|
|
asm( "CPSE r31, r18" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 24" );
|
|
asm( "CPSE r31, r19" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 25" );
|
|
asm( "CPSE r31, r20" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 26" );
|
|
asm( "CPSE r31, r21" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 27" );
|
|
asm( "CPSE r31, r22" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 28" );
|
|
asm( "CPSE r31, r23" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 29" );
|
|
asm( "CPSE r31, r24" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 30" );
|
|
asm( "CPSE r31, r25" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 31" );
|
|
asm( "CPSE r31, r26" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 32" );
|
|
asm( "CPSE r31, r27" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 33" );
|
|
asm( "CPSE r31, r30" );
|
|
asm( "STS xRegTestError, r0" );
|
|
}
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
static void prvRegisterCheck2( void *pvParameters )
|
|
{
|
|
( void ) pvParameters;
|
|
|
|
for( ;; )
|
|
{
|
|
asm( "LDI r31, 1" );
|
|
asm( "MOV r0, r31" );
|
|
asm( "LDI r31, 2" );
|
|
asm( "MOV r1, r31" );
|
|
asm( "LDI r31, 3" );
|
|
asm( "MOV r2, r31" );
|
|
asm( "LDI r31, 4" );
|
|
asm( "MOV r3, r31" );
|
|
asm( "LDI r31, 5" );
|
|
asm( "MOV r4, r31" );
|
|
asm( "LDI r31, 6" );
|
|
asm( "MOV r5, r31" );
|
|
asm( "LDI r31, 7" );
|
|
asm( "MOV r6, r31" );
|
|
asm( "LDI r31, 8" );
|
|
asm( "MOV r7, r31" );
|
|
asm( "LDI r31, 9" );
|
|
asm( "MOV r8, r31" );
|
|
asm( "LDI r31, 10" );
|
|
asm( "MOV r9, r31" );
|
|
asm( "LDI r31, 11" );
|
|
asm( "MOV r10, r31" );
|
|
asm( "LDI r31, 12" );
|
|
asm( "MOV r11, r31" );
|
|
asm( "LDI r31, 13" );
|
|
asm( "MOV r12, r31" );
|
|
asm( "LDI r31, 14" );
|
|
asm( "MOV r13, r31" );
|
|
asm( "LDI r31, 15" );
|
|
asm( "MOV r14, r31" );
|
|
asm( "LDI r31, 16" );
|
|
asm( "MOV r15, r31" );
|
|
asm( "LDI r16, 17" );
|
|
asm( "LDI r17, 18" );
|
|
asm( "LDI r18, 19" );
|
|
asm( "LDI r19, 20" );
|
|
asm( "LDI r20, 21" );
|
|
asm( "LDI r21, 22" );
|
|
asm( "LDI r22, 23" );
|
|
asm( "LDI r23, 24" );
|
|
asm( "LDI r24, 25" );
|
|
asm( "LDI r25, 26" );
|
|
asm( "LDI r26, 27" );
|
|
asm( "LDI r27, 28" );
|
|
asm( "LDI r30, 29" );
|
|
|
|
asm( "LDI r31, 1" );
|
|
asm( "CPSE r31, r0" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 2" );
|
|
asm( "CPSE r31, r1" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 3" );
|
|
asm( "CPSE r31, r2" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 4" );
|
|
asm( "CPSE r31, r3" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 5" );
|
|
asm( "CPSE r31, r4" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 6" );
|
|
asm( "CPSE r31, r5" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 7" );
|
|
asm( "CPSE r31, r6" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 8" );
|
|
asm( "CPSE r31, r7" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 9" );
|
|
asm( "CPSE r31, r8" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 10" );
|
|
asm( "CPSE r31, r9" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 11" );
|
|
asm( "CPSE r31, r10" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 12" );
|
|
asm( "CPSE r31, r11" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 13" );
|
|
asm( "CPSE r31, r12" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 14" );
|
|
asm( "CPSE r31, r13" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 15" );
|
|
asm( "CPSE r31, r14" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 16" );
|
|
asm( "CPSE r31, r15" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 17" );
|
|
asm( "CPSE r31, r16" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 18" );
|
|
asm( "CPSE r31, r17" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 19" );
|
|
asm( "CPSE r31, r18" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 20" );
|
|
asm( "CPSE r31, r19" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 21" );
|
|
asm( "CPSE r31, r20" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 22" );
|
|
asm( "CPSE r31, r21" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 23" );
|
|
asm( "CPSE r31, r22" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 24" );
|
|
asm( "CPSE r31, r23" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 25" );
|
|
asm( "CPSE r31, r24" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 26" );
|
|
asm( "CPSE r31, r25" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 27" );
|
|
asm( "CPSE r31, r26" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 28" );
|
|
asm( "CPSE r31, r27" );
|
|
asm( "STS xRegTestError, r0" );
|
|
asm( "LDI r31, 29" );
|
|
asm( "CPSE r31, r30" );
|
|
asm( "STS xRegTestError, r0" );
|
|
}
|
|
}
|
|
|