Subversion Repositories openrisc

//--------------------------------------------------------------------------//

//----------------------- COPIED FROM AVR32 EXAMPLE ------------------------//

//--------------------------------------------------------------------------//

/*This file has been prepared for Doxygen automatic documentation generation.*/

/*! \file *********************************************************************

 *

 * \brief FreeRTOS Serial Port management example for AVR32 UC3.

 *

 * - Compiler:           IAR EWAVR32 and GNU GCC for AVR32

 * - Supported devices:  All AVR32 devices can be used.

 * - AppNote:

 *

 * \author               Atmel Corporation: http://www.atmel.com \n

 *                       Support and FAQ: http://support.atmel.no/

 *

 *****************************************************************************/

/* Copyright (c) 2007, Atmel Corporation All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions are met:

 *

 * 1. Redistributions of source code must retain the above copyright notice,

 * this list of conditions and the following disclaimer.

 *

 * 2. Redistributions in binary form must reproduce the above copyright notice,

 * this list of conditions and the following disclaimer in the documentation

 * and/or other materials provided with the distribution.

 *

 * 3. The name of ATMEL may not be used to endorse or promote products derived

 * from this software without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY ATMEL ``AS IS'' AND ANY EXPRESS OR IMPLIED

 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF

 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE EXPRESSLY AND

 * SPECIFICALLY DISCLAIMED. IN NO EVENT SHALL ATMEL BE LIABLE FOR ANY DIRECT,

 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES

 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;

 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND

 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT

 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF

 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 */

/*

  BASIC INTERRUPT DRIVEN SERIAL PORT DRIVER FOR USART.

*/

/* Scheduler includes. */

#include "FreeRTOS.h"

#include "queue.h"

#include "task.h"

/* Demo application includes. */

#include "serial.h"

#include "uart.h"

/*-----------------------------------------------------------*/

/* Constants to setup and access the USART. */

#define serINVALID_COMPORT_HANDLER        ( ( xComPortHandle ) 0 )

#define serINVALID_QUEUE                  ( ( xQueueHandle ) 0 )

#define serHANDLE                         ( ( xComPortHandle ) 1 )

#define serNO_BLOCK                       ( ( portTickType ) 0 )

/*-----------------------------------------------------------*/

/* Queues used to hold received characters, and characters waiting to be

transmitted. */

static xQueueHandle xRxedChars;

static xQueueHandle xCharsForTx;

/*-----------------------------------------------------------*/

/* Forward declaration. */

static void vprvSerialCreateQueues( unsigned portBASE_TYPE uxQueueLength,

                                                                        xQueueHandle *pxRxedChars,

                                                                        xQueueHandle *pxCharsForTx );

/*-----------------------------------------------------------*/

// TODO : Porting

static portBASE_TYPE prvUSART_ISR_NonNakedBehaviour( void )

{

        /* Now we can declare the local variables. */

        signed portCHAR     cChar;

        portBASE_TYPE     xHigherPriorityTaskWoken = pdFALSE;

        unsigned portLONG     ulStatus;

        // FIXME

        #define ADDR_UART_BASE          (0x90000000)

        volatile portBASE_TYPE  *usart = ADDR_UART_BASE;

        portBASE_TYPE retstatus;

        /* What caused the interrupt? */

        // FIXME

        // ulStatus = usart->csr & usart->imr;

        // TODO : TX RADY INTERRUPT, FIXME

        // if (ulStatus & AVR32_USART_CSR_TXRDY_MASK)

        if (ulStatus & 0x1)

        {

                /* The interrupt was caused by the THR becoming empty.  Are there any

                more characters to transmit?

                Because FreeRTOS is not supposed to run with nested interrupts, put all OS

                calls in a critical section . */

                portENTER_CRITICAL();

                        retstatus = xQueueReceiveFromISR( xCharsForTx, &cChar, &xHigherPriorityTaskWoken );

                portEXIT_CRITICAL();

                if (retstatus == pdTRUE)

                {

                        /* A character was retrieved from the queue so can be sent to the

                         THR now. */

                        // FIXME

                        // usart->thr = cChar;

                }

                else

                {

                        /* Queue empty, nothing to send so turn off the Tx interrupt. */

                        // FIXME

                        // usart->idr = AVR32_USART_IDR_TXRDY_MASK;

                }

        }

        // TODO : RX RADY INTERRUPT, FIXME

        // if (ulStatus & AVR32_USART_CSR_RXRDY_MASK)

        if (ulStatus & 0x2)

        {

                /* The interrupt was caused by the receiver getting data. */

                // FIXME

                // cChar = usart->rhr; 

                /* Because FreeRTOS is not supposed to run with nested interrupts, put all OS

                calls in a critical section . */

                portENTER_CRITICAL();

                        xQueueSendFromISR(xRxedChars, &cChar, &xHigherPriorityTaskWoken);

                portEXIT_CRITICAL();

        }

        /* The return value will be used by portEXIT_SWITCHING_ISR() to know if it

        should perform a vTaskSwitchContext(). */

        return ( xHigherPriorityTaskWoken );

}

