Ethernetwebsoc

Dependencies:   C12832_lcd LM75B WebSocketClient mbed-rtos mbed Socket lwip-eth lwip-sys lwip

Committer:
GordonSin
Date:
Fri May 31 04:09:54 2013 +0000
Revision:
0:0ed2a7c7190c
31/5/2013;

Who changed what in which revision?

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