KEIS

Fork of lwip-eth by mbed official

Committer:
bogdanm
Date:
Tue Sep 10 15:14:48 2013 +0300
Revision:
9:59490137c7a7
Parent:
8:5754e05385b8
Sync with git revision 171dda705c947bf910926a0b73d6a4797802554d

Who changed what in which revision?

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