/*-----------------------------------------------------------*/

/*

 * USART interrupt service routine.

 */

// FIXME it was __naked__ fuction

static void vUSART_ISR( void )

{

        /* This ISR can cause a context switch, so the first statement must be a

        call to the portENTER_SWITCHING_ISR() macro.  This must be BEFORE any

        variable declarations. */

        portENTER_SWITCHING_ISR();                      // TODO

        prvUSART_ISR_NonNakedBehaviour();

        /* Exit the ISR.  If a task was woken by either a character being received

        or transmitted then a context switch will occur. */

        portEXIT_SWITCHING_ISR();                       // TODO

}

/*-----------------------------------------------------------*/

// TODO : porting

/*

 * Init the serial port for the Minimal implementation.

 */

xComPortHandle xSerialPortInitMinimal( unsigned portLONG ulWantedBaud, unsigned portBASE_TYPE uxQueueLength )

{

        xComPortHandle xReturn = serHANDLE;

        // FIXME

        #define ADDR_UART_BASE          (0x90000000)

        volatile portBASE_TYPE  *usart = ADDR_UART_BASE;

        int cd; /* USART Clock Divider. */

        /* Create the rx and tx queues. */

        vprvSerialCreateQueues( uxQueueLength, &xRxedChars, &xCharsForTx );

        /* Configure USART. */

        if( ( xRxedChars != serINVALID_QUEUE ) &&

                ( xCharsForTx != serINVALID_QUEUE ) &&

                ( ulWantedBaud != ( unsigned portLONG ) 0 ) )

        {

                portENTER_CRITICAL();

                {

                        if( cd > 65535 )

                        {

                                /* Baudrate is too low */

                                return serINVALID_COMPORT_HANDLER;

                        }

                        // FIXME

                        // INTC_register_interrupt((__int_handler)&vUSART_ISR, serialPORT_USART_IRQ, INT1);     // interrupt register

                }

                portEXIT_CRITICAL();

        }

        else

        {

                xReturn = serINVALID_COMPORT_HANDLER;

        }

        return xReturn;

}

/*-----------------------------------------------------------*/

signed portBASE_TYPE xSerialGetChar( xComPortHandle pxPort, signed portCHAR *pcRxedChar, portTickType xBlockTime )

{

        /* The port handle is not required as this driver only supports UART0. */

        ( void ) pxPort;

        /* Get the next character from the buffer.  Return false if no characters

        are available, or arrive before xBlockTime expires. */

        if( xQueueReceive( xRxedChars, pcRxedChar, xBlockTime ) )

        {

                return pdTRUE;

        }

        else

        {

                return pdFALSE;

        }

}

/*-----------------------------------------------------------*/

void vSerialPutString( xComPortHandle pxPort, const signed portCHAR * const pcString, unsigned portSHORT usStringLength )

{

        signed portCHAR *pxNext;

        /* NOTE: This implementation does not handle the queue being full as no

        block time is used! */

        /* The port handle is not required as this driver only supports UART0. */

        ( void ) pxPort;

        /* Send each character in the string, one at a time. */

        pxNext = ( signed portCHAR * ) pcString;

        while( *pxNext )

        {

                xSerialPutChar( pxPort, *pxNext, serNO_BLOCK );

                pxNext++;

        }

}

/*-----------------------------------------------------------*/

signed portBASE_TYPE xSerialPutChar( xComPortHandle pxPort, signed portCHAR cOutChar, portTickType xBlockTime )

{

        // FIXME

        #define ADDR_UART_BASE          (0x90000000)

        volatile portBASE_TYPE  *usart = ADDR_UART_BASE;

        /* Place the character in the queue of characters to be transmitted. */

        if( xQueueSend( xCharsForTx, &cOutChar, xBlockTime ) != pdPASS )

        {

                return pdFAIL;

        }

        /* Turn on the Tx interrupt so the ISR will remove the character from the

        queue and send it.   This does not need to be in a critical section as

        if the interrupt has already removed the character the next interrupt

        will simply turn off the Tx interrupt again. */

        // FIXME

        // usart->ier = (1 << AVR32_USART_IER_TXRDY_OFFSET);

        // TODO : Turn on TX interrupt

        return pdPASS;

}

/*-----------------------------------------------------------*/

void vSerialClose( xComPortHandle xPort )

{

  /* Not supported as not required by the demo application. */

}

/*-----------------------------------------------------------*/

/*###########################################################*/

/*

 * Create the rx and tx queues.

 */

static void vprvSerialCreateQueues(  unsigned portBASE_TYPE uxQueueLength, xQueueHandle *pxRxedChars, xQueueHandle *pxCharsForTx )

{

        /* Create the queues used to hold Rx and Tx characters. */

        xRxedChars = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );

        xCharsForTx = xQueueCreate( uxQueueLength + 1, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );

        /* Pass back a reference to the queues so the serial API file can

        post/receive characters. */

        *pxRxedChars = xRxedChars;

        *pxCharsForTx = xCharsForTx;

}

/*-----------------------------------------------------------*/