git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTUS_APS3_GCC/Demo/7seg.c

   1 /*\r
   2     FreeRTOS V7.3.0 - Copyright (C) 2012 Real Time Engineers Ltd.\r
   3 \r
   4     FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME.  PLEASE VISIT \r
   5     http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
   6 \r
   7     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS tutorial books are available in pdf and paperback.        *\r
  10      *    Complete, revised, and edited pdf reference manuals are also       *\r
  11      *    available.                                                         *\r
  12      *                                                                       *\r
  13      *    Purchasing FreeRTOS documentation will not only help you, by       *\r
  14      *    ensuring you get running as quickly as possible and with an        *\r
  15      *    in-depth knowledge of how to use FreeRTOS, it will also help       *\r
  16      *    the FreeRTOS project to continue with its mission of providing     *\r
  17      *    professional grade, cross platform, de facto standard solutions    *\r
  18      *    for microcontrollers - completely free of charge!                  *\r
  19      *                                                                       *\r
  20      *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *\r
  21      *                                                                       *\r
  22      *    Thank you for using FreeRTOS, and thank you for your support!      *\r
  23      *                                                                       *\r
  24     ***************************************************************************\r
  25 \r
  26 \r
  27     This file is part of the FreeRTOS distribution.\r
  28 \r
  29     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  30     the terms of the GNU General Public License (version 2) as published by the\r
  31     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  32     >>>NOTE<<< The modification to the GPL is included to allow you to\r
  33     distribute a combined work that includes FreeRTOS without being obliged to\r
  34     provide the source code for proprietary components outside of the FreeRTOS\r
  35     kernel.  FreeRTOS is distributed in the hope that it will be useful, but\r
  36     WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY\r
  37     or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  38     more details. You should have received a copy of the GNU General Public\r
  39     License and the FreeRTOS license exception along with FreeRTOS; if not it\r
  40     can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
  41     by writing to Richard Barry, contact details for whom are available on the\r
  42     FreeRTOS WEB site.\r
  43 \r
  44     1 tab == 4 spaces!\r
  45     \r
  46     ***************************************************************************\r
  47      *                                                                       *\r
  48      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  49      *    not run, what could be wrong?"                                     *\r
  50      *                                                                       *\r
  51      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  52      *                                                                       *\r
  53     ***************************************************************************\r
  54 \r
  55     \r
  56     http://www.FreeRTOS.org - Documentation, training, latest versions, license \r
  57     and contact details.  \r
  58     \r
  59     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  60     including FreeRTOS+Trace - an indispensable productivity tool.\r
  61 \r
  62     Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell \r
  63     the code with commercial support, indemnification, and middleware, under \r
  64     the OpenRTOS brand: http://www.OpenRTOS.com.  High Integrity Systems also\r
  65     provide a safety engineered and independently SIL3 certified version under \r
  66     the SafeRTOS brand: http://www.SafeRTOS.com.\r
  67 */\r
  68 \r
  69 \r
  70 #include <stdlib.h>\r
  71 \r
  72 /* Scheduler include files. */\r
  73 #include "FreeRTOS.h"\r
  74 #include "task.h"\r
  75 \r
  76 /* Demo program include files. */\r
  77 #include "7seg.h"\r
  78 #include "demoGpio.h"\r
  79 \r
  80 #define x7segSTACK_SIZE                 configMINIMAL_STACK_SIZE\r
  81 \r
  82 static void prvRefreshTask( void *pvParameters );\r
  83 static void prvCountTask( void *pvParameters );\r
  84 \r
  85 /* Value to output to 7 segment display\r
  86 led_digits[0] is the right most digit */\r
  87 static signed char seg7_digits[4];\r
  88 \r
  89 void vStart7SegTasks( unsigned portBASE_TYPE uxPriority )\r
  90 {\r
  91         xTaskCreate( prvRefreshTask, ( signed char * ) "7SegRefresh", x7segSTACK_SIZE, NULL, uxPriority, ( xTaskHandle *) NULL );\r
  92         xTaskCreate( prvCountTask,   ( signed char * ) "7SegCount",     x7segSTACK_SIZE, NULL, uxPriority, ( xTaskHandle *) NULL );\r
  93 }\r
  94 /*-----------------------------------------------------------*/\r
  95 \r
  96 static void prvRefreshTask( void *pvParameters )\r
  97 {\r
  98 /* This is table 3.3 from the Spartan-3 Starter Kit board user guide */\r
  99 const unsigned char bits[ 16 ] =\r
 100 {\r
 101         0x01,\r
 102         0x4f,\r
 103         0x12,\r
 104         0x06,\r
 105         0x4c,\r
 106         0x24,\r
 107         0x20,\r
 108         0x0f,\r
 109         0x00,\r
 110         0x04,\r
 111         0x08,\r
 112         0x60,\r
 113         0x31,\r
 114         0x42,\r
 115         0x30,\r
 116         0x38\r
 117 };\r
 118 \r
 119 const unsigned char apsx[4] =\r
 120 {\r
 121         0x06, /* 3 */\r
 122         0x24, /* S */\r
 123         0x18, /* P */\r
 124         0x08  /* A */\r
 125 };\r
 126 \r
 127 portTickType xRefreshRate, xLastRefreshTime;\r
 128 \r
 129 /* Digit to scan */\r
 130 static int d = 0;\r
 131 \r
 132         xRefreshRate = 2;\r
 133 \r
 134         /* We need to initialise xLastRefreshTime prior to the first call to\r
 135         vTaskDelayUntil(). */\r
 136         xLastRefreshTime = xTaskGetTickCount();\r
 137 \r
 138         for (;;)\r
 139         {\r
 140                 for( d = 0; d < 4; d++ )\r
 141                 {\r
 142                         vTaskDelayUntil ( &xLastRefreshTime, xRefreshRate );\r
 143 \r
 144                         /* Display digit */\r
 145                         gpio->out.an  = -1;\r
 146                         if( ( seg7_digits[ 1 ] == 4 ) || ( seg7_digits[ 1 ] == 5 ) )\r
 147                         {\r
 148                                 gpio->out.digit = apsx[ d ];\r
 149                         }\r
 150                         else\r
 151                         {\r
 152                                 gpio->out.digit = bits[ seg7_digits[ d ] ];\r
 153                         }\r
 154 \r
 155                         gpio->out.dp = 1;\r
 156                         gpio->out.an  = ~(1 << d);\r
 157                 }\r
 158         }\r
 159 }\r
 160 /*-----------------------------------------------------------*/\r
 161 \r
 162 static void prvCountTask( void *pvParameters )\r
 163 {\r
 164 portTickType xCountRate, xLastCountTime;\r
 165 \r
 166         /* Approximately 20HZ */\r
 167         xCountRate = configTICK_RATE_HZ / 20;\r
 168 \r
 169         /* We need to initialise xLastCountTime prior to the first call to\r
 170         vTaskDelayUntil(). */\r
 171         xLastCountTime = xTaskGetTickCount();\r
 172 \r
 173         for (;;)\r
 174         {\r
 175                 vTaskDelayUntil( &xLastCountTime, xCountRate );\r
 176 \r
 177                 /* Really ugly way to do BCD arithmetic.... */\r
 178                 seg7_digits[ 0 ] -= 1;\r
 179                 if( seg7_digits[ 0 ] < 0 )\r
 180                 {\r
 181                         seg7_digits[ 0 ] = 9;\r
 182                         seg7_digits[ 1 ] -= 1;\r
 183                         if( seg7_digits[ 1 ] < 0 )\r
 184                         {\r
 185                                 seg7_digits[ 1 ] = 9;\r
 186                                 seg7_digits[ 2 ] -= 1;\r
 187                                 if( seg7_digits[ 2 ] < 0 )\r
 188                                 {\r
 189                                         seg7_digits[ 2 ] = 9;\r
 190                                         seg7_digits[ 3 ] -= 1;\r
 191                                         if( seg7_digits[ 3 ] < 0 )\r
 192                                         {\r
 193                                                 seg7_digits[ 3 ] = 9;\r
 194                                         }\r
 195                                 }\r
 196                         }\r
 197                 }\r
 198         }\r
 199 }\r
 200 \r
 201 \r