545 lines
16 KiB
C
545 lines
16 KiB
C
/*
|
|
ChibiOS/RT - Copyright (C) 2006,2007,2008,2009,2010,
|
|
2011,2012 Giovanni Di Sirio.
|
|
|
|
This file is part of ChibiOS/RT.
|
|
|
|
ChibiOS/RT is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
ChibiOS/RT is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* @file STM32/mac_lld.c
|
|
* @brief STM32 low level MAC driver code.
|
|
*
|
|
* @addtogroup MAC
|
|
* @{
|
|
*/
|
|
|
|
#include "ch.h"
|
|
#include "hal.h"
|
|
#include "mii.h"
|
|
|
|
#if HAL_USE_MAC || defined(__DOXYGEN__)
|
|
|
|
/*===========================================================================*/
|
|
/* Driver local definitions. */
|
|
/*===========================================================================*/
|
|
|
|
#define BUFFER_SLICE ((((MAC_BUFFERS_SIZE - 1) | 3) + 1) / 4)
|
|
|
|
/* MII divider optimal value.*/
|
|
#if (STM32_HCLK >= 60000000)
|
|
#define MACMIIDR_CR ETH_MACMIIAR_CR_Div42
|
|
#elif (STM32_HCLK >= 35000000)
|
|
#define MACMIIDR_CR ETH_MACMIIAR_CR_Div26
|
|
#elif (STM32_HCLK >= 20000000)
|
|
#define MACMIIDR_CR ETH_MACMIIAR_CR_Div16
|
|
#else
|
|
#error "STM32_HCLK below minimum frequency for ETH operations (20MHz)"
|
|
#endif
|
|
|
|
/*===========================================================================*/
|
|
/* Driver exported variables. */
|
|
/*===========================================================================*/
|
|
|
|
/**
|
|
* @brief Ethernet driver 1.
|
|
*/
|
|
MACDriver ETHD1;
|
|
|
|
/*===========================================================================*/
|
|
/* Driver local variables. */
|
|
/*===========================================================================*/
|
|
|
|
static const uint8_t default_mac_address[] = {0xAA, 0x55, 0x13,
|
|
0x37, 0x01, 0x10};
|
|
|
|
static stm32_eth_rx_descriptor_t rd[MAC_RECEIVE_BUFFERS];
|
|
static stm32_eth_tx_descriptor_t td[MAC_TRANSMIT_BUFFERS];
|
|
|
|
static uint32_t rb[MAC_RECEIVE_BUFFERS * BUFFER_SLICE];
|
|
static uint32_t tb[MAC_TRANSMIT_BUFFERS * BUFFER_SLICE];
|
|
|
|
/*===========================================================================*/
|
|
/* Driver local functions. */
|
|
/*===========================================================================*/
|
|
|
|
/**
|
|
* @brief Writes a PHY register.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
* @param[in] reg register number
|
|
* @param[in] value new register value
|
|
*/
|
|
static void mii_write_phy(MACDriver *macp, uint32_t reg, uint32_t value) {
|
|
|
|
ETH->MACMIIDR = value;
|
|
ETH->MACMIIAR = macp->phyaddr | (reg << 6) | MACMIIDR_CR |
|
|
ETH_MACMIIAR_MW | ETH_MACMIIAR_MB;
|
|
while ((ETH->MACMIIAR & ETH_MACMIIAR_MB) != 0)
|
|
;
|
|
}
|
|
|
|
/**
|
|
* @brief Reads a PHY register.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
* @param[in] reg register number
|
|
*
|
|
* @return The PHY register content.
|
|
*/
|
|
static uint32_t mii_read_phy(MACDriver *macp, uint32_t reg) {
|
|
|
|
ETH->MACMIIAR = macp->phyaddr | (reg << 6) | MACMIIDR_CR | ETH_MACMIIAR_MB;
|
|
while ((ETH->MACMIIAR & ETH_MACMIIAR_MB) != 0)
|
|
;
|
|
return ETH->MACMIIDR;
|
|
}
|
|
|
|
#if !defined(BOARD_PHY_ADDRESS)
|
|
/**
|
|
* @brief PHY address detection.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
*/
|
|
static void mii_find_phy(MACDriver *macp) {
|
|
uint32_t i;
|
|
|
|
for (i = 0; i < 31; i++) {
|
|
ETH->MACMIIDR = (i << 6) | MACMIIDR_CR;
|
|
if ((mii_read_phy(macp, MII_PHYSID1) == (BOARD_PHY_ID >> 16)) &&
|
|
(mii_read_phy(macp, MII_PHYSID2) == (BOARD_PHY_ID & 0xFFF0))) {
|
|
macp->phyaddr = i << 11;
|
|
return;
|
|
}
|
|
}
|
|
/* Wrong or defective board.*/
|
|
chSysHalt();
|
|
}
|
|
#endif
|
|
|
|
/**
|
|
* @brief MAC address setup.
|
|
*
|
|
* @param[in] p pointer to a six bytes buffer containing the MAC
|
|
* address
|
|
*/
|
|
static void mac_lld_set_address(const uint8_t *p) {
|
|
|
|
/* MAC address configuration, only a single address comparator is used,
|
|
hash table not used.*/
|
|
ETH->MACA0HR = ((uint32_t)p[5] << 8) |
|
|
((uint32_t)p[4] << 0);
|
|
ETH->MACA0LR = ((uint32_t)p[3] << 24) |
|
|
((uint32_t)p[2] << 16) |
|
|
((uint32_t)p[1] << 8) |
|
|
((uint32_t)p[0] << 0);
|
|
ETH->MACA1HR = 0x0000FFFF;
|
|
ETH->MACA1LR = 0xFFFFFFFF;
|
|
ETH->MACA2HR = 0x0000FFFF;
|
|
ETH->MACA2LR = 0xFFFFFFFF;
|
|
ETH->MACA3HR = 0x0000FFFF;
|
|
ETH->MACA3LR = 0xFFFFFFFF;
|
|
ETH->MACHTHR = 0;
|
|
ETH->MACHTLR = 0;
|
|
}
|
|
|
|
/*===========================================================================*/
|
|
/* Driver interrupt handlers. */
|
|
/*===========================================================================*/
|
|
|
|
CH_IRQ_HANDLER(ETH_IRQHandler) {
|
|
uint32_t dmasr;
|
|
|
|
CH_IRQ_PROLOGUE();
|
|
|
|
dmasr = ETH->DMASR;
|
|
ETH->DMASR = dmasr; /* Clear status bits.*/
|
|
|
|
if (dmasr & ETH_DMASR_RS) {
|
|
/* Data Received.*/
|
|
chSysLockFromIsr();
|
|
chSemResetI(ÐD1.rdsem, 0);
|
|
#if MAC_USE_EVENTS
|
|
chEvtBroadcastI(ÐD1.rdevent);
|
|
#endif
|
|
chSysUnlockFromIsr();
|
|
}
|
|
|
|
if (dmasr & ETH_DMASR_TS) {
|
|
/* Data Transmitted.*/
|
|
chSysLockFromIsr();
|
|
chSemResetI(ÐD1.tdsem, 0);
|
|
chSysUnlockFromIsr();
|
|
}
|
|
|
|
CH_IRQ_EPILOGUE();
|
|
}
|
|
|
|
/*===========================================================================*/
|
|
/* Driver exported functions. */
|
|
/*===========================================================================*/
|
|
|
|
/**
|
|
* @brief Low level MAC initialization.
|
|
*
|
|
* @notapi
|
|
*/
|
|
void mac_lld_init(void) {
|
|
unsigned i;
|
|
|
|
macObjectInit(ÐD1);
|
|
ETHD1.link_up = FALSE;
|
|
|
|
/* Descriptor tables are initialized in chained mode, note that the first
|
|
word is not initialized here but in mac_lld_start().*/
|
|
for (i = 0; i < MAC_RECEIVE_BUFFERS; i++) {
|
|
rd[i].rdes1 = STM32_RDES1_RCH | MAC_BUFFERS_SIZE;
|
|
rd[i].rdes2 = (uint32_t)&rb[i * BUFFER_SLICE];
|
|
rd[i].rdes3 = (uint32_t)&rb[((i + 1) % MAC_RECEIVE_BUFFERS) *
|
|
BUFFER_SLICE];
|
|
}
|
|
for (i = 0; i < MAC_TRANSMIT_BUFFERS; i++) {
|
|
td[i].tdes1 = 0;
|
|
td[i].tdes2 = (uint32_t)&tb[i * BUFFER_SLICE];
|
|
td[i].tdes3 = (uint32_t)&tb[((i + 1) % MAC_TRANSMIT_BUFFERS) *
|
|
BUFFER_SLICE];
|
|
}
|
|
|
|
/* Selection of the RMII or MII mode based on info exported by board.h.*/
|
|
#if defined(STM32F10X_CL)
|
|
#if defined(BOARD_PHY_RMII)
|
|
AFIO->MAPR |= AFIO_MAPR_MII_RMII_SEL;
|
|
#else
|
|
AFIO->MAPR &= ~AFIO_MAPR_MII_RMII_SEL;
|
|
#endif
|
|
#elif defined(STM32F2XX) || defined(STM32F4XX)
|
|
#if defined(BOARD_PHY_RMII)
|
|
SYSCFG->PMC |= SYSCFG_PMC_MII_RMII;
|
|
#else
|
|
SYSCFG->PMC &= ~SYSCFG_PMC_MII_RMII;
|
|
#endif
|
|
#else
|
|
#error "unsupported STM32 platform for MAC driver"
|
|
#endif
|
|
|
|
/* Reset of the MAC core.*/
|
|
rccResetETH();
|
|
|
|
/* MAC clocks temporary activation.*/
|
|
rccEnableETH(FALSE);
|
|
|
|
/* PHY address setup.*/
|
|
#if defined(BOARD_PHY_ADDRESS)
|
|
phyaddr = BOARD_PHY_ADDRESS << 11;
|
|
#else
|
|
mii_find_phy(ÐD1);
|
|
#endif
|
|
|
|
#if defined(BOARD_PHY_RESET)
|
|
/* PHY board-specific reset procedure.*/
|
|
BOARD_PHY_RESET();
|
|
#else
|
|
/* PHY soft reset procedure.*/
|
|
mii_write_phy(ÐD1, MII_BMCR, BMCR_RESET);
|
|
while (mii_read_phy(ÐD1, MII_BMCR) & BMCR_RESET)
|
|
;
|
|
#endif
|
|
|
|
/* PHY in power down mode until the driver will be started.*/
|
|
mii_write_phy(ÐD1, MII_BMCR, BMCR_PDOWN);
|
|
|
|
/* MAC clocks stopped again.*/
|
|
rccDisableETH(FALSE);
|
|
}
|
|
|
|
/**
|
|
* @brief Configures and activates the MAC peripheral.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
*
|
|
* @notapi
|
|
*/
|
|
void mac_lld_start(MACDriver *macp) {
|
|
unsigned i;
|
|
|
|
|
|
/* Resets the state of all descriptors.*/
|
|
for (i = 0; i < MAC_RECEIVE_BUFFERS; i++)
|
|
rd[i].rdes0 = STM32_RDES0_OWN;
|
|
macp->rxptr = (stm32_eth_rx_descriptor_t *)rd;
|
|
for (i = 0; i < MAC_TRANSMIT_BUFFERS; i++)
|
|
td[i].tdes0 = STM32_TDES0_TCH;
|
|
macp->txptr = (stm32_eth_tx_descriptor_t *)td;
|
|
|
|
/* MAC clocks activation and commanded reset procedure.*/
|
|
rccEnableETH(FALSE);
|
|
ETH->DMABMR |= ETH_DMABMR_SR;
|
|
while(ETH->DMABMR & ETH_DMABMR_SR)
|
|
;
|
|
|
|
/* ISR vector enabled.*/
|
|
nvicEnableVector(ETH_IRQn, CORTEX_PRIORITY_MASK(STM32_ETH1_IRQ_PRIORITY));
|
|
|
|
/* MAC configuration:
|
|
ETH_MACFFR_SAF - Source address filter. Broadcast frames are not
|
|
filtered.*/
|
|
ETH->MACFFR = ETH_MACFFR_SAF;
|
|
|
|
/* MAC address setup.*/
|
|
if (macp->config->mac_address == NULL)
|
|
mac_lld_set_address(default_mac_address);
|
|
else
|
|
mac_lld_set_address(macp->config->mac_address);
|
|
|
|
/* MAC flow control not used, VLAN not used.*/
|
|
ETH->MACFCR = 0;
|
|
ETH->MACVLANTR = 0;
|
|
|
|
/* Transmitter and receiver enabled.
|
|
Note that the complete setup of the MAC is performed when the link
|
|
status is detected.*/
|
|
ETH->MACCR = ETH_MACCR_TE | ETH_MACCR_TE;
|
|
|
|
/* DMA configuration:
|
|
Descriptor chains pointers.*/
|
|
ETH->DMARDLAR = (uint32_t)rd;
|
|
ETH->DMATDLAR = (uint32_t)td;
|
|
|
|
/* Enabling required interrupt sources.*/
|
|
ETH->DMASR = ETH->DMASR;
|
|
ETH->DMAIER = ETH_DMAIER_RIE | ETH_DMAIER_TIE;
|
|
|
|
/* DMA general settings.*/
|
|
ETH->DMABMR = ETH_DMABMR_AAB | ETH_DMABMR_RDP_1Beat | ETH_DMABMR_PBL_1Beat;
|
|
|
|
/* Transmit FIFO flush.*/
|
|
ETH->DMAOMR = ETH_DMAOMR_FTF;
|
|
while (ETH->DMAOMR & ETH_DMAOMR_FTF)
|
|
;
|
|
|
|
/* DMA final configuration and start.*/
|
|
ETH->DMAOMR = ETH_DMAOMR_DTCEFD | ETH_DMAOMR_RSF | ETH_DMAOMR_TSF |
|
|
ETH_DMAOMR_ST | ETH_DMAOMR_SR;
|
|
}
|
|
|
|
/**
|
|
* @brief Deactivates the MAC peripheral.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
*
|
|
* @notapi
|
|
*/
|
|
void mac_lld_stop(MACDriver *macp) {
|
|
|
|
(void)macp;
|
|
|
|
/* MAC and DMA stopped.*/
|
|
ETH->MACCR = 0;
|
|
ETH->DMAOMR = 0;
|
|
ETH->DMAIER = 0;
|
|
ETH->DMASR = ETH->DMASR;
|
|
|
|
/* MAC clocks stopped.*/
|
|
rccDisableETH(FALSE);
|
|
|
|
/* ISR vector disabled.*/
|
|
nvicDisableVector(ETH_IRQn);
|
|
}
|
|
|
|
/**
|
|
* @brief Returns a transmission descriptor.
|
|
* @details One of the available transmission descriptors is locked and
|
|
* returned.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
* @param[out] tdp pointer to a @p MACTransmitDescriptor structure
|
|
* @return The operation status.
|
|
* @retval RDY_OK the descriptor has been obtained.
|
|
* @retval RDY_TIMEOUT descriptor not available.
|
|
*
|
|
* @notapi
|
|
*/
|
|
msg_t max_lld_get_transmit_descriptor(MACDriver *macp,
|
|
MACTransmitDescriptor *tdp) {
|
|
|
|
(void)macp;
|
|
(void)tdp;
|
|
|
|
return RDY_OK;
|
|
}
|
|
|
|
/**
|
|
* @brief Writes to a transmit descriptor's stream.
|
|
*
|
|
* @param[in] tdp pointer to a @p MACTransmitDescriptor structure
|
|
* @param[in] buf pointer to the buffer cointaining the data to be
|
|
* written
|
|
* @param[in] size number of bytes to be written
|
|
* @return The number of bytes written into the descriptor's
|
|
* stream, this value can be less than the amount
|
|
* specified in the parameter @p size if the maximum
|
|
* frame size is reached.
|
|
*
|
|
* @notapi
|
|
*/
|
|
size_t mac_lld_write_transmit_descriptor(MACTransmitDescriptor *tdp,
|
|
uint8_t *buf,
|
|
size_t size) {
|
|
|
|
(void)tdp;
|
|
(void)buf;
|
|
(void)size;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* @brief Releases a transmit descriptor and starts the transmission of the
|
|
* enqueued data as a single frame.
|
|
*
|
|
* @param[in] tdp the pointer to the @p MACTransmitDescriptor structure
|
|
*
|
|
* @notapi
|
|
*/
|
|
void mac_lld_release_transmit_descriptor(MACTransmitDescriptor *tdp) {
|
|
|
|
(void)tdp;
|
|
}
|
|
|
|
/**
|
|
* @brief Returns a receive descriptor.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
* @param[out] rdp pointer to a @p MACReceiveDescriptor structure
|
|
* @return The operation status.
|
|
* @retval RDY_OK the descriptor has been obtained.
|
|
* @retval RDY_TIMEOUT descriptor not available.
|
|
*
|
|
* @notapi
|
|
*/
|
|
msg_t max_lld_get_receive_descriptor(MACDriver *macp,
|
|
MACReceiveDescriptor *rdp) {
|
|
|
|
(void)macp;
|
|
(void)rdp;
|
|
|
|
return RDY_TIMEOUT;
|
|
}
|
|
|
|
/**
|
|
* @brief Reads from a receive descriptor's stream.
|
|
*
|
|
* @param[in] rdp pointer to a @p MACReceiveDescriptor structure
|
|
* @param[in] buf pointer to the buffer that will receive the read data
|
|
* @param[in] size number of bytes to be read
|
|
* @return The number of bytes read from the descriptor's
|
|
* stream, this value can be less than the amount
|
|
* specified in the parameter @p size if there are
|
|
* no more bytes to read.
|
|
*
|
|
* @notapi
|
|
*/
|
|
size_t mac_lld_read_receive_descriptor(MACReceiveDescriptor *rdp,
|
|
uint8_t *buf,
|
|
size_t size) {
|
|
|
|
(void)rdp;
|
|
(void)buf;
|
|
(void)size;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* @brief Releases a receive descriptor.
|
|
* @details The descriptor and its buffer are made available for more incoming
|
|
* frames.
|
|
*
|
|
* @param[in] rdp the pointer to the @p MACReceiveDescriptor structure
|
|
*
|
|
* @notapi
|
|
*/
|
|
void mac_lld_release_receive_descriptor(MACReceiveDescriptor *rdp) {
|
|
|
|
(void)rdp;
|
|
}
|
|
|
|
/**
|
|
* @brief Updates and returns the link status.
|
|
*
|
|
* @param[in] macp pointer to the @p MACDriver object
|
|
* @return The link status.
|
|
* @retval TRUE if the link is active.
|
|
* @retval FALSE if the link is down.
|
|
*
|
|
* @notapi
|
|
*/
|
|
bool_t mac_lld_poll_link_status(MACDriver *macp) {
|
|
uint32_t maccr, bmsr, bmcr;
|
|
|
|
/* Checks if the link is up, updates the status accordingly and returns.*/
|
|
bmsr = mii_read_phy(macp, MII_BMSR);
|
|
if (!(bmsr & BMSR_LSTATUS))
|
|
return macp->link_up = FALSE;
|
|
|
|
maccr = ETH->MACCR;
|
|
bmcr = mii_read_phy(macp, MII_BMCR);
|
|
|
|
/* Check on auto-negotiation mode.*/
|
|
if (bmcr & BMCR_ANENABLE) {
|
|
uint32_t lpa;
|
|
|
|
/* Auto-nogotiation enabled, checks the LPA register.*/
|
|
lpa = mii_read_phy(macp, MII_LPA);
|
|
|
|
/* Check on link speed.*/
|
|
if (lpa & (LPA_100HALF | LPA_100FULL | LPA_100BASE4))
|
|
maccr |= ETH_MACCR_FES;
|
|
else
|
|
maccr &= ~ETH_MACCR_FES;
|
|
|
|
/* Check on link mode.*/
|
|
if (lpa & (LPA_10FULL | LPA_100FULL))
|
|
maccr |= ETH_MACCR_DM;
|
|
else
|
|
maccr &= ~ETH_MACCR_DM;
|
|
}
|
|
else {
|
|
/* Auto-negotiation disabled, checks the current settings.*/
|
|
|
|
/* Check on link speed.*/
|
|
if (bmcr & BMCR_SPEED100)
|
|
maccr |= ETH_MACCR_FES;
|
|
else
|
|
maccr &= ~ETH_MACCR_FES;
|
|
|
|
/* Check on link mode.*/
|
|
if (bmcr & BMCR_FULLDPLX)
|
|
maccr |= ETH_MACCR_DM;
|
|
else
|
|
maccr &= ~ETH_MACCR_DM;
|
|
}
|
|
|
|
/* Changes the mode in the MAC.*/
|
|
ETH->MACCR = maccr;
|
|
|
|
/* Returns the link status.*/
|
|
return macp->link_up = TRUE;
|
|
}
|
|
|
|
#endif /* HAL_USE_MAC */
|
|
|
|
/** @} */
|