mirror of
https://github.com/FreeRTOS/FreeRTOS-Kernel.git
synced 2025-04-22 22:42:00 -04:00
291 lines
8.2 KiB
ArmAsm
291 lines
8.2 KiB
ArmAsm
/*
|
|
FreeRTOS V7.4.0 - Copyright (C) 2013 Real Time Engineers Ltd.
|
|
|
|
FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME. PLEASE VISIT
|
|
http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
|
|
|
***************************************************************************
|
|
* *
|
|
* 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 itcan be
|
|
viewed here: http://www.freertos.org/a00114.html and also obtained by
|
|
writing to Real Time Engineers Ltd., contact details for whom are available
|
|
on the FreeRTOS WEB site.
|
|
|
|
1 tab == 4 spaces!
|
|
|
|
***************************************************************************
|
|
* *
|
|
* Having a problem? Start by reading the FAQ "My application does *
|
|
* not run, what could be wrong?" *
|
|
* *
|
|
* http://www.FreeRTOS.org/FAQHelp.html *
|
|
* *
|
|
***************************************************************************
|
|
|
|
|
|
http://www.FreeRTOS.org - Documentation, books, training, latest versions,
|
|
license and Real Time Engineers Ltd. contact details.
|
|
|
|
http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
|
|
including FreeRTOS+Trace - an indispensable productivity tool, and our new
|
|
fully thread aware and reentrant UDP/IP stack.
|
|
|
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
|
Integrity Systems, who sell the code with commercial support,
|
|
indemnification and middleware, under the OpenRTOS brand.
|
|
|
|
http://www.SafeRTOS.com - High Integrity Systems also provide a safety
|
|
engineered and independently SIL3 certified version for use in safety and
|
|
mission critical applications that require provable dependability.
|
|
*/
|
|
|
|
/*
|
|
* This file defines the RegTest tasks as described at the top of main.c
|
|
*/
|
|
|
|
.global _vRegTest1Task
|
|
.short _vRegTest1Task
|
|
.global _vRegTest2Task
|
|
.short _vRegTest2Task
|
|
|
|
.extern _vRegTestError
|
|
.extern _usRegTest1LoopCounter
|
|
.extern _usRegTest2LoopCounter
|
|
|
|
.text
|
|
/*
|
|
* Fill all the registers with known values, then check that the registers
|
|
* contain the expected value. An incorrect value being indicative of an
|
|
* error in the context switch mechanism.
|
|
*/
|
|
_vRegTest1Task:
|
|
|
|
/* First fill the registers. */
|
|
SEL RB0
|
|
MOVW AX, #0x1122
|
|
MOVW BC, #0x3344
|
|
MOVW DE, #0x5566
|
|
MOVW HL, #0x7788
|
|
SEL RB1
|
|
MOVW AX, #0x1111
|
|
MOVW BC, #0x2222
|
|
MOVW DE, #0x3333
|
|
MOVW HL, #0x4444
|
|
SEL RB2
|
|
MOVW AX, #0x5555
|
|
MOVW BC, #0x6666
|
|
MOVW DE, #0x7777
|
|
MOVW HL, #0x8888
|
|
|
|
/* Register bank 3 is not used outside of interrupts so is not saved as part
|
|
of the task context. */
|
|
SEL RB0
|
|
|
|
_loop1:
|
|
|
|
/* Continuously check that the register values remain at their expected
|
|
values. The BRK is to test the yield. This task runs at low priority
|
|
so will also regularly get preempted. */
|
|
BRK
|
|
|
|
/* Compare with the expected value. */
|
|
CMPW AX, #0x1122
|
|
BZ $.+5
|
|
|
|
/* Jump over the branch to vRegTestError() if the register contained the
|
|
expected value - otherwise flag an error by executing vRegTestError(). */
|
|
BR !!_vRegTestError
|
|
|
|
/* Repeat for all the registers. */
|
|
MOVW AX, BC
|
|
CMPW AX, #0x3344
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0x5566
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0x7788
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
|
|
/* Set AX back to its initial value. */
|
|
MOVW AX, #0x1122
|
|
|
|
SEL RB1
|
|
CMPW AX, #0x1111
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, BC
|
|
CMPW AX, #0x2222
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0x3333
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0x4444
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, #0x1111
|
|
|
|
|
|
SEL RB2
|
|
CMPW AX, #0x5555
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, BC
|
|
CMPW AX, #0x6666
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0x7777
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0x8888
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, #0x5555
|
|
|
|
|
|
/* Register bank 3 is not used outside of interrupts so is not saved as
|
|
part of the task context. */
|
|
|
|
SEL RB0
|
|
|
|
/* Indicate that this task is still cycling. */
|
|
INCW !_usRegTest1LoopCounter
|
|
|
|
BR !!_loop1
|
|
|
|
|
|
/*
|
|
* Fill all the registers with known values, then check that the registers
|
|
* contain the expected value. An incorrect value being indicative of an
|
|
* error in the context switch mechanism.
|
|
*/
|
|
_vRegTest2Task:
|
|
|
|
SEL RB0
|
|
MOVW AX, #0x99aa
|
|
MOVW BC, #0xbbcc
|
|
MOVW DE, #0xddee
|
|
MOVW HL, #0xff12
|
|
SEL RB1
|
|
MOVW AX, #0x0110
|
|
MOVW BC, #0x0220
|
|
MOVW DE, #0x0330
|
|
MOVW HL, #0x0440
|
|
SEL RB2
|
|
MOVW AX, #0x0550
|
|
MOVW BC, #0x0660
|
|
MOVW DE, #0x0770
|
|
MOVW HL, #0x0880
|
|
|
|
/* Register bank 3 is not used outside of interrupts so is not saved as
|
|
part of the task context. */
|
|
SEL RB0
|
|
|
|
_loop2:
|
|
CMPW AX, #0x99aa
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, BC
|
|
CMPW AX, #0xbbcc
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0xddee
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0xff12
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, #0x99aa
|
|
|
|
SEL RB1
|
|
CMPW AX, #0x0110
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, BC
|
|
CMPW AX, #0x0220
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0x0330
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0x0440
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, #0x0110
|
|
|
|
SEL RB2
|
|
CMPW AX, #0x0550
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, BC
|
|
CMPW AX, #0x0660
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, DE
|
|
CMPW AX, #0x0770
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, HL
|
|
CMPW AX, #0x0880
|
|
BZ $.+5
|
|
BR !!_vRegTestError
|
|
MOVW AX, #0x0550
|
|
|
|
/* Register bank 3 is not used outside of interrupts so is not saved as
|
|
part of the task context. */
|
|
|
|
SEL RB0
|
|
|
|
/* Indicate that this task is still cycling. */
|
|
INCW !_usRegTest2LoopCounter
|
|
|
|
BR !!_loop2
|
|
|
|
.end
|
|
|