git.sur5r.net Git - freertos/blob - Demo/CORTEX_LM3Sxxxx_Eclipse/RTOSDemo/webserver/emac.c

   1 /*\r
   2     FreeRTOS V6.0.0 - Copyright (C) 2009 Real Time Engineers Ltd.\r
   3 \r
   4     This file is part of the FreeRTOS distribution.\r
   5 \r
   6     FreeRTOS is free software; you can redistribute it and/or modify it    under\r
   7     the terms of the GNU General Public License (version 2) as published by the\r
   8     Free Software Foundation and modified by the FreeRTOS exception.\r
   9     **NOTE** The exception to the GPL is included to allow you to distribute a\r
  10     combined work that includes FreeRTOS without being obliged to provide the\r
  11     source code for proprietary components outside of the FreeRTOS kernel.\r
  12     Alternative commercial license and support terms are also available upon\r
  13     request.  See the licensing section of http://www.FreeRTOS.org for full\r
  14     license details.\r
  15 \r
  16     FreeRTOS is distributed in the hope that it will be useful,    but WITHOUT\r
  17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
  18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  19     more details.\r
  20 \r
  21     You should have received a copy of the GNU General Public License along\r
  22     with FreeRTOS; if not, write to the Free Software Foundation, Inc., 59\r
  23     Temple Place, Suite 330, Boston, MA  02111-1307  USA.\r
  24 \r
  25 \r
  26     ***************************************************************************\r
  27     *                                                                         *\r
  28     * The FreeRTOS eBook and reference manual are available to purchase for a *\r
  29     * small fee. Help yourself get started quickly while also helping the     *\r
  30     * FreeRTOS project! See http://www.FreeRTOS.org/Documentation for details *\r
  31     *                                                                         *\r
  32     ***************************************************************************\r
  33 \r
  34     1 tab == 4 spaces!\r
  35 \r
  36     Please ensure to read the configuration and relevant port sections of the\r
  37     online documentation.\r
  38 \r
  39     http://www.FreeRTOS.org - Documentation, latest information, license and\r
  40     contact details.\r
  41 \r
  42     http://www.SafeRTOS.com - A version that is certified for use in safety\r
  43     critical systems.\r
  44 \r
  45     http://www.OpenRTOS.com - Commercial support, development, porting,\r
  46     licensing and training services.\r
  47 */\r
  48 \r
  49 /* Kernel includes. */\r
  50 #include "FreeRTOS.h"\r
  51 #include "semphr.h"\r
  52 #include "task.h"\r
  53 \r
  54 /* Demo includes. */\r
  55 #include "emac.h"\r
  56 \r
  57 /* uIP includes. */\r
  58 #include "uip.h"\r
  59 \r
  60 /* Hardware library includes. */\r
  61 #include "hw_types.h"\r
  62 #include "hw_memmap.h"\r
  63 #include "hw_ints.h"\r
  64 #include "hw_ethernet.h"\r
  65 #include "ethernet.h"\r
  66 #include "interrupt.h"\r
  67 \r
  68 #define emacNUM_RX_BUFFERS              5\r
  69 #define emacFRAM_SIZE_BYTES     2\r
  70 #define macNEGOTIATE_DELAY              2000\r
  71 #define macWAIT_SEND_TIME               ( 10 )\r
  72 \r
  73 /* The task that handles the MAC peripheral.  This is created at a high\r
  74 priority and is effectively a deferred interrupt handler.  The peripheral\r
  75 handling is deferred to a task to prevent the entire FIFO having to be read\r
  76 from within an ISR. */\r
  77 void vMACHandleTask( void *pvParameters );\r
  78 \r
  79 /*-----------------------------------------------------------*/\r
  80 \r
  81 /* The semaphore used to wake the uIP task when data arrives. */\r
  82 xSemaphoreHandle xEMACSemaphore = NULL;\r
  83 \r
  84 /* The semaphore used to wake the interrupt handler task.  The peripheral\r
  85 is processed at the task level to prevent the need to read the entire FIFO from\r
  86 within the ISR itself. */\r
  87 xSemaphoreHandle xMACInterruptSemaphore = NULL;\r
  88 \r
  89 /* The buffer used by the uIP stack.  In this case the pointer is used to\r
  90 point to one of the Rx buffers. */\r
  91 unsigned portCHAR *uip_buf;\r
  92 \r
  93 /* Buffers into which Rx data is placed. */\r
  94 static unsigned portCHAR ucRxBuffers[ emacNUM_RX_BUFFERS ][ UIP_BUFSIZE + ( 4 * emacFRAM_SIZE_BYTES ) ];\r
  95 \r
  96 /* The length of the data within each of the Rx buffers. */\r
  97 static unsigned portLONG ulRxLength[ emacNUM_RX_BUFFERS ];\r
  98 \r
  99 /* Used to keep a track of the number of bytes to transmit. */\r
 100 static unsigned portLONG ulNextTxSpace;\r
 101 \r
 102 /*-----------------------------------------------------------*/\r
 103 \r
 104 portBASE_TYPE vInitEMAC( void )\r
 105 {\r
 106 unsigned long ulTemp;\r
 107 portBASE_TYPE xReturn;\r
 108 \r
 109         /* Ensure all interrupts are disabled. */\r
 110         EthernetIntDisable( ETH_BASE, ( ETH_INT_PHY | ETH_INT_MDIO | ETH_INT_RXER | ETH_INT_RXOF | ETH_INT_TX | ETH_INT_TXER | ETH_INT_RX));\r
 111 \r
 112         /* Clear any interrupts that were already pending. */\r
 113     ulTemp = EthernetIntStatus( ETH_BASE, pdFALSE );\r
 114     EthernetIntClear( ETH_BASE, ulTemp );\r
 115 \r
 116         /* Initialise the MAC and connect. */\r
 117     EthernetInit( ETH_BASE );\r
 118     EthernetConfigSet( ETH_BASE, ( ETH_CFG_TX_DPLXEN | ETH_CFG_TX_CRCEN | ETH_CFG_TX_PADEN ) );\r
 119     EthernetEnable( ETH_BASE );\r
 120 \r
 121         /* Mark each Rx buffer as empty. */\r
 122         for( ulTemp = 0; ulTemp < emacNUM_RX_BUFFERS; ulTemp++ )\r
 123         {\r
 124                 ulRxLength[ ulTemp ] = 0;\r
 125         }\r
 126         \r
 127         /* Create the queue and task used to defer the MAC processing to the\r
 128         task level. */\r
 129         vSemaphoreCreateBinary( xMACInterruptSemaphore );\r
 130         xSemaphoreTake( xMACInterruptSemaphore, 0 );\r
 131         xReturn = xTaskCreate( vMACHandleTask, ( signed portCHAR * ) "MAC", configMINIMAL_STACK_SIZE, NULL, configMAX_PRIORITIES - 1, NULL );\r
 132         vTaskDelay( macNEGOTIATE_DELAY );\r
 133         \r
 134         /* We are only interested in Rx interrupts. */\r
 135         IntPrioritySet( INT_ETH, configKERNEL_INTERRUPT_PRIORITY );\r
 136     IntEnable( INT_ETH );\r
 137     EthernetIntEnable(ETH_BASE, ETH_INT_RX);\r
 138 \r
 139         return xReturn;\r
 140 }\r
 141 /*-----------------------------------------------------------*/\r
 142 \r
 143 unsigned int uiGetEMACRxData( unsigned char *ucBuffer )\r
 144 {\r
 145 static unsigned long ulNextRxBuffer = 0;\r
 146 unsigned int iLen;\r
 147 \r
 148         iLen = ulRxLength[ ulNextRxBuffer ];\r
 149 \r
 150         if( iLen != 0 )\r
 151         {\r
 152                 /* Leave room for the size at the start of the buffer. */\r
 153                 uip_buf = &( ucRxBuffers[ ulNextRxBuffer ][ 2 ] );\r
 154                 \r
 155                 ulRxLength[ ulNextRxBuffer ] = 0;\r
 156                 \r
 157                 ulNextRxBuffer++;\r
 158                 if( ulNextRxBuffer >= emacNUM_RX_BUFFERS )\r
 159                 {\r
 160                         ulNextRxBuffer = 0;\r
 161                 }\r
 162         }\r
 163 \r
 164     return iLen;\r
 165 }\r
 166 /*-----------------------------------------------------------*/\r
 167 \r
 168 void vInitialiseSend( void )\r
 169 {\r
 170         /* Set the index to the first byte to send - skipping over the size\r
 171         bytes. */\r
 172         ulNextTxSpace = 2;\r
 173 }\r
 174 /*-----------------------------------------------------------*/\r
 175 \r
 176 void vIncrementTxLength( unsigned portLONG ulLength )\r
 177 {\r
 178         ulNextTxSpace += ulLength;\r
 179 }\r
 180 /*-----------------------------------------------------------*/\r
 181 \r
 182 void vSendBufferToMAC( void )\r
 183 {\r
 184 unsigned long *pulSource;\r
 185 unsigned portSHORT * pus;\r
 186 unsigned portLONG ulNextWord;\r
 187 \r
 188         /* Locate the data to be send. */\r
 189         pus = ( unsigned portSHORT * ) uip_buf;\r
 190 \r
 191         /* Add in the size of the data. */\r
 192         pus--;\r
 193         *pus = ulNextTxSpace;\r
 194 \r
 195         /* Wait for data to be sent if there is no space immediately. */\r
 196     while( !EthernetSpaceAvail( ETH_BASE ) )\r
 197     {\r
 198                 vTaskDelay( macWAIT_SEND_TIME );\r
 199     }\r
 200         \r
 201         pulSource = ( unsigned portLONG * ) pus;        \r
 202         \r
 203         for( ulNextWord = 0; ulNextWord < ulNextTxSpace; ulNextWord += sizeof( unsigned portLONG ) )\r
 204         {\r
 205         HWREG(ETH_BASE + MAC_O_DATA) = *pulSource;\r
 206                 pulSource++;\r
 207         }\r
 208 \r
 209         /* Go. */\r
 210     HWREG( ETH_BASE + MAC_O_TR ) = MAC_TR_NEWTX;\r
 211 }\r
 212 /*-----------------------------------------------------------*/\r
 213 \r
 214 void vEMAC_ISR( void )\r
 215 {\r
 216 portBASE_TYPE xHigherPriorityTaskWoken = pdFALSE;\r
 217 unsigned portLONG ulTemp;\r
 218 \r
 219         /* Clear the interrupt. */\r
 220         ulTemp = EthernetIntStatus( ETH_BASE, pdFALSE );\r
 221         EthernetIntClear( ETH_BASE, ulTemp );\r
 222                 \r
 223         /* Was it an Rx interrupt? */\r
 224         if( ulTemp & ETH_INT_RX )\r
 225         {\r
 226                 xSemaphoreGiveFromISR( xMACInterruptSemaphore, &xHigherPriorityTaskWoken );\r
 227                 EthernetIntDisable( ETH_BASE, ETH_INT_RX );\r
 228         }\r
 229                 \r
 230     /* Switch to the uIP task. */\r
 231         portEND_SWITCHING_ISR( xHigherPriorityTaskWoken );\r
 232 }\r
 233 /*-----------------------------------------------------------*/\r
 234 \r
 235 void vMACHandleTask( void *pvParameters )\r
 236 {\r
 237 unsigned long ulLen = 0, i;\r
 238 unsigned portLONG ulLength, ulInt;\r
 239 unsigned long *pulBuffer;\r
 240 static unsigned portLONG ulNextRxBuffer = 0;\r
 241 portBASE_TYPE xSwitchRequired = pdFALSE;\r
 242 \r
 243         for( ;; )\r
 244         {\r
 245                 /* Wait for something to do. */\r
 246                 xSemaphoreTake( xMACInterruptSemaphore, portMAX_DELAY );\r
 247                 \r
 248                 while( ( ulInt = ( EthernetIntStatus( ETH_BASE, pdFALSE ) & ETH_INT_RX ) ) != 0 )\r
 249                 {               \r
 250                         ulLength = HWREG( ETH_BASE + MAC_O_DATA );\r
 251                         \r
 252                         /* Leave room at the start of the buffer for the size. */\r
 253                         pulBuffer = ( unsigned long * ) &( ucRxBuffers[ ulNextRxBuffer ][ 2 ] );                        \r
 254                         *pulBuffer = ( ulLength >> 16 );\r
 255 \r
 256                         /* Get the size of the data. */                 \r
 257                         pulBuffer = ( unsigned long * ) &( ucRxBuffers[ ulNextRxBuffer ][ 4 ] );                        \r
 258                         ulLength &= 0xFFFF;\r
 259                         \r
 260                         if( ulLength > 4 )\r
 261                         {\r
 262                                 ulLength -= 4;\r
 263                                 \r
 264                                 if( ulLength >= UIP_BUFSIZE )\r
 265                                 {\r
 266                                         /* The data won't fit in our buffer.  Ensure we don't\r
 267                                         try to write into the buffer. */\r
 268                                         ulLength = 0;\r
 269                                 }\r
 270 \r
 271                                 /* Read out the data into our buffer. */\r
 272                                 for( i = 0; i < ulLength; i += sizeof( unsigned portLONG ) )\r
 273                                 {\r
 274                                         *pulBuffer = HWREG( ETH_BASE + MAC_O_DATA );\r
 275                                         pulBuffer++;\r
 276                                 }\r
 277                                 \r
 278                                 /* Store the length of the data into the separate array. */\r
 279                                 ulRxLength[ ulNextRxBuffer ] = ulLength;\r
 280                                 \r
 281                                 /* Use the next buffer the next time through. */\r
 282                                 ulNextRxBuffer++;\r
 283                                 if( ulNextRxBuffer >= emacNUM_RX_BUFFERS )\r
 284                                 {\r
 285                                         ulNextRxBuffer = 0;\r
 286                                 }\r
 287                 \r
 288                                 /* Ensure the uIP task is not blocked as data has arrived. */\r
 289                                 xSemaphoreGive( xEMACSemaphore );\r
 290                         }\r
 291                 }\r
 292                 \r
 293                 EthernetIntEnable( ETH_BASE, ETH_INT_RX );\r
 294         }\r
 295 }\r
 296 \r