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

   1 /*\r
   2         FreeRTOS.org V4.8.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 /* \r
  51 Changes from V2.0.0\r
  52 \r
  53         + Use scheduler suspends in place of critical sections.\r
  54 */\r
  55 \r
  56 #include "FreeRTOS.h"\r
  57 #include "task.h"\r
  58 #include "partest.h"\r
  59 \r
  60 /*-----------------------------------------------------------\r
  61  * Simple parallel port IO routines for the FED 40pin demo board.\r
  62  * The four LED's are connected to D4 to D7.\r
  63  *-----------------------------------------------------------*/\r
  64 \r
  65 #define partstBIT_AS_OUTPUT                     ( ( unsigned portSHORT ) 0 )\r
  66 #define partstSET_OUTPUT                        ( ( unsigned portSHORT ) 1 )\r
  67 #define partstCLEAR_OUTPUT                      ( ( unsigned portSHORT ) 0 )\r
  68 \r
  69 #define partstENABLE_GENERAL_IO         ( ( unsigned portCHAR ) 7 )\r
  70 \r
  71 /*-----------------------------------------------------------*/\r
  72 \r
  73 void vParTestInitialise( void )\r
  74 {\r
  75         /* Set the top four bits of port D to output. */\r
  76         TRISDbits.TRISD7 = partstBIT_AS_OUTPUT;\r
  77         TRISDbits.TRISD6 = partstBIT_AS_OUTPUT;\r
  78         TRISDbits.TRISD5 = partstBIT_AS_OUTPUT;\r
  79         TRISDbits.TRISD4 = partstBIT_AS_OUTPUT;\r
  80 \r
  81         /* Start with all bits off. */\r
  82         PORTDbits.RD7 = partstCLEAR_OUTPUT;\r
  83         PORTDbits.RD6 = partstCLEAR_OUTPUT;\r
  84         PORTDbits.RD5 = partstCLEAR_OUTPUT;\r
  85         PORTDbits.RD4 = partstCLEAR_OUTPUT;\r
  86 \r
  87         /* Enable the driver. */\r
  88         ADCON1 = partstENABLE_GENERAL_IO;\r
  89         TRISEbits.TRISE2 = partstBIT_AS_OUTPUT;\r
  90         PORTEbits.RE2 = partstSET_OUTPUT;       \r
  91 }\r
  92 /*-----------------------------------------------------------*/\r
  93 \r
  94 void vParTestSetLED( unsigned portBASE_TYPE uxLED, portBASE_TYPE xValue )\r
  95 {\r
  96         /* We are only using the top nibble, so LED 0 corresponds to bit 4. */  \r
  97         vTaskSuspendAll();\r
  98         {\r
  99                 switch( uxLED )\r
 100                 {\r
 101                         case 3  :       PORTDbits.RD7 = ( portSHORT ) xValue;\r
 102                                                 break;\r
 103                         case 2  :       PORTDbits.RD6 = ( portSHORT ) xValue;\r
 104                                                 break;\r
 105                         case 1  :       PORTDbits.RD5 = ( portSHORT ) xValue;\r
 106                                                 break;\r
 107                         case 0  :       PORTDbits.RD4 = ( portSHORT ) xValue;\r
 108                                                 break;\r
 109                         default :       /* There are only 4 LED's. */\r
 110                                                 break;\r
 111                 }\r
 112         }\r
 113         xTaskResumeAll();\r
 114 }\r
 115 /*-----------------------------------------------------------*/\r
 116 \r
 117 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 118 {\r
 119         /* We are only using the top nibble, so LED 0 corresponds to bit 4. */  \r
 120         vTaskSuspendAll();\r
 121         {\r
 122                 switch( uxLED )\r
 123                 {\r
 124                         case 3  :       PORTDbits.RD7 = !( PORTDbits.RD7 );\r
 125                                                 break;\r
 126                         case 2  :       PORTDbits.RD6 = !( PORTDbits.RD6 );\r
 127                                                 break;\r
 128                         case 1  :       PORTDbits.RD5 = !( PORTDbits.RD5 );\r
 129                                                 break;\r
 130                         case 0  :       PORTDbits.RD4 = !( PORTDbits.RD4 );\r
 131                                                 break;\r
 132                         default :       /* There are only 4 LED's. */\r
 133                                                 break;\r
 134                 }\r
 135         }\r
 136         xTaskResumeAll();\r
 137 }\r
 138 \r
 139 \r
 140 \r