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

   1 /*\r
   2  * FreeRTOS Kernel V10.2.1\r
   3  * Copyright (C) 2019 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 /* FreeRTOS.org includes. */\r
  29 #include "FreeRTOS.h"\r
  30 \r
  31 /* Demo application includes. */\r
  32 #include "partest.h"\r
  33 \r
  34 #define partstFIRST_IO                  ( ( unsigned long ) 0x01 )\r
  35 #define partstNUM_LEDS                  ( 8 )\r
  36 #define partstALL_OUTPUTS_OFF   ( ( unsigned long ) 0xff )\r
  37 \r
  38 /*-----------------------------------------------------------\r
  39  * Simple parallel port IO routines.\r
  40  *-----------------------------------------------------------*/\r
  41 \r
  42 void vParTestInitialise( void )\r
  43 {\r
  44         PINSEL10 = 0;\r
  45         FIO2DIR  = 0x000000FF;\r
  46         FIO2MASK = 0x00000000;\r
  47         FIO2CLR  = 0xFF;\r
  48         SCS |= (1<<0); //fast mode for port 0 and 1\r
  49 \r
  50     FIO2CLR = partstALL_OUTPUTS_OFF;\r
  51 }\r
  52 /*-----------------------------------------------------------*/\r
  53 \r
  54 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  55 {\r
  56 unsigned long ulLED = partstFIRST_IO;\r
  57 \r
  58         if( uxLED < partstNUM_LEDS )\r
  59         {\r
  60                 /* Rotate to the wanted bit of port */\r
  61                 ulLED <<= ( unsigned long ) uxLED;\r
  62 \r
  63                 /* Set of clear the output. */\r
  64                 if( xValue )\r
  65                 {\r
  66                         FIO2CLR = ulLED;\r
  67                 }\r
  68                 else\r
  69                 {\r
  70                         FIO2SET = ulLED;\r
  71                 }\r
  72         }\r
  73 }\r
  74 /*-----------------------------------------------------------*/\r
  75 \r
  76 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
  77 {\r
  78 unsigned long ulLED = partstFIRST_IO, ulCurrentState;\r
  79 \r
  80         if( uxLED < partstNUM_LEDS )\r
  81         {\r
  82                 /* Rotate to the wanted bit of port 0.  Only P10 to P13 have an LED\r
  83                 attached. */\r
  84                 ulLED <<= ( unsigned long ) uxLED;\r
  85 \r
  86                 /* If this bit is already set, clear it, and vice versa. */\r
  87                 ulCurrentState = FIO2PIN;\r
  88                 if( ulCurrentState & ulLED )\r
  89                 {\r
  90                         FIO2CLR = ulLED;\r
  91                 }\r
  92                 else\r
  93                 {\r
  94                         FIO2SET = ulLED;                        \r
  95                 }\r
  96         }       \r
  97 }\r
  98 \r
  99 /*-----------------------------------------------------------*/\r
 100 unsigned portBASE_TYPE uxParTextGetLED( unsigned portBASE_TYPE uxLED )\r
 101 {\r
 102 unsigned long ulLED = partstFIRST_IO;\r
 103     \r
 104     ulLED <<= ( unsigned long ) uxLED;\r
 105 \r
 106     return ( FIO2PIN & ulLED );\r
 107 }\r
 108 \r
 109 \r