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

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