begriffs open source - freertos/blob - Demo/dsPIC_MPLAB/ParTest/ParTest.c

   1 /*\r
   2         FreeRTOS.org V5.1.0 - 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     *                                                                         *\r
  29     * SAVE TIME AND MONEY!  We can port FreeRTOS.org to your own hardware,    *\r
  30     * and even write all or part of your application on your behalf.          *\r
  31     * See http://www.OpenRTOS.com for details of the services we provide to   *\r
  32     * expedite your project.                                                  *\r
  33     *                                                                         *\r
  34     ***************************************************************************\r
  35     ***************************************************************************\r
  36 \r
  37         Please ensure to read the configuration and relevant port sections of the\r
  38         online documentation.\r
  39 \r
  40         http://www.FreeRTOS.org - Documentation, latest information, license and \r
  41         contact details.\r
  42 \r
  43         http://www.SafeRTOS.com - A version that is certified for use in safety \r
  44         critical systems.\r
  45 \r
  46         http://www.OpenRTOS.com - Commercial support, development, porting, \r
  47         licensing and training services.\r
  48 */\r
  49 \r
  50 /* Scheduler includes. */\r
  51 #include "FreeRTOS.h"\r
  52 \r
  53 /* Demo app includes. */\r
  54 #include "partest.h"\r
  55 \r
  56 #define ptOUTPUT        0\r
  57 #define ptALL_OFF       0\r
  58 \r
  59 unsigned portBASE_TYPE uxOutput;\r
  60 \r
  61 /*-----------------------------------------------------------\r
  62  * Simple parallel port IO routines.\r
  63  *-----------------------------------------------------------*/\r
  64 \r
  65 void vParTestInitialise( void )\r
  66 {\r
  67         /* The explorer 16 board has LED's on port A.  All bits are set as output\r
  68         so PORTA is read-modified-written directly.  Two pins have change \r
  69         notification pullups that need disabling. */\r
  70         CNPU2bits.CN22PUE = 0;\r
  71         CNPU2bits.CN23PUE = 0;\r
  72         TRISA = ptOUTPUT;\r
  73         PORTA = ptALL_OFF;\r
  74         uxOutput = ptALL_OFF;\r
  75 }\r
  76 /*-----------------------------------------------------------*/\r
  77 \r
  78 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  79 {\r
  80 unsigned portBASE_TYPE uxLEDBit;\r
  81 \r
  82         /* Which port A bit is being modified? */\r
  83         uxLEDBit = 1 << uxLED;\r
  84 \r
  85         if( xValue )\r
  86         {\r
  87                 /* Turn the LED on. */\r
  88                 portENTER_CRITICAL();\r
  89                 {\r
  90                         uxOutput |= uxLEDBit;\r
  91                         PORTA = uxOutput;\r
  92                 }\r
  93                 portEXIT_CRITICAL();\r
  94         }\r
  95         else\r
  96         {\r
  97                 /* Turn the LED off. */\r
  98                 portENTER_CRITICAL();\r
  99                 {\r
 100                         uxOutput &= ~uxLEDBit;\r
 101                         PORTA = uxOutput;\r
 102                 }\r
 103                 portEXIT_CRITICAL();\r
 104         }\r
 105 }\r
 106 /*-----------------------------------------------------------*/\r
 107 \r
 108 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 109 {\r
 110 unsigned portBASE_TYPE uxLEDBit;\r
 111 \r
 112         uxLEDBit = 1 << uxLED;\r
 113         portENTER_CRITICAL();\r
 114         {\r
 115                 /* If the LED is already on - turn it off.  If the LED is already\r
 116                 off, turn it on. */\r
 117                 if( uxOutput & uxLEDBit )\r
 118                 {\r
 119                         uxOutput &= ~uxLEDBit;\r
 120                         PORTA = uxOutput;\r
 121                 }\r
 122                 else\r
 123                 {\r
 124                         uxOutput |= uxLEDBit;\r
 125                         PORTA = uxOutput;\r
 126                 }\r
 127         }\r
 128         portEXIT_CRITICAL();\r
 129 }\r
 130 \r