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

   1 /*\r
   2  * FreeRTOS Kernel V10.3.0\r
   3  * Copyright (C) 2020 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.\r
  14  *\r
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS\r
  17  * FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR\r
  18  * COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
  19  * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
  20  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
  21  *\r
  22  * http://www.FreeRTOS.org\r
  23  * http://aws.amazon.com/freertos\r
  24  *\r
  25  * 1 tab == 4 spaces!\r
  26  */\r
  27 \r
  28 /*-----------------------------------------------------------\r
  29  * Simple IO routines to control the LEDs.\r
  30  *-----------------------------------------------------------*/\r
  31 \r
  32 /* Scheduler includes. */\r
  33 #include "FreeRTOS.h"\r
  34 #include "task.h"\r
  35 \r
  36 /* Demo includes. */\r
  37 #include "partest.h"\r
  38 \r
  39 /* Hardware specifics. */\r
  40 #include <iorx62n.h>\r
  41 \r
  42 #define partestNUM_LEDS ( 6 )\r
  43 \r
  44 long lParTestGetLEDState( unsigned long ulLED );\r
  45 \r
  46 /*-----------------------------------------------------------*/\r
  47 \r
  48 void vParTestInitialise( void )\r
  49 {\r
  50         /* Port pin configuration is done by the low level set up prior to this\r
  51         function being called. */\r
  52 }\r
  53 /*-----------------------------------------------------------*/\r
  54 \r
  55 void vParTestSetLED( unsigned long ulLED, signed long xValue )\r
  56 {\r
  57         if( ulLED < partestNUM_LEDS )\r
  58         {\r
  59                 if( xValue != 0 )\r
  60                 {\r
  61                         /* Turn the LED on. */\r
  62                         taskENTER_CRITICAL();\r
  63                         {\r
  64                                 switch( ulLED )\r
  65                                 {\r
  66                                         case 0: LED0 = LED_ON;\r
  67                                                         break;\r
  68                                         case 1: LED1 = LED_ON;\r
  69                                                         break;\r
  70                                         case 2: LED2 = LED_ON;\r
  71                                                         break;\r
  72                                         case 3: LED3 = LED_ON;\r
  73                                                         break;\r
  74                                         case 4: LED4 = LED_ON;\r
  75                                                         break;\r
  76                                         case 5: LED5 = LED_ON;\r
  77                                                         break;\r
  78                                 }\r
  79                         }\r
  80                         taskEXIT_CRITICAL();\r
  81                 }\r
  82                 else\r
  83                 {\r
  84                         /* Turn the LED off. */\r
  85                         taskENTER_CRITICAL();\r
  86                         {\r
  87                                 switch( ulLED )\r
  88                                 {\r
  89                                         case 0: LED0 = LED_OFF;\r
  90                                                         break;\r
  91                                         case 1: LED1 = LED_OFF;\r
  92                                                         break;\r
  93                                         case 2: LED2 = LED_OFF;\r
  94                                                         break;\r
  95                                         case 3: LED3 = LED_OFF;\r
  96                                                         break;\r
  97                                         case 4: LED4 = LED_OFF;\r
  98                                                         break;\r
  99                                         case 5: LED5 = LED_OFF;\r
 100                                                         break;\r
 101                                 }\r
 102 \r
 103                         }\r
 104                         taskEXIT_CRITICAL();\r
 105                 }\r
 106         }\r
 107 }\r
 108 /*-----------------------------------------------------------*/\r
 109 \r
 110 void vParTestToggleLED( unsigned long ulLED )\r
 111 {\r
 112         if( ulLED < partestNUM_LEDS )\r
 113         {\r
 114                 taskENTER_CRITICAL();\r
 115                 {\r
 116                         if( lParTestGetLEDState( ulLED ) != 0x00 )\r
 117                         {\r
 118                                 vParTestSetLED( ulLED, 0 );\r
 119                         }\r
 120                         else\r
 121                         {\r
 122                                 vParTestSetLED( ulLED, 1 );\r
 123                         }\r
 124                 }\r
 125                 taskEXIT_CRITICAL();\r
 126         }\r
 127 }\r
 128 /*-----------------------------------------------------------*/\r
 129                                                         \r
 130 long lParTestGetLEDState( unsigned long ulLED )\r
 131 {\r
 132 long lReturn = pdTRUE;\r
 133 \r
 134         if( ulLED < partestNUM_LEDS )\r
 135         {\r
 136                 switch( ulLED )\r
 137                 {\r
 138                         case 0  :       if( LED0 != 0 )\r
 139                                                 {\r
 140                                                         lReturn =  pdFALSE;\r
 141                                                 }\r
 142                                                 break;                                  \r
 143                         case 1  :       if( LED1 != 0 )\r
 144                                                 {\r
 145                                                         lReturn =  pdFALSE;\r
 146                                                 }\r
 147                                                 break;                                  \r
 148                         case 2  :       if( LED2 != 0 )\r
 149                                                 {\r
 150                                                         lReturn =  pdFALSE;\r
 151                                                 }\r
 152                                                 break;                                  \r
 153                         case 3  :       if( LED3 != 0 )\r
 154                                                 {\r
 155                                                         lReturn =  pdFALSE;\r
 156                                                 }\r
 157                                                 break;                                  \r
 158                         case 4  :       if( LED4 != 0 )\r
 159                                                 {\r
 160                                                         lReturn =  pdFALSE;\r
 161                                                 }\r
 162                                                 break;                                  \r
 163                         case 5  :       if( LED5 != 0 )\r
 164                                                 {\r
 165                                                         lReturn =  pdFALSE;\r
 166                                                 }\r
 167                                                 break;                                  \r
 168                 }\r
 169         }\r
 170         \r
 171         return lReturn;\r
 172 }\r
 173 /*-----------------------------------------------------------*/\r
 174 \r
 175