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

   1 /*
   2     FreeRTOS V6.0.3 - Copyright (C) 2010 Real Time Engineers Ltd.
   3
   4     ***************************************************************************
   5     *                                                                         *
   6     * If you are:                                                             *
   7     *                                                                         *
   8     *    + New to FreeRTOS,                                                   *
   9     *    + Wanting to learn FreeRTOS or multitasking in general quickly       *
  10     *    + Looking for basic training,                                        *
  11     *    + Wanting to improve your FreeRTOS skills and productivity           *
  12     *                                                                         *
  13     * then take a look at the FreeRTOS eBook                                  *
  14     *                                                                         *
  15     *        "Using the FreeRTOS Real Time Kernel - a Practical Guide"        *
  16     *                  http://www.FreeRTOS.org/Documentation                  *
  17     *                                                                         *
  18     * A pdf reference manual is also available.  Both are usually delivered   *
  19     * to your inbox within 20 minutes to two hours when purchased between 8am *
  20     * and 8pm GMT (although please allow up to 24 hours in case of            *
  21     * exceptional circumstances).  Thank you for your support!                *
  22     *                                                                         *
  23     ***************************************************************************
  24
  25     This file is part of the FreeRTOS distribution.
  26
  27     FreeRTOS is free software; you can redistribute it and/or modify it under
  28     the terms of the GNU General Public License (version 2) as published by the
  29     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.
  30     ***NOTE*** The exception to the GPL is included to allow you to distribute
  31     a combined work that includes FreeRTOS without being obliged to provide the
  32     source code for proprietary components outside of the FreeRTOS kernel.
  33     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT
  34     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  35     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  36     more details. You should have received a copy of the GNU General Public
  37     License and the FreeRTOS license exception along with FreeRTOS; if not it
  38     can be viewed here: http://www.freertos.org/a00114.html and also obtained
  39     by writing to Richard Barry, contact details for whom are available on the
  40     FreeRTOS WEB site.
  41
  42     1 tab == 4 spaces!
  43
  44     http://www.FreeRTOS.org - Documentation, latest information, license and
  45     contact details.
  46
  47     http://www.SafeRTOS.com - A version that is certified for use in safety
  48     critical systems.
  49
  50     http://www.OpenRTOS.com - Commercial support, development, porting,
  51     licensing and training services.
  52 */
  53
  54 /*  Basic interrupt driven serial port driver for uart1.
  55 */
  56
  57 /* Standard includes. */
  58 #include <stdlib.h>
  59
  60 /* Kernel includes. */
  61 #include "FreeRTOS.h"
  62 #include "queue.h"
  63 #include "task.h"
  64
  65 /* Demo application includes. */
  66 #include <machine/uart.h>
  67 #include <machine/ic.h>
  68 #include "serial.h"
  69 /*-----------------------------------------------------------*/
  70
  71 #define comBLOCK_RETRY_TIME                             10
  72 /*-----------------------------------------------------------*/
  73
  74 /* Queues used to hold received characters, and characters waiting to be
  75 transmitted. */
  76 static xQueueHandle xRxedChars;
  77 static xQueueHandle xCharsForTx;
  78 extern unsigned portBASE_TYPE *pxVectorTable;
  79 /*-----------------------------------------------------------*/
  80
  81 xComPortHandle xSerialPortInitMinimal( unsigned long ulWantedBaud, unsigned portBASE_TYPE uxQueueLength )
  82 {
  83         /* Create the queues used to hold Rx and Tx characters. */
  84         xRxedChars = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed char ) );
  85         xCharsForTx = xQueueCreate( uxQueueLength + 1, ( unsigned portBASE_TYPE ) sizeof( signed char ) );
  86
  87         if( ( xRxedChars ) && ( xCharsForTx ) )
  88         {
  89                 /* Set up interrupts */
  90                 /* tx interrupt will be enabled when we need to send something */
  91                 uart1->tx_mask = 0;
  92                 uart1->rx_mask = 1;
  93                 irq[IRQ_UART1_TX].ien = 1;
  94                 irq[IRQ_UART1_TX].ipl = portSYSTEM_INTERRUPT_PRIORITY_LEVEL;
  95                 irq[IRQ_UART1_RX].ien = 1;
  96                 irq[IRQ_UART1_RX].ipl = portSYSTEM_INTERRUPT_PRIORITY_LEVEL;
  97         }
  98
  99         return ( xComPortHandle ) 0;
 100 }
 101 /*-----------------------------------------------------------*/
 102
 103 signed portBASE_TYPE xSerialGetChar( xComPortHandle pxPort, signed char *pcRxedChar, portTickType xBlockTime )
 104 {
 105         /* The port handle is not required as this driver only supports uart1. */
 106         (void) pxPort;
 107
 108         /* Get the next character from the buffer.      Return false if no characters
 109            are available, or arrive before xBlockTime expires. */
 110         if( xQueueReceive( xRxedChars, pcRxedChar, xBlockTime ) )
 111         {
 112                 return pdTRUE;
 113         }
 114         else
 115         {
 116                 return pdFALSE;
 117         }
 118 }
 119
 120 /*-----------------------------------------------------------*/
 121
 122 void vSerialPutString( xComPortHandle pxPort, const signed char * const pcString, unsigned short usStringLength )
 123 {
 124         int i;
 125         signed char *pChNext;
 126
 127         /* Send each character in the string, one at a time. */
 128         pChNext = ( signed char * )pcString;
 129         for( i = 0; i < usStringLength; i++ )
 130         {
 131                 /* Block until character has been transmitted. */
 132                 while( xSerialPutChar( pxPort, *pChNext, comBLOCK_RETRY_TIME ) != pdTRUE ); pChNext++;
 133         }
 134 }
 135
 136 /*-----------------------------------------------------------*/
 137
 138 signed portBASE_TYPE xSerialPutChar( xComPortHandle pxPort, signed char cOutChar, portTickType xBlockTime )
 139 {
 140         ( void ) pxPort;
 141
 142         /* Place the character in the queue of characters to be transmitted. */
 143         if( xQueueSend( xCharsForTx, &cOutChar, xBlockTime ) != pdPASS )
 144         {
 145                 return pdFAIL;
 146         }
 147
 148         /* Turn on the Tx interrupt so the ISR will remove the character from the
 149            queue and send it. This does not need to be in a critical section as
 150            if the interrupt has already removed the character the next interrupt
 151            will simply turn off the Tx interrupt again. */
 152         uart1->tx_mask = 1;
 153
 154         return pdPASS;
 155 }
 156 /*-----------------------------------------------------------*/
 157
 158 void vSerialClose( xComPortHandle xPort )
 159 {
 160         /* Not supported as not required by the demo application. */
 161         ( void ) xPort;
 162 }
 163 /*-----------------------------------------------------------*/
 164
 165 void interrupt_handler( IRQ_UART1_TX )
 166 {
 167 static signed char cChar;
 168 static portBASE_TYPE xHigherPriorityTaskWoken = pdFALSE;
 169
 170         portSAVE_CONTEXT_REDUCED();
 171
 172         /* The interrupt was caused by the transmit fifo having space for at least one
 173         character. Are there any more characters to transmit? */
 174         if( xQueueReceiveFromISR( xCharsForTx, &cChar, &xHigherPriorityTaskWoken ) == pdTRUE )
 175         {
 176                 /* A character was retrieved from the queue so can be sent to the uart now. */
 177                 uart1->tx_data = cChar;
 178         }
 179         else
 180         {
 181                 /* Queue empty, nothing to send so turn off the Tx interrupt. */
 182                 uart1->tx_mask = 0;
 183         }
 184
 185         /* If an event caused a task to unblock then we call "Yield from ISR" to
 186         ensure that the unblocked task is the task that executes when the interrupt
 187         completes if the unblocked task has a priority higher than the interrupted
 188         task. */
 189         if( xHigherPriorityTaskWoken )
 190         {
 191                 portYIELD_FROM_ISR();
 192         }
 193         portRESTORE_CONTEXT_REDUCED();
 194 }
 195 /*-----------------------------------------------------------*/
 196
 197 void interrupt_handler( IRQ_UART1_RX )
 198 {
 199 static signed char cChar;
 200 static portBASE_TYPE xHigherPriorityTaskWoken = pdFALSE;
 201
 202         portSAVE_CONTEXT_REDUCED();
 203
 204         /* The interrupt was caused by the receiver getting data. */
 205         cChar = uart1->rx_data;
 206
 207         (void)xQueueSendFromISR(xRxedChars, &cChar, &xHigherPriorityTaskWoken);
 208
 209         /* If an event caused a task to unblock then we call "Yield from ISR" to
 210         ensure that the unblocked task is the task that executes when the interrupt
 211         completes if the unblocked task has a priority higher than the interrupted
 212         task. */
 213         if( xHigherPriorityTaskWoken )
 214         {
 215                 portYIELD_FROM_ISR();
 216         }
 217
 218         portRESTORE_CONTEXT_REDUCED();
 219 }
 220 /*-----------------------------------------------------------*/
 221
 222