git.sur5r.net Git - freertos/blob - Demo/ColdFire_MCF52233_Eclipse/RTOSDemo/ParTest/ParTest.c

   1 /*\r
   2         FreeRTOS.org V5.1.2 - Copyright (C) 2003-2009 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     *                                                                         *\r
  29     * Get the FreeRTOS eBook!  See http://www.FreeRTOS.org/Documentation      *\r
  30         *                                                                         *\r
  31         * This is a concise, step by step, 'hands on' guide that describes both   *\r
  32         * general multitasking concepts and FreeRTOS specifics. It presents and   *\r
  33         * explains numerous examples that are written using the FreeRTOS API.     *\r
  34         * Full source code for all the examples is provided in an accompanying    *\r
  35         * .zip file.                                                              *\r
  36     *                                                                         *\r
  37     ***************************************************************************\r
  38     ***************************************************************************\r
  39 \r
  40         Please ensure to read the configuration and relevant port sections of the\r
  41         online documentation.\r
  42 \r
  43         http://www.FreeRTOS.org - Documentation, latest information, license and\r
  44         contact details.\r
  45 \r
  46         http://www.SafeRTOS.com - A version that is certified for use in safety\r
  47         critical systems.\r
  48 \r
  49         http://www.OpenRTOS.com - Commercial support, development, porting,\r
  50         licensing and training services.\r
  51 */\r
  52 \r
  53 #include "FreeRTOS.h"\r
  54 #include "task.h"\r
  55 #include "partest.h"\r
  56 \r
  57 #define partstNUM_LEDs  4\r
  58 \r
  59 /*-----------------------------------------------------------\r
  60  * Simple parallel port IO routines.\r
  61  *-----------------------------------------------------------*/\r
  62 \r
  63 void vParTestInitialise( void )\r
  64 {\r
  65     /* Ensure LED outputs are set to GPIO */\r
  66     MCF_GPIO_PTCPAR = MCF_GPIO_PTCPAR_DTIN3_GPIO | MCF_GPIO_PTCPAR_DTIN2_GPIO | MCF_GPIO_PTCPAR_DTIN1_GPIO | MCF_GPIO_PTCPAR_DTIN0_GPIO;\r
  67 \r
  68     /* Set GPIO to outputs. */\r
  69     MCF_GPIO_DDRTC = MCF_GPIO_DDRTC_DDRTC3 | MCF_GPIO_DDRTC_DDRTC2 | MCF_GPIO_DDRTC_DDRTC1 | MCF_GPIO_DDRTC_DDRTC0;\r
  70 \r
  71     /* Start with all LEDs off. */\r
  72         MCF_GPIO_PORTTC = 0x00;\r
  73 }\r
  74 /*-----------------------------------------------------------*/\r
  75 \r
  76 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  77 {\r
  78         if( uxLED < partstNUM_LEDs )\r
  79         {\r
  80                 if( xValue != 0 )\r
  81                 {\r
  82                         taskENTER_CRITICAL();\r
  83                                 MCF_GPIO_PORTTC |= ( 1 << uxLED );\r
  84                         taskEXIT_CRITICAL();\r
  85                 }\r
  86                 else\r
  87                 {\r
  88                         taskENTER_CRITICAL();\r
  89                                 MCF_GPIO_PORTTC &= ~( 1 << uxLED );\r
  90                         taskEXIT_CRITICAL();\r
  91                 }\r
  92         }\r
  93 }\r
  94 /*-----------------------------------------------------------*/\r
  95 \r
  96 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
  97 {\r
  98         if( uxLED < partstNUM_LEDs )\r
  99         {\r
 100                 taskENTER_CRITICAL();\r
 101                 {\r
 102                         if( ( MCF_GPIO_PORTTC & ( 1 << uxLED ) ) == ( unsigned portCHAR ) 0 )\r
 103                         {\r
 104                                 MCF_GPIO_PORTTC |= ( 1 << uxLED );\r
 105                         }\r
 106                         else\r
 107                         {\r
 108                                 MCF_GPIO_PORTTC &= ~( 1 << uxLED );\r
 109                         }\r
 110                 }\r
 111                 taskEXIT_CRITICAL();\r
 112         }\r
 113 }\r
 114 /*-----------------------------------------------------------*/\r
 115 \r
 116 unsigned portBASE_TYPE uxParTestGetLED( unsigned portBASE_TYPE uxLED )\r
 117 {\r
 118 unsigned portBASE_TYPE uxReturn = pdFALSE;\r
 119 \r
 120         if( uxLED < partstNUM_LEDs )\r
 121         {\r
 122                 if( ( MCF_GPIO_PORTTC & ( 1 << uxLED ) ) != 0 )\r
 123                 {\r
 124                         uxReturn = pdTRUE;\r
 125                 }\r
 126         }\r
 127 \r
 128         return uxReturn;\r
 129 }\r
 130 \r
 131 \r
 132 \r