孙 毅明 / Mbed 2 deprecated 123

创建mbed

Dependencies:   EthernetInterface SDFileSystem mbed-rtos mbed

EthernetInterface/lwip-eth/arch/TARGET_NXP/lpc17_emac.c@1:6465a3f5c58a, 2018-03-06 (annotated)

Committer:
sunyiming
Date:
Tue Mar 06 08:53:46 2018 +0000
Revision:
1:6465a3f5c58a
??OK

Who changed what in which revision?

UserRevisionLine numberNew contents of line
sunyiming 1:6465a3f5c58a 1 /**********************************************************************
sunyiming 1:6465a3f5c58a 2 * $Id$ lpc17_emac.c 2011-11-20
sunyiming 1:6465a3f5c58a 3 *//**
sunyiming 1:6465a3f5c58a 4 * @file lpc17_emac.c
sunyiming 1:6465a3f5c58a 5 * @brief LPC17 ethernet driver for LWIP
sunyiming 1:6465a3f5c58a 6 * @version 1.0
sunyiming 1:6465a3f5c58a 7 * @date 20. Nov. 2011
sunyiming 1:6465a3f5c58a 8 * @author NXP MCU SW Application Team
sunyiming 1:6465a3f5c58a 9 *
sunyiming 1:6465a3f5c58a 10 * Copyright(C) 2011, NXP Semiconductor
sunyiming 1:6465a3f5c58a 11 * All rights reserved.
sunyiming 1:6465a3f5c58a 12 *
sunyiming 1:6465a3f5c58a 13 ***********************************************************************
sunyiming 1:6465a3f5c58a 14 * Software that is described herein is for illustrative purposes only
sunyiming 1:6465a3f5c58a 15 * which provides customers with programming information regarding the
sunyiming 1:6465a3f5c58a 16 * products. This software is supplied "AS IS" without any warranties.
sunyiming 1:6465a3f5c58a 17 * NXP Semiconductors assumes no responsibility or liability for the
sunyiming 1:6465a3f5c58a 18 * use of the software, conveys no license or title under any patent,
sunyiming 1:6465a3f5c58a 19 * copyright, or mask work right to the product. NXP Semiconductors
sunyiming 1:6465a3f5c58a 20 * reserves the right to make changes in the software without
sunyiming 1:6465a3f5c58a 21 * notification. NXP Semiconductors also make no representation or
sunyiming 1:6465a3f5c58a 22 * warranty that such application will be suitable for the specified
sunyiming 1:6465a3f5c58a 23 * use without further testing or modification.
sunyiming 1:6465a3f5c58a 24 **********************************************************************/
sunyiming 1:6465a3f5c58a 25
sunyiming 1:6465a3f5c58a 26 #include "lwip/opt.h"
sunyiming 1:6465a3f5c58a 27 #include "lwip/sys.h"
sunyiming 1:6465a3f5c58a 28 #include "lwip/def.h"
sunyiming 1:6465a3f5c58a 29 #include "lwip/mem.h"
sunyiming 1:6465a3f5c58a 30 #include "lwip/pbuf.h"
sunyiming 1:6465a3f5c58a 31 #include "lwip/stats.h"
sunyiming 1:6465a3f5c58a 32 #include "lwip/snmp.h"
sunyiming 1:6465a3f5c58a 33 #include "netif/etharp.h"
sunyiming 1:6465a3f5c58a 34 #include "netif/ppp_oe.h"
sunyiming 1:6465a3f5c58a 35
sunyiming 1:6465a3f5c58a 36 #include "lpc17xx_emac.h"
sunyiming 1:6465a3f5c58a 37 #include "eth_arch.h"
sunyiming 1:6465a3f5c58a 38 #include "lpc_emac_config.h"
sunyiming 1:6465a3f5c58a 39 #include "lpc_phy.h"
sunyiming 1:6465a3f5c58a 40 #include "sys_arch.h"
sunyiming 1:6465a3f5c58a 41
sunyiming 1:6465a3f5c58a 42 #include "mbed_interface.h"
sunyiming 1:6465a3f5c58a 43 #include <string.h>
sunyiming 1:6465a3f5c58a 44
sunyiming 1:6465a3f5c58a 45 #ifndef LPC_EMAC_RMII
sunyiming 1:6465a3f5c58a 46 #error LPC_EMAC_RMII is not defined!
sunyiming 1:6465a3f5c58a 47 #endif
sunyiming 1:6465a3f5c58a 48
sunyiming 1:6465a3f5c58a 49 #if LPC_NUM_BUFF_TXDESCS < 2
sunyiming 1:6465a3f5c58a 50 #error LPC_NUM_BUFF_TXDESCS must be at least 2
sunyiming 1:6465a3f5c58a 51 #endif
sunyiming 1:6465a3f5c58a 52
sunyiming 1:6465a3f5c58a 53 #if LPC_NUM_BUFF_RXDESCS < 3
sunyiming 1:6465a3f5c58a 54 #error LPC_NUM_BUFF_RXDESCS must be at least 3
sunyiming 1:6465a3f5c58a 55 #endif
sunyiming 1:6465a3f5c58a 56
sunyiming 1:6465a3f5c58a 57 /** @defgroup lwip17xx_emac_DRIVER lpc17 EMAC driver for LWIP
sunyiming 1:6465a3f5c58a 58 * @ingroup lwip_emac
sunyiming 1:6465a3f5c58a 59 *
sunyiming 1:6465a3f5c58a 60 * @{
sunyiming 1:6465a3f5c58a 61 */
sunyiming 1:6465a3f5c58a 62
sunyiming 1:6465a3f5c58a 63 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 64 /** \brief Driver transmit and receive thread priorities
sunyiming 1:6465a3f5c58a 65 *
sunyiming 1:6465a3f5c58a 66 * Thread priorities for receive thread and TX cleanup thread. Alter
sunyiming 1:6465a3f5c58a 67 * to prioritize receive or transmit bandwidth. In a heavily loaded
sunyiming 1:6465a3f5c58a 68 * system or with LEIP_DEBUG enabled, the priorities might be better
sunyiming 1:6465a3f5c58a 69 * the same. */
sunyiming 1:6465a3f5c58a 70 #define RX_PRIORITY (osPriorityNormal)
sunyiming 1:6465a3f5c58a 71 #define TX_PRIORITY (osPriorityNormal)
sunyiming 1:6465a3f5c58a 72
sunyiming 1:6465a3f5c58a 73 /** \brief Debug output formatter lock define
sunyiming 1:6465a3f5c58a 74 *
sunyiming 1:6465a3f5c58a 75 * When using FreeRTOS and with LWIP_DEBUG enabled, enabling this
sunyiming 1:6465a3f5c58a 76 * define will allow RX debug messages to not interleave with the
sunyiming 1:6465a3f5c58a 77 * TX messages (so they are actually readable). Not enabling this
sunyiming 1:6465a3f5c58a 78 * define when the system is under load will cause the output to
sunyiming 1:6465a3f5c58a 79 * be unreadable. There is a small tradeoff in performance for this
sunyiming 1:6465a3f5c58a 80 * so use it only for debug. */
sunyiming 1:6465a3f5c58a 81 //#define LOCK_RX_THREAD
sunyiming 1:6465a3f5c58a 82
sunyiming 1:6465a3f5c58a 83 /** \brief Receive group interrupts
sunyiming 1:6465a3f5c58a 84 */
sunyiming 1:6465a3f5c58a 85 #define RXINTGROUP (EMAC_INT_RX_OVERRUN | EMAC_INT_RX_ERR | EMAC_INT_RX_DONE)
sunyiming 1:6465a3f5c58a 86
sunyiming 1:6465a3f5c58a 87 /** \brief Transmit group interrupts
sunyiming 1:6465a3f5c58a 88 */
sunyiming 1:6465a3f5c58a 89 #define TXINTGROUP (EMAC_INT_TX_UNDERRUN | EMAC_INT_TX_ERR | EMAC_INT_TX_DONE)
sunyiming 1:6465a3f5c58a 90
sunyiming 1:6465a3f5c58a 91 /** \brief Signal used for ethernet ISR to signal packet_rx() thread.
sunyiming 1:6465a3f5c58a 92 */
sunyiming 1:6465a3f5c58a 93 #define RX_SIGNAL 1
sunyiming 1:6465a3f5c58a 94
sunyiming 1:6465a3f5c58a 95 #else
sunyiming 1:6465a3f5c58a 96 #define RXINTGROUP 0
sunyiming 1:6465a3f5c58a 97 #define TXINTGROUP 0
sunyiming 1:6465a3f5c58a 98 #endif
sunyiming 1:6465a3f5c58a 99
sunyiming 1:6465a3f5c58a 100 /** \brief Structure of a TX/RX descriptor
sunyiming 1:6465a3f5c58a 101 */
sunyiming 1:6465a3f5c58a 102 typedef struct
sunyiming 1:6465a3f5c58a 103 {
sunyiming 1:6465a3f5c58a 104 volatile u32_t packet; /**< Pointer to buffer */
sunyiming 1:6465a3f5c58a 105 volatile u32_t control; /**< Control word */
sunyiming 1:6465a3f5c58a 106 } LPC_TXRX_DESC_T;
sunyiming 1:6465a3f5c58a 107
sunyiming 1:6465a3f5c58a 108 /** \brief Structure of a RX status entry
sunyiming 1:6465a3f5c58a 109 */
sunyiming 1:6465a3f5c58a 110 typedef struct
sunyiming 1:6465a3f5c58a 111 {
sunyiming 1:6465a3f5c58a 112 volatile u32_t statusinfo; /**< RX status word */
sunyiming 1:6465a3f5c58a 113 volatile u32_t statushashcrc; /**< RX hash CRC */
sunyiming 1:6465a3f5c58a 114 } LPC_TXRX_STATUS_T;
sunyiming 1:6465a3f5c58a 115
sunyiming 1:6465a3f5c58a 116 /* LPC EMAC driver data structure */
sunyiming 1:6465a3f5c58a 117 struct lpc_enetdata {
sunyiming 1:6465a3f5c58a 118 /* prxs must be 8 byte aligned! */
sunyiming 1:6465a3f5c58a 119 LPC_TXRX_STATUS_T prxs[LPC_NUM_BUFF_RXDESCS]; /**< Pointer to RX statuses */
sunyiming 1:6465a3f5c58a 120 struct netif *netif; /**< Reference back to LWIP parent netif */
sunyiming 1:6465a3f5c58a 121 LPC_TXRX_DESC_T ptxd[LPC_NUM_BUFF_TXDESCS]; /**< Pointer to TX descriptor list */
sunyiming 1:6465a3f5c58a 122 LPC_TXRX_STATUS_T ptxs[LPC_NUM_BUFF_TXDESCS]; /**< Pointer to TX statuses */
sunyiming 1:6465a3f5c58a 123 LPC_TXRX_DESC_T prxd[LPC_NUM_BUFF_RXDESCS]; /**< Pointer to RX descriptor list */
sunyiming 1:6465a3f5c58a 124 struct pbuf *rxb[LPC_NUM_BUFF_RXDESCS]; /**< RX pbuf pointer list, zero-copy mode */
sunyiming 1:6465a3f5c58a 125 u32_t rx_fill_desc_index; /**< RX descriptor next available index */
sunyiming 1:6465a3f5c58a 126 volatile u32_t rx_free_descs; /**< Count of free RX descriptors */
sunyiming 1:6465a3f5c58a 127 struct pbuf *txb[LPC_NUM_BUFF_TXDESCS]; /**< TX pbuf pointer list, zero-copy mode */
sunyiming 1:6465a3f5c58a 128 u32_t lpc_last_tx_idx; /**< TX last descriptor index, zero-copy mode */
sunyiming 1:6465a3f5c58a 129 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 130 sys_thread_t RxThread; /**< RX receive thread data object pointer */
sunyiming 1:6465a3f5c58a 131 sys_sem_t TxCleanSem; /**< TX cleanup thread wakeup semaphore */
sunyiming 1:6465a3f5c58a 132 sys_mutex_t TXLockMutex; /**< TX critical section mutex */
sunyiming 1:6465a3f5c58a 133 sys_sem_t xTXDCountSem; /**< TX free buffer counting semaphore */
sunyiming 1:6465a3f5c58a 134 #endif
sunyiming 1:6465a3f5c58a 135 };
sunyiming 1:6465a3f5c58a 136
sunyiming 1:6465a3f5c58a 137 #if defined(TARGET_LPC4088) || defined(TARGET_LPC4088_DM)
sunyiming 1:6465a3f5c58a 138 # if defined (__ICCARM__)
sunyiming 1:6465a3f5c58a 139 # define ETHMEM_SECTION
sunyiming 1:6465a3f5c58a 140 # elif defined(TOOLCHAIN_GCC_CR)
sunyiming 1:6465a3f5c58a 141 # define ETHMEM_SECTION __attribute__((section(".data.$RamPeriph32"), aligned))
sunyiming 1:6465a3f5c58a 142 # else
sunyiming 1:6465a3f5c58a 143 # define ETHMEM_SECTION __attribute__((section("AHBSRAM1"),aligned))
sunyiming 1:6465a3f5c58a 144 # endif
sunyiming 1:6465a3f5c58a 145 #elif defined(TARGET_LPC1768)
sunyiming 1:6465a3f5c58a 146 # if defined(TOOLCHAIN_GCC_ARM)
sunyiming 1:6465a3f5c58a 147 # define ETHMEM_SECTION __attribute__((section("AHBSRAM1"),aligned))
sunyiming 1:6465a3f5c58a 148 # endif
sunyiming 1:6465a3f5c58a 149 #endif
sunyiming 1:6465a3f5c58a 150
sunyiming 1:6465a3f5c58a 151 #ifndef ETHMEM_SECTION
sunyiming 1:6465a3f5c58a 152 #define ETHMEM_SECTION ALIGNED(8)
sunyiming 1:6465a3f5c58a 153 #endif
sunyiming 1:6465a3f5c58a 154
sunyiming 1:6465a3f5c58a 155 /** \brief LPC EMAC driver work data
sunyiming 1:6465a3f5c58a 156 */
sunyiming 1:6465a3f5c58a 157 ETHMEM_SECTION struct lpc_enetdata lpc_enetdata;
sunyiming 1:6465a3f5c58a 158
sunyiming 1:6465a3f5c58a 159 /** \brief Queues a pbuf into the RX descriptor list
sunyiming 1:6465a3f5c58a 160 *
sunyiming 1:6465a3f5c58a 161 * \param[in] lpc_enetif Pointer to the drvier data structure
sunyiming 1:6465a3f5c58a 162 * \param[in] p Pointer to pbuf to queue
sunyiming 1:6465a3f5c58a 163 */
sunyiming 1:6465a3f5c58a 164 static void lpc_rxqueue_pbuf(struct lpc_enetdata *lpc_enetif, struct pbuf *p)
sunyiming 1:6465a3f5c58a 165 {
sunyiming 1:6465a3f5c58a 166 u32_t idx;
sunyiming 1:6465a3f5c58a 167
sunyiming 1:6465a3f5c58a 168 /* Get next free descriptor index */
sunyiming 1:6465a3f5c58a 169 idx = lpc_enetif->rx_fill_desc_index;
sunyiming 1:6465a3f5c58a 170
sunyiming 1:6465a3f5c58a 171 /* Setup descriptor and clear statuses */
sunyiming 1:6465a3f5c58a 172 lpc_enetif->prxd[idx].control = EMAC_RCTRL_INT | ((u32_t) (p->len - 1));
sunyiming 1:6465a3f5c58a 173 lpc_enetif->prxd[idx].packet = (u32_t) p->payload;
sunyiming 1:6465a3f5c58a 174 lpc_enetif->prxs[idx].statusinfo = 0xFFFFFFFF;
sunyiming 1:6465a3f5c58a 175 lpc_enetif->prxs[idx].statushashcrc = 0xFFFFFFFF;
sunyiming 1:6465a3f5c58a 176
sunyiming 1:6465a3f5c58a 177 /* Save pbuf pointer for push to network layer later */
sunyiming 1:6465a3f5c58a 178 lpc_enetif->rxb[idx] = p;
sunyiming 1:6465a3f5c58a 179
sunyiming 1:6465a3f5c58a 180 /* Wrap at end of descriptor list */
sunyiming 1:6465a3f5c58a 181 idx++;
sunyiming 1:6465a3f5c58a 182 if (idx >= LPC_NUM_BUFF_RXDESCS)
sunyiming 1:6465a3f5c58a 183 idx = 0;
sunyiming 1:6465a3f5c58a 184
sunyiming 1:6465a3f5c58a 185 /* Queue descriptor(s) */
sunyiming 1:6465a3f5c58a 186 lpc_enetif->rx_free_descs -= 1;
sunyiming 1:6465a3f5c58a 187 lpc_enetif->rx_fill_desc_index = idx;
sunyiming 1:6465a3f5c58a 188 LPC_EMAC->RxConsumeIndex = idx;
sunyiming 1:6465a3f5c58a 189
sunyiming 1:6465a3f5c58a 190 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 191 ("lpc_rxqueue_pbuf: pbuf packet queued: %p (free desc=%d)\n", p,
sunyiming 1:6465a3f5c58a 192 lpc_enetif->rx_free_descs));
sunyiming 1:6465a3f5c58a 193 }
sunyiming 1:6465a3f5c58a 194
sunyiming 1:6465a3f5c58a 195 /** \brief Attempt to allocate and requeue a new pbuf for RX
sunyiming 1:6465a3f5c58a 196 *
sunyiming 1:6465a3f5c58a 197 * \param[in] netif Pointer to the netif structure
sunyiming 1:6465a3f5c58a 198 * \returns 1 if a packet was allocated and requeued, otherwise 0
sunyiming 1:6465a3f5c58a 199 */
sunyiming 1:6465a3f5c58a 200 s32_t lpc_rx_queue(struct netif *netif)
sunyiming 1:6465a3f5c58a 201 {
sunyiming 1:6465a3f5c58a 202 struct lpc_enetdata *lpc_enetif = netif->state;
sunyiming 1:6465a3f5c58a 203 struct pbuf *p;
sunyiming 1:6465a3f5c58a 204 s32_t queued = 0;
sunyiming 1:6465a3f5c58a 205
sunyiming 1:6465a3f5c58a 206 /* Attempt to requeue as many packets as possible */
sunyiming 1:6465a3f5c58a 207 while (lpc_enetif->rx_free_descs > 0) {
sunyiming 1:6465a3f5c58a 208 /* Allocate a pbuf from the pool. We need to allocate at the
sunyiming 1:6465a3f5c58a 209 maximum size as we don't know the size of the yet to be
sunyiming 1:6465a3f5c58a 210 received packet. */
sunyiming 1:6465a3f5c58a 211 p = pbuf_alloc(PBUF_RAW, (u16_t) EMAC_ETH_MAX_FLEN, PBUF_RAM);
sunyiming 1:6465a3f5c58a 212 if (p == NULL) {
sunyiming 1:6465a3f5c58a 213 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 214 ("lpc_rx_queue: could not allocate RX pbuf (free desc=%d)\n",
sunyiming 1:6465a3f5c58a 215 lpc_enetif->rx_free_descs));
sunyiming 1:6465a3f5c58a 216 return queued;
sunyiming 1:6465a3f5c58a 217 }
sunyiming 1:6465a3f5c58a 218
sunyiming 1:6465a3f5c58a 219 /* pbufs allocated from the RAM pool should be non-chained. */
sunyiming 1:6465a3f5c58a 220 LWIP_ASSERT("lpc_rx_queue: pbuf is not contiguous (chained)",
sunyiming 1:6465a3f5c58a 221 pbuf_clen(p) <= 1);
sunyiming 1:6465a3f5c58a 222
sunyiming 1:6465a3f5c58a 223 /* Queue packet */
sunyiming 1:6465a3f5c58a 224 lpc_rxqueue_pbuf(lpc_enetif, p);
sunyiming 1:6465a3f5c58a 225
sunyiming 1:6465a3f5c58a 226 /* Update queued count */
sunyiming 1:6465a3f5c58a 227 queued++;
sunyiming 1:6465a3f5c58a 228 }
sunyiming 1:6465a3f5c58a 229
sunyiming 1:6465a3f5c58a 230 return queued;
sunyiming 1:6465a3f5c58a 231 }
sunyiming 1:6465a3f5c58a 232
sunyiming 1:6465a3f5c58a 233 /** \brief Sets up the RX descriptor ring buffers.
sunyiming 1:6465a3f5c58a 234 *
sunyiming 1:6465a3f5c58a 235 * This function sets up the descriptor list used for receive packets.
sunyiming 1:6465a3f5c58a 236 *
sunyiming 1:6465a3f5c58a 237 * \param[in] lpc_enetif Pointer to driver data structure
sunyiming 1:6465a3f5c58a 238 * \returns Always returns ERR_OK
sunyiming 1:6465a3f5c58a 239 */
sunyiming 1:6465a3f5c58a 240 static err_t lpc_rx_setup(struct lpc_enetdata *lpc_enetif)
sunyiming 1:6465a3f5c58a 241 {
sunyiming 1:6465a3f5c58a 242 /* Setup pointers to RX structures */
sunyiming 1:6465a3f5c58a 243 LPC_EMAC->RxDescriptor = (u32_t) &lpc_enetif->prxd[0];
sunyiming 1:6465a3f5c58a 244 LPC_EMAC->RxStatus = (u32_t) &lpc_enetif->prxs[0];
sunyiming 1:6465a3f5c58a 245 LPC_EMAC->RxDescriptorNumber = LPC_NUM_BUFF_RXDESCS - 1;
sunyiming 1:6465a3f5c58a 246
sunyiming 1:6465a3f5c58a 247 lpc_enetif->rx_free_descs = LPC_NUM_BUFF_RXDESCS;
sunyiming 1:6465a3f5c58a 248 lpc_enetif->rx_fill_desc_index = 0;
sunyiming 1:6465a3f5c58a 249
sunyiming 1:6465a3f5c58a 250 /* Build RX buffer and descriptors */
sunyiming 1:6465a3f5c58a 251 lpc_rx_queue(lpc_enetif->netif);
sunyiming 1:6465a3f5c58a 252
sunyiming 1:6465a3f5c58a 253 return ERR_OK;
sunyiming 1:6465a3f5c58a 254 }
sunyiming 1:6465a3f5c58a 255
sunyiming 1:6465a3f5c58a 256 /** \brief Allocates a pbuf and returns the data from the incoming packet.
sunyiming 1:6465a3f5c58a 257 *
sunyiming 1:6465a3f5c58a 258 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 259 * \return a pbuf filled with the received packet (including MAC header)
sunyiming 1:6465a3f5c58a 260 * NULL on memory error
sunyiming 1:6465a3f5c58a 261 */
sunyiming 1:6465a3f5c58a 262 static struct pbuf *lpc_low_level_input(struct netif *netif)
sunyiming 1:6465a3f5c58a 263 {
sunyiming 1:6465a3f5c58a 264 struct lpc_enetdata *lpc_enetif = netif->state;
sunyiming 1:6465a3f5c58a 265 struct pbuf *p = NULL;
sunyiming 1:6465a3f5c58a 266 u32_t idx, length;
sunyiming 1:6465a3f5c58a 267 u16_t origLength;
sunyiming 1:6465a3f5c58a 268
sunyiming 1:6465a3f5c58a 269 #ifdef LOCK_RX_THREAD
sunyiming 1:6465a3f5c58a 270 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 271 /* Get exclusive access */
sunyiming 1:6465a3f5c58a 272 sys_mutex_lock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 273 #endif
sunyiming 1:6465a3f5c58a 274 #endif
sunyiming 1:6465a3f5c58a 275
sunyiming 1:6465a3f5c58a 276 /* Monitor RX overrun status. This should never happen unless
sunyiming 1:6465a3f5c58a 277 (possibly) the internal bus is behing held up by something.
sunyiming 1:6465a3f5c58a 278 Unless your system is running at a very low clock speed or
sunyiming 1:6465a3f5c58a 279 there are possibilities that the internal buses may be held
sunyiming 1:6465a3f5c58a 280 up for a long time, this can probably safely be removed. */
sunyiming 1:6465a3f5c58a 281 if (LPC_EMAC->IntStatus & EMAC_INT_RX_OVERRUN) {
sunyiming 1:6465a3f5c58a 282 LINK_STATS_INC(link.err);
sunyiming 1:6465a3f5c58a 283 LINK_STATS_INC(link.drop);
sunyiming 1:6465a3f5c58a 284
sunyiming 1:6465a3f5c58a 285 /* Temporarily disable RX */
sunyiming 1:6465a3f5c58a 286 LPC_EMAC->MAC1 &= ~EMAC_MAC1_REC_EN;
sunyiming 1:6465a3f5c58a 287
sunyiming 1:6465a3f5c58a 288 /* Reset the RX side */
sunyiming 1:6465a3f5c58a 289 LPC_EMAC->MAC1 |= EMAC_MAC1_RES_RX;
sunyiming 1:6465a3f5c58a 290 LPC_EMAC->IntClear = EMAC_INT_RX_OVERRUN;
sunyiming 1:6465a3f5c58a 291
sunyiming 1:6465a3f5c58a 292 /* De-allocate all queued RX pbufs */
sunyiming 1:6465a3f5c58a 293 for (idx = 0; idx < LPC_NUM_BUFF_RXDESCS; idx++) {
sunyiming 1:6465a3f5c58a 294 if (lpc_enetif->rxb[idx] != NULL) {
sunyiming 1:6465a3f5c58a 295 pbuf_free(lpc_enetif->rxb[idx]);
sunyiming 1:6465a3f5c58a 296 lpc_enetif->rxb[idx] = NULL;
sunyiming 1:6465a3f5c58a 297 }
sunyiming 1:6465a3f5c58a 298 }
sunyiming 1:6465a3f5c58a 299
sunyiming 1:6465a3f5c58a 300 /* Start RX side again */
sunyiming 1:6465a3f5c58a 301 lpc_rx_setup(lpc_enetif);
sunyiming 1:6465a3f5c58a 302
sunyiming 1:6465a3f5c58a 303 /* Re-enable RX */
sunyiming 1:6465a3f5c58a 304 LPC_EMAC->MAC1 |= EMAC_MAC1_REC_EN;
sunyiming 1:6465a3f5c58a 305
sunyiming 1:6465a3f5c58a 306 #ifdef LOCK_RX_THREAD
sunyiming 1:6465a3f5c58a 307 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 308 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 309 #endif
sunyiming 1:6465a3f5c58a 310 #endif
sunyiming 1:6465a3f5c58a 311
sunyiming 1:6465a3f5c58a 312 return NULL;
sunyiming 1:6465a3f5c58a 313 }
sunyiming 1:6465a3f5c58a 314
sunyiming 1:6465a3f5c58a 315 /* Determine if a frame has been received */
sunyiming 1:6465a3f5c58a 316 length = 0;
sunyiming 1:6465a3f5c58a 317 idx = LPC_EMAC->RxConsumeIndex;
sunyiming 1:6465a3f5c58a 318 if (LPC_EMAC->RxProduceIndex != idx) {
sunyiming 1:6465a3f5c58a 319 /* Handle errors */
sunyiming 1:6465a3f5c58a 320 if (lpc_enetif->prxs[idx].statusinfo & (EMAC_RINFO_CRC_ERR |
sunyiming 1:6465a3f5c58a 321 EMAC_RINFO_SYM_ERR | EMAC_RINFO_ALIGN_ERR | EMAC_RINFO_LEN_ERR)) {
sunyiming 1:6465a3f5c58a 322 #if LINK_STATS
sunyiming 1:6465a3f5c58a 323 if (lpc_enetif->prxs[idx].statusinfo & (EMAC_RINFO_CRC_ERR |
sunyiming 1:6465a3f5c58a 324 EMAC_RINFO_SYM_ERR | EMAC_RINFO_ALIGN_ERR))
sunyiming 1:6465a3f5c58a 325 LINK_STATS_INC(link.chkerr);
sunyiming 1:6465a3f5c58a 326 if (lpc_enetif->prxs[idx].statusinfo & EMAC_RINFO_LEN_ERR)
sunyiming 1:6465a3f5c58a 327 LINK_STATS_INC(link.lenerr);
sunyiming 1:6465a3f5c58a 328 #endif
sunyiming 1:6465a3f5c58a 329
sunyiming 1:6465a3f5c58a 330 /* Drop the frame */
sunyiming 1:6465a3f5c58a 331 LINK_STATS_INC(link.drop);
sunyiming 1:6465a3f5c58a 332
sunyiming 1:6465a3f5c58a 333 /* Re-queue the pbuf for receive */
sunyiming 1:6465a3f5c58a 334 lpc_enetif->rx_free_descs++;
sunyiming 1:6465a3f5c58a 335 p = lpc_enetif->rxb[idx];
sunyiming 1:6465a3f5c58a 336 lpc_enetif->rxb[idx] = NULL;
sunyiming 1:6465a3f5c58a 337 lpc_rxqueue_pbuf(lpc_enetif, p);
sunyiming 1:6465a3f5c58a 338
sunyiming 1:6465a3f5c58a 339 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 340 ("lpc_low_level_input: Packet dropped with errors (0x%x)\n",
sunyiming 1:6465a3f5c58a 341 lpc_enetif->prxs[idx].statusinfo));
sunyiming 1:6465a3f5c58a 342
sunyiming 1:6465a3f5c58a 343 p = NULL;
sunyiming 1:6465a3f5c58a 344 } else {
sunyiming 1:6465a3f5c58a 345 /* A packet is waiting, get length */
sunyiming 1:6465a3f5c58a 346 length = (lpc_enetif->prxs[idx].statusinfo & 0x7FF) + 1;
sunyiming 1:6465a3f5c58a 347
sunyiming 1:6465a3f5c58a 348 /* Zero-copy */
sunyiming 1:6465a3f5c58a 349 p = lpc_enetif->rxb[idx];
sunyiming 1:6465a3f5c58a 350 origLength = p->len;
sunyiming 1:6465a3f5c58a 351 p->len = (u16_t) length;
sunyiming 1:6465a3f5c58a 352
sunyiming 1:6465a3f5c58a 353 /* Free pbuf from descriptor */
sunyiming 1:6465a3f5c58a 354 lpc_enetif->rxb[idx] = NULL;
sunyiming 1:6465a3f5c58a 355 lpc_enetif->rx_free_descs++;
sunyiming 1:6465a3f5c58a 356
sunyiming 1:6465a3f5c58a 357 /* Attempt to queue new buffer(s) */
sunyiming 1:6465a3f5c58a 358 if (lpc_rx_queue(lpc_enetif->netif) == 0) {
sunyiming 1:6465a3f5c58a 359 /* Drop the frame due to OOM. */
sunyiming 1:6465a3f5c58a 360 LINK_STATS_INC(link.drop);
sunyiming 1:6465a3f5c58a 361
sunyiming 1:6465a3f5c58a 362 /* Re-queue the pbuf for receive */
sunyiming 1:6465a3f5c58a 363 p->len = origLength;
sunyiming 1:6465a3f5c58a 364 lpc_rxqueue_pbuf(lpc_enetif, p);
sunyiming 1:6465a3f5c58a 365
sunyiming 1:6465a3f5c58a 366 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 367 ("lpc_low_level_input: Packet index %d dropped for OOM\n",
sunyiming 1:6465a3f5c58a 368 idx));
sunyiming 1:6465a3f5c58a 369
sunyiming 1:6465a3f5c58a 370 #ifdef LOCK_RX_THREAD
sunyiming 1:6465a3f5c58a 371 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 372 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 373 #endif
sunyiming 1:6465a3f5c58a 374 #endif
sunyiming 1:6465a3f5c58a 375
sunyiming 1:6465a3f5c58a 376 return NULL;
sunyiming 1:6465a3f5c58a 377 }
sunyiming 1:6465a3f5c58a 378
sunyiming 1:6465a3f5c58a 379 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 380 ("lpc_low_level_input: Packet received: %p, size %d (index=%d)\n",
sunyiming 1:6465a3f5c58a 381 p, length, idx));
sunyiming 1:6465a3f5c58a 382
sunyiming 1:6465a3f5c58a 383 /* Save size */
sunyiming 1:6465a3f5c58a 384 p->tot_len = (u16_t) length;
sunyiming 1:6465a3f5c58a 385 LINK_STATS_INC(link.recv);
sunyiming 1:6465a3f5c58a 386 }
sunyiming 1:6465a3f5c58a 387 }
sunyiming 1:6465a3f5c58a 388
sunyiming 1:6465a3f5c58a 389 #ifdef LOCK_RX_THREAD
sunyiming 1:6465a3f5c58a 390 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 391 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 392 #endif
sunyiming 1:6465a3f5c58a 393 #endif
sunyiming 1:6465a3f5c58a 394
sunyiming 1:6465a3f5c58a 395 return p;
sunyiming 1:6465a3f5c58a 396 }
sunyiming 1:6465a3f5c58a 397
sunyiming 1:6465a3f5c58a 398 /** \brief Attempt to read a packet from the EMAC interface.
sunyiming 1:6465a3f5c58a 399 *
sunyiming 1:6465a3f5c58a 400 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 401 */
sunyiming 1:6465a3f5c58a 402 void lpc_enetif_input(struct netif *netif)
sunyiming 1:6465a3f5c58a 403 {
sunyiming 1:6465a3f5c58a 404 struct eth_hdr *ethhdr;
sunyiming 1:6465a3f5c58a 405 struct pbuf *p;
sunyiming 1:6465a3f5c58a 406
sunyiming 1:6465a3f5c58a 407 /* move received packet into a new pbuf */
sunyiming 1:6465a3f5c58a 408 p = lpc_low_level_input(netif);
sunyiming 1:6465a3f5c58a 409 if (p == NULL)
sunyiming 1:6465a3f5c58a 410 return;
sunyiming 1:6465a3f5c58a 411
sunyiming 1:6465a3f5c58a 412 /* points to packet payload, which starts with an Ethernet header */
sunyiming 1:6465a3f5c58a 413 ethhdr = p->payload;
sunyiming 1:6465a3f5c58a 414
sunyiming 1:6465a3f5c58a 415 switch (htons(ethhdr->type)) {
sunyiming 1:6465a3f5c58a 416 case ETHTYPE_IP:
sunyiming 1:6465a3f5c58a 417 case ETHTYPE_ARP:
sunyiming 1:6465a3f5c58a 418 #if PPPOE_SUPPORT
sunyiming 1:6465a3f5c58a 419 case ETHTYPE_PPPOEDISC:
sunyiming 1:6465a3f5c58a 420 case ETHTYPE_PPPOE:
sunyiming 1:6465a3f5c58a 421 #endif /* PPPOE_SUPPORT */
sunyiming 1:6465a3f5c58a 422 /* full packet send to tcpip_thread to process */
sunyiming 1:6465a3f5c58a 423 if (netif->input(p, netif) != ERR_OK) {
sunyiming 1:6465a3f5c58a 424 LWIP_DEBUGF(NETIF_DEBUG, ("lpc_enetif_input: IP input error\n"));
sunyiming 1:6465a3f5c58a 425 /* Free buffer */
sunyiming 1:6465a3f5c58a 426 pbuf_free(p);
sunyiming 1:6465a3f5c58a 427 }
sunyiming 1:6465a3f5c58a 428 break;
sunyiming 1:6465a3f5c58a 429
sunyiming 1:6465a3f5c58a 430 default:
sunyiming 1:6465a3f5c58a 431 /* Return buffer */
sunyiming 1:6465a3f5c58a 432 pbuf_free(p);
sunyiming 1:6465a3f5c58a 433 break;
sunyiming 1:6465a3f5c58a 434 }
sunyiming 1:6465a3f5c58a 435 }
sunyiming 1:6465a3f5c58a 436
sunyiming 1:6465a3f5c58a 437 /** \brief Determine if the passed address is usable for the ethernet
sunyiming 1:6465a3f5c58a 438 * DMA controller.
sunyiming 1:6465a3f5c58a 439 *
sunyiming 1:6465a3f5c58a 440 * \param[in] addr Address of packet to check for DMA safe operation
sunyiming 1:6465a3f5c58a 441 * \return 1 if the packet address is not safe, otherwise 0
sunyiming 1:6465a3f5c58a 442 */
sunyiming 1:6465a3f5c58a 443 static s32_t lpc_packet_addr_notsafe(void *addr) {
sunyiming 1:6465a3f5c58a 444 /* Check for legal address ranges */
sunyiming 1:6465a3f5c58a 445 #if defined(TARGET_LPC1768)
sunyiming 1:6465a3f5c58a 446 if ((((u32_t) addr >= 0x2007C000) && ((u32_t) addr < 0x20083FFF))) {
sunyiming 1:6465a3f5c58a 447 #elif defined(TARGET_LPC4088) || defined(TARGET_LPC4088_DM)
sunyiming 1:6465a3f5c58a 448 if ((((u32_t) addr >= 0x20000000) && ((u32_t) addr < 0x20007FFF))) {
sunyiming 1:6465a3f5c58a 449 #endif
sunyiming 1:6465a3f5c58a 450 return 0;
sunyiming 1:6465a3f5c58a 451 }
sunyiming 1:6465a3f5c58a 452 return 1;
sunyiming 1:6465a3f5c58a 453 }
sunyiming 1:6465a3f5c58a 454
sunyiming 1:6465a3f5c58a 455 /** \brief Sets up the TX descriptor ring buffers.
sunyiming 1:6465a3f5c58a 456 *
sunyiming 1:6465a3f5c58a 457 * This function sets up the descriptor list used for transmit packets.
sunyiming 1:6465a3f5c58a 458 *
sunyiming 1:6465a3f5c58a 459 * \param[in] lpc_enetif Pointer to driver data structure
sunyiming 1:6465a3f5c58a 460 */
sunyiming 1:6465a3f5c58a 461 static err_t lpc_tx_setup(struct lpc_enetdata *lpc_enetif)
sunyiming 1:6465a3f5c58a 462 {
sunyiming 1:6465a3f5c58a 463 s32_t idx;
sunyiming 1:6465a3f5c58a 464
sunyiming 1:6465a3f5c58a 465 /* Build TX descriptors for local buffers */
sunyiming 1:6465a3f5c58a 466 for (idx = 0; idx < LPC_NUM_BUFF_TXDESCS; idx++) {
sunyiming 1:6465a3f5c58a 467 lpc_enetif->ptxd[idx].control = 0;
sunyiming 1:6465a3f5c58a 468 lpc_enetif->ptxs[idx].statusinfo = 0xFFFFFFFF;
sunyiming 1:6465a3f5c58a 469 }
sunyiming 1:6465a3f5c58a 470
sunyiming 1:6465a3f5c58a 471 /* Setup pointers to TX structures */
sunyiming 1:6465a3f5c58a 472 LPC_EMAC->TxDescriptor = (u32_t) &lpc_enetif->ptxd[0];
sunyiming 1:6465a3f5c58a 473 LPC_EMAC->TxStatus = (u32_t) &lpc_enetif->ptxs[0];
sunyiming 1:6465a3f5c58a 474 LPC_EMAC->TxDescriptorNumber = LPC_NUM_BUFF_TXDESCS - 1;
sunyiming 1:6465a3f5c58a 475
sunyiming 1:6465a3f5c58a 476 lpc_enetif->lpc_last_tx_idx = 0;
sunyiming 1:6465a3f5c58a 477
sunyiming 1:6465a3f5c58a 478 return ERR_OK;
sunyiming 1:6465a3f5c58a 479 }
sunyiming 1:6465a3f5c58a 480
sunyiming 1:6465a3f5c58a 481 /** \brief Free TX buffers that are complete
sunyiming 1:6465a3f5c58a 482 *
sunyiming 1:6465a3f5c58a 483 * \param[in] lpc_enetif Pointer to driver data structure
sunyiming 1:6465a3f5c58a 484 * \param[in] cidx EMAC current descriptor comsumer index
sunyiming 1:6465a3f5c58a 485 */
sunyiming 1:6465a3f5c58a 486 static void lpc_tx_reclaim_st(struct lpc_enetdata *lpc_enetif, u32_t cidx)
sunyiming 1:6465a3f5c58a 487 {
sunyiming 1:6465a3f5c58a 488 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 489 /* Get exclusive access */
sunyiming 1:6465a3f5c58a 490 sys_mutex_lock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 491 #endif
sunyiming 1:6465a3f5c58a 492
sunyiming 1:6465a3f5c58a 493 while (cidx != lpc_enetif->lpc_last_tx_idx) {
sunyiming 1:6465a3f5c58a 494 if (lpc_enetif->txb[lpc_enetif->lpc_last_tx_idx] != NULL) {
sunyiming 1:6465a3f5c58a 495 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 496 ("lpc_tx_reclaim_st: Freeing packet %p (index %d)\n",
sunyiming 1:6465a3f5c58a 497 lpc_enetif->txb[lpc_enetif->lpc_last_tx_idx],
sunyiming 1:6465a3f5c58a 498 lpc_enetif->lpc_last_tx_idx));
sunyiming 1:6465a3f5c58a 499 pbuf_free(lpc_enetif->txb[lpc_enetif->lpc_last_tx_idx]);
sunyiming 1:6465a3f5c58a 500 lpc_enetif->txb[lpc_enetif->lpc_last_tx_idx] = NULL;
sunyiming 1:6465a3f5c58a 501 }
sunyiming 1:6465a3f5c58a 502
sunyiming 1:6465a3f5c58a 503 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 504 osSemaphoreRelease(lpc_enetif->xTXDCountSem.id);
sunyiming 1:6465a3f5c58a 505 #endif
sunyiming 1:6465a3f5c58a 506 lpc_enetif->lpc_last_tx_idx++;
sunyiming 1:6465a3f5c58a 507 if (lpc_enetif->lpc_last_tx_idx >= LPC_NUM_BUFF_TXDESCS)
sunyiming 1:6465a3f5c58a 508 lpc_enetif->lpc_last_tx_idx = 0;
sunyiming 1:6465a3f5c58a 509 }
sunyiming 1:6465a3f5c58a 510
sunyiming 1:6465a3f5c58a 511 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 512 /* Restore access */
sunyiming 1:6465a3f5c58a 513 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 514 #endif
sunyiming 1:6465a3f5c58a 515 }
sunyiming 1:6465a3f5c58a 516
sunyiming 1:6465a3f5c58a 517 /** \brief User call for freeingTX buffers that are complete
sunyiming 1:6465a3f5c58a 518 *
sunyiming 1:6465a3f5c58a 519 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 520 */
sunyiming 1:6465a3f5c58a 521 void lpc_tx_reclaim(struct netif *netif)
sunyiming 1:6465a3f5c58a 522 {
sunyiming 1:6465a3f5c58a 523 lpc_tx_reclaim_st((struct lpc_enetdata *) netif->state,
sunyiming 1:6465a3f5c58a 524 LPC_EMAC->TxConsumeIndex);
sunyiming 1:6465a3f5c58a 525 }
sunyiming 1:6465a3f5c58a 526
sunyiming 1:6465a3f5c58a 527 /** \brief Polls if an available TX descriptor is ready. Can be used to
sunyiming 1:6465a3f5c58a 528 * determine if the low level transmit function will block.
sunyiming 1:6465a3f5c58a 529 *
sunyiming 1:6465a3f5c58a 530 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 531 * \return 0 if no descriptors are read, or >0
sunyiming 1:6465a3f5c58a 532 */
sunyiming 1:6465a3f5c58a 533 s32_t lpc_tx_ready(struct netif *netif)
sunyiming 1:6465a3f5c58a 534 {
sunyiming 1:6465a3f5c58a 535 s32_t fb;
sunyiming 1:6465a3f5c58a 536 u32_t idx, cidx;
sunyiming 1:6465a3f5c58a 537
sunyiming 1:6465a3f5c58a 538 cidx = LPC_EMAC->TxConsumeIndex;
sunyiming 1:6465a3f5c58a 539 idx = LPC_EMAC->TxProduceIndex;
sunyiming 1:6465a3f5c58a 540
sunyiming 1:6465a3f5c58a 541 /* Determine number of free buffers */
sunyiming 1:6465a3f5c58a 542 if (idx == cidx)
sunyiming 1:6465a3f5c58a 543 fb = LPC_NUM_BUFF_TXDESCS;
sunyiming 1:6465a3f5c58a 544 else if (cidx > idx)
sunyiming 1:6465a3f5c58a 545 fb = (LPC_NUM_BUFF_TXDESCS - 1) -
sunyiming 1:6465a3f5c58a 546 ((idx + LPC_NUM_BUFF_TXDESCS) - cidx);
sunyiming 1:6465a3f5c58a 547 else
sunyiming 1:6465a3f5c58a 548 fb = (LPC_NUM_BUFF_TXDESCS - 1) - (cidx - idx);
sunyiming 1:6465a3f5c58a 549
sunyiming 1:6465a3f5c58a 550 return fb;
sunyiming 1:6465a3f5c58a 551 }
sunyiming 1:6465a3f5c58a 552
sunyiming 1:6465a3f5c58a 553 /** \brief Low level output of a packet. Never call this from an
sunyiming 1:6465a3f5c58a 554 * interrupt context, as it may block until TX descriptors
sunyiming 1:6465a3f5c58a 555 * become available.
sunyiming 1:6465a3f5c58a 556 *
sunyiming 1:6465a3f5c58a 557 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 558 * \param[in] p the MAC packet to send (e.g. IP packet including MAC addresses and type)
sunyiming 1:6465a3f5c58a 559 * \return ERR_OK if the packet could be sent or an err_t value if the packet couldn't be sent
sunyiming 1:6465a3f5c58a 560 */
sunyiming 1:6465a3f5c58a 561 static err_t lpc_low_level_output(struct netif *netif, struct pbuf *p)
sunyiming 1:6465a3f5c58a 562 {
sunyiming 1:6465a3f5c58a 563 struct lpc_enetdata *lpc_enetif = netif->state;
sunyiming 1:6465a3f5c58a 564 struct pbuf *q;
sunyiming 1:6465a3f5c58a 565 u8_t *dst;
sunyiming 1:6465a3f5c58a 566 u32_t idx, notdmasafe = 0;
sunyiming 1:6465a3f5c58a 567 struct pbuf *np;
sunyiming 1:6465a3f5c58a 568 s32_t dn;
sunyiming 1:6465a3f5c58a 569
sunyiming 1:6465a3f5c58a 570 /* Zero-copy TX buffers may be fragmented across mutliple payload
sunyiming 1:6465a3f5c58a 571 chains. Determine the number of descriptors needed for the
sunyiming 1:6465a3f5c58a 572 transfer. The pbuf chaining can be a mess! */
sunyiming 1:6465a3f5c58a 573 dn = (s32_t) pbuf_clen(p);
sunyiming 1:6465a3f5c58a 574
sunyiming 1:6465a3f5c58a 575 /* Test to make sure packet addresses are DMA safe. A DMA safe
sunyiming 1:6465a3f5c58a 576 address is once that uses external memory or periphheral RAM.
sunyiming 1:6465a3f5c58a 577 IRAM and FLASH are not safe! */
sunyiming 1:6465a3f5c58a 578 for (q = p; q != NULL; q = q->next)
sunyiming 1:6465a3f5c58a 579 notdmasafe += lpc_packet_addr_notsafe(q->payload);
sunyiming 1:6465a3f5c58a 580
sunyiming 1:6465a3f5c58a 581 #if LPC_TX_PBUF_BOUNCE_EN==1
sunyiming 1:6465a3f5c58a 582 /* If the pbuf is not DMA safe, a new bounce buffer (pbuf) will be
sunyiming 1:6465a3f5c58a 583 created that will be used instead. This requires an copy from the
sunyiming 1:6465a3f5c58a 584 non-safe DMA region to the new pbuf */
sunyiming 1:6465a3f5c58a 585 if (notdmasafe) {
sunyiming 1:6465a3f5c58a 586 /* Allocate a pbuf in DMA memory */
sunyiming 1:6465a3f5c58a 587 np = pbuf_alloc(PBUF_RAW, p->tot_len, PBUF_RAM);
sunyiming 1:6465a3f5c58a 588 if (np == NULL)
sunyiming 1:6465a3f5c58a 589 return ERR_MEM;
sunyiming 1:6465a3f5c58a 590
sunyiming 1:6465a3f5c58a 591 /* This buffer better be contiguous! */
sunyiming 1:6465a3f5c58a 592 LWIP_ASSERT("lpc_low_level_output: New transmit pbuf is chained",
sunyiming 1:6465a3f5c58a 593 (pbuf_clen(np) == 1));
sunyiming 1:6465a3f5c58a 594
sunyiming 1:6465a3f5c58a 595 /* Copy to DMA safe pbuf */
sunyiming 1:6465a3f5c58a 596 dst = (u8_t *) np->payload;
sunyiming 1:6465a3f5c58a 597 for(q = p; q != NULL; q = q->next) {
sunyiming 1:6465a3f5c58a 598 /* Copy the buffer to the descriptor's buffer */
sunyiming 1:6465a3f5c58a 599 MEMCPY(dst, (u8_t *) q->payload, q->len);
sunyiming 1:6465a3f5c58a 600 dst += q->len;
sunyiming 1:6465a3f5c58a 601 }
sunyiming 1:6465a3f5c58a 602 np->len = p->tot_len;
sunyiming 1:6465a3f5c58a 603
sunyiming 1:6465a3f5c58a 604 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 605 ("lpc_low_level_output: Switched to DMA safe buffer, old=%p, new=%p\n",
sunyiming 1:6465a3f5c58a 606 q, np));
sunyiming 1:6465a3f5c58a 607
sunyiming 1:6465a3f5c58a 608 /* use the new buffer for descrptor queueing. The original pbuf will
sunyiming 1:6465a3f5c58a 609 be de-allocated outsuide this driver. */
sunyiming 1:6465a3f5c58a 610 p = np;
sunyiming 1:6465a3f5c58a 611 dn = 1;
sunyiming 1:6465a3f5c58a 612 }
sunyiming 1:6465a3f5c58a 613 #else
sunyiming 1:6465a3f5c58a 614 if (notdmasafe)
sunyiming 1:6465a3f5c58a 615 LWIP_ASSERT("lpc_low_level_output: Not a DMA safe pbuf",
sunyiming 1:6465a3f5c58a 616 (notdmasafe == 0));
sunyiming 1:6465a3f5c58a 617 #endif
sunyiming 1:6465a3f5c58a 618
sunyiming 1:6465a3f5c58a 619 /* Wait until enough descriptors are available for the transfer. */
sunyiming 1:6465a3f5c58a 620 /* THIS WILL BLOCK UNTIL THERE ARE ENOUGH DESCRIPTORS AVAILABLE */
sunyiming 1:6465a3f5c58a 621 while (dn > lpc_tx_ready(netif))
sunyiming 1:6465a3f5c58a 622 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 623 osSemaphoreWait(lpc_enetif->xTXDCountSem.id, osWaitForever);
sunyiming 1:6465a3f5c58a 624 #else
sunyiming 1:6465a3f5c58a 625 osDelay(1);
sunyiming 1:6465a3f5c58a 626 #endif
sunyiming 1:6465a3f5c58a 627
sunyiming 1:6465a3f5c58a 628 /* Get free TX buffer index */
sunyiming 1:6465a3f5c58a 629 idx = LPC_EMAC->TxProduceIndex;
sunyiming 1:6465a3f5c58a 630
sunyiming 1:6465a3f5c58a 631 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 632 /* Get exclusive access */
sunyiming 1:6465a3f5c58a 633 sys_mutex_lock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 634 #endif
sunyiming 1:6465a3f5c58a 635
sunyiming 1:6465a3f5c58a 636 /* Prevent LWIP from de-allocating this pbuf. The driver will
sunyiming 1:6465a3f5c58a 637 free it once it's been transmitted. */
sunyiming 1:6465a3f5c58a 638 if (!notdmasafe)
sunyiming 1:6465a3f5c58a 639 pbuf_ref(p);
sunyiming 1:6465a3f5c58a 640
sunyiming 1:6465a3f5c58a 641 /* Setup transfers */
sunyiming 1:6465a3f5c58a 642 q = p;
sunyiming 1:6465a3f5c58a 643 while (dn > 0) {
sunyiming 1:6465a3f5c58a 644 dn--;
sunyiming 1:6465a3f5c58a 645
sunyiming 1:6465a3f5c58a 646 /* Only save pointer to free on last descriptor */
sunyiming 1:6465a3f5c58a 647 if (dn == 0) {
sunyiming 1:6465a3f5c58a 648 /* Save size of packet and signal it's ready */
sunyiming 1:6465a3f5c58a 649 lpc_enetif->ptxd[idx].control = (q->len - 1) | EMAC_TCTRL_INT |
sunyiming 1:6465a3f5c58a 650 EMAC_TCTRL_LAST;
sunyiming 1:6465a3f5c58a 651 lpc_enetif->txb[idx] = p;
sunyiming 1:6465a3f5c58a 652 }
sunyiming 1:6465a3f5c58a 653 else {
sunyiming 1:6465a3f5c58a 654 /* Save size of packet, descriptor is not last */
sunyiming 1:6465a3f5c58a 655 lpc_enetif->ptxd[idx].control = (q->len - 1) | EMAC_TCTRL_INT;
sunyiming 1:6465a3f5c58a 656 lpc_enetif->txb[idx] = NULL;
sunyiming 1:6465a3f5c58a 657 }
sunyiming 1:6465a3f5c58a 658
sunyiming 1:6465a3f5c58a 659 LWIP_DEBUGF(UDP_LPC_EMAC | LWIP_DBG_TRACE,
sunyiming 1:6465a3f5c58a 660 ("lpc_low_level_output: pbuf packet(%p) sent, chain#=%d,"
sunyiming 1:6465a3f5c58a 661 " size = %d (index=%d)\n", q->payload, dn, q->len, idx));
sunyiming 1:6465a3f5c58a 662
sunyiming 1:6465a3f5c58a 663 lpc_enetif->ptxd[idx].packet = (u32_t) q->payload;
sunyiming 1:6465a3f5c58a 664
sunyiming 1:6465a3f5c58a 665 q = q->next;
sunyiming 1:6465a3f5c58a 666
sunyiming 1:6465a3f5c58a 667 idx++;
sunyiming 1:6465a3f5c58a 668 if (idx >= LPC_NUM_BUFF_TXDESCS)
sunyiming 1:6465a3f5c58a 669 idx = 0;
sunyiming 1:6465a3f5c58a 670 }
sunyiming 1:6465a3f5c58a 671
sunyiming 1:6465a3f5c58a 672 LPC_EMAC->TxProduceIndex = idx;
sunyiming 1:6465a3f5c58a 673
sunyiming 1:6465a3f5c58a 674 LINK_STATS_INC(link.xmit);
sunyiming 1:6465a3f5c58a 675
sunyiming 1:6465a3f5c58a 676 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 677 /* Restore access */
sunyiming 1:6465a3f5c58a 678 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 679 #endif
sunyiming 1:6465a3f5c58a 680
sunyiming 1:6465a3f5c58a 681 return ERR_OK;
sunyiming 1:6465a3f5c58a 682 }
sunyiming 1:6465a3f5c58a 683
sunyiming 1:6465a3f5c58a 684 /** \brief LPC EMAC interrupt handler.
sunyiming 1:6465a3f5c58a 685 *
sunyiming 1:6465a3f5c58a 686 * This function handles the transmit, receive, and error interrupt of
sunyiming 1:6465a3f5c58a 687 * the LPC177x_8x. This is meant to be used when NO_SYS=0.
sunyiming 1:6465a3f5c58a 688 */
sunyiming 1:6465a3f5c58a 689 void ENET_IRQHandler(void)
sunyiming 1:6465a3f5c58a 690 {
sunyiming 1:6465a3f5c58a 691 #if NO_SYS == 1
sunyiming 1:6465a3f5c58a 692 /* Interrupts are not used without an RTOS */
sunyiming 1:6465a3f5c58a 693 NVIC_DisableIRQ(ENET_IRQn);
sunyiming 1:6465a3f5c58a 694 #else
sunyiming 1:6465a3f5c58a 695 uint32_t ints;
sunyiming 1:6465a3f5c58a 696
sunyiming 1:6465a3f5c58a 697 /* Interrupts are of 2 groups - transmit or receive. Based on the
sunyiming 1:6465a3f5c58a 698 interrupt, kick off the receive or transmit (cleanup) task */
sunyiming 1:6465a3f5c58a 699
sunyiming 1:6465a3f5c58a 700 /* Get pending interrupts */
sunyiming 1:6465a3f5c58a 701 ints = LPC_EMAC->IntStatus;
sunyiming 1:6465a3f5c58a 702
sunyiming 1:6465a3f5c58a 703 if (ints & RXINTGROUP) {
sunyiming 1:6465a3f5c58a 704 /* RX group interrupt(s): Give signal to wakeup RX receive task.*/
sunyiming 1:6465a3f5c58a 705 osSignalSet(lpc_enetdata.RxThread->id, RX_SIGNAL);
sunyiming 1:6465a3f5c58a 706 }
sunyiming 1:6465a3f5c58a 707
sunyiming 1:6465a3f5c58a 708 if (ints & TXINTGROUP) {
sunyiming 1:6465a3f5c58a 709 /* TX group interrupt(s): Give semaphore to wakeup TX cleanup task. */
sunyiming 1:6465a3f5c58a 710 sys_sem_signal(&lpc_enetdata.TxCleanSem);
sunyiming 1:6465a3f5c58a 711 }
sunyiming 1:6465a3f5c58a 712
sunyiming 1:6465a3f5c58a 713 /* Clear pending interrupts */
sunyiming 1:6465a3f5c58a 714 LPC_EMAC->IntClear = ints;
sunyiming 1:6465a3f5c58a 715 #endif
sunyiming 1:6465a3f5c58a 716 }
sunyiming 1:6465a3f5c58a 717
sunyiming 1:6465a3f5c58a 718 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 719 /** \brief Packet reception task
sunyiming 1:6465a3f5c58a 720 *
sunyiming 1:6465a3f5c58a 721 * This task is called when a packet is received. It will
sunyiming 1:6465a3f5c58a 722 * pass the packet to the LWIP core.
sunyiming 1:6465a3f5c58a 723 *
sunyiming 1:6465a3f5c58a 724 * \param[in] pvParameters Not used yet
sunyiming 1:6465a3f5c58a 725 */
sunyiming 1:6465a3f5c58a 726 static void packet_rx(void* pvParameters) {
sunyiming 1:6465a3f5c58a 727 struct lpc_enetdata *lpc_enetif = pvParameters;
sunyiming 1:6465a3f5c58a 728
sunyiming 1:6465a3f5c58a 729 while (1) {
sunyiming 1:6465a3f5c58a 730 /* Wait for receive task to wakeup */
sunyiming 1:6465a3f5c58a 731 osSignalWait(RX_SIGNAL, osWaitForever);
sunyiming 1:6465a3f5c58a 732
sunyiming 1:6465a3f5c58a 733 /* Process packets until all empty */
sunyiming 1:6465a3f5c58a 734 while (LPC_EMAC->RxConsumeIndex != LPC_EMAC->RxProduceIndex)
sunyiming 1:6465a3f5c58a 735 lpc_enetif_input(lpc_enetif->netif);
sunyiming 1:6465a3f5c58a 736 }
sunyiming 1:6465a3f5c58a 737 }
sunyiming 1:6465a3f5c58a 738
sunyiming 1:6465a3f5c58a 739 /** \brief Transmit cleanup task
sunyiming 1:6465a3f5c58a 740 *
sunyiming 1:6465a3f5c58a 741 * This task is called when a transmit interrupt occurs and
sunyiming 1:6465a3f5c58a 742 * reclaims the pbuf and descriptor used for the packet once
sunyiming 1:6465a3f5c58a 743 * the packet has been transferred.
sunyiming 1:6465a3f5c58a 744 *
sunyiming 1:6465a3f5c58a 745 * \param[in] pvParameters Not used yet
sunyiming 1:6465a3f5c58a 746 */
sunyiming 1:6465a3f5c58a 747 static void packet_tx(void* pvParameters) {
sunyiming 1:6465a3f5c58a 748 struct lpc_enetdata *lpc_enetif = pvParameters;
sunyiming 1:6465a3f5c58a 749 s32_t idx;
sunyiming 1:6465a3f5c58a 750
sunyiming 1:6465a3f5c58a 751 while (1) {
sunyiming 1:6465a3f5c58a 752 /* Wait for transmit cleanup task to wakeup */
sunyiming 1:6465a3f5c58a 753 sys_arch_sem_wait(&lpc_enetif->TxCleanSem, 0);
sunyiming 1:6465a3f5c58a 754
sunyiming 1:6465a3f5c58a 755 /* Error handling for TX underruns. This should never happen unless
sunyiming 1:6465a3f5c58a 756 something is holding the bus or the clocks are going too slow. It
sunyiming 1:6465a3f5c58a 757 can probably be safely removed. */
sunyiming 1:6465a3f5c58a 758 if (LPC_EMAC->IntStatus & EMAC_INT_TX_UNDERRUN) {
sunyiming 1:6465a3f5c58a 759 LINK_STATS_INC(link.err);
sunyiming 1:6465a3f5c58a 760 LINK_STATS_INC(link.drop);
sunyiming 1:6465a3f5c58a 761
sunyiming 1:6465a3f5c58a 762 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 763 /* Get exclusive access */
sunyiming 1:6465a3f5c58a 764 sys_mutex_lock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 765 #endif
sunyiming 1:6465a3f5c58a 766 /* Reset the TX side */
sunyiming 1:6465a3f5c58a 767 LPC_EMAC->MAC1 |= EMAC_MAC1_RES_TX;
sunyiming 1:6465a3f5c58a 768 LPC_EMAC->IntClear = EMAC_INT_TX_UNDERRUN;
sunyiming 1:6465a3f5c58a 769
sunyiming 1:6465a3f5c58a 770 /* De-allocate all queued TX pbufs */
sunyiming 1:6465a3f5c58a 771 for (idx = 0; idx < LPC_NUM_BUFF_TXDESCS; idx++) {
sunyiming 1:6465a3f5c58a 772 if (lpc_enetif->txb[idx] != NULL) {
sunyiming 1:6465a3f5c58a 773 pbuf_free(lpc_enetif->txb[idx]);
sunyiming 1:6465a3f5c58a 774 lpc_enetif->txb[idx] = NULL;
sunyiming 1:6465a3f5c58a 775 }
sunyiming 1:6465a3f5c58a 776 }
sunyiming 1:6465a3f5c58a 777
sunyiming 1:6465a3f5c58a 778 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 779 /* Restore access */
sunyiming 1:6465a3f5c58a 780 sys_mutex_unlock(&lpc_enetif->TXLockMutex);
sunyiming 1:6465a3f5c58a 781 #endif
sunyiming 1:6465a3f5c58a 782 /* Start TX side again */
sunyiming 1:6465a3f5c58a 783 lpc_tx_setup(lpc_enetif);
sunyiming 1:6465a3f5c58a 784 } else {
sunyiming 1:6465a3f5c58a 785 /* Free TX buffers that are done sending */
sunyiming 1:6465a3f5c58a 786 lpc_tx_reclaim(lpc_enetdata.netif);
sunyiming 1:6465a3f5c58a 787 }
sunyiming 1:6465a3f5c58a 788 }
sunyiming 1:6465a3f5c58a 789 }
sunyiming 1:6465a3f5c58a 790 #endif
sunyiming 1:6465a3f5c58a 791
sunyiming 1:6465a3f5c58a 792 /** \brief Low level init of the MAC and PHY.
sunyiming 1:6465a3f5c58a 793 *
sunyiming 1:6465a3f5c58a 794 * \param[in] netif Pointer to LWIP netif structure
sunyiming 1:6465a3f5c58a 795 */
sunyiming 1:6465a3f5c58a 796 static err_t low_level_init(struct netif *netif)
sunyiming 1:6465a3f5c58a 797 {
sunyiming 1:6465a3f5c58a 798 struct lpc_enetdata *lpc_enetif = netif->state;
sunyiming 1:6465a3f5c58a 799 err_t err = ERR_OK;
sunyiming 1:6465a3f5c58a 800
sunyiming 1:6465a3f5c58a 801 /* Enable MII clocking */
sunyiming 1:6465a3f5c58a 802 LPC_SC->PCONP |= CLKPWR_PCONP_PCENET;
sunyiming 1:6465a3f5c58a 803
sunyiming 1:6465a3f5c58a 804 #if defined(TARGET_LPC1768)
sunyiming 1:6465a3f5c58a 805 LPC_PINCON->PINSEL2 = 0x50150105; /* Enable P1 Ethernet Pins. */
sunyiming 1:6465a3f5c58a 806 LPC_PINCON->PINSEL3 = (LPC_PINCON->PINSEL3 & ~0x0000000F) | 0x00000005;
sunyiming 1:6465a3f5c58a 807 #elif defined(TARGET_LPC4088) || defined(TARGET_LPC4088_DM)
sunyiming 1:6465a3f5c58a 808 LPC_IOCON->P1_0 &= ~0x07; /* ENET I/O config */
sunyiming 1:6465a3f5c58a 809 LPC_IOCON->P1_0 |= 0x01; /* ENET_TXD0 */
sunyiming 1:6465a3f5c58a 810 LPC_IOCON->P1_1 &= ~0x07;
sunyiming 1:6465a3f5c58a 811 LPC_IOCON->P1_1 |= 0x01; /* ENET_TXD1 */
sunyiming 1:6465a3f5c58a 812 LPC_IOCON->P1_4 &= ~0x07;
sunyiming 1:6465a3f5c58a 813 LPC_IOCON->P1_4 |= 0x01; /* ENET_TXEN */
sunyiming 1:6465a3f5c58a 814 LPC_IOCON->P1_8 &= ~0x07;
sunyiming 1:6465a3f5c58a 815 LPC_IOCON->P1_8 |= 0x01; /* ENET_CRS */
sunyiming 1:6465a3f5c58a 816 LPC_IOCON->P1_9 &= ~0x07;
sunyiming 1:6465a3f5c58a 817 LPC_IOCON->P1_9 |= 0x01; /* ENET_RXD0 */
sunyiming 1:6465a3f5c58a 818 LPC_IOCON->P1_10 &= ~0x07;
sunyiming 1:6465a3f5c58a 819 LPC_IOCON->P1_10 |= 0x01; /* ENET_RXD1 */
sunyiming 1:6465a3f5c58a 820 LPC_IOCON->P1_14 &= ~0x07;
sunyiming 1:6465a3f5c58a 821 LPC_IOCON->P1_14 |= 0x01; /* ENET_RX_ER */
sunyiming 1:6465a3f5c58a 822 LPC_IOCON->P1_15 &= ~0x07;
sunyiming 1:6465a3f5c58a 823 LPC_IOCON->P1_15 |= 0x01; /* ENET_REF_CLK */
sunyiming 1:6465a3f5c58a 824 LPC_IOCON->P1_16 &= ~0x07; /* ENET/PHY I/O config */
sunyiming 1:6465a3f5c58a 825 LPC_IOCON->P1_16 |= 0x01; /* ENET_MDC */
sunyiming 1:6465a3f5c58a 826 LPC_IOCON->P1_17 &= ~0x07;
sunyiming 1:6465a3f5c58a 827 LPC_IOCON->P1_17 |= 0x01; /* ENET_MDIO */
sunyiming 1:6465a3f5c58a 828 #endif
sunyiming 1:6465a3f5c58a 829
sunyiming 1:6465a3f5c58a 830 /* Reset all MAC logic */
sunyiming 1:6465a3f5c58a 831 LPC_EMAC->MAC1 = EMAC_MAC1_RES_TX | EMAC_MAC1_RES_MCS_TX |
sunyiming 1:6465a3f5c58a 832 EMAC_MAC1_RES_RX | EMAC_MAC1_RES_MCS_RX | EMAC_MAC1_SIM_RES |
sunyiming 1:6465a3f5c58a 833 EMAC_MAC1_SOFT_RES;
sunyiming 1:6465a3f5c58a 834 LPC_EMAC->Command = EMAC_CR_REG_RES | EMAC_CR_TX_RES | EMAC_CR_RX_RES |
sunyiming 1:6465a3f5c58a 835 EMAC_CR_PASS_RUNT_FRM;
sunyiming 1:6465a3f5c58a 836 osDelay(10);
sunyiming 1:6465a3f5c58a 837
sunyiming 1:6465a3f5c58a 838 /* Initial MAC initialization */
sunyiming 1:6465a3f5c58a 839 LPC_EMAC->MAC1 = EMAC_MAC1_PASS_ALL;
sunyiming 1:6465a3f5c58a 840 LPC_EMAC->MAC2 = EMAC_MAC2_CRC_EN | EMAC_MAC2_PAD_EN |
sunyiming 1:6465a3f5c58a 841 EMAC_MAC2_VLAN_PAD_EN;
sunyiming 1:6465a3f5c58a 842 LPC_EMAC->MAXF = EMAC_ETH_MAX_FLEN;
sunyiming 1:6465a3f5c58a 843
sunyiming 1:6465a3f5c58a 844 /* Set RMII management clock rate to lowest speed */
sunyiming 1:6465a3f5c58a 845 LPC_EMAC->MCFG = EMAC_MCFG_CLK_SEL(11) | EMAC_MCFG_RES_MII;
sunyiming 1:6465a3f5c58a 846 LPC_EMAC->MCFG &= ~EMAC_MCFG_RES_MII;
sunyiming 1:6465a3f5c58a 847
sunyiming 1:6465a3f5c58a 848 /* Maximum number of retries, 0x37 collision window, gap */
sunyiming 1:6465a3f5c58a 849 LPC_EMAC->CLRT = EMAC_CLRT_DEF;
sunyiming 1:6465a3f5c58a 850 LPC_EMAC->IPGR = EMAC_IPGR_P1_DEF | EMAC_IPGR_P2_DEF;
sunyiming 1:6465a3f5c58a 851
sunyiming 1:6465a3f5c58a 852 #if LPC_EMAC_RMII
sunyiming 1:6465a3f5c58a 853 /* RMII setup */
sunyiming 1:6465a3f5c58a 854 LPC_EMAC->Command = EMAC_CR_PASS_RUNT_FRM | EMAC_CR_RMII;
sunyiming 1:6465a3f5c58a 855 #else
sunyiming 1:6465a3f5c58a 856 /* MII setup */
sunyiming 1:6465a3f5c58a 857 LPC_EMAC->CR = EMAC_CR_PASS_RUNT_FRM;
sunyiming 1:6465a3f5c58a 858 #endif
sunyiming 1:6465a3f5c58a 859
sunyiming 1:6465a3f5c58a 860 /* Initialize the PHY and reset */
sunyiming 1:6465a3f5c58a 861 err = lpc_phy_init(netif, LPC_EMAC_RMII);
sunyiming 1:6465a3f5c58a 862 if (err != ERR_OK)
sunyiming 1:6465a3f5c58a 863 return err;
sunyiming 1:6465a3f5c58a 864
sunyiming 1:6465a3f5c58a 865 /* Save station address */
sunyiming 1:6465a3f5c58a 866 LPC_EMAC->SA2 = (u32_t) netif->hwaddr[0] |
sunyiming 1:6465a3f5c58a 867 (((u32_t) netif->hwaddr[1]) << 8);
sunyiming 1:6465a3f5c58a 868 LPC_EMAC->SA1 = (u32_t) netif->hwaddr[2] |
sunyiming 1:6465a3f5c58a 869 (((u32_t) netif->hwaddr[3]) << 8);
sunyiming 1:6465a3f5c58a 870 LPC_EMAC->SA0 = (u32_t) netif->hwaddr[4] |
sunyiming 1:6465a3f5c58a 871 (((u32_t) netif->hwaddr[5]) << 8);
sunyiming 1:6465a3f5c58a 872
sunyiming 1:6465a3f5c58a 873 /* Setup transmit and receive descriptors */
sunyiming 1:6465a3f5c58a 874 if (lpc_tx_setup(lpc_enetif) != ERR_OK)
sunyiming 1:6465a3f5c58a 875 return ERR_BUF;
sunyiming 1:6465a3f5c58a 876 if (lpc_rx_setup(lpc_enetif) != ERR_OK)
sunyiming 1:6465a3f5c58a 877 return ERR_BUF;
sunyiming 1:6465a3f5c58a 878
sunyiming 1:6465a3f5c58a 879 /* Enable packet reception */
sunyiming 1:6465a3f5c58a 880 #if IP_SOF_BROADCAST_RECV
sunyiming 1:6465a3f5c58a 881 LPC_EMAC->RxFilterCtrl = EMAC_RFC_PERFECT_EN | EMAC_RFC_BCAST_EN | EMAC_RFC_MCAST_EN;
sunyiming 1:6465a3f5c58a 882 #else
sunyiming 1:6465a3f5c58a 883 LPC_EMAC->RxFilterCtrl = EMAC_RFC_PERFECT_EN;
sunyiming 1:6465a3f5c58a 884 #endif
sunyiming 1:6465a3f5c58a 885
sunyiming 1:6465a3f5c58a 886 /* Clear and enable rx/tx interrupts */
sunyiming 1:6465a3f5c58a 887 LPC_EMAC->IntClear = 0xFFFF;
sunyiming 1:6465a3f5c58a 888 LPC_EMAC->IntEnable = RXINTGROUP | TXINTGROUP;
sunyiming 1:6465a3f5c58a 889
sunyiming 1:6465a3f5c58a 890 /* Enable RX and TX */
sunyiming 1:6465a3f5c58a 891 LPC_EMAC->Command |= EMAC_CR_RX_EN | EMAC_CR_TX_EN;
sunyiming 1:6465a3f5c58a 892 LPC_EMAC->MAC1 |= EMAC_MAC1_REC_EN;
sunyiming 1:6465a3f5c58a 893
sunyiming 1:6465a3f5c58a 894 return err;
sunyiming 1:6465a3f5c58a 895 }
sunyiming 1:6465a3f5c58a 896
sunyiming 1:6465a3f5c58a 897 /* This function provides a method for the PHY to setup the EMAC
sunyiming 1:6465a3f5c58a 898 for the PHY negotiated duplex mode */
sunyiming 1:6465a3f5c58a 899 void lpc_emac_set_duplex(int full_duplex)
sunyiming 1:6465a3f5c58a 900 {
sunyiming 1:6465a3f5c58a 901 if (full_duplex) {
sunyiming 1:6465a3f5c58a 902 LPC_EMAC->MAC2 |= EMAC_MAC2_FULL_DUP;
sunyiming 1:6465a3f5c58a 903 LPC_EMAC->Command |= EMAC_CR_FULL_DUP;
sunyiming 1:6465a3f5c58a 904 LPC_EMAC->IPGT = EMAC_IPGT_FULL_DUP;
sunyiming 1:6465a3f5c58a 905 } else {
sunyiming 1:6465a3f5c58a 906 LPC_EMAC->MAC2 &= ~EMAC_MAC2_FULL_DUP;
sunyiming 1:6465a3f5c58a 907 LPC_EMAC->Command &= ~EMAC_CR_FULL_DUP;
sunyiming 1:6465a3f5c58a 908 LPC_EMAC->IPGT = EMAC_IPGT_HALF_DUP;
sunyiming 1:6465a3f5c58a 909 }
sunyiming 1:6465a3f5c58a 910 }
sunyiming 1:6465a3f5c58a 911
sunyiming 1:6465a3f5c58a 912 /* This function provides a method for the PHY to setup the EMAC
sunyiming 1:6465a3f5c58a 913 for the PHY negotiated bit rate */
sunyiming 1:6465a3f5c58a 914 void lpc_emac_set_speed(int mbs_100)
sunyiming 1:6465a3f5c58a 915 {
sunyiming 1:6465a3f5c58a 916 if (mbs_100)
sunyiming 1:6465a3f5c58a 917 LPC_EMAC->SUPP = EMAC_SUPP_SPEED;
sunyiming 1:6465a3f5c58a 918 else
sunyiming 1:6465a3f5c58a 919 LPC_EMAC->SUPP = 0;
sunyiming 1:6465a3f5c58a 920 }
sunyiming 1:6465a3f5c58a 921
sunyiming 1:6465a3f5c58a 922 /**
sunyiming 1:6465a3f5c58a 923 * This function is the ethernet packet send function. It calls
sunyiming 1:6465a3f5c58a 924 * etharp_output after checking link status.
sunyiming 1:6465a3f5c58a 925 *
sunyiming 1:6465a3f5c58a 926 * \param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 927 * \param[in] q Pointer to pbug to send
sunyiming 1:6465a3f5c58a 928 * \param[in] ipaddr IP address
sunyiming 1:6465a3f5c58a 929 * \return ERR_OK or error code
sunyiming 1:6465a3f5c58a 930 */
sunyiming 1:6465a3f5c58a 931 err_t lpc_etharp_output(struct netif *netif, struct pbuf *q,
sunyiming 1:6465a3f5c58a 932 ip_addr_t *ipaddr)
sunyiming 1:6465a3f5c58a 933 {
sunyiming 1:6465a3f5c58a 934 /* Only send packet is link is up */
sunyiming 1:6465a3f5c58a 935 if (netif->flags & NETIF_FLAG_LINK_UP)
sunyiming 1:6465a3f5c58a 936 return etharp_output(netif, q, ipaddr);
sunyiming 1:6465a3f5c58a 937
sunyiming 1:6465a3f5c58a 938 return ERR_CONN;
sunyiming 1:6465a3f5c58a 939 }
sunyiming 1:6465a3f5c58a 940
sunyiming 1:6465a3f5c58a 941 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 942 /* periodic PHY status update */
sunyiming 1:6465a3f5c58a 943 void phy_update(void const *nif) {
sunyiming 1:6465a3f5c58a 944 lpc_phy_sts_sm((struct netif*)nif);
sunyiming 1:6465a3f5c58a 945 }
sunyiming 1:6465a3f5c58a 946 osTimerDef(phy_update, phy_update);
sunyiming 1:6465a3f5c58a 947 #endif
sunyiming 1:6465a3f5c58a 948
sunyiming 1:6465a3f5c58a 949 /**
sunyiming 1:6465a3f5c58a 950 * Should be called at the beginning of the program to set up the
sunyiming 1:6465a3f5c58a 951 * network interface.
sunyiming 1:6465a3f5c58a 952 *
sunyiming 1:6465a3f5c58a 953 * This function should be passed as a parameter to netif_add().
sunyiming 1:6465a3f5c58a 954 *
sunyiming 1:6465a3f5c58a 955 * @param[in] netif the lwip network interface structure for this lpc_enetif
sunyiming 1:6465a3f5c58a 956 * @return ERR_OK if the loopif is initialized
sunyiming 1:6465a3f5c58a 957 * ERR_MEM if private data couldn't be allocated
sunyiming 1:6465a3f5c58a 958 * any other err_t on error
sunyiming 1:6465a3f5c58a 959 */
sunyiming 1:6465a3f5c58a 960 err_t eth_arch_enetif_init(struct netif *netif)
sunyiming 1:6465a3f5c58a 961 {
sunyiming 1:6465a3f5c58a 962 err_t err;
sunyiming 1:6465a3f5c58a 963
sunyiming 1:6465a3f5c58a 964 LWIP_ASSERT("netif != NULL", (netif != NULL));
sunyiming 1:6465a3f5c58a 965
sunyiming 1:6465a3f5c58a 966 lpc_enetdata.netif = netif;
sunyiming 1:6465a3f5c58a 967
sunyiming 1:6465a3f5c58a 968 /* set MAC hardware address */
sunyiming 1:6465a3f5c58a 969 #if (MBED_MAC_ADDRESS_SUM != MBED_MAC_ADDR_INTERFACE)
sunyiming 1:6465a3f5c58a 970 netif->hwaddr[0] = MBED_MAC_ADDR_0;
sunyiming 1:6465a3f5c58a 971 netif->hwaddr[1] = MBED_MAC_ADDR_1;
sunyiming 1:6465a3f5c58a 972 netif->hwaddr[2] = MBED_MAC_ADDR_2;
sunyiming 1:6465a3f5c58a 973 netif->hwaddr[3] = MBED_MAC_ADDR_3;
sunyiming 1:6465a3f5c58a 974 netif->hwaddr[4] = MBED_MAC_ADDR_4;
sunyiming 1:6465a3f5c58a 975 netif->hwaddr[5] = MBED_MAC_ADDR_5;
sunyiming 1:6465a3f5c58a 976 #else
sunyiming 1:6465a3f5c58a 977 mbed_mac_address((char *)netif->hwaddr);
sunyiming 1:6465a3f5c58a 978 #endif
sunyiming 1:6465a3f5c58a 979 netif->hwaddr_len = ETHARP_HWADDR_LEN;
sunyiming 1:6465a3f5c58a 980
sunyiming 1:6465a3f5c58a 981 /* maximum transfer unit */
sunyiming 1:6465a3f5c58a 982 netif->mtu = 1500;
sunyiming 1:6465a3f5c58a 983
sunyiming 1:6465a3f5c58a 984 /* device capabilities */
sunyiming 1:6465a3f5c58a 985 netif->flags = NETIF_FLAG_BROADCAST | NETIF_FLAG_ETHARP | NETIF_FLAG_ETHERNET | NETIF_FLAG_IGMP;
sunyiming 1:6465a3f5c58a 986
sunyiming 1:6465a3f5c58a 987 /* Initialize the hardware */
sunyiming 1:6465a3f5c58a 988 netif->state = &lpc_enetdata;
sunyiming 1:6465a3f5c58a 989 err = low_level_init(netif);
sunyiming 1:6465a3f5c58a 990 if (err != ERR_OK)
sunyiming 1:6465a3f5c58a 991 return err;
sunyiming 1:6465a3f5c58a 992
sunyiming 1:6465a3f5c58a 993 #if LWIP_NETIF_HOSTNAME
sunyiming 1:6465a3f5c58a 994 /* Initialize interface hostname */
sunyiming 1:6465a3f5c58a 995 netif->hostname = "lwiplpc";
sunyiming 1:6465a3f5c58a 996 #endif /* LWIP_NETIF_HOSTNAME */
sunyiming 1:6465a3f5c58a 997
sunyiming 1:6465a3f5c58a 998 netif->name[0] = 'e';
sunyiming 1:6465a3f5c58a 999 netif->name[1] = 'n';
sunyiming 1:6465a3f5c58a 1000
sunyiming 1:6465a3f5c58a 1001 netif->output = lpc_etharp_output;
sunyiming 1:6465a3f5c58a 1002 netif->linkoutput = lpc_low_level_output;
sunyiming 1:6465a3f5c58a 1003
sunyiming 1:6465a3f5c58a 1004 /* CMSIS-RTOS, start tasks */
sunyiming 1:6465a3f5c58a 1005 #if NO_SYS == 0
sunyiming 1:6465a3f5c58a 1006 #ifdef CMSIS_OS_RTX
sunyiming 1:6465a3f5c58a 1007 memset(lpc_enetdata.xTXDCountSem.data, 0, sizeof(lpc_enetdata.xTXDCountSem.data));
sunyiming 1:6465a3f5c58a 1008 lpc_enetdata.xTXDCountSem.def.semaphore = lpc_enetdata.xTXDCountSem.data;
sunyiming 1:6465a3f5c58a 1009 #endif
sunyiming 1:6465a3f5c58a 1010 lpc_enetdata.xTXDCountSem.id = osSemaphoreCreate(&lpc_enetdata.xTXDCountSem.def, LPC_NUM_BUFF_TXDESCS);
sunyiming 1:6465a3f5c58a 1011 LWIP_ASSERT("xTXDCountSem creation error", (lpc_enetdata.xTXDCountSem.id != NULL));
sunyiming 1:6465a3f5c58a 1012
sunyiming 1:6465a3f5c58a 1013 err = sys_mutex_new(&lpc_enetdata.TXLockMutex);
sunyiming 1:6465a3f5c58a 1014 LWIP_ASSERT("TXLockMutex creation error", (err == ERR_OK));
sunyiming 1:6465a3f5c58a 1015
sunyiming 1:6465a3f5c58a 1016 /* Packet receive task */
sunyiming 1:6465a3f5c58a 1017 lpc_enetdata.RxThread = sys_thread_new("receive_thread", packet_rx, netif->state, DEFAULT_THREAD_STACKSIZE, RX_PRIORITY);
sunyiming 1:6465a3f5c58a 1018 LWIP_ASSERT("RxThread creation error", (lpc_enetdata.RxThread));
sunyiming 1:6465a3f5c58a 1019
sunyiming 1:6465a3f5c58a 1020 /* Transmit cleanup task */
sunyiming 1:6465a3f5c58a 1021 err = sys_sem_new(&lpc_enetdata.TxCleanSem, 0);
sunyiming 1:6465a3f5c58a 1022 LWIP_ASSERT("TxCleanSem creation error", (err == ERR_OK));
sunyiming 1:6465a3f5c58a 1023 sys_thread_new("txclean_thread", packet_tx, netif->state, DEFAULT_THREAD_STACKSIZE, TX_PRIORITY);
sunyiming 1:6465a3f5c58a 1024
sunyiming 1:6465a3f5c58a 1025 /* periodic PHY status update */
sunyiming 1:6465a3f5c58a 1026 osTimerId phy_timer = osTimerCreate(osTimer(phy_update), osTimerPeriodic, (void *)netif);
sunyiming 1:6465a3f5c58a 1027 osTimerStart(phy_timer, 250);
sunyiming 1:6465a3f5c58a 1028 #endif
sunyiming 1:6465a3f5c58a 1029
sunyiming 1:6465a3f5c58a 1030 return ERR_OK;
sunyiming 1:6465a3f5c58a 1031 }
sunyiming 1:6465a3f5c58a 1032
sunyiming 1:6465a3f5c58a 1033 void eth_arch_enable_interrupts(void) {
sunyiming 1:6465a3f5c58a 1034 NVIC_SetPriority(ENET_IRQn, ((0x01 << 3) | 0x01));
sunyiming 1:6465a3f5c58a 1035 NVIC_EnableIRQ(ENET_IRQn);
sunyiming 1:6465a3f5c58a 1036 }
sunyiming 1:6465a3f5c58a 1037
sunyiming 1:6465a3f5c58a 1038 void eth_arch_disable_interrupts(void) {
sunyiming 1:6465a3f5c58a 1039 NVIC_DisableIRQ(ENET_IRQn);
sunyiming 1:6465a3f5c58a 1040 }
sunyiming 1:6465a3f5c58a 1041
sunyiming 1:6465a3f5c58a 1042 /**
sunyiming 1:6465a3f5c58a 1043 * @}
sunyiming 1:6465a3f5c58a 1044 */
sunyiming 1:6465a3f5c58a 1045
sunyiming 1:6465a3f5c58a 1046 /* --------------------------------- End Of File ------------------------------ */