mirror of
https://github.com/FreeRTOS/FreeRTOS-Kernel.git
synced 2025-06-07 04:49:04 -04:00
Check in RL78 GCC port layer now it has been verified with the fixed compiler.
This commit is contained in:
Richard Barry
parent
5cbab67186
commit
9efb5c8b2f
164
FreeRTOS/Source/portable/GCC/RL78/isr_support.h
Normal file
164
FreeRTOS/Source/portable/GCC/RL78/isr_support.h
Normal file
|
|
@ -0,0 +1,164 @@
|
||||||
|
/*
|
||||||
|
FreeRTOS V8.0.1 - Copyright (C) 2014 Real Time Engineers Ltd.
|
||||||
|
All rights reserved
|
||||||
|
|
||||||
|
VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
||||||
|
|
||||||
|
***************************************************************************
|
||||||
|
* *
|
||||||
|
* FreeRTOS provides completely free yet professionally developed, *
|
||||||
|
* robust, strictly quality controlled, supported, and cross *
|
||||||
|
* platform software that has become a de facto standard. *
|
||||||
|
* *
|
||||||
|
* Help yourself get started quickly and support the FreeRTOS *
|
||||||
|
* project by purchasing a FreeRTOS tutorial book, reference *
|
||||||
|
* manual, or both from: http://www.FreeRTOS.org/Documentation *
|
||||||
|
* *
|
||||||
|
* Thank you! *
|
||||||
|
* *
|
||||||
|
***************************************************************************
|
||||||
|
|
||||||
|
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. Full license text is available from the following
|
||||||
|
link: http://www.freertos.org/a00114.html
|
||||||
|
|
||||||
|
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, a DOS
|
||||||
|
compatible FAT file system, and our tiny thread aware UDP/IP stack.
|
||||||
|
|
||||||
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
||||||
|
Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS
|
||||||
|
licenses offer ticketed support, indemnification and middleware.
|
||||||
|
|
||||||
|
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.
|
||||||
|
|
||||||
|
1 tab == 4 spaces!
|
||||||
|
*/
|
||||||
|
|
||||||
|
/* Variables used by scheduler */
|
||||||
|
.extern _pxCurrentTCB
|
||||||
|
.extern _usCriticalNesting
|
||||||
|
|
||||||
|
/*
|
||||||
|
* portSAVE_CONTEXT MACRO
|
||||||
|
* Saves the context of the general purpose registers, CS and ES (only in far
|
||||||
|
* memory mode) registers the usCriticalNesting Value and the Stack Pointer
|
||||||
|
* of the active Task onto the task stack
|
||||||
|
*/
|
||||||
|
.macro portSAVE_CONTEXT
|
||||||
|
|
||||||
|
SEL RB0
|
||||||
|
|
||||||
|
/* Save AX Register to stack. */
|
||||||
|
PUSH AX
|
||||||
|
PUSH HL
|
||||||
|
/* Save CS register. */
|
||||||
|
MOV A, CS
|
||||||
|
XCH A, X
|
||||||
|
/* Save ES register. */
|
||||||
|
MOV A, ES
|
||||||
|
PUSH AX
|
||||||
|
/* Save the remaining general purpose registers from bank 0. */
|
||||||
|
PUSH DE
|
||||||
|
PUSH BC
|
||||||
|
/* Save the other register banks - only necessary in the GCC port. */
|
||||||
|
SEL RB1
|
||||||
|
PUSH AX
|
||||||
|
PUSH BC
|
||||||
|
PUSH DE
|
||||||
|
PUSH HL
|
||||||
|
SEL RB2
|
||||||
|
PUSH AX
|
||||||
|
PUSH BC
|
||||||
|
PUSH DE
|
||||||
|
PUSH HL
|
||||||
|
/* Registers in bank 3 are for ISR use only so don't need saving. */
|
||||||
|
SEL RB0
|
||||||
|
/* Save the usCriticalNesting value. */
|
||||||
|
MOVW AX, !_usCriticalNesting
|
||||||
|
PUSH AX
|
||||||
|
/* Save the Stack pointer. */
|
||||||
|
MOVW AX, !_pxCurrentTCB
|
||||||
|
MOVW HL, AX
|
||||||
|
MOVW AX, SP
|
||||||
|
MOVW [HL], AX
|
||||||
|
/* Switch stack pointers. */
|
||||||
|
movw sp,#_stack /* Set stack pointer */
|
||||||
|
|
||||||
|
.endm
|
||||||
|
|
||||||
|
|
||||||
|
/*
|
||||||
|
* portRESTORE_CONTEXT MACRO
|
||||||
|
* Restores the task Stack Pointer then use this to restore usCriticalNesting,
|
||||||
|
* general purpose registers and the CS and ES (only in far memory mode)
|
||||||
|
* of the selected task from the task stack
|
||||||
|
*/
|
||||||
|
.macro portRESTORE_CONTEXT MACRO
|
||||||
|
SEL RB0
|
||||||
|
/* Restore the Stack pointer. */
|
||||||
|
MOVW AX, !_pxCurrentTCB
|
||||||
|
MOVW HL, AX
|
||||||
|
MOVW AX, [HL]
|
||||||
|
MOVW SP, AX
|
||||||
|
/* Restore usCriticalNesting value. */
|
||||||
|
POP AX
|
||||||
|
MOVW !_usCriticalNesting, AX
|
||||||
|
/* Restore the alternative register banks - only necessary in the GCC
|
||||||
|
port. Register bank 3 is dedicated for interrupts use so is not saved or
|
||||||
|
restored. */
|
||||||
|
SEL RB2
|
||||||
|
POP HL
|
||||||
|
POP DE
|
||||||
|
POP BC
|
||||||
|
POP AX
|
||||||
|
SEL RB1
|
||||||
|
POP HL
|
||||||
|
POP DE
|
||||||
|
POP BC
|
||||||
|
POP AX
|
||||||
|
SEL RB0
|
||||||
|
/* Restore the necessary general purpose registers. */
|
||||||
|
POP BC
|
||||||
|
POP DE
|
||||||
|
/* Restore the ES register. */
|
||||||
|
POP AX
|
||||||
|
MOV ES, A
|
||||||
|
/* Restore the CS register. */
|
||||||
|
XCH A, X
|
||||||
|
MOV CS, A
|
||||||
|
/* Restore general purpose register HL. */
|
||||||
|
POP HL
|
||||||
|
/* Restore AX. */
|
||||||
|
POP AX
|
||||||
|
|
||||||
|
.endm
|
||||||
|
|
||||||
249
FreeRTOS/Source/portable/GCC/RL78/port.c
Normal file
249
FreeRTOS/Source/portable/GCC/RL78/port.c
Normal file
|
|
@ -0,0 +1,249 @@
|
||||||
|
/*
|
||||||
|
FreeRTOS V8.0.1 - Copyright (C) 2014 Real Time Engineers Ltd.
|
||||||
|
All rights reserved
|
||||||
|
|
||||||
|
VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
||||||
|
|
||||||
|
***************************************************************************
|
||||||
|
* *
|
||||||
|
* FreeRTOS provides completely free yet professionally developed, *
|
||||||
|
* robust, strictly quality controlled, supported, and cross *
|
||||||
|
* platform software that has become a de facto standard. *
|
||||||
|
* *
|
||||||
|
* Help yourself get started quickly and support the FreeRTOS *
|
||||||
|
* project by purchasing a FreeRTOS tutorial book, reference *
|
||||||
|
* manual, or both from: http://www.FreeRTOS.org/Documentation *
|
||||||
|
* *
|
||||||
|
* Thank you! *
|
||||||
|
* *
|
||||||
|
***************************************************************************
|
||||||
|
|
||||||
|
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. Full license text is available from the following
|
||||||
|
link: http://www.freertos.org/a00114.html
|
||||||
|
|
||||||
|
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, a DOS
|
||||||
|
compatible FAT file system, and our tiny thread aware UDP/IP stack.
|
||||||
|
|
||||||
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
||||||
|
Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS
|
||||||
|
licenses offer ticketed support, indemnification and middleware.
|
||||||
|
|
||||||
|
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.
|
||||||
|
|
||||||
|
1 tab == 4 spaces!
|
||||||
|
*/
|
||||||
|
|
||||||
|
/* Scheduler includes. */
|
||||||
|
#include "FreeRTOS.h"
|
||||||
|
#include "task.h"
|
||||||
|
|
||||||
|
/* The critical nesting value is initialised to a non zero value to ensure
|
||||||
|
interrupts don't accidentally become enabled before the scheduler is started. */
|
||||||
|
#define portINITIAL_CRITICAL_NESTING ( ( uint16_t ) 10 )
|
||||||
|
|
||||||
|
/* Initial PSW value allocated to a newly created task.
|
||||||
|
* 11000110
|
||||||
|
* ||||||||-------------- Fill byte
|
||||||
|
* |||||||--------------- Carry Flag cleared
|
||||||
|
* |||||----------------- In-service priority Flags set to low level
|
||||||
|
* ||||------------------ Register bank Select 0 Flag cleared
|
||||||
|
* |||------------------- Auxiliary Carry Flag cleared
|
||||||
|
* ||-------------------- Register bank Select 1 Flag cleared
|
||||||
|
* |--------------------- Zero Flag set
|
||||||
|
* ---------------------- Global Interrupt Flag set (enabled)
|
||||||
|
*/
|
||||||
|
#define portPSW ( 0xc6UL )
|
||||||
|
|
||||||
|
/* Each task maintains a count of the critical section nesting depth. Each time
|
||||||
|
a critical section is entered the count is incremented. Each time a critical
|
||||||
|
section is exited the count is decremented - with interrupts only being
|
||||||
|
re-enabled if the count is zero.
|
||||||
|
|
||||||
|
usCriticalNesting will get set to zero when the scheduler starts, but must
|
||||||
|
not be initialised to zero as that could cause problems during the startup
|
||||||
|
sequence. */
|
||||||
|
volatile uint16_t usCriticalNesting = portINITIAL_CRITICAL_NESTING;
|
||||||
|
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Sets up the periodic ISR used for the RTOS tick.
|
||||||
|
*/
|
||||||
|
__attribute__((weak)) void vApplicationSetupTimerInterrupt( void );
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Starts the scheduler by loading the context of the first task to run.
|
||||||
|
* (defined in portasm.S).
|
||||||
|
*/
|
||||||
|
extern void vPortStartFirstTask( void );
|
||||||
|
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Initialise the stack of a task to look exactly as if a call to
|
||||||
|
* portSAVE_CONTEXT had been called.
|
||||||
|
*
|
||||||
|
* See the header file portable.h.
|
||||||
|
*/
|
||||||
|
StackType_t *pxPortInitialiseStack( StackType_t *pxTopOfStack, TaskFunction_t pxCode, void *pvParameters )
|
||||||
|
{
|
||||||
|
uint32_t *pulLocal;
|
||||||
|
|
||||||
|
/* Stack type and pointers to the stack type are both 2 bytes. */
|
||||||
|
|
||||||
|
/* Parameters are passed in on the stack, and written using a 32bit value
|
||||||
|
hence a space is left for the second two bytes. */
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* Write in the parameter value. */
|
||||||
|
pulLocal = ( uint32_t * ) pxTopOfStack;
|
||||||
|
*pulLocal = ( StackType_t ) pvParameters;
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* The return address, leaving space for the first two bytes of the
|
||||||
|
32-bit value. */
|
||||||
|
pxTopOfStack--;
|
||||||
|
pulLocal = ( uint32_t * ) pxTopOfStack;
|
||||||
|
*pulLocal = ( uint32_t ) 0;
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* The start address / PSW value is also written in as a 32bit value,
|
||||||
|
so leave a space for the second two bytes. */
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* Task function start address combined with the PSW. */
|
||||||
|
pulLocal = ( uint32_t * ) pxTopOfStack;
|
||||||
|
*pulLocal = ( ( ( uint32_t ) pxCode ) | ( portPSW << 24UL ) );
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* An initial value for the AX register. */
|
||||||
|
*pxTopOfStack = ( StackType_t ) 0x1111;
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* An initial value for the HL register. */
|
||||||
|
*pxTopOfStack = ( StackType_t ) 0x2222;
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* CS and ES registers. */
|
||||||
|
*pxTopOfStack = ( StackType_t ) 0x0F00;
|
||||||
|
pxTopOfStack--;
|
||||||
|
|
||||||
|
/* The remaining general purpose registers bank 0 (DE and BC) and the other
|
||||||
|
two register banks...register bank 3 is dedicated for use by interrupts so
|
||||||
|
is not saved as part of the task context. */
|
||||||
|
pxTopOfStack -= 10;
|
||||||
|
|
||||||
|
/* Finally the critical section nesting count is set to zero when the task
|
||||||
|
first starts. */
|
||||||
|
*pxTopOfStack = ( StackType_t ) portNO_CRITICAL_SECTION_NESTING;
|
||||||
|
|
||||||
|
/* Return a pointer to the top of the stack that has beene generated so it
|
||||||
|
can be stored in the task control block for the task. */
|
||||||
|
return pxTopOfStack;
|
||||||
|
}
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
portBASE_TYPE xPortStartScheduler( void )
|
||||||
|
{
|
||||||
|
/* Setup the hardware to generate the tick. Interrupts are disabled when
|
||||||
|
this function is called. */
|
||||||
|
vApplicationSetupTimerInterrupt();
|
||||||
|
|
||||||
|
/* Restore the context of the first task that is going to run. */
|
||||||
|
vPortStartFirstTask();
|
||||||
|
|
||||||
|
/* Execution should not reach here as the tasks are now running! */
|
||||||
|
return pdTRUE;
|
||||||
|
}
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
void vPortEndScheduler( void )
|
||||||
|
{
|
||||||
|
/* It is unlikely that the RL78 port will get stopped. */
|
||||||
|
}
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
__attribute__((weak)) void vApplicationSetupTimerInterrupt( void )
|
||||||
|
{
|
||||||
|
const uint16_t usClockHz = 15000UL; /* Internal clock. */
|
||||||
|
const uint16_t usCompareMatch = ( usClockHz / configTICK_RATE_HZ ) + 1UL;
|
||||||
|
|
||||||
|
/* Use the internal 15K clock. */
|
||||||
|
OSMC = ( unsigned char ) 0x16;
|
||||||
|
|
||||||
|
#ifdef RTCEN
|
||||||
|
{
|
||||||
|
/* Supply the interval timer clock. */
|
||||||
|
RTCEN = ( unsigned char ) 1U;
|
||||||
|
|
||||||
|
/* Disable INTIT interrupt. */
|
||||||
|
ITMK = ( unsigned char ) 1;
|
||||||
|
|
||||||
|
/* Disable ITMC operation. */
|
||||||
|
ITMC = ( unsigned char ) 0x0000;
|
||||||
|
|
||||||
|
/* Clear INIT interrupt. */
|
||||||
|
ITIF = ( unsigned char ) 0;
|
||||||
|
|
||||||
|
/* Set interval and enable interrupt operation. */
|
||||||
|
ITMC = usCompareMatch | 0x8000U;
|
||||||
|
|
||||||
|
/* Enable INTIT interrupt. */
|
||||||
|
ITMK = ( unsigned char ) 0;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef TMKAEN
|
||||||
|
{
|
||||||
|
/* Supply the interval timer clock. */
|
||||||
|
TMKAEN = ( unsigned char ) 1U;
|
||||||
|
|
||||||
|
/* Disable INTIT interrupt. */
|
||||||
|
TMKAMK = ( unsigned char ) 1;
|
||||||
|
|
||||||
|
/* Disable ITMC operation. */
|
||||||
|
ITMC = ( unsigned char ) 0x0000;
|
||||||
|
|
||||||
|
/* Clear INIT interrupt. */
|
||||||
|
TMKAIF = ( unsigned char ) 0;
|
||||||
|
|
||||||
|
/* Set interval and enable interrupt operation. */
|
||||||
|
ITMC = usCompareMatch | 0x8000U;
|
||||||
|
|
||||||
|
/* Enable INTIT interrupt. */
|
||||||
|
TMKAMK = ( unsigned char ) 0;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
}
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
118
FreeRTOS/Source/portable/GCC/RL78/portasm.S
Normal file
118
FreeRTOS/Source/portable/GCC/RL78/portasm.S
Normal file
|
|
@ -0,0 +1,118 @@
|
||||||
|
/*
|
||||||
|
FreeRTOS V8.0.1 - Copyright (C) 2014 Real Time Engineers Ltd.
|
||||||
|
All rights reserved
|
||||||
|
|
||||||
|
VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
||||||
|
|
||||||
|
***************************************************************************
|
||||||
|
* *
|
||||||
|
* FreeRTOS provides completely free yet professionally developed, *
|
||||||
|
* robust, strictly quality controlled, supported, and cross *
|
||||||
|
* platform software that has become a de facto standard. *
|
||||||
|
* *
|
||||||
|
* Help yourself get started quickly and support the FreeRTOS *
|
||||||
|
* project by purchasing a FreeRTOS tutorial book, reference *
|
||||||
|
* manual, or both from: http://www.FreeRTOS.org/Documentation *
|
||||||
|
* *
|
||||||
|
* Thank you! *
|
||||||
|
* *
|
||||||
|
***************************************************************************
|
||||||
|
|
||||||
|
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. Full license text is available from the following
|
||||||
|
link: http://www.freertos.org/a00114.html
|
||||||
|
|
||||||
|
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, a DOS
|
||||||
|
compatible FAT file system, and our tiny thread aware UDP/IP stack.
|
||||||
|
|
||||||
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
||||||
|
Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS
|
||||||
|
licenses offer ticketed support, indemnification and middleware.
|
||||||
|
|
||||||
|
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.
|
||||||
|
|
||||||
|
1 tab == 4 spaces!
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include "FreeRTOSConfig.h"
|
||||||
|
#include "ISR_Support.h"
|
||||||
|
|
||||||
|
.global _vPortYield
|
||||||
|
.global _vPortStartFirstTask
|
||||||
|
.global _vPortTickISR
|
||||||
|
|
||||||
|
.extern _vTaskSwitchContext
|
||||||
|
.extern _xTaskIncrementTick
|
||||||
|
|
||||||
|
.text
|
||||||
|
.align 2
|
||||||
|
|
||||||
|
/* FreeRTOS yield handler. This is installed as the BRK software interrupt
|
||||||
|
handler. */
|
||||||
|
_vPortYield:
|
||||||
|
/* Save the context of the current task. */
|
||||||
|
portSAVE_CONTEXT
|
||||||
|
/* Call the scheduler to select the next task. */
|
||||||
|
call !!_vTaskSwitchContext
|
||||||
|
/* Restore the context of the next task to run. */
|
||||||
|
portRESTORE_CONTEXT
|
||||||
|
retb
|
||||||
|
|
||||||
|
|
||||||
|
/* Starts the scheduler by restoring the context of the task that will execute
|
||||||
|
first. */
|
||||||
|
.align 2
|
||||||
|
_vPortStartFirstTask:
|
||||||
|
/* Restore the context of whichever task will execute first. */
|
||||||
|
portRESTORE_CONTEXT
|
||||||
|
/* An interrupt stack frame is used so the task is started using RETI. */
|
||||||
|
reti
|
||||||
|
|
||||||
|
/* FreeRTOS tick handler. This is installed as the interval timer interrupt
|
||||||
|
handler. */
|
||||||
|
.align 2
|
||||||
|
_vPortTickISR:
|
||||||
|
|
||||||
|
/* Save the context of the currently executing task. */
|
||||||
|
portSAVE_CONTEXT
|
||||||
|
/* Call the RTOS tick function. */
|
||||||
|
call !!_xTaskIncrementTick
|
||||||
|
#if configUSE_PREEMPTION == 1
|
||||||
|
/* Select the next task to run. */
|
||||||
|
call !!_vTaskSwitchContext
|
||||||
|
#endif
|
||||||
|
/* Retore the context of whichever task will run next. */
|
||||||
|
portRESTORE_CONTEXT
|
||||||
|
reti
|
||||||
|
|
||||||
|
.end
|
||||||
|
|
||||||
159
FreeRTOS/Source/portable/GCC/RL78/portmacro.h
Normal file
159
FreeRTOS/Source/portable/GCC/RL78/portmacro.h
Normal file
|
|
@ -0,0 +1,159 @@
|
||||||
|
/*
|
||||||
|
FreeRTOS V8.0.1 - Copyright (C) 2014 Real Time Engineers Ltd.
|
||||||
|
All rights reserved
|
||||||
|
|
||||||
|
VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
||||||
|
|
||||||
|
***************************************************************************
|
||||||
|
* *
|
||||||
|
* FreeRTOS provides completely free yet professionally developed, *
|
||||||
|
* robust, strictly quality controlled, supported, and cross *
|
||||||
|
* platform software that has become a de facto standard. *
|
||||||
|
* *
|
||||||
|
* Help yourself get started quickly and support the FreeRTOS *
|
||||||
|
* project by purchasing a FreeRTOS tutorial book, reference *
|
||||||
|
* manual, or both from: http://www.FreeRTOS.org/Documentation *
|
||||||
|
* *
|
||||||
|
* Thank you! *
|
||||||
|
* *
|
||||||
|
***************************************************************************
|
||||||
|
|
||||||
|
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. Full license text is available from the following
|
||||||
|
link: http://www.freertos.org/a00114.html
|
||||||
|
|
||||||
|
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, a DOS
|
||||||
|
compatible FAT file system, and our tiny thread aware UDP/IP stack.
|
||||||
|
|
||||||
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
||||||
|
Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS
|
||||||
|
licenses offer ticketed support, indemnification and middleware.
|
||||||
|
|
||||||
|
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.
|
||||||
|
|
||||||
|
1 tab == 4 spaces!
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef PORTMACRO_H
|
||||||
|
#define PORTMACRO_H
|
||||||
|
|
||||||
|
/*-----------------------------------------------------------
|
||||||
|
* Port specific definitions.
|
||||||
|
*
|
||||||
|
* The settings in this file configure FreeRTOS correctly for the
|
||||||
|
* given hardware and compiler.
|
||||||
|
*
|
||||||
|
* These settings should not be altered.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
*/
|
||||||
|
|
||||||
|
/* Type definitions. */
|
||||||
|
|
||||||
|
#define portCHAR char
|
||||||
|
#define portFLOAT float
|
||||||
|
#define portDOUBLE double
|
||||||
|
#define portLONG long
|
||||||
|
#define portSHORT short
|
||||||
|
#define portSTACK_TYPE uint16_t
|
||||||
|
#define portBASE_TYPE short
|
||||||
|
#define portPOINTER_SIZE_TYPE uint16_t
|
||||||
|
|
||||||
|
typedef portSTACK_TYPE StackType_t;
|
||||||
|
typedef short BaseType_t;
|
||||||
|
typedef unsigned short UBaseType_t;
|
||||||
|
|
||||||
|
#if( configUSE_16_BIT_TICKS == 1 )
|
||||||
|
typedef uint16_t TickType_t;
|
||||||
|
#define portMAX_DELAY ( TickType_t ) 0xffff
|
||||||
|
#else
|
||||||
|
typedef uint32_t TickType_t;
|
||||||
|
#define portMAX_DELAY ( TickType_t ) 0xffffffffUL
|
||||||
|
#endif
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/* Interrupt control macros. */
|
||||||
|
#define portDISABLE_INTERRUPTS() __asm volatile ( "DI" )
|
||||||
|
#define portENABLE_INTERRUPTS() __asm volatile ( "EI" )
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/* Critical section control macros. */
|
||||||
|
#define portNO_CRITICAL_SECTION_NESTING ( ( unsigned short ) 0 )
|
||||||
|
|
||||||
|
#define portENTER_CRITICAL() \
|
||||||
|
{ \
|
||||||
|
extern volatile uint16_t usCriticalNesting; \
|
||||||
|
\
|
||||||
|
portDISABLE_INTERRUPTS(); \
|
||||||
|
\
|
||||||
|
/* Now interrupts are disabled ulCriticalNesting can be accessed */ \
|
||||||
|
/* directly. Increment ulCriticalNesting to keep a count of how many */ \
|
||||||
|
/* times portENTER_CRITICAL() has been called. */ \
|
||||||
|
usCriticalNesting++; \
|
||||||
|
}
|
||||||
|
|
||||||
|
#define portEXIT_CRITICAL() \
|
||||||
|
{ \
|
||||||
|
extern volatile uint16_t usCriticalNesting; \
|
||||||
|
\
|
||||||
|
if( usCriticalNesting > portNO_CRITICAL_SECTION_NESTING ) \
|
||||||
|
{ \
|
||||||
|
/* Decrement the nesting count as we are leaving a critical section. */ \
|
||||||
|
usCriticalNesting--; \
|
||||||
|
\
|
||||||
|
/* If the nesting level has reached zero then interrupts should be */ \
|
||||||
|
/* re-enabled. */ \
|
||||||
|
if( usCriticalNesting == portNO_CRITICAL_SECTION_NESTING ) \
|
||||||
|
{ \
|
||||||
|
portENABLE_INTERRUPTS(); \
|
||||||
|
} \
|
||||||
|
} \
|
||||||
|
}
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/* Task utilities. */
|
||||||
|
#define portYIELD() __asm volatile ( "BRK" )
|
||||||
|
#define portYIELD_FROM_ISR( xHigherPriorityTaskWoken ) if( xHigherPriorityTaskWoken ) vTaskSwitchContext()
|
||||||
|
#define portNOP() __asm volatile ( "NOP" )
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/* Hardwware specifics. */
|
||||||
|
#define portBYTE_ALIGNMENT 2
|
||||||
|
#define portSTACK_GROWTH ( -1 )
|
||||||
|
#define portTICK_PERIOD_MS ( ( TickType_t ) 1000 / configTICK_RATE_HZ )
|
||||||
|
/*-----------------------------------------------------------*/
|
||||||
|
|
||||||
|
/* Task function macros as described on the FreeRTOS.org WEB site. */
|
||||||
|
#define portTASK_FUNCTION_PROTO( vFunction, pvParameters ) void vFunction( void *pvParameters )
|
||||||
|
#define portTASK_FUNCTION( vFunction, pvParameters ) void vFunction( void *pvParameters )
|
||||||
|
|
||||||
|
#endif /* PORTMACRO_H */
|
||||||
|
|
||||||
Loading…
Reference in a new issue