/* | |
FreeRTOS V7.2.0 - Copyright (C) 2012 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! | |
*************************************************************************** | |
* * | |
* 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, training, latest information, | |
license and contact details. | |
http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products, | |
including FreeRTOS+Trace - an indispensable productivity tool. | |
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.OpenRTOS.com. High Integrity Systems also | |
provide a safety engineered and independently SIL3 certified version under | |
the SafeRTOS brand: http://www.SafeRTOS.com. | |
*/ | |
/* | |
Changes from V2.6.0 | |
+ AVR port - Replaced the inb() and outb() functions with direct memory | |
access. This allows the port to be built with the 20050414 build of | |
WinAVR. | |
*/ | |
#include <stdlib.h> | |
#include <avr/interrupt.h> | |
#include "FreeRTOS.h" | |
#include "task.h" | |
/*----------------------------------------------------------- | |
* Implementation of functions defined in portable.h for the AVR port. | |
*----------------------------------------------------------*/ | |
/* Start tasks with interrupts enables. */ | |
#define portFLAGS_INT_ENABLED ( ( portSTACK_TYPE ) 0x80 ) | |
/* Hardware constants for timer 1. */ | |
#define portCLEAR_COUNTER_ON_MATCH ( ( unsigned char ) 0x08 ) | |
#define portPRESCALE_64 ( ( unsigned char ) 0x03 ) | |
#define portCLOCK_PRESCALER ( ( unsigned long ) 64 ) | |
#define portCOMPARE_MATCH_A_INTERRUPT_ENABLE ( ( unsigned char ) 0x10 ) | |
/*-----------------------------------------------------------*/ | |
/* We require the address of the pxCurrentTCB variable, but don't want to know | |
any details of its type. */ | |
typedef void tskTCB; | |
extern volatile tskTCB * volatile pxCurrentTCB; | |
/*-----------------------------------------------------------*/ | |
/* | |
* Macro to save all the general purpose registers, the save the stack pointer | |
* into the TCB. | |
* | |
* The first thing we do is save the flags then disable interrupts. This is to | |
* guard our stack against having a context switch interrupt after we have already | |
* pushed the registers onto the stack - causing the 32 registers to be on the | |
* stack twice. | |
* | |
* r1 is set to zero as the compiler expects it to be thus, however some | |
* of the math routines make use of R1. | |
* | |
* The interrupts will have been disabled during the call to portSAVE_CONTEXT() | |
* so we need not worry about reading/writing to the stack pointer. | |
*/ | |
#define portSAVE_CONTEXT() \ | |
asm volatile ( "push r0 \n\t" \ | |
"in r0, __SREG__ \n\t" \ | |
"cli \n\t" \ | |
"push r0 \n\t" \ | |
"push r1 \n\t" \ | |
"clr r1 \n\t" \ | |
"push r2 \n\t" \ | |
"push r3 \n\t" \ | |
"push r4 \n\t" \ | |
"push r5 \n\t" \ | |
"push r6 \n\t" \ | |
"push r7 \n\t" \ | |
"push r8 \n\t" \ | |
"push r9 \n\t" \ | |
"push r10 \n\t" \ | |
"push r11 \n\t" \ | |
"push r12 \n\t" \ | |
"push r13 \n\t" \ | |
"push r14 \n\t" \ | |
"push r15 \n\t" \ | |
"push r16 \n\t" \ | |
"push r17 \n\t" \ | |
"push r18 \n\t" \ | |
"push r19 \n\t" \ | |
"push r20 \n\t" \ | |
"push r21 \n\t" \ | |
"push r22 \n\t" \ | |
"push r23 \n\t" \ | |
"push r24 \n\t" \ | |
"push r25 \n\t" \ | |
"push r26 \n\t" \ | |
"push r27 \n\t" \ | |
"push r28 \n\t" \ | |
"push r29 \n\t" \ | |
"push r30 \n\t" \ | |
"push r31 \n\t" \ | |
"lds r26, pxCurrentTCB \n\t" \ | |
"lds r27, pxCurrentTCB + 1 \n\t" \ | |
"in r0, 0x3d \n\t" \ | |
"st x+, r0 \n\t" \ | |
"in r0, 0x3e \n\t" \ | |
"st x+, r0 \n\t" \ | |
); | |
/* | |
* Opposite to portSAVE_CONTEXT(). Interrupts will have been disabled during | |
* the context save so we can write to the stack pointer. | |
*/ | |
#define portRESTORE_CONTEXT() \ | |
asm volatile ( "lds r26, pxCurrentTCB \n\t" \ | |
"lds r27, pxCurrentTCB + 1 \n\t" \ | |
"ld r28, x+ \n\t" \ | |
"out __SP_L__, r28 \n\t" \ | |
"ld r29, x+ \n\t" \ | |
"out __SP_H__, r29 \n\t" \ | |
"pop r31 \n\t" \ | |
"pop r30 \n\t" \ | |
"pop r29 \n\t" \ | |
"pop r28 \n\t" \ | |
"pop r27 \n\t" \ | |
"pop r26 \n\t" \ | |
"pop r25 \n\t" \ | |
"pop r24 \n\t" \ | |
"pop r23 \n\t" \ | |
"pop r22 \n\t" \ | |
"pop r21 \n\t" \ | |
"pop r20 \n\t" \ | |
"pop r19 \n\t" \ | |
"pop r18 \n\t" \ | |
"pop r17 \n\t" \ | |
"pop r16 \n\t" \ | |
"pop r15 \n\t" \ | |
"pop r14 \n\t" \ | |
"pop r13 \n\t" \ | |
"pop r12 \n\t" \ | |
"pop r11 \n\t" \ | |
"pop r10 \n\t" \ | |
"pop r9 \n\t" \ | |
"pop r8 \n\t" \ | |
"pop r7 \n\t" \ | |
"pop r6 \n\t" \ | |
"pop r5 \n\t" \ | |
"pop r4 \n\t" \ | |
"pop r3 \n\t" \ | |
"pop r2 \n\t" \ | |
"pop r1 \n\t" \ | |
"pop r0 \n\t" \ | |
"out __SREG__, r0 \n\t" \ | |
"pop r0 \n\t" \ | |
); | |
/*-----------------------------------------------------------*/ | |
/* | |
* Perform hardware setup to enable ticks from timer 1, compare match A. | |
*/ | |
static void prvSetupTimerInterrupt( void ); | |
/*-----------------------------------------------------------*/ | |
/* | |
* See header file for description. | |
*/ | |
portSTACK_TYPE *pxPortInitialiseStack( portSTACK_TYPE *pxTopOfStack, pdTASK_CODE pxCode, void *pvParameters ) | |
{ | |
unsigned short usAddress; | |
/* Place a few bytes of known values on the bottom of the stack. | |
This is just useful for debugging. */ | |
*pxTopOfStack = 0x11; | |
pxTopOfStack--; | |
*pxTopOfStack = 0x22; | |
pxTopOfStack--; | |
*pxTopOfStack = 0x33; | |
pxTopOfStack--; | |
/* Simulate how the stack would look after a call to vPortYield() generated by | |
the compiler. */ | |
/*lint -e950 -e611 -e923 Lint doesn't like this much - but nothing I can do about it. */ | |
/* The start of the task code will be popped off the stack last, so place | |
it on first. */ | |
usAddress = ( unsigned short ) pxCode; | |
*pxTopOfStack = ( portSTACK_TYPE ) ( usAddress & ( unsigned short ) 0x00ff ); | |
pxTopOfStack--; | |
usAddress >>= 8; | |
*pxTopOfStack = ( portSTACK_TYPE ) ( usAddress & ( unsigned short ) 0x00ff ); | |
pxTopOfStack--; | |
/* Next simulate the stack as if after a call to portSAVE_CONTEXT(). | |
portSAVE_CONTEXT places the flags on the stack immediately after r0 | |
to ensure the interrupts get disabled as soon as possible, and so ensuring | |
the stack use is minimal should a context switch interrupt occur. */ | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x00; /* R0 */ | |
pxTopOfStack--; | |
*pxTopOfStack = portFLAGS_INT_ENABLED; | |
pxTopOfStack--; | |
/* Now the remaining registers. The compiler expects R1 to be 0. */ | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x00; /* R1 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x02; /* R2 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x03; /* R3 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x04; /* R4 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x05; /* R5 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x06; /* R6 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x07; /* R7 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x08; /* R8 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x09; /* R9 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x10; /* R10 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x11; /* R11 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x12; /* R12 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x13; /* R13 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x14; /* R14 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x15; /* R15 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x16; /* R16 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x17; /* R17 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x18; /* R18 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x19; /* R19 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x20; /* R20 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x21; /* R21 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x22; /* R22 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x23; /* R23 */ | |
pxTopOfStack--; | |
/* Place the parameter on the stack in the expected location. */ | |
usAddress = ( unsigned short ) pvParameters; | |
*pxTopOfStack = ( portSTACK_TYPE ) ( usAddress & ( unsigned short ) 0x00ff ); | |
pxTopOfStack--; | |
usAddress >>= 8; | |
*pxTopOfStack = ( portSTACK_TYPE ) ( usAddress & ( unsigned short ) 0x00ff ); | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x26; /* R26 X */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x27; /* R27 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x28; /* R28 Y */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x29; /* R29 */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x30; /* R30 Z */ | |
pxTopOfStack--; | |
*pxTopOfStack = ( portSTACK_TYPE ) 0x031; /* R31 */ | |
pxTopOfStack--; | |
/*lint +e950 +e611 +e923 */ | |
return pxTopOfStack; | |
} | |
/*-----------------------------------------------------------*/ | |
portBASE_TYPE xPortStartScheduler( void ) | |
{ | |
/* Setup the hardware to generate the tick. */ | |
prvSetupTimerInterrupt(); | |
/* Restore the context of the first task that is going to run. */ | |
portRESTORE_CONTEXT(); | |
/* Simulate a function call end as generated by the compiler. We will now | |
jump to the start of the task the context of which we have just restored. */ | |
asm volatile ( "ret" ); | |
/* Should not get here. */ | |
return pdTRUE; | |
} | |
/*-----------------------------------------------------------*/ | |
void vPortEndScheduler( void ) | |
{ | |
/* It is unlikely that the AVR port will get stopped. If required simply | |
disable the tick interrupt here. */ | |
} | |
/*-----------------------------------------------------------*/ | |
/* | |
* Manual context switch. The first thing we do is save the registers so we | |
* can use a naked attribute. | |
*/ | |
void vPortYield( void ) __attribute__ ( ( naked ) ); | |
void vPortYield( void ) | |
{ | |
portSAVE_CONTEXT(); | |
vTaskSwitchContext(); | |
portRESTORE_CONTEXT(); | |
asm volatile ( "ret" ); | |
} | |
/*-----------------------------------------------------------*/ | |
/* | |
* Context switch function used by the tick. This must be identical to | |
* vPortYield() from the call to vTaskSwitchContext() onwards. The only | |
* difference from vPortYield() is the tick count is incremented as the | |
* call comes from the tick ISR. | |
*/ | |
void vPortYieldFromTick( void ) __attribute__ ( ( naked ) ); | |
void vPortYieldFromTick( void ) | |
{ | |
portSAVE_CONTEXT(); | |
vTaskIncrementTick(); | |
vTaskSwitchContext(); | |
portRESTORE_CONTEXT(); | |
asm volatile ( "ret" ); | |
} | |
/*-----------------------------------------------------------*/ | |
/* | |
* Setup timer 1 compare match A to generate a tick interrupt. | |
*/ | |
static void prvSetupTimerInterrupt( void ) | |
{ | |
unsigned long ulCompareMatch; | |
unsigned char ucHighByte, ucLowByte; | |
/* Using 16bit timer 1 to generate the tick. Correct fuses must be | |
selected for the configCPU_CLOCK_HZ clock. */ | |
ulCompareMatch = configCPU_CLOCK_HZ / configTICK_RATE_HZ; | |
/* We only have 16 bits so have to scale to get our required tick rate. */ | |
ulCompareMatch /= portCLOCK_PRESCALER; | |
/* Adjust for correct value. */ | |
ulCompareMatch -= ( unsigned long ) 1; | |
/* Setup compare match value for compare match A. Interrupts are disabled | |
before this is called so we need not worry here. */ | |
ucLowByte = ( unsigned char ) ( ulCompareMatch & ( unsigned long ) 0xff ); | |
ulCompareMatch >>= 8; | |
ucHighByte = ( unsigned char ) ( ulCompareMatch & ( unsigned long ) 0xff ); | |
OCR1AH = ucHighByte; | |
OCR1AL = ucLowByte; | |
/* Setup clock source and compare match behaviour. */ | |
ucLowByte = portCLEAR_COUNTER_ON_MATCH | portPRESCALE_64; | |
TCCR1B = ucLowByte; | |
/* Enable the interrupt - this is okay as interrupt are currently globally | |
disabled. */ | |
ucLowByte = TIMSK; | |
ucLowByte |= portCOMPARE_MATCH_A_INTERRUPT_ENABLE; | |
TIMSK = ucLowByte; | |
} | |
/*-----------------------------------------------------------*/ | |
#if configUSE_PREEMPTION == 1 | |
/* | |
* Tick ISR for preemptive scheduler. We can use a naked attribute as | |
* the context is saved at the start of vPortYieldFromTick(). The tick | |
* count is incremented after the context is saved. | |
*/ | |
void SIG_OUTPUT_COMPARE1A( void ) __attribute__ ( ( signal, naked ) ); | |
void SIG_OUTPUT_COMPARE1A( void ) | |
{ | |
vPortYieldFromTick(); | |
asm volatile ( "reti" ); | |
} | |
#else | |
/* | |
* Tick ISR for the cooperative scheduler. All this does is increment the | |
* tick count. We don't need to switch context, this can only be done by | |
* manual calls to taskYIELD(); | |
*/ | |
void SIG_OUTPUT_COMPARE1A( void ) __attribute__ ( ( signal ) ); | |
void SIG_OUTPUT_COMPARE1A( void ) | |
{ | |
vTaskIncrementTick(); | |
} | |
#endif | |