2 * Ethernet driver for TI TMS320DM644x (DaVinci) chips.
4 * Copyright (C) 2007 Sergey Kubushyn <ksi@koi8.net>
6 * Parts shamelessly stolen from TI's dm644x_emac.c. Original copyright
9 * ----------------------------------------------------------------------------
13 * TI DaVinci (DM644X) EMAC peripheral driver source for DV-EVM
15 * Copyright (C) 2005 Texas Instruments.
17 * ----------------------------------------------------------------------------
19 * This program is free software; you can redistribute it and/or modify
20 * it under the terms of the GNU General Public License as published by
21 * the Free Software Foundation; either version 2 of the License, or
22 * (at your option) any later version.
24 * This program is distributed in the hope that it will be useful,
25 * but WITHOUT ANY WARRANTY; without even the implied warranty of
26 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
27 * GNU General Public License for more details.
29 * You should have received a copy of the GNU General Public License
30 * along with this program; if not, write to the Free Software
31 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
32 * ----------------------------------------------------------------------------
35 * ver. 1.0: Sep 2005, Anant Gole - Created EMAC version for uBoot.
36 * ver 1.1: Nov 2005, Anant Gole - Extended the RX logic for multiple descriptors
44 #include <asm/arch/emac_defs.h>
47 unsigned int emac_dbg = 0;
48 #define debug_emac(fmt,args...) if (emac_dbg) printf(fmt,##args)
50 #ifdef DAVINCI_EMAC_GIG_ENABLE
51 #define emac_gigabit_enable() davinci_eth_gigabit_enable()
53 #define emac_gigabit_enable() /* no gigabit to enable */
56 static void davinci_eth_mdio_enable(void);
58 static int gen_init_phy(int phy_addr);
59 static int gen_is_phy_connected(int phy_addr);
60 static int gen_get_link_speed(int phy_addr);
61 static int gen_auto_negotiate(int phy_addr);
63 void eth_mdio_enable(void)
65 davinci_eth_mdio_enable();
69 static volatile emac_regs *adap_emac = (emac_regs *)EMAC_BASE_ADDR;
70 static volatile ewrap_regs *adap_ewrap = (ewrap_regs *)EMAC_WRAPPER_BASE_ADDR;
71 static volatile mdio_regs *adap_mdio = (mdio_regs *)EMAC_MDIO_BASE_ADDR;
73 /* EMAC descriptors */
74 static volatile emac_desc *emac_rx_desc = (emac_desc *)(EMAC_WRAPPER_RAM_ADDR + EMAC_RX_DESC_BASE);
75 static volatile emac_desc *emac_tx_desc = (emac_desc *)(EMAC_WRAPPER_RAM_ADDR + EMAC_TX_DESC_BASE);
76 static volatile emac_desc *emac_rx_active_head = 0;
77 static volatile emac_desc *emac_rx_active_tail = 0;
78 static int emac_rx_queue_active = 0;
80 /* Receive packet buffers */
81 static unsigned char emac_rx_buffers[EMAC_MAX_RX_BUFFERS * (EMAC_MAX_ETHERNET_PKT_SIZE + EMAC_PKT_ALIGN)];
83 /* PHY address for a discovered PHY (0xff - not found) */
84 static volatile u_int8_t active_phy_addr = 0xff;
88 static int davinci_eth_set_mac_addr(struct eth_device *dev)
94 * Set MAC Addresses & Init multicast Hash to 0 (disable any multicast
96 * Using channel 0 only - other channels are disabled
98 writel(0, &adap_emac->MACINDEX);
99 mac_hi = (dev->enetaddr[3] << 24) |
100 (dev->enetaddr[2] << 16) |
101 (dev->enetaddr[1] << 8) |
103 mac_lo = (dev->enetaddr[5] << 8) |
106 writel(mac_hi, &adap_emac->MACADDRHI);
107 #if defined(DAVINCI_EMAC_VERSION2)
108 writel(mac_lo | EMAC_MAC_ADDR_IS_VALID | EMAC_MAC_ADDR_MATCH,
109 &adap_emac->MACADDRLO);
111 writel(mac_lo, &adap_emac->MACADDRLO);
114 writel(0, &adap_emac->MACHASH1);
115 writel(0, &adap_emac->MACHASH2);
117 /* Set source MAC address - REQUIRED */
118 writel(mac_hi, &adap_emac->MACSRCADDRHI);
119 writel(mac_lo, &adap_emac->MACSRCADDRLO);
125 static void davinci_eth_mdio_enable(void)
129 clkdiv = (EMAC_MDIO_BUS_FREQ / EMAC_MDIO_CLOCK_FREQ) - 1;
131 writel((clkdiv & 0xff) |
132 MDIO_CONTROL_ENABLE |
134 MDIO_CONTROL_FAULT_ENABLE,
135 &adap_mdio->CONTROL);
137 while (readl(&adap_mdio->CONTROL) & MDIO_CONTROL_IDLE)
142 * Tries to find an active connected PHY. Returns 1 if address if found.
143 * If no active PHY (or more than one PHY) found returns 0.
144 * Sets active_phy_addr variable.
146 static int davinci_eth_phy_detect(void)
148 u_int32_t phy_act_state;
151 active_phy_addr = 0xff;
153 phy_act_state = readl(&adap_mdio->ALIVE) & EMAC_MDIO_PHY_MASK;
154 if (phy_act_state == 0)
155 return(0); /* No active PHYs */
157 debug_emac("davinci_eth_phy_detect(), ALIVE = 0x%08x\n", phy_act_state);
159 for (i = 0; i < 32; i++) {
160 if (phy_act_state & (1 << i)) {
161 if (phy_act_state & ~(1 << i))
162 return(0); /* More than one PHY */
170 return(0); /* Just to make GCC happy */
174 /* Read a PHY register via MDIO inteface. Returns 1 on success, 0 otherwise */
175 int davinci_eth_phy_read(u_int8_t phy_addr, u_int8_t reg_num, u_int16_t *data)
179 while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
182 writel(MDIO_USERACCESS0_GO |
183 MDIO_USERACCESS0_WRITE_READ |
184 ((reg_num & 0x1f) << 21) |
185 ((phy_addr & 0x1f) << 16),
186 &adap_mdio->USERACCESS0);
188 /* Wait for command to complete */
189 while ((tmp = readl(&adap_mdio->USERACCESS0)) & MDIO_USERACCESS0_GO)
192 if (tmp & MDIO_USERACCESS0_ACK) {
193 *data = tmp & 0xffff;
201 /* Write to a PHY register via MDIO inteface. Blocks until operation is complete. */
202 int davinci_eth_phy_write(u_int8_t phy_addr, u_int8_t reg_num, u_int16_t data)
205 while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
208 writel(MDIO_USERACCESS0_GO |
209 MDIO_USERACCESS0_WRITE_WRITE |
210 ((reg_num & 0x1f) << 21) |
211 ((phy_addr & 0x1f) << 16) |
213 &adap_mdio->USERACCESS0);
215 /* Wait for command to complete */
216 while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
222 /* PHY functions for a generic PHY */
223 static int gen_init_phy(int phy_addr)
227 if (gen_get_link_speed(phy_addr)) {
228 /* Try another time */
229 ret = gen_get_link_speed(phy_addr);
235 static int gen_is_phy_connected(int phy_addr)
239 return(davinci_eth_phy_read(phy_addr, PHY_PHYIDR1, &dummy));
242 static int gen_get_link_speed(int phy_addr)
246 if (davinci_eth_phy_read(phy_addr, MII_STATUS_REG, &tmp) &&
248 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
249 defined(CONFIG_MACH_DAVINCI_DA850_EVM)
250 davinci_eth_phy_read(phy_addr, PHY_ANLPAR, &tmp);
252 /* Speed doesn't matter, there is no setting for it in EMAC. */
253 if (tmp & (PHY_ANLPAR_TXFD | PHY_ANLPAR_10FD)) {
254 /* set EMAC for Full Duplex */
255 writel(EMAC_MACCONTROL_MIIEN_ENABLE |
256 EMAC_MACCONTROL_FULLDUPLEX_ENABLE,
257 &adap_emac->MACCONTROL);
259 /*set EMAC for Half Duplex */
260 writel(EMAC_MACCONTROL_MIIEN_ENABLE,
261 &adap_emac->MACCONTROL);
264 if (tmp & (PHY_ANLPAR_TXFD | PHY_ANLPAR_TX))
265 writel(readl(&adap_emac->MACCONTROL) |
266 EMAC_MACCONTROL_RMIISPEED_100,
267 &adap_emac->MACCONTROL);
269 writel(readl(&adap_emac->MACCONTROL) &
270 ~EMAC_MACCONTROL_RMIISPEED_100,
271 &adap_emac->MACCONTROL);
279 static int gen_auto_negotiate(int phy_addr)
283 if (!davinci_eth_phy_read(phy_addr, PHY_BMCR, &tmp))
286 /* Restart Auto_negotiation */
287 tmp |= PHY_BMCR_AUTON;
288 davinci_eth_phy_write(phy_addr, PHY_BMCR, tmp);
290 /*check AutoNegotiate complete */
292 if (!davinci_eth_phy_read(phy_addr, PHY_BMSR, &tmp))
295 if (!(tmp & PHY_BMSR_AUTN_COMP))
298 return(gen_get_link_speed(phy_addr));
300 /* End of generic PHY functions */
303 #if defined(CONFIG_MII) || defined(CONFIG_CMD_MII)
304 static int davinci_mii_phy_read(const char *devname, unsigned char addr, unsigned char reg, unsigned short *value)
306 return(davinci_eth_phy_read(addr, reg, value) ? 0 : 1);
309 static int davinci_mii_phy_write(const char *devname, unsigned char addr, unsigned char reg, unsigned short value)
311 return(davinci_eth_phy_write(addr, reg, value) ? 0 : 1);
315 static void __attribute__((unused)) davinci_eth_gigabit_enable(void)
319 if (davinci_eth_phy_read(EMAC_MDIO_PHY_NUM, 0, &data)) {
320 if (data & (1 << 6)) { /* speed selection MSB */
322 * Check if link detected is giga-bit
323 * If Gigabit mode detected, enable gigbit in MAC
325 writel(EMAC_MACCONTROL_GIGFORCE |
326 EMAC_MACCONTROL_GIGABIT_ENABLE,
327 &adap_emac->MACCONTROL);
332 /* Eth device open */
333 static int davinci_eth_open(struct eth_device *dev, bd_t *bis)
336 u_int32_t clkdiv, cnt;
337 volatile emac_desc *rx_desc;
339 debug_emac("+ emac_open\n");
341 /* Reset EMAC module and disable interrupts in wrapper */
342 writel(1, &adap_emac->SOFTRESET);
343 while (readl(&adap_emac->SOFTRESET) != 0)
345 #if defined(DAVINCI_EMAC_VERSION2)
346 writel(1, &adap_ewrap->softrst);
347 while (readl(&adap_ewrap->softrst) != 0)
350 writel(0, &adap_ewrap->EWCTL);
351 for (cnt = 0; cnt < 5; cnt++) {
352 clkdiv = readl(&adap_ewrap->EWCTL);
356 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
357 defined(CONFIG_MACH_DAVINCI_DA850_EVM)
358 adap_ewrap->c0rxen = adap_ewrap->c1rxen = adap_ewrap->c2rxen = 0;
359 adap_ewrap->c0txen = adap_ewrap->c1txen = adap_ewrap->c2txen = 0;
360 adap_ewrap->c0miscen = adap_ewrap->c1miscen = adap_ewrap->c2miscen = 0;
362 rx_desc = emac_rx_desc;
364 writel(1, &adap_emac->TXCONTROL);
365 writel(1, &adap_emac->RXCONTROL);
367 davinci_eth_set_mac_addr(dev);
369 /* Set DMA 8 TX / 8 RX Head pointers to 0 */
370 addr = &adap_emac->TX0HDP;
371 for(cnt = 0; cnt < 16; cnt++)
374 addr = &adap_emac->RX0HDP;
375 for(cnt = 0; cnt < 16; cnt++)
378 /* Clear Statistics (do this before setting MacControl register) */
379 addr = &adap_emac->RXGOODFRAMES;
380 for(cnt = 0; cnt < EMAC_NUM_STATS; cnt++)
383 /* No multicast addressing */
384 writel(0, &adap_emac->MACHASH1);
385 writel(0, &adap_emac->MACHASH2);
387 /* Create RX queue and set receive process in place */
388 emac_rx_active_head = emac_rx_desc;
389 for (cnt = 0; cnt < EMAC_MAX_RX_BUFFERS; cnt++) {
390 rx_desc->next = (u_int32_t)(rx_desc + 1);
391 rx_desc->buffer = &emac_rx_buffers[cnt * (EMAC_MAX_ETHERNET_PKT_SIZE + EMAC_PKT_ALIGN)];
392 rx_desc->buff_off_len = EMAC_MAX_ETHERNET_PKT_SIZE;
393 rx_desc->pkt_flag_len = EMAC_CPPI_OWNERSHIP_BIT;
397 /* Finalize the rx desc list */
400 emac_rx_active_tail = rx_desc;
401 emac_rx_queue_active = 1;
404 writel(EMAC_MAX_ETHERNET_PKT_SIZE, &adap_emac->RXMAXLEN);
405 writel(0, &adap_emac->RXBUFFEROFFSET);
408 * No fancy configs - Use this for promiscous debug
409 * - EMAC_RXMBPENABLE_RXCAFEN_ENABLE
411 writel(EMAC_RXMBPENABLE_RXBROADEN, &adap_emac->RXMBPENABLE);
413 /* Enable ch 0 only */
414 writel(1, &adap_emac->RXUNICASTSET);
416 /* Enable MII interface and Full duplex mode */
417 #ifdef CONFIG_SOC_DA8XX
418 writel((EMAC_MACCONTROL_MIIEN_ENABLE |
419 EMAC_MACCONTROL_FULLDUPLEX_ENABLE |
420 EMAC_MACCONTROL_RMIISPEED_100),
421 &adap_emac->MACCONTROL);
423 writel((EMAC_MACCONTROL_MIIEN_ENABLE |
424 EMAC_MACCONTROL_FULLDUPLEX_ENABLE),
425 &adap_emac->MACCONTROL);
428 /* Init MDIO & get link state */
429 clkdiv = (EMAC_MDIO_BUS_FREQ / EMAC_MDIO_CLOCK_FREQ) - 1;
430 writel((clkdiv & 0xff) | MDIO_CONTROL_ENABLE | MDIO_CONTROL_FAULT,
431 &adap_mdio->CONTROL);
433 /* We need to wait for MDIO to start */
436 if (!phy.get_link_speed(active_phy_addr))
439 emac_gigabit_enable();
441 /* Start receive process */
442 writel((u_int32_t)emac_rx_desc, &adap_emac->RX0HDP);
444 debug_emac("- emac_open\n");
449 /* EMAC Channel Teardown */
450 static void davinci_eth_ch_teardown(int ch)
455 debug_emac("+ emac_ch_teardown\n");
457 if (ch == EMAC_CH_TX) {
458 /* Init TX channel teardown */
459 writel(1, &adap_emac->TXTEARDOWN);
462 * Wait here for Tx teardown completion interrupt to
463 * occur. Note: A task delay can be called here to pend
464 * rather than occupying CPU cycles - anyway it has
465 * been found that teardown takes very few cpu cycles
466 * and does not affect functionality
472 cnt = readl(&adap_emac->TX0CP);
473 } while (cnt != 0xfffffffc);
474 writel(cnt, &adap_emac->TX0CP);
475 writel(0, &adap_emac->TX0HDP);
477 /* Init RX channel teardown */
478 writel(1, &adap_emac->RXTEARDOWN);
481 * Wait here for Rx teardown completion interrupt to
482 * occur. Note: A task delay can be called here to pend
483 * rather than occupying CPU cycles - anyway it has
484 * been found that teardown takes very few cpu cycles
485 * and does not affect functionality
491 cnt = readl(&adap_emac->RX0CP);
492 } while (cnt != 0xfffffffc);
493 writel(cnt, &adap_emac->RX0CP);
494 writel(0, &adap_emac->RX0HDP);
497 debug_emac("- emac_ch_teardown\n");
500 /* Eth device close */
501 static void davinci_eth_close(struct eth_device *dev)
503 debug_emac("+ emac_close\n");
505 davinci_eth_ch_teardown(EMAC_CH_TX); /* TX Channel teardown */
506 davinci_eth_ch_teardown(EMAC_CH_RX); /* RX Channel teardown */
508 /* Reset EMAC module and disable interrupts in wrapper */
509 writel(1, &adap_emac->SOFTRESET);
510 #if defined(DAVINCI_EMAC_VERSION2)
511 writel(1, &adap_ewrap->softrst);
513 writel(0, &adap_ewrap->EWCTL);
516 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
517 defined(CONFIG_MACH_DAVINCI_DA850_EVM)
518 adap_ewrap->c0rxen = adap_ewrap->c1rxen = adap_ewrap->c2rxen = 0;
519 adap_ewrap->c0txen = adap_ewrap->c1txen = adap_ewrap->c2txen = 0;
520 adap_ewrap->c0miscen = adap_ewrap->c1miscen = adap_ewrap->c2miscen = 0;
522 debug_emac("- emac_close\n");
525 static int tx_send_loop = 0;
528 * This function sends a single packet on the network and returns
529 * positive number (number of bytes transmitted) or negative for error
531 static int davinci_eth_send_packet (struct eth_device *dev,
532 volatile void *packet, int length)
538 /* Return error if no link */
539 if (!phy.get_link_speed (active_phy_addr)) {
540 printf ("WARN: emac_send_packet: No link\n");
544 emac_gigabit_enable();
546 /* Check packet size and if < EMAC_MIN_ETHERNET_PKT_SIZE, pad it up */
547 if (length < EMAC_MIN_ETHERNET_PKT_SIZE) {
548 length = EMAC_MIN_ETHERNET_PKT_SIZE;
551 /* Populate the TX descriptor */
552 emac_tx_desc->next = 0;
553 emac_tx_desc->buffer = (u_int8_t *) packet;
554 emac_tx_desc->buff_off_len = (length & 0xffff);
555 emac_tx_desc->pkt_flag_len = ((length & 0xffff) |
557 EMAC_CPPI_OWNERSHIP_BIT |
559 /* Send the packet */
560 writel((unsigned long)emac_tx_desc, &adap_emac->TX0HDP);
562 /* Wait for packet to complete or link down */
564 if (!phy.get_link_speed (active_phy_addr)) {
565 davinci_eth_ch_teardown (EMAC_CH_TX);
569 emac_gigabit_enable();
571 if (readl(&adap_emac->TXINTSTATRAW) & 0x01) {
582 * This function handles receipt of a packet from the network
584 static int davinci_eth_rcv_packet (struct eth_device *dev)
586 volatile emac_desc *rx_curr_desc;
587 volatile emac_desc *curr_desc;
588 volatile emac_desc *tail_desc;
589 int status, ret = -1;
591 rx_curr_desc = emac_rx_active_head;
592 status = rx_curr_desc->pkt_flag_len;
593 if ((rx_curr_desc) && ((status & EMAC_CPPI_OWNERSHIP_BIT) == 0)) {
594 if (status & EMAC_CPPI_RX_ERROR_FRAME) {
595 /* Error in packet - discard it and requeue desc */
596 printf ("WARN: emac_rcv_pkt: Error in packet\n");
598 NetReceive (rx_curr_desc->buffer,
599 (rx_curr_desc->buff_off_len & 0xffff));
600 ret = rx_curr_desc->buff_off_len & 0xffff;
603 /* Ack received packet descriptor */
604 writel((unsigned long)rx_curr_desc, &adap_emac->RX0CP);
605 curr_desc = rx_curr_desc;
606 emac_rx_active_head =
607 (volatile emac_desc *) rx_curr_desc->next;
609 if (status & EMAC_CPPI_EOQ_BIT) {
610 if (emac_rx_active_head) {
611 writel((unsigned long)emac_rx_active_head,
614 emac_rx_queue_active = 0;
615 printf ("INFO:emac_rcv_packet: RX Queue not active\n");
619 /* Recycle RX descriptor */
620 rx_curr_desc->buff_off_len = EMAC_MAX_ETHERNET_PKT_SIZE;
621 rx_curr_desc->pkt_flag_len = EMAC_CPPI_OWNERSHIP_BIT;
622 rx_curr_desc->next = 0;
624 if (emac_rx_active_head == 0) {
625 printf ("INFO: emac_rcv_pkt: active queue head = 0\n");
626 emac_rx_active_head = curr_desc;
627 emac_rx_active_tail = curr_desc;
628 if (emac_rx_queue_active != 0) {
629 writel((unsigned long)emac_rx_active_head,
631 printf ("INFO: emac_rcv_pkt: active queue head = 0, HDP fired\n");
632 emac_rx_queue_active = 1;
635 tail_desc = emac_rx_active_tail;
636 emac_rx_active_tail = curr_desc;
637 tail_desc->next = (unsigned int) curr_desc;
638 status = tail_desc->pkt_flag_len;
639 if (status & EMAC_CPPI_EOQ_BIT) {
640 writel((unsigned long)curr_desc,
642 status &= ~EMAC_CPPI_EOQ_BIT;
643 tail_desc->pkt_flag_len = status;
652 * This function initializes the emac hardware. It does NOT initialize
653 * EMAC modules power or pin multiplexors, that is done by board_init()
654 * much earlier in bootup process. Returns 1 on success, 0 otherwise.
656 int davinci_emac_initialize(void)
661 struct eth_device *dev;
663 dev = malloc(sizeof *dev);
668 memset(dev, 0, sizeof *dev);
671 dev->init = davinci_eth_open;
672 dev->halt = davinci_eth_close;
673 dev->send = davinci_eth_send_packet;
674 dev->recv = davinci_eth_rcv_packet;
675 dev->write_hwaddr = davinci_eth_set_mac_addr;
679 davinci_eth_mdio_enable();
681 for (i = 0; i < 256; i++) {
682 if (readl(&adap_mdio->ALIVE))
688 printf("No ETH PHY detected!!!\n");
692 /* Find if a PHY is connected and get it's address */
693 if (!davinci_eth_phy_detect())
696 /* Get PHY ID and initialize phy_ops for a detected PHY */
697 if (!davinci_eth_phy_read(active_phy_addr, PHY_PHYIDR1, &tmp)) {
698 active_phy_addr = 0xff;
702 phy_id = (tmp << 16) & 0xffff0000;
704 if (!davinci_eth_phy_read(active_phy_addr, PHY_PHYIDR2, &tmp)) {
705 active_phy_addr = 0xff;
709 phy_id |= tmp & 0x0000ffff;
713 sprintf(phy.name, "LXT972 @ 0x%02x", active_phy_addr);
714 phy.init = lxt972_init_phy;
715 phy.is_phy_connected = lxt972_is_phy_connected;
716 phy.get_link_speed = lxt972_get_link_speed;
717 phy.auto_negotiate = lxt972_auto_negotiate;
720 sprintf(phy.name, "DP83848 @ 0x%02x", active_phy_addr);
721 phy.init = dp83848_init_phy;
722 phy.is_phy_connected = dp83848_is_phy_connected;
723 phy.get_link_speed = dp83848_get_link_speed;
724 phy.auto_negotiate = dp83848_auto_negotiate;
727 sprintf(phy.name, "GENERIC @ 0x%02x", active_phy_addr);
728 phy.init = gen_init_phy;
729 phy.is_phy_connected = gen_is_phy_connected;
730 phy.get_link_speed = gen_get_link_speed;
731 phy.auto_negotiate = gen_auto_negotiate;
734 printf("Ethernet PHY: %s\n", phy.name);
736 miiphy_register(phy.name, davinci_mii_phy_read, davinci_mii_phy_write);