git.sur5r.net Git - freertos/blob - Demo/MB91460_Softune/SRC/serial/serial.c

   1 /*\r
   2         FreeRTOS.org V5.0.0 - Copyright (C) 2003-2008 Richard Barry.\r
   3 \r
   4         This file is part of the FreeRTOS.org distribution.\r
   5 \r
   6         FreeRTOS.org is free software; you can redistribute it and/or modify\r
   7         it under the terms of the GNU General Public License as published by\r
   8         the Free Software Foundation; either version 2 of the License, or\r
   9         (at your option) any later version.\r
  10 \r
  11         FreeRTOS.org is distributed in the hope that it will be useful,\r
  12         but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14         GNU General Public License for more details.\r
  15 \r
  16         You should have received a copy of the GNU General Public License\r
  17         along with FreeRTOS.org; if not, write to the Free Software\r
  18         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
  19 \r
  20         A special exception to the GPL can be applied should you wish to distribute\r
  21         a combined work that includes FreeRTOS.org, without being obliged to provide\r
  22         the source code for any proprietary components.  See the licensing section\r
  23         of http://www.FreeRTOS.org for full details of how and when the exception\r
  24         can be applied.\r
  25 \r
  26     ***************************************************************************\r
  27     ***************************************************************************\r
  28     *                                                                         *\r
  29     * SAVE TIME AND MONEY!  We can port FreeRTOS.org to your own hardware,    *\r
  30     * and even write all or part of your application on your behalf.          *\r
  31     * See http://www.OpenRTOS.com for details of the services we provide to   *\r
  32     * expedite your project.                                                  *\r
  33     *                                                                         *\r
  34     ***************************************************************************\r
  35     ***************************************************************************\r
  36 \r
  37         Please ensure to read the configuration and relevant port sections of the\r
  38         online documentation.\r
  39 \r
  40         http://www.FreeRTOS.org - Documentation, latest information, license and \r
  41         contact details.\r
  42 \r
  43         http://www.SafeRTOS.com - A version that is certified for use in safety \r
  44         critical systems.\r
  45 \r
  46         http://www.OpenRTOS.com - Commercial support, development, porting, \r
  47         licensing and training services.\r
  48 */\r
  49 \r
  50 \r
  51 /* \r
  52  * BASIC INTERRUPT DRIVEN SERIAL PORT DRIVER.   \r
  53  * \r
  54  * This file only supports UART 2\r
  55  */\r
  56 \r
  57 /* Standard includes. */\r
  58 #include <stdlib.h>\r
  59 \r
  60 /* Scheduler includes. */\r
  61 #include "FreeRTOS.h"\r
  62 #include "queue.h"\r
  63 #include "task.h"\r
  64 \r
  65 /* Demo application includes. */\r
  66 #include "serial.h"\r
  67 \r
  68 /* The queue used to hold received characters. */\r
  69 static xQueueHandle xRxedChars; \r
  70 \r
  71 /* The queue used to hold characters waiting transmission. */\r
  72 static xQueueHandle xCharsForTx; \r
  73 \r
  74 static volatile portSHORT sTHREEmpty;\r
  75 \r
  76 /*-----------------------------------------------------------*/\r
  77 \r
  78 xComPortHandle xSerialPortInitMinimal( unsigned portLONG ulWantedBaud, unsigned portBASE_TYPE uxQueueLength )\r
  79 {\r
  80         portENTER_CRITICAL();\r
  81         {\r
  82                 /* Create the queues used by the com test task. */\r
  83                 xRxedChars = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
  84                 xCharsForTx = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
  85 \r
  86                  /* Initialize UART asynchronous mode */\r
  87                 BGR02 = configPER_CLOCK_HZ / ulWantedBaud;\r
  88                   \r
  89                 SCR02 = 0x17;   /* 8N1 */\r
  90                 SMR02 = 0x0d;   /* enable SOT3, Reset, normal mode */\r
  91                 SSR02 = 0x02;   /* LSB first, enable receive interrupts */\r
  92 \r
  93                 PFR20_D0 = 1;   /* enable UART */\r
  94                 PFR20_D1 = 1;   /* enable UART */\r
  95 \r
  96                 EPFR20_D1 = 0;  /* enable UART */\r
  97         }\r
  98         portEXIT_CRITICAL();\r
  99         \r
 100         /* Unlike other ports, this serial code does not allow for more than one\r
 101         com port.  We therefore don't return a pointer to a port structure and can\r
 102         instead just return NULL. */\r
 103         return NULL;\r
 104 }\r
 105 /*-----------------------------------------------------------*/\r
 106 \r
 107 signed portBASE_TYPE xSerialGetChar( xComPortHandle pxPort, signed portCHAR *pcRxedChar, portTickType xBlockTime )\r
 108 {\r
 109         /* Get the next character from the buffer.  Return false if no characters\r
 110         are available, or arrive before xBlockTime expires. */\r
 111         if( xQueueReceive( xRxedChars, pcRxedChar, xBlockTime ) )\r
 112         {\r
 113                 return pdTRUE;\r
 114         }\r
 115         else\r
 116         {\r
 117                 return pdFALSE;\r
 118         }\r
 119 }\r
 120 /*-----------------------------------------------------------*/\r
 121 \r
 122 signed portBASE_TYPE xSerialPutChar( xComPortHandle pxPort, signed portCHAR cOutChar, portTickType xBlockTime )\r
 123 {\r
 124 signed portBASE_TYPE xReturn;\r
 125 \r
 126         /* Transmit a character. */\r
 127         portENTER_CRITICAL();\r
 128         {\r
 129                 if( sTHREEmpty == pdTRUE )\r
 130                 {\r
 131                         /* If sTHREEmpty is true then the UART Tx ISR has indicated that \r
 132                         there are no characters queued to be transmitted - so we can\r
 133                         write the character directly to the shift Tx register. */\r
 134                         sTHREEmpty = pdFALSE;\r
 135                         TDR02 = cOutChar;\r
 136                         xReturn = pdPASS;\r
 137                 }\r
 138                 else\r
 139                 {\r
 140                         /* sTHREEmpty is false, so there are still characters waiting to be\r
 141                         transmitted.  We have to queue this character so it gets \r
 142                         transmitted     in turn. */\r
 143 \r
 144                         /* Return false if after the block time there is no room on the Tx \r
 145                         queue.  It is ok to block inside a critical section as each task\r
 146                         maintains it's own critical section status. */\r
 147                         if (xQueueSend( xCharsForTx, &cOutChar, xBlockTime ) == pdTRUE)\r
 148                         {\r
 149                                 xReturn = pdPASS;\r
 150                         }\r
 151                         else\r
 152                         {\r
 153                                 xReturn = pdFAIL;\r
 154                         }\r
 155                 }\r
 156                 \r
 157                 if (pdPASS == xReturn)\r
 158                 {\r
 159                         /* Turn on the Tx interrupt so the ISR will remove the character from the\r
 160                         queue and send it.   This does not need to be in a critical section as\r
 161                         if the interrupt has already removed the character the next interrupt\r
 162                         will simply turn off the Tx interrupt again. */\r
 163                         SSR02_TIE = 1;\r
 164                 }\r
 165                 \r
 166         }\r
 167         portEXIT_CRITICAL();\r
 168 \r
 169         return pdPASS;\r
 170 }\r
 171 /*-----------------------------------------------------------*/\r
 172 \r
 173 /*\r
 174  * UART RX interrupt service routine.\r
 175  */\r
 176  __interrupt void UART2_RxISR (void)\r
 177 {\r
 178         signed portCHAR cChar;\r
 179         portBASE_TYPE xHigherPriorityTaskWoken = pdFALSE;\r
 180 \r
 181         /* Get the character from the UART and post it on the queue of Rxed \r
 182         characters. */\r
 183         cChar = RDR02;\r
 184 \r
 185         xQueueSendFromISR( xRxedChars, &cChar, &xHigherPriorityTaskWoken );\r
 186 \r
 187         if( xHigherPriorityTaskWoken )\r
 188         {\r
 189                 /*If the post causes a task to wake force a context switch \r
 190                 as the woken task may have a higher priority than the task we have \r
 191                 interrupted. */\r
 192                 portYIELD_FROM_ISR();\r
 193         }\r
 194 }\r
 195 \r
 196 /*-----------------------------------------------------------*/\r
 197 \r
 198 /*\r
 199  * UART Tx interrupt service routine.\r
 200  */\r
 201 __interrupt void UART2_TxISR (void)\r
 202 {\r
 203         signed portCHAR cChar;\r
 204         signed portBASE_TYPE xTaskWoken = pdFALSE;\r
 205 \r
 206         /* The previous character has been transmitted.  See if there are any\r
 207         further characters waiting transmission. */\r
 208         if( xQueueReceiveFromISR( xCharsForTx, &cChar, &xTaskWoken ) == pdTRUE )\r
 209         {\r
 210                 /* There was another character queued - transmit it now. */\r
 211                 TDR02 = cChar;\r
 212         }\r
 213         else\r
 214         {\r
 215                 /* There were no other characters to transmit. */\r
 216                 sTHREEmpty = pdTRUE;\r
 217                 \r
 218                 /* Disable transmit interrupts */\r
 219                 SSR02_TIE = 0;\r
 220         }\r
 221 }\r
 222 \r