git.sur5r.net Git - freertos/blob - Demo/ARM7_AT91SAM7X256_Eclipse/RTOSDemo/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!  Why not get us to quote to get FreeRTOS.org               *\r
  30         * running on your hardware - or even write all or part of your application*\r
  31         * for you?  See http://www.OpenRTOS.com for details.                                      *\r
  32         *                                                                                                                                                 *\r
  33         ***************************************************************************\r
  34         ***************************************************************************\r
  35 \r
  36         Please ensure to read the configuration and relevant port sections of the\r
  37         online documentation.\r
  38 \r
  39         http://www.FreeRTOS.org - Documentation, latest information, license and \r
  40         contact details.\r
  41 \r
  42         http://www.SafeRTOS.com - A version that is certified for use in safety \r
  43         critical systems.\r
  44 \r
  45         http://www.OpenRTOS.com - Commercial support, development, porting, \r
  46         licensing and training services.\r
  47 */\r
  48 \r
  49 /* Scheduler includes. */\r
  50 #include "FreeRTOS.h"\r
  51 \r
  52 /* Demo application includes. */\r
  53 #include "partest.h"\r
  54 \r
  55 /*-----------------------------------------------------------\r
  56  * Simple parallel port IO routines for the LED's.  LED's can be set, cleared\r
  57  * or toggled.\r
  58  *-----------------------------------------------------------*/\r
  59 \r
  60 #define partstNUM_LEDS          ( 4 )\r
  61 #define partstALL_LEDS          ( ulLED_Mask[ 0 ] | ulLED_Mask[ 1 ] | ulLED_Mask[ 2 ] | ulLED_Mask[ 3 ] )\r
  62 const unsigned portLONG         ulLED_Mask[ partstNUM_LEDS ]= { (1<<19), (1<<20), (1<<21), (1<<22) };\r
  63 \r
  64 \r
  65 void vParTestInitialise( void )\r
  66 {       \r
  67         /* Configure the PIO Lines corresponding to LED1 to LED4 to be outputs. */\r
  68         AT91C_BASE_PIOB->PIO_PER = partstALL_LEDS; \r
  69         AT91C_BASE_PIOB->PIO_OER = partstALL_LEDS; \r
  70 \r
  71         /* Start with all LED's off. */\r
  72     AT91C_BASE_PIOB->PIO_SODR = partstALL_LEDS;\r
  73 }\r
  74 /*-----------------------------------------------------------*/\r
  75 \r
  76 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  77 {\r
  78         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
  79         {\r
  80                 if( xValue )\r
  81                 {\r
  82                         AT91C_BASE_PIOB->PIO_SODR = ulLED_Mask[ uxLED ];\r
  83                 }\r
  84                 else\r
  85                 {\r
  86                         AT91C_BASE_PIOB->PIO_CODR = ulLED_Mask[ uxLED ];\r
  87                 }\r
  88         }\r
  89 }\r
  90 /*-----------------------------------------------------------*/\r
  91 \r
  92 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
  93 {\r
  94         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
  95         {\r
  96                 if( AT91C_BASE_PIOB->PIO_PDSR & ulLED_Mask[ uxLED ] )\r
  97                 {\r
  98                         AT91C_BASE_PIOB->PIO_CODR = ulLED_Mask[ uxLED ];\r
  99                 }\r
 100                 else\r
 101                 {\r
 102                         AT91C_BASE_PIOB->PIO_SODR = ulLED_Mask[ uxLED ];\r
 103                 }\r
 104         }\r
 105 }\r
 106 /*-----------------------------------------------------------*/\r
 107 \r
 108 unsigned portBASE_TYPE uxParTestGetLED( void )\r
 109 {\r
 110         /* Return the value of LED DS4 for use by the WEB server. */\r
 111         return !( AT91C_BASE_PIOB->PIO_PDSR & ulLED_Mask[ partstNUM_LEDS - 1 ] );\r
 112 }\r
 113 \r