git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/RX100-RSK_IAR/ParTest.c

   1 /*\r
   2  * FreeRTOS Kernel V10.0.0\r
   3  * Copyright (C) 2017 Amazon.com, Inc. or its affiliates.  All Rights Reserved.\r
   4  *\r
   5  * Permission is hereby granted, free of charge, to any person obtaining a copy of\r
   6  * this software and associated documentation files (the "Software"), to deal in\r
   7  * the Software without restriction, including without limitation the rights to\r
   8  * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of\r
   9  * the Software, and to permit persons to whom the Software is furnished to do so,\r
  10  * subject to the following conditions:\r
  11  *\r
  12  * The above copyright notice and this permission notice shall be included in all\r
  13  * copies or substantial portions of the Software. If you wish to use our Amazon\r
  14  * FreeRTOS name, please do so in a fair use way that does not cause confusion.\r
  15  *\r
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS\r
  18  * FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR\r
  19  * COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
  20  * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
  21  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
  22  *\r
  23  * http://www.FreeRTOS.org\r
  24  * http://aws.amazon.com/freertos\r
  25  *\r
  26  * 1 tab == 4 spaces!\r
  27  */\r
  28 \r
  29 /*-----------------------------------------------------------\r
  30  * Simple IO routines to control the LEDs.\r
  31  *-----------------------------------------------------------*/\r
  32 \r
  33 /* Scheduler includes. */\r
  34 #include "FreeRTOS.h"\r
  35 #include "task.h"\r
  36 \r
  37 /* Demo includes. */\r
  38 #include "partest.h"\r
  39 \r
  40 #define partestNUM_LEDS ( 4 )\r
  41 \r
  42 long lParTestGetLEDState( unsigned long ulLED );\r
  43 \r
  44 /*-----------------------------------------------------------*/\r
  45 \r
  46 void vParTestInitialise( void )\r
  47 {\r
  48         /* Port pin configuration is done by the low level set up prior to this\r
  49         function being called. */\r
  50 }\r
  51 /*-----------------------------------------------------------*/\r
  52 \r
  53 void vParTestSetLED( unsigned long ulLED, signed long xValue )\r
  54 {\r
  55         if( ulLED < partestNUM_LEDS )\r
  56         {\r
  57                 if( xValue != 0 )\r
  58                 {\r
  59                         /* Turn the LED on. */\r
  60                         taskENTER_CRITICAL();\r
  61                         {\r
  62                                 switch( ulLED )\r
  63                                 {\r
  64                                         case 0: LED0 = LED_ON;\r
  65                                                         break;\r
  66                                         case 1: LED1 = LED_ON;\r
  67                                                         break;\r
  68                                         case 2: LED2 = LED_ON;\r
  69                                                         break;\r
  70                                         case 3: LED3 = LED_ON;\r
  71                                                         break;\r
  72                                 }\r
  73                         }\r
  74                         taskEXIT_CRITICAL();\r
  75                 }\r
  76                 else\r
  77                 {\r
  78                         /* Turn the LED off. */\r
  79                         taskENTER_CRITICAL();\r
  80                         {\r
  81                                 switch( ulLED )\r
  82                                 {\r
  83                                         case 0: LED0 = LED_OFF;\r
  84                                                         break;\r
  85                                         case 1: LED1 = LED_OFF;\r
  86                                                         break;\r
  87                                         case 2: LED2 = LED_OFF;\r
  88                                                         break;\r
  89                                         case 3: LED3 = LED_OFF;\r
  90                                                         break;\r
  91                                 }\r
  92 \r
  93                         }\r
  94                         taskEXIT_CRITICAL();\r
  95                 }\r
  96         }\r
  97 }\r
  98 /*-----------------------------------------------------------*/\r
  99 \r
 100 void vParTestToggleLED( unsigned long ulLED )\r
 101 {\r
 102         if( ulLED < partestNUM_LEDS )\r
 103         {\r
 104                 taskENTER_CRITICAL();\r
 105                 {\r
 106                         if( lParTestGetLEDState( ulLED ) != 0x00 )\r
 107                         {\r
 108                                 vParTestSetLED( ulLED, 0 );\r
 109                         }\r
 110                         else\r
 111                         {\r
 112                                 vParTestSetLED( ulLED, 1 );\r
 113                         }\r
 114                 }\r
 115                 taskEXIT_CRITICAL();\r
 116         }\r
 117 }\r
 118 /*-----------------------------------------------------------*/\r
 119 \r
 120 long lParTestGetLEDState( unsigned long ulLED )\r
 121 {\r
 122 long lReturn = pdTRUE;\r
 123 \r
 124         if( ulLED < partestNUM_LEDS )\r
 125         {\r
 126                 switch( ulLED )\r
 127                 {\r
 128                         case 0  :       if( LED0 != 0 )\r
 129                                                 {\r
 130                                                         lReturn =  pdFALSE;\r
 131                                                 }\r
 132                                                 break;\r
 133                         case 1  :       if( LED1 != 0 )\r
 134                                                 {\r
 135                                                         lReturn =  pdFALSE;\r
 136                                                 }\r
 137                                                 break;\r
 138                         case 2  :       if( LED2 != 0 )\r
 139                                                 {\r
 140                                                         lReturn =  pdFALSE;\r
 141                                                 }\r
 142                                                 break;\r
 143                         case 3  :       if( LED3 != 0 )\r
 144                                                 {\r
 145                                                         lReturn =  pdFALSE;\r
 146                                                 }\r
 147                                                 break;\r
 148                 }\r
 149         }\r
 150 \r
 151         return lReturn;\r
 152 }\r
 153 /*-----------------------------------------------------------*/\r
 154 \r