This repository has been archived on 2023-11-05. You can view files and clone it, but cannot push or open issues or pull requests.
FreeRTOS-Kernel/FreeRTOS/Demo/msp430_IAR/ParTest/ParTest.c

253 lines
9.3 KiB
C
Raw Normal View History

2008-10-26 22:57:40 +08:00
/*
2013-04-18 20:58:17 +08:00
FreeRTOS V7.4.1 - Copyright (C) 2013 Real Time Engineers Ltd.
2012-10-16 20:17:47 +08:00
2013-02-20 02:36:58 +08:00
FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME. PLEASE VISIT
2012-10-16 20:17:47 +08:00
http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
2008-10-26 22:57:40 +08:00
2009-10-13 19:05:41 +08:00
***************************************************************************
* *
* 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! *
* *
2009-10-13 19:05:41 +08:00
***************************************************************************
This file is part of the FreeRTOS distribution.
2008-10-26 22:57:40 +08:00
2009-10-13 19:05:41 +08:00
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
2009-10-13 19:05:41 +08:00
Free Software Foundation AND MODIFIED BY the FreeRTOS exception.
2013-02-20 02:36:58 +08:00
>>>>>>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
2013-02-20 02:36:58 +08:00
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
2013-04-18 20:58:17 +08:00
and the FreeRTOS license exception along with FreeRTOS; if not it can be
2013-02-20 02:36:58 +08:00
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.
2009-03-15 03:20:12 +08:00
1 tab == 4 spaces!
2013-02-20 02:36:58 +08:00
2012-05-09 01:35:44 +08:00
***************************************************************************
* *
* Having a problem? Start by reading the FAQ "My application does *
2012-10-16 20:17:47 +08:00
* not run, what could be wrong?" *
2012-05-09 01:35:44 +08:00
* *
* http://www.FreeRTOS.org/FAQHelp.html *
* *
***************************************************************************
2008-10-26 22:57:40 +08:00
2013-02-20 02:36:58 +08:00
http://www.FreeRTOS.org - Documentation, books, training, latest versions,
license and Real Time Engineers Ltd. contact details.
2012-05-09 01:35:44 +08:00
http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
2013-02-20 02:36:58 +08:00
including FreeRTOS+Trace - an indispensable productivity tool, and our new
fully thread aware and reentrant UDP/IP stack.
2008-10-26 22:57:40 +08:00
2013-02-20 02:36:58 +08:00
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.
2008-10-26 22:57:40 +08:00
*/
/*-----------------------------------------------------------
* Characters on the LCD are used to simulate LED's. In this case the 'ParTest'
* is really operating on the LCD display.
*-----------------------------------------------------------*/
/*
* This demo is configured to execute on the ES449 prototyping board from
* SoftBaugh. The ES449 has a built in LCD display and a single built in user
* LED. Therefore, in place of flashing an LED, the 'flash' and 'check' tasks
* toggle '*' characters on the LCD. The left most '*' represents LED 0, the
* next LED 1, etc.
*
* There is a single genuine on board LED referenced as LED 10.
*/
/* Scheduler includes. */
#include "FreeRTOS.h"
#include "task.h"
/* Demo application includes. */
#include "partest.h"
/* Constants required to setup the LCD. */
#define LCD_DIV_64 5
/* Constants required to access the "LED's". The LED segments are turned on
and off to generate '*' characters. */
#define partstNUM_LEDS ( ( unsigned portCHAR ) 6 )
#define partstSEGMENTS_ON ( ( unsigned portCHAR ) 0x0f )
#define partstSEGMENTS_OFF ( ( unsigned portCHAR ) 0x00 )
/* The LED number of the real on board LED, rather than a simulated LED. */
#define partstON_BOARD_LED ( ( unsigned portBASE_TYPE ) 10 )
#define mainON_BOARD_LED_BIT ( ( unsigned portCHAR ) 0x01 )
/* The LCD segments used to generate the '*' characters for LED's 0 to 5. */
unsigned portCHAR * const ucRHSSegments[ partstNUM_LEDS ] = { ( unsigned portCHAR * )0xa4,
( unsigned portCHAR * )0xa2,
( unsigned portCHAR * )0xa0,
( unsigned portCHAR * )0x9e,
( unsigned portCHAR * )0x9c,
( unsigned portCHAR * )0x9a };
unsigned portCHAR * const ucLHSSegments[ partstNUM_LEDS ] = { ( unsigned portCHAR * )0xa3,
( unsigned portCHAR * )0xa1,
( unsigned portCHAR * )0x9f,
( unsigned portCHAR * )0x9d,
( unsigned portCHAR * )0x9b,
( unsigned portCHAR * )0x99 };
/*
* Toggle the single genuine built in LED.
*/
static void prvToggleOnBoardLED( void );
/*-----------------------------------------------------------*/
void vParTestInitialise( void )
{
/* Initialise the LCD hardware. */
/* Used for the onboard LED. */
P1DIR = 0x01;
// Setup Basic Timer for LCD operation
BTCTL = (LCD_DIV_64+0x23);
// Setup port functions
P1SEL = 0x32;
P2SEL = 0x00;
P3SEL = 0x00;
P4SEL = 0xFC;
P5SEL = 0xFF;
/* Initialise all segments to off. */
LCDM1 = partstSEGMENTS_OFF;
LCDM2 = partstSEGMENTS_OFF;
LCDM3 = partstSEGMENTS_OFF;
LCDM4 = partstSEGMENTS_OFF;
LCDM5 = partstSEGMENTS_OFF;
LCDM6 = partstSEGMENTS_OFF;
LCDM7 = partstSEGMENTS_OFF;
LCDM8 = partstSEGMENTS_OFF;
LCDM9 = partstSEGMENTS_OFF;
LCDM10 = partstSEGMENTS_OFF;
LCDM11 = partstSEGMENTS_OFF;
LCDM12 = partstSEGMENTS_OFF;
LCDM13 = partstSEGMENTS_OFF;
LCDM14 = partstSEGMENTS_OFF;
LCDM15 = partstSEGMENTS_OFF;
LCDM16 = partstSEGMENTS_OFF;
LCDM17 = partstSEGMENTS_OFF;
LCDM18 = partstSEGMENTS_OFF;
LCDM19 = partstSEGMENTS_OFF;
LCDM20 = partstSEGMENTS_OFF;
/* Setup LCD control. */
LCDCTL = (LCDSG0_7|LCD4MUX|LCDON);
}
/*-----------------------------------------------------------*/
void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )
{
/* Set or clear the output [in this case show or hide the '*' character. */
if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )
{
vTaskSuspendAll();
{
if( xValue )
{
/* Turn on the segments required to show the '*'. */
*( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;
*( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;
}
else
{
/* Turn off all the segments. */
*( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;
*( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;
}
}
xTaskResumeAll();
}
}
/*-----------------------------------------------------------*/
void vParTestToggleLED( unsigned portBASE_TYPE uxLED )
{
if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )
{
vTaskSuspendAll();
{
/* If the '*' is already showing - hide it. If it is not already
showing then show it. */
if( *( ucRHSSegments[ uxLED ] ) )
{
*( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;
*( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;
}
else
{
*( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;
*( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;
}
}
xTaskResumeAll();
}
else
{
if( uxLED == partstON_BOARD_LED )
{
/* The request related to the genuine on board LED. */
prvToggleOnBoardLED();
}
}
}
/*-----------------------------------------------------------*/
static void prvToggleOnBoardLED( void )
{
static unsigned portSHORT sState = pdFALSE;
/* Toggle the state of the single genuine on board LED. */
if( sState )
{
P1OUT |= mainON_BOARD_LED_BIT;
}
else
{
P1OUT &= ~mainON_BOARD_LED_BIT;
}
sState = !sState;
}
/*-----------------------------------------------------------*/