begriffs open source - freertos/blob - 20080217/Demo/lwIP_Demo_Rowley_ARM7/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 application includes. */\r
  47 #include "partest.h"\r
  48 \r
  49 /* Hardware specific includes. */\r
  50 #include "Board.h"\r
  51 \r
  52 \r
  53 /*-----------------------------------------------------------\r
  54  * Simple parallel port IO routines for the LED's.  LED's can be set, cleared\r
  55  * or toggled.\r
  56  *-----------------------------------------------------------*/\r
  57 const unsigned portLONG ulLED_MASK[ NB_LED ]= { LED1, LED2, LED3, LED4 };\r
  58 \r
  59 void vParTestInitialise( void )\r
  60 {       \r
  61         /* Start with all LED's off. */\r
  62     AT91C_BASE_PIOB->PIO_SODR = LED_MASK;\r
  63 }\r
  64 /*-----------------------------------------------------------*/\r
  65 \r
  66 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  67 {\r
  68         if( uxLED < ( portBASE_TYPE ) NB_LED )\r
  69         {\r
  70                 if( xValue )\r
  71                 {\r
  72                         AT91C_BASE_PIOB->PIO_SODR = ulLED_MASK[ uxLED ];\r
  73                 }\r
  74                 else\r
  75                 {\r
  76                         AT91C_BASE_PIOB->PIO_CODR = ulLED_MASK[ uxLED ];\r
  77                 }\r
  78         }\r
  79 }\r
  80 /*-----------------------------------------------------------*/\r
  81 \r
  82 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
  83 {\r
  84         if( uxLED < ( portBASE_TYPE ) NB_LED )\r
  85         {\r
  86                 if( AT91C_BASE_PIOB->PIO_PDSR & ulLED_MASK[ uxLED ] )\r
  87                 {\r
  88                         AT91C_BASE_PIOB->PIO_CODR = ulLED_MASK[ uxLED ];\r
  89                 }\r
  90                 else\r
  91                 {\r
  92                         AT91C_BASE_PIOB->PIO_SODR = ulLED_MASK[ uxLED ];\r
  93                 }\r
  94         }\r
  95 }\r
  96 \r