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