git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_MB9B500_IAR_Keil/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 parallel port IO routines.\r
  30  *-----------------------------------------------------------*/\r
  31 \r
  32 /* Kernel includes. */\r
  33 #include "FreeRTOS.h"\r
  34 #include "task.h"\r
  35 \r
  36 /* Fujitsu drivers/libraries. */\r
  37 #include "mb9bf506n.h"\r
  38 #include "system_mb9bf50x.h"\r
  39 \r
  40 /* Only the LEDs on one of the two seven segment displays are used. */\r
  41 #define partstMAX_LEDS          8\r
  42 \r
  43 /* The LEDs are controlled by bits 8 to 15 of the IO port. */\r
  44 #define partstLED_0_OFFSET      8\r
  45 \r
  46 /*-----------------------------------------------------------*/\r
  47 \r
  48 void vParTestInitialise( void )\r
  49 {\r
  50 const unsigned short usGPIOState = 0xFF00U;\r
  51 \r
  52         /* Analog inputs are not used on the LED outputs. */\r
  53         FM3_GPIO->ADE  = 0x00FF;\r
  54         \r
  55         /* LED seg1 to GPIO output (P18->P1F). */\r
  56         FM3_GPIO->DDR1 = 0xFF00;\r
  57         FM3_GPIO->PFR1 = 0x0000;\r
  58         \r
  59         /* LED seg2 to GPIO output (P30->P3F). */\r
  60         FM3_GPIO->DDR3 = 0xFF00;\r
  61         FM3_GPIO->PFR3 = 0x0000;\r
  62         \r
  63         /* Start with all LEDs off. */\r
  64         FM3_GPIO->PDOR3 = usGPIOState;\r
  65         FM3_GPIO->PDOR1 = usGPIOState;\r
  66 }\r
  67 /*-----------------------------------------------------------*/\r
  68 \r
  69 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  70 {\r
  71         if( uxLED < partstMAX_LEDS )\r
  72         {\r
  73                 /* A critical section is used as the LEDs are also accessed from an\r
  74                 interrupt. */\r
  75                 taskENTER_CRITICAL();\r
  76                 {\r
  77                         if( xValue == pdTRUE )\r
  78                         {\r
  79                                 FM3_GPIO->PDOR3 &= ~( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
  80                         }\r
  81                         else\r
  82                         {\r
  83                                 FM3_GPIO->PDOR3 |= ( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
  84                         }\r
  85                 }\r
  86                 taskEXIT_CRITICAL();\r
  87         }\r
  88 }\r
  89 /*-----------------------------------------------------------*/\r
  90 \r
  91 void vParTestSetLEDFromISR( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  92 {\r
  93 unsigned portBASE_TYPE uxInterruptFlags;\r
  94 \r
  95         uxInterruptFlags = portSET_INTERRUPT_MASK_FROM_ISR();\r
  96         {\r
  97                 if( uxLED < partstMAX_LEDS )\r
  98                 {\r
  99                         if( xValue == pdTRUE )\r
 100                         {\r
 101                                 FM3_GPIO->PDOR3 &= ~( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
 102                         }\r
 103                         else\r
 104                         {\r
 105                                 FM3_GPIO->PDOR3 |= ( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
 106                         }\r
 107                 }\r
 108         }\r
 109         portCLEAR_INTERRUPT_MASK_FROM_ISR( uxInterruptFlags );\r
 110 }\r
 111 /*-----------------------------------------------------------*/\r
 112 \r
 113 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 114 {\r
 115         if( uxLED < partstMAX_LEDS )\r
 116         {\r
 117                 /* A critical section is used as the LEDs are also accessed from an\r
 118                 interrupt. */\r
 119                 taskENTER_CRITICAL();\r
 120                 {\r
 121                         if( ( FM3_GPIO->PDOR3 & ( 1UL << ( uxLED + partstLED_0_OFFSET ) ) ) != 0UL )\r
 122                         {\r
 123                                 FM3_GPIO->PDOR3 &= ~( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
 124                         }\r
 125                         else\r
 126                         {\r
 127                                 FM3_GPIO->PDOR3 |= ( 1UL << ( uxLED + partstLED_0_OFFSET ) );\r
 128                         }\r
 129                 }\r
 130                 taskEXIT_CRITICAL();\r
 131         }\r
 132 }\r
 133 /*-----------------------------------------------------------*/\r
 134 \r
 135 long lParTestGetLEDState( unsigned long ulLED )\r
 136 {\r
 137 long lReturn = pdFALSE;\r
 138 \r
 139         if( ulLED < partstMAX_LEDS )\r
 140         {\r
 141                 taskENTER_CRITICAL();\r
 142                 {\r
 143                         if( ( FM3_GPIO->PDOR3 & ( 1UL << ( ulLED + partstLED_0_OFFSET ) ) ) == 0UL )\r
 144                         {\r
 145                                 lReturn = pdTRUE;\r
 146                         }\r
 147                 }\r
 148                 taskEXIT_CRITICAL();\r
 149         }\r
 150 \r
 151         return lReturn;\r
 152 }\r
 153 /*-----------------------------------------------------------*/\r