+/*\r
+ FreeRTOS V6.1.0 - Copyright (C) 2010 Real Time Engineers Ltd.\r
+\r
+ ***************************************************************************\r
+ * *\r
+ * If you are: *\r
+ * *\r
+ * + New to FreeRTOS, *\r
+ * + Wanting to learn FreeRTOS or multitasking in general quickly *\r
+ * + Looking for basic training, *\r
+ * + Wanting to improve your FreeRTOS skills and productivity *\r
+ * *\r
+ * then take a look at the FreeRTOS books - available as PDF or paperback *\r
+ * *\r
+ * "Using the FreeRTOS Real Time Kernel - a Practical Guide" *\r
+ * http://www.FreeRTOS.org/Documentation *\r
+ * *\r
+ * A pdf reference manual is also available. Both are usually delivered *\r
+ * to your inbox within 20 minutes to two hours when purchased between 8am *\r
+ * and 8pm GMT (although please allow up to 24 hours in case of *\r
+ * exceptional circumstances). Thank you for your support! *\r
+ * *\r
+ ***************************************************************************\r
+\r
+ This file is part of the FreeRTOS distribution.\r
+\r
+ FreeRTOS is free software; you can redistribute it and/or modify it under\r
+ the terms of the GNU General Public License (version 2) as published by the\r
+ Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
+ ***NOTE*** The exception to the GPL is included to allow you to distribute\r
+ a combined work that includes FreeRTOS without being obliged to provide the\r
+ source code for proprietary components outside of the FreeRTOS kernel.\r
+ FreeRTOS is distributed in the hope that it will be useful, but WITHOUT\r
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for\r
+ more details. You should have received a copy of the GNU General Public\r
+ License and the FreeRTOS license exception along with FreeRTOS; if not it\r
+ can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
+ by writing to Richard Barry, contact details for whom are available on the\r
+ FreeRTOS WEB site.\r
+\r
+ 1 tab == 4 spaces!\r
+\r
+ http://www.FreeRTOS.org - Documentation, latest information, license and\r
+ contact details.\r
+\r
+ http://www.SafeRTOS.com - A version that is certified for use in safety\r
+ critical systems.\r
+\r
+ http://www.OpenRTOS.com - Commercial support, development, porting,\r
+ licensing and training services.\r
+*/\r
+\r
+\r
+/* BASIC INTERRUPT DRIVEN SERIAL PORT DRIVER.\r
+ *\r
+ * This file only supports UART A0 in loopback mode, and has not been tested\r
+ * for real UART operation (only loopback mode) so is not guaranteed to have\r
+ * a correct baud rate configuration.\r
+ */\r
+\r
+/* Standard includes. */\r
+#include <stdlib.h>\r
+\r
+/* Scheduler includes. */\r
+#include "FreeRTOS.h"\r
+#include "queue.h"\r
+#include "task.h"\r
+\r
+/* Demo application includes. */\r
+#include "serial.h"\r
+\r
+/* HAL includes. */\r
+#include "hal_usb.h"\r
+\r
+/* Constants required to setup the hardware. */\r
+#define serTX_AND_RX ( ( unsigned portCHAR ) 0x03 )\r
+\r
+/* Misc. constants. */\r
+#define serNO_BLOCK ( ( portTickType ) 0 )\r
+\r
+/* The queue used to hold received characters. */\r
+static xQueueHandle xRxedChars;\r
+\r
+/* The queue used to hold characters waiting transmission. */\r
+static xQueueHandle xCharsForTx;\r
+\r
+/*-----------------------------------------------------------*/\r
+\r
+xComPortHandle xSerialPortInitMinimal( unsigned portLONG ulWantedBaud, unsigned portBASE_TYPE uxQueueLength )\r
+{\r
+unsigned portLONG ulBaudRateCount;\r
+\r
+ /* Initialise the hardware. */\r
+\r
+ /* Generate the baud rate constants for the wanted baud rate. */\r
+ ulBaudRateCount = configCPU_CLOCK_HZ / ulWantedBaud;\r
+\r
+ portENTER_CRITICAL();\r
+ {\r
+ /* Create the queues used by the com test task. */\r
+ xRxedChars = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
+ xCharsForTx = xQueueCreate( uxQueueLength, ( unsigned portBASE_TYPE ) sizeof( signed portCHAR ) );\r
+\r
+#if 0\r
+ /* Reset UART. */\r
+ UCA0CTL1 |= UCSWRST;\r
+\r
+ /* Use SMCLK. */\r
+ UCA0CTL1 = UCSSEL0 | UCSSEL1;\r
+ \r
+ /* Setup baud rate low byte. */\r
+ UCA0BR0 = ( unsigned portCHAR ) ( ulBaudRateCount & ( unsigned portLONG ) 0xff );\r
+\r
+ /* Setup baud rate high byte. */\r
+ ulBaudRateCount >>= 8UL;\r
+ UCA0BR1 = ( unsigned portCHAR ) ( ulBaudRateCount & ( unsigned portLONG ) 0xff );\r
+\r
+ /* UCLISTEN sets loopback mode! */\r
+ UCA0STAT = UCLISTEN;\r
+\r
+ /* Clear interrupts. */\r
+// UCA0IFG = 0;\r
+ \r
+ /* Enable interrupts. */\r
+ UCA0IE |= UCRXIE;\r
+ \r
+ /* Take out of reset. */\r
+ UCA0CTL1 &= ~UCSWRST;\r
+#else\r
+ USB_PORT_SEL |= USB_PIN_RXD + USB_PIN_TXD;\r
+ USB_PORT_DIR |= USB_PIN_TXD;\r
+ USB_PORT_DIR &= ~USB_PIN_RXD;\r
+ \r
+ UCA1CTL1 |= UCSWRST; //Reset State\r
+ UCA1CTL0 = UCMODE_0;\r
+ \r
+ UCA1CTL0 &= ~UC7BIT; // 8bit char\r
+ UCA1CTL1 |= UCSSEL_2;\r
+// UCA1BR0 = 16; // 8Mhz/57600=138\r
+// UCA1BR1 = 1;\r
+ /* Setup baud rate low byte. */\r
+ UCA0BR0 = ( unsigned portCHAR ) ( ulBaudRateCount & ( unsigned portLONG ) 0xff );\r
+\r
+ /* Setup baud rate high byte. */\r
+ ulBaudRateCount >>= 8UL;\r
+ UCA0BR1 = ( unsigned portCHAR ) ( ulBaudRateCount & ( unsigned portLONG ) 0xff );\r
+\r
+ UCA1MCTL = 0xE;\r
+ UCA1CTL1 &= ~UCSWRST;\r
+ UCA1IE |= UCRXIE;\r
+#endif\r
+ }\r
+ portEXIT_CRITICAL();\r
+ \r
+ /* Unlike other ports, this serial code does not allow for more than one\r
+ com port. We therefore don't return a pointer to a port structure and can\r
+ instead just return NULL. */\r
+ return NULL;\r
+}\r
+/*-----------------------------------------------------------*/\r
+\r
+signed portBASE_TYPE xSerialGetChar( xComPortHandle pxPort, signed portCHAR *pcRxedChar, portTickType xBlockTime )\r
+{\r
+ /* Get the next character from the buffer. Return false if no characters\r
+ are available, or arrive before xBlockTime expires. */\r
+ if( xQueueReceive( xRxedChars, pcRxedChar, xBlockTime ) )\r
+ {\r
+ return pdTRUE;\r
+ }\r
+ else\r
+ {\r
+ return pdFALSE;\r
+ }\r
+}\r
+/*-----------------------------------------------------------*/\r
+\r
+signed portBASE_TYPE xSerialPutChar( xComPortHandle pxPort, signed portCHAR cOutChar, portTickType xBlockTime )\r
+{\r
+signed portBASE_TYPE xReturn;\r
+\r
+ xReturn = xQueueSend( xCharsForTx, &cOutChar, xBlockTime );\r
+ UCA0IE |= UCTXIE;\r
+\r
+ return xReturn;\r
+}\r
+/*-----------------------------------------------------------*/\r
+char cTxedBytes[ 512 ];\r
+char cRxedBytes[ 512 ];\r
+volatile int xIndex = 0;\r
+volatile int xIndex2 = 0;\r
+\r
+#pragma vector=USCI_A0_VECTOR\r
+static __interrupt void prvUSCI_A0_ISR( void )\r
+{\r
+signed portCHAR cChar;\r
+portBASE_TYPE xTaskWoken = pdFALSE;\r
+portBASE_TYPE xHigherPriorityTaskWoken = pdFALSE;\r
+\r
+ while( UCA0IFG & UCRXIFG )\r
+ {\r
+ /* Get the character from the UART and post it on the queue of Rxed\r
+ characters. */\r
+ cChar = UCA0RXBUF;\r
+\r
+if( xIndex2 < 500 )\r
+{\r
+ cRxedBytes[ xIndex2++ ] = cChar;\r
+}\r
+\r
+ xQueueSendFromISR( xRxedChars, &cChar, &xHigherPriorityTaskWoken );\r
+ }\r
+ \r
+ if( UCA0IFG & UCTXIFG )\r
+ {\r
+ /* The previous character has been transmitted. See if there are any\r
+ further characters waiting transmission. */\r
+ if( xQueueReceiveFromISR( xCharsForTx, &cChar, &xTaskWoken ) == pdTRUE )\r
+ {\r
+if( xIndex < 500 )\r
+{\r
+ cTxedBytes[ xIndex++ ] = cChar;\r
+}\r
+\r
+ /* There was another character queued - transmit it now. */\r
+ UCA0TXBUF = cChar;\r
+ }\r
+ else\r
+ {\r
+ /* There were no other characters to transmit - disable the Tx\r
+ interrupt. */\r
+ UCA0IE &= ~UCTXIE;\r
+ }\r
+ }\r
+\r
+ __bic_SR_register_on_exit( SCG1 + SCG0 + OSCOFF + CPUOFF ); \r
+ portYIELD_FROM_ISR( xHigherPriorityTaskWoken );\r
+}\r
+\r
+\r
projects / freertos / commitdiff