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

   1 /*\r
   2         FreeRTOS.org V4.7.0 - Copyright (C) 2003-2007 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         See http://www.FreeRTOS.org for documentation, latest information, license \r
  28         and contact details.  Please ensure to read the configuration and relevant \r
  29         port sections of the online documentation.\r
  30 \r
  31         Also see http://www.SafeRTOS.com a version that has been certified for use\r
  32         in safety critical systems, plus commercial licensing, development and\r
  33         support options.\r
  34         ***************************************************************************\r
  35 */\r
  36 \r
  37 \r
  38 /* BASIC INTERRUPT DRIVEN SERIAL PORT DRIVER.   \r
  39  * \r
  40  * This file only supports UART 2\r
  41  */\r
  42 \r
  43 /* Standard includes. */\r
  44 #include <stdlib.h>\r
  45 \r
  46 /* Scheduler includes. */\r
  47 #include "FreeRTOS.h"\r
  48 #include "queue.h"\r
  49 #include "task.h"\r
  50 \r
  51 /* Demo application includes. */\r
  52 #include "serial.h"\r
  53 \r
  54 /* The queue used to hold received characters. */\r
  55 static xQueueHandle xRxedChars; \r
  56 \r
  57 /* The queue used to hold characters waiting transmission. */\r
  58 static xQueueHandle xCharsForTx; \r
  59 \r
  60 static volatile portSHORT sTHREEmpty;\r
  61 \r
  62 /*-----------------------------------------------------------*/\r
  63 \r
  64 xComPortHandle xSerialPortInitMinimal( unsigned portLONG ulWantedBaud, unsigned portBASE_TYPE uxQueueLength )\r
  65 {\r
  66 //unsigned portLONG ulBaudRateCount;\r
  67 \r
  68         portENTER_CRITICAL();\r
  69         {\r
  70                 /* Create the queues used by the com test task. */\r
  71                 xRxedChars = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
  72                 xCharsForTx = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
  73 \r
  74                  /* Initialize UART asynchronous mode */\r
  75                 BGR02 = configPER_CLOCK_HZ / ulWantedBaud;\r
  76                   \r
  77                 SCR02 = 0x17;    /* 8N1 */\r
  78                 SMR02 = 0x0d;    /* enable SOT3, Reset, normal mode */\r
  79                 SSR02 = 0x02;    /* LSB first, enable receive interrupts */\r
  80 \r
  81                 PFR20_D0 = 1;    // enable UART\r
  82                 PFR20_D1 = 1;    // enable UART\r
  83 \r
  84                 EPFR20_D1 = 0;   // enable UART\r
  85         }\r
  86         portEXIT_CRITICAL();\r
  87         \r
  88         /* Unlike other ports, this serial code does not allow for more than one\r
  89         com port.  We therefore don't return a pointer to a port structure and can\r
  90         instead just return NULL. */\r
  91         return NULL;\r
  92 }\r
  93 /*-----------------------------------------------------------*/\r
  94 \r
  95 signed portBASE_TYPE xSerialGetChar( xComPortHandle pxPort, signed portCHAR *pcRxedChar, portTickType xBlockTime )\r
  96 {\r
  97         /* Get the next character from the buffer.  Return false if no characters\r
  98         are available, or arrive before xBlockTime expires. */\r
  99         if( xQueueReceive( xRxedChars, pcRxedChar, xBlockTime ) )\r
 100         {\r
 101                 return pdTRUE;\r
 102         }\r
 103         else\r
 104         {\r
 105                 return pdFALSE;\r
 106         }\r
 107 }\r
 108 /*-----------------------------------------------------------*/\r
 109 \r
 110 signed portBASE_TYPE xSerialPutChar( xComPortHandle pxPort, signed portCHAR cOutChar, portTickType xBlockTime )\r
 111 {\r
 112 signed portBASE_TYPE xReturn;\r
 113 \r
 114         /* Transmit a character. */\r
 115         portENTER_CRITICAL();\r
 116         {\r
 117                 if( sTHREEmpty == pdTRUE )\r
 118                 {\r
 119                         /* If sTHREEmpty is true then the UART Tx ISR has indicated that \r
 120                         there are no characters queued to be transmitted - so we can\r
 121                         write the character directly to the shift Tx register. */\r
 122                         sTHREEmpty = pdFALSE;\r
 123                         TDR02 = cOutChar;\r
 124                         xReturn = pdPASS;\r
 125                 }\r
 126                 else\r
 127                 {\r
 128                         /* sTHREEmpty is false, so there are still characters waiting to be\r
 129                         transmitted.  We have to queue this character so it gets \r
 130                         transmitted     in turn. */\r
 131 \r
 132                         /* Return false if after the block time there is no room on the Tx \r
 133                         queue.  It is ok to block inside a critical section as each task\r
 134                         maintains it's own critical section status. */\r
 135                         if (xQueueSend( xCharsForTx, &cOutChar, xBlockTime ) == pdTRUE)\r
 136                         {\r
 137                                 xReturn = pdPASS;\r
 138                         }\r
 139                         else\r
 140                         {\r
 141                                 xReturn = pdFAIL;\r
 142                         }\r
 143                 }\r
 144                 \r
 145                 if (pdPASS == xReturn)\r
 146                 {\r
 147                         /* Turn on the Tx interrupt so the ISR will remove the character from the\r
 148                         queue and send it.   This does not need to be in a critical section as\r
 149                         if the interrupt has already removed the character the next interrupt\r
 150                         will simply turn off the Tx interrupt again. */\r
 151                         SSR02_TIE = 1;\r
 152                 }\r
 153                 \r
 154         }\r
 155         portEXIT_CRITICAL();\r
 156 \r
 157         return pdPASS;\r
 158 }\r
 159 /*-----------------------------------------------------------*/\r
 160 \r
 161 /*\r
 162  * UART RX interrupt service routine.\r
 163  */\r
 164  __interrupt void UART2_RxISR (void)\r
 165 {\r
 166         signed portCHAR cChar;\r
 167 \r
 168         /* Get the character from the UART and post it on the queue of Rxed \r
 169         characters. */\r
 170         cChar = RDR02;\r
 171 \r
 172         if( xQueueSendFromISR( xRxedChars, &cChar, pdFALSE ) )\r
 173         {\r
 174                 /*If the post causes a task to wake force a context switch \r
 175                 as the woken task may have a higher priority than the task we have \r
 176                 interrupted. */\r
 177                 portYIELDFromISR();\r
 178         }\r
 179 }\r
 180 \r
 181 /*-----------------------------------------------------------*/\r
 182 \r
 183 /*\r
 184  * UART Tx interrupt service routine.\r
 185  */\r
 186 __interrupt void UART2_TxISR (void)\r
 187 {\r
 188         signed portCHAR cChar;\r
 189         signed portBASE_TYPE xTaskWoken;\r
 190 \r
 191         /* The previous character has been transmitted.  See if there are any\r
 192         further characters waiting transmission. */\r
 193         if( xQueueReceiveFromISR( xCharsForTx, &cChar, &xTaskWoken ) == pdTRUE )\r
 194         {\r
 195                 /* There was another character queued - transmit it now. */\r
 196                 TDR02 = cChar;\r
 197         }\r
 198         else\r
 199         {\r
 200                 /* There were no other characters to transmit. */\r
 201                 sTHREEmpty = pdTRUE;\r
 202                 \r
 203                 /* Disable transmit interrupts */\r
 204                 SSR02_TIE = 0;\r
 205         }\r
 206 }\r
 207 \r