]> begriffs open source - freertos/blob - 20080217/Demo/PIC32MX_MPLAB/ParTest/ParTest.c
Prepare Fujitsu ports for release.
[freertos] / 20080217 / Demo / PIC32MX_MPLAB / ParTest / ParTest.c
1 /*\r
2         FreeRTOS.org V4.7.1 - Copyright (C) 2003-2008 Richard Barry.\r
3 \r
4         This file is part of the FreeRTOS.org distribution.\r
5 \r
6         FreeRTOS.org is free software; you can redistribute it and/or modify\r
7         it under the terms of the GNU General Public License as published by\r
8         the Free Software Foundation; either version 2 of the License, or\r
9         (at your option) any later version.\r
10 \r
11         FreeRTOS.org is distributed in the hope that it will be useful,\r
12         but WITHOUT ANY WARRANTY; without even the implied warranty of\r
13         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
14         GNU General Public License for more details.\r
15 \r
16         You should have received a copy of the GNU General Public License\r
17         along with FreeRTOS.org; if not, write to the Free Software\r
18         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
19 \r
20         A special exception to the GPL can be applied should you wish to distribute\r
21         a combined work that includes FreeRTOS.org, without being obliged to provide\r
22         the source code for any proprietary components.  See the licensing section \r
23         of http://www.FreeRTOS.org for full details of how and when the exception\r
24         can be applied.\r
25 \r
26         ***************************************************************************\r
27 \r
28         Please ensure to read the configuration and relevant port sections of the \r
29         online documentation.\r
30 \r
31         +++ http://www.FreeRTOS.org +++\r
32         Documentation, latest information, license and contact details.  \r
33 \r
34         +++ http://www.SafeRTOS.com +++\r
35         A version that is certified for use in safety critical systems.\r
36 \r
37         +++ http://www.OpenRTOS.com +++\r
38         Commercial support, development, porting, licensing and training services.\r
39 \r
40         ***************************************************************************\r
41 */\r
42 \r
43 /* Scheduler includes. */\r
44 #include "FreeRTOS.h"\r
45 \r
46 /* Demo app includes. */\r
47 #include "partest.h"\r
48 \r
49 #define ptOUTPUT        0\r
50 #define ptALL_OFF       0\r
51 \r
52 /*-----------------------------------------------------------\r
53  * Simple parallel port IO routines.\r
54  *-----------------------------------------------------------*/\r
55 \r
56 void vParTestInitialise( void )\r
57 {\r
58         /* All LEDs output. */  \r
59         TRISA = ptOUTPUT;       \r
60         PORTA = ptALL_OFF;\r
61         \r
62         mJTAGPortEnable( 0 );\r
63 }\r
64 /*-----------------------------------------------------------*/\r
65 \r
66 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
67 {\r
68 unsigned portBASE_TYPE uxLEDBit;\r
69 \r
70         /* Which port A bit is being modified? */\r
71         uxLEDBit = 1 << uxLED;\r
72 \r
73         if( xValue )\r
74         {\r
75                 /* Turn the LED on.   Use of the PORTASET register removes the need\r
76                 to use a critical section. */\r
77                 PORTASET = uxLEDBit;\r
78         }\r
79         else\r
80         {\r
81                 /* Turn the LED off.  Use of the PORTACLR register removes the need\r
82                 to use a critical section. */\r
83                 PORTACLR = uxLEDBit;\r
84         }\r
85 }\r
86 /*-----------------------------------------------------------*/\r
87 \r
88 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
89 {\r
90 unsigned portBASE_TYPE uxLEDBit;\r
91         \r
92         uxLEDBit = 1 << uxLED;\r
93 \r
94         /* Use of the PORTAINV register removes the need to use a critical section. */\r
95         PORTAINV = uxLEDBit;\r
96 }\r
97 \r
98 \r
99 \r