git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/RX600_RX64M_RSK_Renesas_e2studio/Source/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 "rskrx64mdef.h"\r
  41 \r
  42 #define partestNUM_LEDS ( 4 )\r
  43 \r
  44 long lParTestGetLEDState( unsigned long ulLED );\r
  45 \r
  46 /*-----------------------------------------------------------*/\r
  47 \r
  48 void vParTestInitialise( void )\r
  49 {\r
  50         /* First set the data levels. */\r
  51         LED0 = LED_OFF;\r
  52         LED1 = LED_OFF;\r
  53         LED2 = LED_OFF;\r
  54         LED3 = LED_OFF;\r
  55 \r
  56         /* Set port direction registers. */\r
  57         LED0_PIN_DIR = OUTPUT_PIN;\r
  58         LED1_PIN_DIR = OUTPUT_PIN;\r
  59         LED2_PIN_DIR = OUTPUT_PIN;\r
  60         LED3_PIN_DIR = OUTPUT_PIN;\r
  61 }\r
  62 /*-----------------------------------------------------------*/\r
  63 \r
  64 void vParTestSetLED( unsigned long ulLED, signed long xValue )\r
  65 {\r
  66         if( ulLED < partestNUM_LEDS )\r
  67         {\r
  68                 if( xValue != 0 )\r
  69                 {\r
  70                         /* Turn the LED on. */\r
  71                         taskENTER_CRITICAL();\r
  72                         {\r
  73                                 switch( ulLED )\r
  74                                 {\r
  75                                         case 0: LED0 = LED_ON;\r
  76                                                         break;\r
  77                                         case 1: LED1 = LED_ON;\r
  78                                                         break;\r
  79                                         case 2: LED2 = LED_ON;\r
  80                                                         break;\r
  81                                         case 3: LED3 = LED_ON;\r
  82                                                         break;\r
  83                                 }\r
  84                         }\r
  85                         taskEXIT_CRITICAL();\r
  86                 }\r
  87                 else\r
  88                 {\r
  89                         /* Turn the LED off. */\r
  90                         taskENTER_CRITICAL();\r
  91                         {\r
  92                                 switch( ulLED )\r
  93                                 {\r
  94                                         case 0: LED0 = LED_OFF;\r
  95                                                         break;\r
  96                                         case 1: LED1 = LED_OFF;\r
  97                                                         break;\r
  98                                         case 2: LED2 = LED_OFF;\r
  99                                                         break;\r
 100                                         case 3: LED3 = LED_OFF;\r
 101                                                         break;\r
 102                                 }\r
 103 \r
 104                         }\r
 105                         taskEXIT_CRITICAL();\r
 106                 }\r
 107         }\r
 108 }\r
 109 /*-----------------------------------------------------------*/\r
 110 \r
 111 void vParTestToggleLED( unsigned long ulLED )\r
 112 {\r
 113         if( ulLED < partestNUM_LEDS )\r
 114         {\r
 115                 taskENTER_CRITICAL();\r
 116                 {\r
 117                         if( lParTestGetLEDState( ulLED ) != 0x00 )\r
 118                         {\r
 119                                 vParTestSetLED( ulLED, 0 );\r
 120                         }\r
 121                         else\r
 122                         {\r
 123                                 vParTestSetLED( ulLED, 1 );\r
 124                         }\r
 125                 }\r
 126                 taskEXIT_CRITICAL();\r
 127         }\r
 128 }\r
 129 /*-----------------------------------------------------------*/\r
 130 \r
 131 long lParTestGetLEDState( unsigned long ulLED )\r
 132 {\r
 133 long lReturn = pdTRUE;\r
 134 \r
 135         if( ulLED < partestNUM_LEDS )\r
 136         {\r
 137                 switch( ulLED )\r
 138                 {\r
 139                         case 0  :       if( LED0 != 0 )\r
 140                                                 {\r
 141                                                         lReturn =  pdFALSE;\r
 142                                                 }\r
 143                                                 break;\r
 144                         case 1  :       if( LED1 != 0 )\r
 145                                                 {\r
 146                                                         lReturn =  pdFALSE;\r
 147                                                 }\r
 148                                                 break;\r
 149                         case 2  :       if( LED2 != 0 )\r
 150                                                 {\r
 151                                                         lReturn =  pdFALSE;\r
 152                                                 }\r
 153                                                 break;\r
 154                         case 3  :       if( LED3 != 0 )\r
 155                                                 {\r
 156                                                         lReturn =  pdFALSE;\r
 157                                                 }\r
 158                                                 break;\r
 159                 }\r
 160         }\r
 161 \r
 162         return lReturn;\r
 163 }\r
 164 /*-----------------------------------------------------------*/\r
 165 \r