git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_MB9A310_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 "mcu.h"\r
  38 \r
  39 /* Only the LEDs on one of the two seven segment displays are used. */\r
  40 #define partstMAX_LEDS          8\r
  41 \r
  42 /*-----------------------------------------------------------*/\r
  43 \r
  44 void vParTestInitialise( void )\r
  45 {\r
  46         /* Analog inputs are not used on the LED outputs. */\r
  47         FM3_GPIO->ADE  = 0x0000;\r
  48 \r
  49         /* Set to output. */\r
  50         FM3_GPIO->DDR1 |= 0xFFFF;\r
  51         FM3_GPIO->DDR3 |= 0xFFFF;\r
  52         \r
  53         /* Set as GPIO. */\r
  54         FM3_GPIO->PFR1 &= 0x0000;\r
  55         FM3_GPIO->PFR3 &= 0x0000;\r
  56 \r
  57         /* Start with all LEDs off. */\r
  58         FM3_GPIO->PDOR1 = 0xFFFF;\r
  59         FM3_GPIO->PDOR1 = 0xFFFF;\r
  60 }\r
  61 /*-----------------------------------------------------------*/\r
  62 \r
  63 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  64 {\r
  65         if( uxLED < partstMAX_LEDS )\r
  66         {\r
  67                 /* A critical section is used as the LEDs are also accessed from an\r
  68                 interrupt. */\r
  69                 taskENTER_CRITICAL();\r
  70                 {\r
  71                         if( xValue == pdTRUE )\r
  72                         {\r
  73                                 FM3_GPIO->PDOR1 &= ~( 1UL << uxLED );\r
  74                         }\r
  75                         else\r
  76                         {\r
  77                                 FM3_GPIO->PDOR1 |= ( 1UL << uxLED );\r
  78                         }\r
  79                 }\r
  80                 taskEXIT_CRITICAL();\r
  81         }\r
  82 }\r
  83 /*-----------------------------------------------------------*/\r
  84 \r
  85 void vParTestSetLEDFromISR( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  86 {\r
  87 unsigned portBASE_TYPE uxInterruptFlags;\r
  88 \r
  89         uxInterruptFlags = portSET_INTERRUPT_MASK_FROM_ISR();\r
  90         {\r
  91                 if( uxLED < partstMAX_LEDS )\r
  92                 {\r
  93                         if( xValue == pdTRUE )\r
  94                         {\r
  95                                 FM3_GPIO->PDOR1 &= ~( 1UL << uxLED );\r
  96                         }\r
  97                         else\r
  98                         {\r
  99                                 FM3_GPIO->PDOR1 |= ( 1UL << uxLED );\r
 100                         }\r
 101                 }\r
 102         }\r
 103         portCLEAR_INTERRUPT_MASK_FROM_ISR( uxInterruptFlags );\r
 104 }\r
 105 /*-----------------------------------------------------------*/\r
 106 \r
 107 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 108 {\r
 109         if( uxLED < partstMAX_LEDS )\r
 110         {\r
 111                 /* A critical section is used as the LEDs are also accessed from an\r
 112                 interrupt. */\r
 113                 taskENTER_CRITICAL();\r
 114                 {\r
 115                         if( ( FM3_GPIO->PDOR1 & ( 1UL << uxLED ) ) != 0UL )\r
 116                         {\r
 117                                 FM3_GPIO->PDOR1 &= ~( 1UL << uxLED );\r
 118                         }\r
 119                         else\r
 120                         {\r
 121                                 FM3_GPIO->PDOR1 |= ( 1UL << uxLED );\r
 122                         }\r
 123                 }\r
 124                 taskEXIT_CRITICAL();\r
 125         }\r
 126 }\r
 127 /*-----------------------------------------------------------*/\r
 128 \r