git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/SuperH_SH7216_Renesas/RTOSDemo/ParTest/ParTest.c

   1 /*\r
   2  * FreeRTOS Kernel V10.1.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.\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 #define partestNUM_LEDS ( 6 )\r
  40 #define partestALL_LEDS ( usLEDMasks[ 0 ] | usLEDMasks[ 1 ] | usLEDMasks[ 2 ] | usLEDMasks[ 3 ] | usLEDMasks[ 4 ] | usLEDMasks[ 5 ] )\r
  41 \r
  42 static const unsigned short usLEDMasks[ partestNUM_LEDS ] = { ( 1 << 9 ), ( 1 << 11 ), ( 1 << 12 ), ( 1 << 13 ), ( 1 << 14 ), ( 1 << 15 ) };\r
  43 /*-----------------------------------------------------------*/\r
  44 \r
  45 void vParTestInitialise( void )\r
  46 {\r
  47         /* Select port functions for PE9 to PE15. */\r
  48         PFC.PECRL3.WORD &= ( unsigned short ) ~partestALL_LEDS;\r
  49 \r
  50         /* Turn all LEDs off. */\r
  51         PE.DR.WORD &= ( unsigned short ) ~partestALL_LEDS;\r
  52         \r
  53         /* Set all LEDs to output. */\r
  54         PFC.PEIORL.WORD |= ( unsigned short ) partestALL_LEDS;\r
  55 }\r
  56 /*-----------------------------------------------------------*/\r
  57 \r
  58 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  59 {\r
  60         if( uxLED < partestNUM_LEDS )\r
  61         {\r
  62                 if( xValue )\r
  63                 {\r
  64                         /* Turn the LED on. */\r
  65                         taskENTER_CRITICAL();\r
  66                         {\r
  67                                 PE.DR.WORD |= usLEDMasks[ uxLED ];\r
  68                         }\r
  69                         taskEXIT_CRITICAL();\r
  70                 }\r
  71                 else\r
  72                 {\r
  73                         /* Turn the LED off. */\r
  74                         taskENTER_CRITICAL();\r
  75                         {\r
  76                                 PE.DR.WORD &= ( unsigned short ) ~usLEDMasks[ uxLED ];\r
  77                         }\r
  78                         taskEXIT_CRITICAL();\r
  79                 }\r
  80         }\r
  81 }\r
  82 /*-----------------------------------------------------------*/\r
  83 \r
  84 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
  85 {\r
  86         if( uxLED < partestNUM_LEDS )\r
  87         {\r
  88                 taskENTER_CRITICAL();\r
  89                 {\r
  90                         if( ( PE.DR.WORD & usLEDMasks[ uxLED ] ) != 0x00 )\r
  91                         {\r
  92                                 PE.DR.WORD &= ( unsigned short ) ~usLEDMasks[ uxLED ];\r
  93                         }\r
  94                         else\r
  95                         {\r
  96                                 PE.DR.WORD |= usLEDMasks[ uxLED ];\r
  97                         }\r
  98                 }\r
  99                 taskEXIT_CRITICAL();\r
 100         }\r
 101 }\r
 102 /*-----------------------------------------------------------*/\r
 103                                                         \r
 104 long lParTestGetLEDState( void )\r
 105 {\r
 106         /* Returns the state of the fifth LED. */\r
 107         return !( PE.DR.WORD & usLEDMasks[ 4 ] );\r
 108 }\r
 109 /*-----------------------------------------------------------*/\r
 110 \r
 111 \r
 112 \r
 113 \r
 114