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

   1 /*\r
   2  * FreeRTOS Kernel V10.0.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. If you wish to use our Amazon\r
  14  * FreeRTOS name, please do so in a fair use way that does not cause confusion.\r
  15  *\r
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS\r
  18  * FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR\r
  19  * COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
  20  * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
  21  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
  22  *\r
  23  * http://www.FreeRTOS.org\r
  24  * http://aws.amazon.com/freertos\r
  25  *\r
  26  * 1 tab == 4 spaces!\r
  27  */\r
  28 \r
  29 /* FreeRTOS.org includes. */\r
  30 #include "FreeRTOS.h"\r
  31 \r
  32 /* Demo application includes. */\r
  33 #include "partest.h"\r
  34 \r
  35 #define partstFIRST_IO                  ( ( unsigned long ) 0x04 )\r
  36 #define partstFIO2_BITS                 ( ( unsigned long ) 0x0000007C )\r
  37 #define partstFIO1_BITS                 ( ( unsigned long ) 0xB0000000 )\r
  38 #define partstNUM_LEDS                  ( 5 )\r
  39 #define partstALL_OUTPUTS_OFF   ( ( unsigned long ) 0xff )\r
  40 \r
  41 /*-----------------------------------------------------------\r
  42  * Simple parallel port IO routines.\r
  43  *-----------------------------------------------------------*/\r
  44 \r
  45 void vParTestInitialise( void )\r
  46 {\r
  47         /* LEDs on ports 1 and 2 to output. */\r
  48         GPIO2->FIODIR  = partstFIO2_BITS;\r
  49     GPIO1->FIODIR  = partstFIO1_BITS;\r
  50 \r
  51         /* Start will all LEDs off. */\r
  52     GPIO2->FIOCLR = partstFIO2_BITS;\r
  53     GPIO1->FIOCLR = partstFIO1_BITS;\r
  54 }\r
  55 /*-----------------------------------------------------------*/\r
  56 \r
  57 void vParTestSetLED( unsigned long ulLEDIn, signed long xValue )\r
  58 {\r
  59 unsigned long ulLED = partstFIRST_IO;\r
  60 \r
  61         /* Used to set and clear LEDs on FIO2. */\r
  62 \r
  63         if( ulLEDIn < partstNUM_LEDS )\r
  64         {\r
  65                 /* Rotate to the wanted bit of port */\r
  66                 ulLED <<= ( unsigned long ) ulLEDIn;\r
  67 \r
  68                 /* Set of clear the output. */\r
  69                 if( xValue )\r
  70                 {\r
  71                         GPIO2->FIOCLR = ulLED;\r
  72                 }\r
  73                 else\r
  74                 {\r
  75                         GPIO2->FIOSET = ulLED;\r
  76                 }\r
  77         }\r
  78 }\r
  79 /*-----------------------------------------------------------*/\r
  80 \r
  81 void vParTestToggleLED( unsigned long ulLEDIn )\r
  82 {\r
  83 unsigned long ulLED = partstFIRST_IO, ulCurrentState;\r
  84 \r
  85         /* Used to toggle LEDs on FIO2. */\r
  86 \r
  87         if( ulLEDIn < partstNUM_LEDS )\r
  88         {\r
  89                 /* Rotate to the wanted bit of port 0.  Only P10 to P13 have an LED\r
  90                 attached. */\r
  91                 ulLED <<= ( unsigned long ) ulLEDIn;\r
  92 \r
  93                 /* If this bit is already set, clear it, and vice versa. */\r
  94                 ulCurrentState = GPIO2->FIOPIN;\r
  95                 if( ulCurrentState & ulLED )\r
  96                 {\r
  97                         GPIO2->FIOCLR = ulLED;\r
  98                 }\r
  99                 else\r
 100                 {\r
 101                         GPIO2->FIOSET = ulLED;\r
 102                 }\r
 103         }\r
 104 }\r
 105 /*-----------------------------------------------------------*/\r
 106 \r
 107 long lParTestGetLEDState( void )\r
 108 {\r
 109         /* Returns the state of the LEDs on FIO1. */\r
 110         if( ( GPIO1->FIOPIN & partstFIO1_BITS ) != 0 )\r
 111         {\r
 112                 return pdFALSE;\r
 113         }\r
 114         else\r
 115         {\r
 116                 return pdTRUE;\r
 117         }\r
 118 }\r
 119 /*-----------------------------------------------------------*/\r
 120 \r
 121 void vParTestSetLEDState( long lState )\r
 122 {\r
 123         /* Used to set and clear the LEDs on FIO1. */\r
 124         if( lState != pdFALSE )\r
 125         {\r
 126                 GPIO1->FIOSET = partstFIO1_BITS;\r
 127         }\r
 128         else\r
 129         {\r
 130                 GPIO1->FIOCLR = partstFIO1_BITS;\r
 131         }\r
 132 }\r
 133 /*-----------------------------------------------------------*/\r
 134 \r