git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_LPC1768_GCC_RedSuite/src/webserver/emac.c

   1 /*\r
   2     FreeRTOS V7.4.0 - Copyright (C) 2013 Real Time Engineers Ltd.\r
   3 \r
   4     FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME.  PLEASE VISIT\r
   5     http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
   6 \r
   7     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS tutorial books are available in pdf and paperback.        *\r
  10      *    Complete, revised, and edited pdf reference manuals are also       *\r
  11      *    available.                                                         *\r
  12      *                                                                       *\r
  13      *    Purchasing FreeRTOS documentation will not only help you, by       *\r
  14      *    ensuring you get running as quickly as possible and with an        *\r
  15      *    in-depth knowledge of how to use FreeRTOS, it will also help       *\r
  16      *    the FreeRTOS project to continue with its mission of providing     *\r
  17      *    professional grade, cross platform, de facto standard solutions    *\r
  18      *    for microcontrollers - completely free of charge!                  *\r
  19      *                                                                       *\r
  20      *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *\r
  21      *                                                                       *\r
  22      *    Thank you for using FreeRTOS, and thank you for your support!      *\r
  23      *                                                                       *\r
  24     ***************************************************************************\r
  25 \r
  26 \r
  27     This file is part of the FreeRTOS distribution.\r
  28 \r
  29     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  30     the terms of the GNU General Public License (version 2) as published by the\r
  31     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  32 \r
  33     >>>>>>NOTE<<<<<< The modification to the GPL is included to allow you to\r
  34     distribute a combined work that includes FreeRTOS without being obliged to\r
  35     provide the source code for proprietary components outside of the FreeRTOS\r
  36     kernel.\r
  37 \r
  38     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  39     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  40     FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more\r
  41     details. You should have received a copy of the GNU General Public License\r
  42     and the FreeRTOS license exception along with FreeRTOS; if not itcan be\r
  43     viewed here: http://www.freertos.org/a00114.html and also obtained by\r
  44     writing to Real Time Engineers Ltd., contact details for whom are available\r
  45     on the FreeRTOS WEB site.\r
  46 \r
  47     1 tab == 4 spaces!\r
  48 \r
  49     ***************************************************************************\r
  50      *                                                                       *\r
  51      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  52      *    not run, what could be wrong?"                                     *\r
  53      *                                                                       *\r
  54      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  55      *                                                                       *\r
  56     ***************************************************************************\r
  57 \r
  58 \r
  59     http://www.FreeRTOS.org - Documentation, books, training, latest versions, \r
  60     license and Real Time Engineers Ltd. contact details.\r
  61 \r
  62     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  63     including FreeRTOS+Trace - an indispensable productivity tool, and our new\r
  64     fully thread aware and reentrant UDP/IP stack.\r
  65 \r
  66     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High \r
  67     Integrity Systems, who sell the code with commercial support, \r
  68     indemnification and middleware, under the OpenRTOS brand.\r
  69     \r
  70     http://www.SafeRTOS.com - High Integrity Systems also provide a safety \r
  71     engineered and independently SIL3 certified version for use in safety and \r
  72     mission critical applications that require provable dependability.\r
  73 */\r
  74 \r
  75 /* Originally adapted from file written by Andreas Dannenberg.  Supplied with permission. */\r
  76 \r
  77 /* Kernel includes. */\r
  78 #include "FreeRTOS.h"\r
  79 #include "task.h"\r
  80 #include "semphr.h"\r
  81 \r
  82 /* Hardware specific includes. */\r
  83 #include "EthDev_LPC17xx.h"\r
  84 \r
  85 /* Time to wait between each inspection of the link status. */\r
  86 #define emacWAIT_FOR_LINK_TO_ESTABLISH ( 500 / portTICK_RATE_MS )\r
  87 \r
  88 /* Short delay used in several places during the initialisation process. */\r
  89 #define emacSHORT_DELAY                            ( 2 )\r
  90 \r
  91 /* Hardware specific bit definitions. */\r
  92 #define emacLINK_ESTABLISHED            ( 0x0001 )\r
  93 #define emacFULL_DUPLEX_ENABLED         ( 0x0004 )\r
  94 #define emac10BASE_T_MODE                       ( 0x0002 )\r
  95 #define emacPINSEL2_VALUE 0x50150105\r
  96 \r
  97 /* If no buffers are available, then wait this long before looking again.... */\r
  98 #define emacBUFFER_WAIT_DELAY   ( 3 / portTICK_RATE_MS )\r
  99 \r
 100 /* ...and don't look more than this many times. */\r
 101 #define emacBUFFER_WAIT_ATTEMPTS        ( 30 )\r
 102 \r
 103 /* Index to the Tx descriptor that is always used first for every Tx.  The second\r
 104 descriptor is then used to re-send in order to speed up the uIP Tx process. */\r
 105 #define emacTX_DESC_INDEX                       ( 0 )\r
 106 \r
 107 #define PCONP_PCENET    0x40000000\r
 108 /*-----------------------------------------------------------*/\r
 109 \r
 110 /*\r
 111  * Configure both the Rx and Tx descriptors during the init process.\r
 112  */\r
 113 static void prvInitDescriptors( void );\r
 114 \r
 115 /*\r
 116  * Setup the IO and peripherals required for Ethernet communication.\r
 117  */\r
 118 static void prvSetupEMACHardware( void );\r
 119 \r
 120 /*\r
 121  * Control the auto negotiate process.\r
 122  */\r
 123 static void prvConfigurePHY( void );\r
 124 \r
 125 /*\r
 126  * Wait for a link to be established, then setup the PHY according to the link\r
 127  * parameters.\r
 128  */\r
 129 static long prvSetupLinkStatus( void );\r
 130 \r
 131 /*\r
 132  * Search the pool of buffers to find one that is free.  If a buffer is found\r
 133  * mark it as in use before returning its address.\r
 134  */\r
 135 static unsigned char *prvGetNextBuffer( void );\r
 136 \r
 137 /*\r
 138  * Return an allocated buffer to the pool of free buffers.\r
 139  */\r
 140 static void prvReturnBuffer( unsigned char *pucBuffer );\r
 141 \r
 142 /*\r
 143  * Send lValue to the lPhyReg within the PHY.\r
 144  */\r
 145 static long prvWritePHY( long lPhyReg, long lValue );\r
 146 \r
 147 /*\r
 148  * Read a value from ucPhyReg within the PHY.  *plStatus will be set to\r
 149  * pdFALSE if there is an error.\r
 150  */\r
 151 static unsigned short prvReadPHY( unsigned char ucPhyReg, long *plStatus );\r
 152 \r
 153 /*-----------------------------------------------------------*/\r
 154 \r
 155 /* The semaphore used to wake the uIP task when data arrives. */\r
 156 extern xSemaphoreHandle xEMACSemaphore;\r
 157 \r
 158 /* Each ucBufferInUse index corresponds to a position in the pool of buffers.\r
 159 If the index contains a 1 then the buffer within pool is in use, if it\r
 160 contains a 0 then the buffer is free. */\r
 161 static unsigned char ucBufferInUse[ ETH_NUM_BUFFERS ] = { pdFALSE };\r
 162 \r
 163 /* The uip_buffer is not a fixed array, but instead gets pointed to the buffers\r
 164 allocated within this file. */\r
 165 unsigned char * uip_buf;\r
 166 \r
 167 /* Store the length of the data being sent so the data can be sent twice.  The\r
 168 value will be set back to 0 once the data has been sent twice. */\r
 169 static unsigned short usSendLen = 0;\r
 170 \r
 171 /*-----------------------------------------------------------*/\r
 172 \r
 173 long lEMACInit( void )\r
 174 {\r
 175 long lReturn = pdPASS;\r
 176 unsigned long ulID1, ulID2;\r
 177 \r
 178         /* Reset peripherals, configure port pins and registers. */\r
 179         prvSetupEMACHardware();\r
 180 \r
 181         /* Check the PHY part number is as expected. */\r
 182         ulID1 = prvReadPHY( PHY_REG_IDR1, &lReturn );\r
 183         ulID2 = prvReadPHY( PHY_REG_IDR2, &lReturn );\r
 184         if( ( (ulID1 << 16UL ) | ( ulID2 & 0xFFF0UL ) ) == DP83848C_ID )\r
 185         {\r
 186                 /* Set the Ethernet MAC Address registers */\r
 187                 LPC_EMAC->SA0 = ( configMAC_ADDR0 << 8 ) | configMAC_ADDR1;\r
 188                 LPC_EMAC->SA1 = ( configMAC_ADDR2 << 8 ) | configMAC_ADDR3;\r
 189                 LPC_EMAC->SA2 = ( configMAC_ADDR4 << 8 ) | configMAC_ADDR5;\r
 190 \r
 191                 /* Initialize Tx and Rx DMA Descriptors */\r
 192                 prvInitDescriptors();\r
 193 \r
 194                 /* Receive broadcast and perfect match packets */\r
 195                 LPC_EMAC->RxFilterCtrl = RFC_UCAST_EN | RFC_BCAST_EN | RFC_PERFECT_EN;\r
 196 \r
 197                 /* Setup the PHY. */\r
 198                 prvConfigurePHY();\r
 199         }\r
 200         else\r
 201         {\r
 202                 lReturn = pdFAIL;\r
 203         }\r
 204 \r
 205         /* Check the link status. */\r
 206         if( lReturn == pdPASS )\r
 207         {\r
 208                 lReturn = prvSetupLinkStatus();\r
 209         }\r
 210 \r
 211         if( lReturn == pdPASS )\r
 212         {\r
 213                 /* Initialise uip_buf to ensure it points somewhere valid. */\r
 214                 uip_buf = prvGetNextBuffer();\r
 215 \r
 216                 /* Reset all interrupts */\r
 217                 LPC_EMAC->IntClear = ( INT_RX_OVERRUN | INT_RX_ERR | INT_RX_FIN | INT_RX_DONE | INT_TX_UNDERRUN | INT_TX_ERR | INT_TX_FIN | INT_TX_DONE | INT_SOFT_INT | INT_WAKEUP );\r
 218 \r
 219                 /* Enable receive and transmit mode of MAC Ethernet core */\r
 220                 LPC_EMAC->Command |= ( CR_RX_EN | CR_TX_EN );\r
 221                 LPC_EMAC->MAC1 |= MAC1_REC_EN;\r
 222         }\r
 223 \r
 224         return lReturn;\r
 225 }\r
 226 /*-----------------------------------------------------------*/\r
 227 \r
 228 static unsigned char *prvGetNextBuffer( void )\r
 229 {\r
 230 long x;\r
 231 unsigned char *pucReturn = NULL;\r
 232 unsigned long ulAttempts = 0;\r
 233 \r
 234         while( pucReturn == NULL )\r
 235         {\r
 236                 /* Look through the buffers to find one that is not in use by\r
 237                 anything else. */\r
 238                 for( x = 0; x < ETH_NUM_BUFFERS; x++ )\r
 239                 {\r
 240                         if( ucBufferInUse[ x ] == pdFALSE )\r
 241                         {\r
 242                                 ucBufferInUse[ x ] = pdTRUE;\r
 243                                 pucReturn = ( unsigned char * ) ETH_BUF( x );\r
 244                                 break;\r
 245                         }\r
 246                 }\r
 247 \r
 248                 /* Was a buffer found? */\r
 249                 if( pucReturn == NULL )\r
 250                 {\r
 251                         ulAttempts++;\r
 252 \r
 253                         if( ulAttempts >= emacBUFFER_WAIT_ATTEMPTS )\r
 254                         {\r
 255                                 break;\r
 256                         }\r
 257 \r
 258                         /* Wait then look again. */\r
 259                         vTaskDelay( emacBUFFER_WAIT_DELAY );\r
 260                 }\r
 261         }\r
 262 \r
 263         return pucReturn;\r
 264 }\r
 265 /*-----------------------------------------------------------*/\r
 266 \r
 267 static void prvInitDescriptors( void )\r
 268 {\r
 269 long x, lNextBuffer = 0;\r
 270 \r
 271         for( x = 0; x < NUM_RX_FRAG; x++ )\r
 272         {\r
 273                 /* Allocate the next Ethernet buffer to this descriptor. */\r
 274                 RX_DESC_PACKET( x ) = ETH_BUF( lNextBuffer );\r
 275                 RX_DESC_CTRL( x ) = RCTRL_INT | ( ETH_FRAG_SIZE - 1 );\r
 276                 RX_STAT_INFO( x ) = 0;\r
 277                 RX_STAT_HASHCRC( x ) = 0;\r
 278 \r
 279                 /* The Ethernet buffer is now in use. */\r
 280                 ucBufferInUse[ lNextBuffer ] = pdTRUE;\r
 281                 lNextBuffer++;\r
 282         }\r
 283 \r
 284         /* Set EMAC Receive Descriptor Registers. */\r
 285         LPC_EMAC->RxDescriptor = RX_DESC_BASE;\r
 286         LPC_EMAC->RxStatus = RX_STAT_BASE;\r
 287         LPC_EMAC->RxDescriptorNumber = NUM_RX_FRAG - 1;\r
 288 \r
 289         /* Rx Descriptors Point to 0 */\r
 290         LPC_EMAC->RxConsumeIndex = 0;\r
 291 \r
 292         /* A buffer is not allocated to the Tx descriptors until they are actually\r
 293         used. */\r
 294         for( x = 0; x < NUM_TX_FRAG; x++ )\r
 295         {\r
 296                 TX_DESC_PACKET( x ) = ( unsigned long ) NULL;\r
 297                 TX_DESC_CTRL( x ) = 0;\r
 298                 TX_STAT_INFO( x ) = 0;\r
 299         }\r
 300 \r
 301         /* Set EMAC Transmit Descriptor Registers. */\r
 302         LPC_EMAC->TxDescriptor = TX_DESC_BASE;\r
 303         LPC_EMAC->TxStatus = TX_STAT_BASE;\r
 304         LPC_EMAC->TxDescriptorNumber = NUM_TX_FRAG - 1;\r
 305 \r
 306         /* Tx Descriptors Point to 0 */\r
 307         LPC_EMAC->TxProduceIndex = 0;\r
 308 }\r
 309 /*-----------------------------------------------------------*/\r
 310 \r
 311 static void prvSetupEMACHardware( void )\r
 312 {\r
 313 unsigned short us;\r
 314 long x, lDummy;\r
 315 \r
 316         /* Enable P1 Ethernet Pins. */\r
 317         LPC_PINCON->PINSEL2 = emacPINSEL2_VALUE;\r
 318         LPC_PINCON->PINSEL3 = ( LPC_PINCON->PINSEL3 & ~0x0000000F ) | 0x00000005;\r
 319 \r
 320         /* Power Up the EMAC controller. */\r
 321         LPC_SC->PCONP |= PCONP_PCENET;\r
 322         vTaskDelay( emacSHORT_DELAY );\r
 323 \r
 324         /* Reset all EMAC internal modules. */\r
 325         LPC_EMAC->MAC1 = MAC1_RES_TX | MAC1_RES_MCS_TX | MAC1_RES_RX | MAC1_RES_MCS_RX | MAC1_SIM_RES | MAC1_SOFT_RES;\r
 326         LPC_EMAC->Command = CR_REG_RES | CR_TX_RES | CR_RX_RES | CR_PASS_RUNT_FRM;\r
 327 \r
 328         /* A short delay after reset. */\r
 329         vTaskDelay( emacSHORT_DELAY );\r
 330 \r
 331         /* Initialize MAC control registers. */\r
 332         LPC_EMAC->MAC1 = MAC1_PASS_ALL;\r
 333         LPC_EMAC->MAC2 = MAC2_CRC_EN | MAC2_PAD_EN;\r
 334         LPC_EMAC->MAXF = ETH_MAX_FLEN;\r
 335         LPC_EMAC->CLRT = CLRT_DEF;\r
 336         LPC_EMAC->IPGR = IPGR_DEF;\r
 337 \r
 338         /* Enable Reduced MII interface. */\r
 339         LPC_EMAC->Command = CR_RMII | CR_PASS_RUNT_FRM;\r
 340 \r
 341         /* Reset Reduced MII Logic. */\r
 342         LPC_EMAC->SUPP = SUPP_RES_RMII;\r
 343         vTaskDelay( emacSHORT_DELAY );\r
 344         LPC_EMAC->SUPP = 0;\r
 345 \r
 346         /* Put the PHY in reset mode */\r
 347         prvWritePHY( PHY_REG_BMCR, MCFG_RES_MII );\r
 348         prvWritePHY( PHY_REG_BMCR, MCFG_RES_MII );\r
 349 \r
 350         /* Wait for hardware reset to end. */\r
 351         for( x = 0; x < 100; x++ )\r
 352         {\r
 353                 vTaskDelay( emacSHORT_DELAY * 5 );\r
 354                 us = prvReadPHY( PHY_REG_BMCR, &lDummy );\r
 355                 if( !( us & MCFG_RES_MII ) )\r
 356                 {\r
 357                         /* Reset complete */\r
 358                         break;\r
 359                 }\r
 360         }\r
 361 }\r
 362 /*-----------------------------------------------------------*/\r
 363 \r
 364 static void prvConfigurePHY( void )\r
 365 {\r
 366 unsigned short us;\r
 367 long x, lDummy;\r
 368 \r
 369         /* Auto negotiate the configuration. */\r
 370         if( prvWritePHY( PHY_REG_BMCR, PHY_AUTO_NEG ) )\r
 371         {\r
 372                 vTaskDelay( emacSHORT_DELAY * 5 );\r
 373 \r
 374                 for( x = 0; x < 10; x++ )\r
 375                 {\r
 376                         us = prvReadPHY( PHY_REG_BMSR, &lDummy );\r
 377 \r
 378                         if( us & PHY_AUTO_NEG_COMPLETE )\r
 379                         {\r
 380                                 break;\r
 381                         }\r
 382 \r
 383                         vTaskDelay( emacWAIT_FOR_LINK_TO_ESTABLISH );\r
 384                 }\r
 385         }\r
 386 }\r
 387 /*-----------------------------------------------------------*/\r
 388 \r
 389 static long prvSetupLinkStatus( void )\r
 390 {\r
 391 long lReturn = pdFAIL, x;\r
 392 unsigned short usLinkStatus;\r
 393 \r
 394         /* Wait with timeout for the link to be established. */\r
 395         for( x = 0; x < 10; x++ )\r
 396         {\r
 397                 usLinkStatus = prvReadPHY( PHY_REG_STS, &lReturn );\r
 398                 if( usLinkStatus & emacLINK_ESTABLISHED )\r
 399                 {\r
 400                         /* Link is established. */\r
 401                         lReturn = pdPASS;\r
 402                         break;\r
 403                 }\r
 404 \r
 405         vTaskDelay( emacWAIT_FOR_LINK_TO_ESTABLISH );\r
 406         }\r
 407 \r
 408         if( lReturn == pdPASS )\r
 409         {\r
 410                 /* Configure Full/Half Duplex mode. */\r
 411                 if( usLinkStatus & emacFULL_DUPLEX_ENABLED )\r
 412                 {\r
 413                         /* Full duplex is enabled. */\r
 414                         LPC_EMAC->MAC2 |= MAC2_FULL_DUP;\r
 415                         LPC_EMAC->Command |= CR_FULL_DUP;\r
 416                         LPC_EMAC->IPGT = IPGT_FULL_DUP;\r
 417                 }\r
 418                 else\r
 419                 {\r
 420                         /* Half duplex mode. */\r
 421                         LPC_EMAC->IPGT = IPGT_HALF_DUP;\r
 422                 }\r
 423 \r
 424                 /* Configure 100MBit/10MBit mode. */\r
 425                 if( usLinkStatus & emac10BASE_T_MODE )\r
 426                 {\r
 427                         /* 10MBit mode. */\r
 428                         LPC_EMAC->SUPP = 0;\r
 429                 }\r
 430                 else\r
 431                 {\r
 432                         /* 100MBit mode. */\r
 433                         LPC_EMAC->SUPP = SUPP_SPEED;\r
 434                 }\r
 435         }\r
 436 \r
 437         return lReturn;\r
 438 }\r
 439 /*-----------------------------------------------------------*/\r
 440 \r
 441 static void prvReturnBuffer( unsigned char *pucBuffer )\r
 442 {\r
 443 unsigned long ul;\r
 444 \r
 445         /* Return a buffer to the pool of free buffers. */\r
 446         for( ul = 0; ul < ETH_NUM_BUFFERS; ul++ )\r
 447         {\r
 448                 if( ETH_BUF( ul ) == ( unsigned long ) pucBuffer )\r
 449                 {\r
 450                         ucBufferInUse[ ul ] = pdFALSE;\r
 451                         break;\r
 452                 }\r
 453         }\r
 454 }\r
 455 /*-----------------------------------------------------------*/\r
 456 \r
 457 unsigned long ulGetEMACRxData( void )\r
 458 {\r
 459 unsigned long ulLen = 0;\r
 460 long lIndex;\r
 461 \r
 462         if( LPC_EMAC->RxProduceIndex != LPC_EMAC->RxConsumeIndex )\r
 463         {\r
 464                 /* Mark the current buffer as free as uip_buf is going to be set to\r
 465                 the buffer that contains the received data. */\r
 466                 prvReturnBuffer( uip_buf );\r
 467 \r
 468                 ulLen = ( RX_STAT_INFO( LPC_EMAC->RxConsumeIndex ) & RINFO_SIZE ) - 3;\r
 469                 uip_buf = ( unsigned char * ) RX_DESC_PACKET( LPC_EMAC->RxConsumeIndex );\r
 470 \r
 471                 /* Allocate a new buffer to the descriptor. */\r
 472         RX_DESC_PACKET( LPC_EMAC->RxConsumeIndex ) = ( unsigned long ) prvGetNextBuffer();\r
 473 \r
 474                 /* Move the consume index onto the next position, ensuring it wraps to\r
 475                 the beginning at the appropriate place. */\r
 476                 lIndex = LPC_EMAC->RxConsumeIndex;\r
 477 \r
 478                 lIndex++;\r
 479                 if( lIndex >= NUM_RX_FRAG )\r
 480                 {\r
 481                         lIndex = 0;\r
 482                 }\r
 483 \r
 484                 LPC_EMAC->RxConsumeIndex = lIndex;\r
 485         }\r
 486 \r
 487         return ulLen;\r
 488 }\r
 489 /*-----------------------------------------------------------*/\r
 490 \r
 491 void vSendEMACTxData( unsigned short usTxDataLen )\r
 492 {\r
 493 unsigned long ulAttempts = 0UL;\r
 494 \r
 495         /* Check to see if the Tx descriptor is free, indicated by its buffer being\r
 496         NULL. */\r
 497         while( TX_DESC_PACKET( emacTX_DESC_INDEX ) != ( unsigned long ) NULL )\r
 498         {\r
 499                 /* Wait for the Tx descriptor to become available. */\r
 500                 vTaskDelay( emacBUFFER_WAIT_DELAY );\r
 501 \r
 502                 ulAttempts++;\r
 503                 if( ulAttempts > emacBUFFER_WAIT_ATTEMPTS )\r
 504                 {\r
 505                         /* Something has gone wrong as the Tx descriptor is still in use.\r
 506                         Clear it down manually, the data it was sending will probably be\r
 507                         lost. */\r
 508                         prvReturnBuffer( ( unsigned char * ) TX_DESC_PACKET( emacTX_DESC_INDEX ) );\r
 509                         break;\r
 510                 }\r
 511         }\r
 512 \r
 513         /* Setup the Tx descriptor for transmission.  Remember the length of the\r
 514         data being sent so the second descriptor can be used to send it again from\r
 515         within the ISR. */\r
 516         usSendLen = usTxDataLen;\r
 517         TX_DESC_PACKET( emacTX_DESC_INDEX ) = ( unsigned long ) uip_buf;\r
 518         TX_DESC_CTRL( emacTX_DESC_INDEX ) = ( usTxDataLen | TCTRL_LAST | TCTRL_INT );\r
 519         LPC_EMAC->TxProduceIndex = ( emacTX_DESC_INDEX + 1 );\r
 520 \r
 521         /* uip_buf is being sent by the Tx descriptor.  Allocate a new buffer. */\r
 522         uip_buf = prvGetNextBuffer();\r
 523 }\r
 524 /*-----------------------------------------------------------*/\r
 525 \r
 526 static long prvWritePHY( long lPhyReg, long lValue )\r
 527 {\r
 528 const long lMaxTime = 10;\r
 529 long x;\r
 530 \r
 531         LPC_EMAC->MADR = DP83848C_DEF_ADR | lPhyReg;\r
 532         LPC_EMAC->MWTD = lValue;\r
 533 \r
 534         x = 0;\r
 535         for( x = 0; x < lMaxTime; x++ )\r
 536         {\r
 537                 if( ( LPC_EMAC->MIND & MIND_BUSY ) == 0 )\r
 538                 {\r
 539                         /* Operation has finished. */\r
 540                         break;\r
 541                 }\r
 542 \r
 543                 vTaskDelay( emacSHORT_DELAY );\r
 544         }\r
 545 \r
 546         if( x < lMaxTime )\r
 547         {\r
 548                 return pdPASS;\r
 549         }\r
 550         else\r
 551         {\r
 552                 return pdFAIL;\r
 553         }\r
 554 }\r
 555 /*-----------------------------------------------------------*/\r
 556 \r
 557 static unsigned short prvReadPHY( unsigned char ucPhyReg, long *plStatus )\r
 558 {\r
 559 long x;\r
 560 const long lMaxTime = 10;\r
 561 \r
 562         LPC_EMAC->MADR = DP83848C_DEF_ADR | ucPhyReg;\r
 563         LPC_EMAC->MCMD = MCMD_READ;\r
 564 \r
 565         for( x = 0; x < lMaxTime; x++ )\r
 566         {\r
 567                 /* Operation has finished. */\r
 568                 if( ( LPC_EMAC->MIND & MIND_BUSY ) == 0 )\r
 569                 {\r
 570                         break;\r
 571                 }\r
 572 \r
 573                 vTaskDelay( emacSHORT_DELAY );\r
 574         }\r
 575 \r
 576         LPC_EMAC->MCMD = 0;\r
 577 \r
 578         if( x >= lMaxTime )\r
 579         {\r
 580                 *plStatus = pdFAIL;\r
 581         }\r
 582 \r
 583         return( LPC_EMAC->MRDD );\r
 584 }\r
 585 /*-----------------------------------------------------------*/\r
 586 \r
 587 void vEMAC_ISR( void )\r
 588 {\r
 589 unsigned long ulStatus;\r
 590 long lHigherPriorityTaskWoken = pdFALSE;\r
 591 \r
 592         ulStatus = LPC_EMAC->IntStatus;\r
 593 \r
 594         /* Clear the interrupt. */\r
 595         LPC_EMAC->IntClear = ulStatus;\r
 596 \r
 597         if( ulStatus & INT_RX_DONE )\r
 598         {\r
 599                 /* Ensure the uIP task is not blocked as data has arrived. */\r
 600                 xSemaphoreGiveFromISR( xEMACSemaphore, &lHigherPriorityTaskWoken );\r
 601         }\r
 602 \r
 603         if( ulStatus & INT_TX_DONE )\r
 604         {\r
 605                 if( usSendLen > 0 )\r
 606                 {\r
 607                         /* Send the data again, using the second descriptor.  As there are\r
 608                         only two descriptors the index is set back to 0. */\r
 609                         TX_DESC_PACKET( ( emacTX_DESC_INDEX + 1 ) ) = TX_DESC_PACKET( emacTX_DESC_INDEX );\r
 610                         TX_DESC_CTRL( ( emacTX_DESC_INDEX + 1 ) ) = ( usSendLen | TCTRL_LAST | TCTRL_INT );\r
 611                         LPC_EMAC->TxProduceIndex = ( emacTX_DESC_INDEX );\r
 612 \r
 613                         /* This is the second Tx so set usSendLen to 0 to indicate that the\r
 614                         Tx descriptors will be free again. */\r
 615                         usSendLen = 0UL;\r
 616                 }\r
 617                 else\r
 618                 {\r
 619                         /* The Tx buffer is no longer required. */\r
 620                         prvReturnBuffer( ( unsigned char * ) TX_DESC_PACKET( emacTX_DESC_INDEX ) );\r
 621             TX_DESC_PACKET( emacTX_DESC_INDEX ) = ( unsigned long ) NULL;\r
 622                 }\r
 623         }\r
 624 \r
 625         portEND_SWITCHING_ISR( lHigherPriorityTaskWoken );\r
 626 }\r