xref: /rk3399_rockchip-uboot/drivers/net/davinci_emac.c (revision cc4bd47f4f8d11af50ab56caa9ece29ac13fc5c3)
1 /*
2  * Ethernet driver for TI TMS320DM644x (DaVinci) chips.
3  *
4  * Copyright (C) 2007 Sergey Kubushyn <ksi@koi8.net>
5  *
6  * Parts shamelessly stolen from TI's dm644x_emac.c. Original copyright
7  * follows:
8  *
9  * ----------------------------------------------------------------------------
10  *
11  * dm644x_emac.c
12  *
13  * TI DaVinci (DM644X) EMAC peripheral driver source for DV-EVM
14  *
15  * Copyright (C) 2005 Texas Instruments.
16  *
17  * ----------------------------------------------------------------------------
18  *
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.
23  *
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.
28  *
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  * ----------------------------------------------------------------------------
33 
34  * Modifications:
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
37  *
38  */
39 #include <common.h>
40 #include <command.h>
41 #include <net.h>
42 #include <miiphy.h>
43 #include <malloc.h>
44 #include <asm/arch/emac_defs.h>
45 #include <asm/io.h>
46 
47 unsigned int	emac_dbg = 0;
48 #define debug_emac(fmt,args...)	if (emac_dbg) printf(fmt,##args)
49 
50 #ifdef DAVINCI_EMAC_GIG_ENABLE
51 #define emac_gigabit_enable()	davinci_eth_gigabit_enable()
52 #else
53 #define emac_gigabit_enable()	/* no gigabit to enable */
54 #endif
55 
56 static void davinci_eth_mdio_enable(void);
57 
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);
62 
63 void eth_mdio_enable(void)
64 {
65 	davinci_eth_mdio_enable();
66 }
67 
68 /* EMAC Addresses */
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;
72 
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;
79 
80 /* Receive packet buffers */
81 static unsigned char		emac_rx_buffers[EMAC_MAX_RX_BUFFERS * (EMAC_MAX_ETHERNET_PKT_SIZE + EMAC_PKT_ALIGN)];
82 
83 /* PHY address for a discovered PHY (0xff - not found) */
84 static volatile u_int8_t	active_phy_addr = 0xff;
85 
86 phy_t				phy;
87 
88 static int davinci_eth_set_mac_addr(struct eth_device *dev)
89 {
90 	unsigned long		mac_hi;
91 	unsigned long		mac_lo;
92 
93 	/*
94 	 * Set MAC Addresses & Init multicast Hash to 0 (disable any multicast
95 	 * receive)
96 	 *  Using channel 0 only - other channels are disabled
97 	 *  */
98 	writel(0, &adap_emac->MACINDEX);
99 	mac_hi = (dev->enetaddr[3] << 24) |
100 		 (dev->enetaddr[2] << 16) |
101 		 (dev->enetaddr[1] << 8)  |
102 		 (dev->enetaddr[0]);
103 	mac_lo = (dev->enetaddr[5] << 8) |
104 		 (dev->enetaddr[4]);
105 
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);
110 #else
111 	writel(mac_lo, &adap_emac->MACADDRLO);
112 #endif
113 
114 	writel(0, &adap_emac->MACHASH1);
115 	writel(0, &adap_emac->MACHASH2);
116 
117 	/* Set source MAC address - REQUIRED */
118 	writel(mac_hi, &adap_emac->MACSRCADDRHI);
119 	writel(mac_lo, &adap_emac->MACSRCADDRLO);
120 
121 
122 	return 0;
123 }
124 
125 static void davinci_eth_mdio_enable(void)
126 {
127 	u_int32_t	clkdiv;
128 
129 	clkdiv = (EMAC_MDIO_BUS_FREQ / EMAC_MDIO_CLOCK_FREQ) - 1;
130 
131 	writel((clkdiv & 0xff) |
132 	       MDIO_CONTROL_ENABLE |
133 	       MDIO_CONTROL_FAULT |
134 	       MDIO_CONTROL_FAULT_ENABLE,
135 	       &adap_mdio->CONTROL);
136 
137 	while (readl(&adap_mdio->CONTROL) & MDIO_CONTROL_IDLE)
138 		;
139 }
140 
141 /*
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.
145  */
146 static int davinci_eth_phy_detect(void)
147 {
148 	u_int32_t	phy_act_state;
149 	int		i;
150 
151 	active_phy_addr = 0xff;
152 
153 	phy_act_state = readl(&adap_mdio->ALIVE) & EMAC_MDIO_PHY_MASK;
154 	if (phy_act_state == 0)
155 		return(0);				/* No active PHYs */
156 
157 	debug_emac("davinci_eth_phy_detect(), ALIVE = 0x%08x\n", phy_act_state);
158 
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 */
163 			else {
164 				active_phy_addr = i;
165 				return(1);
166 			}
167 		}
168 	}
169 
170 	return(0);	/* Just to make GCC happy */
171 }
172 
173 
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)
176 {
177 	int	tmp;
178 
179 	while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
180 		;
181 
182 	writel(MDIO_USERACCESS0_GO |
183 	       MDIO_USERACCESS0_WRITE_READ |
184 	       ((reg_num & 0x1f) << 21) |
185 	       ((phy_addr & 0x1f) << 16),
186 	       &adap_mdio->USERACCESS0);
187 
188 	/* Wait for command to complete */
189 	while ((tmp = readl(&adap_mdio->USERACCESS0)) & MDIO_USERACCESS0_GO)
190 		;
191 
192 	if (tmp & MDIO_USERACCESS0_ACK) {
193 		*data = tmp & 0xffff;
194 		return(1);
195 	}
196 
197 	*data = -1;
198 	return(0);
199 }
200 
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)
203 {
204 
205 	while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
206 		;
207 
208 	writel(MDIO_USERACCESS0_GO |
209 	       MDIO_USERACCESS0_WRITE_WRITE |
210 	       ((reg_num & 0x1f) << 21) |
211 	       ((phy_addr & 0x1f) << 16) |
212 	       (data & 0xffff),
213 	       &adap_mdio->USERACCESS0);
214 
215 	/* Wait for command to complete */
216 	while (readl(&adap_mdio->USERACCESS0) & MDIO_USERACCESS0_GO)
217 		;
218 
219 	return(1);
220 }
221 
222 /* PHY functions for a generic PHY */
223 static int gen_init_phy(int phy_addr)
224 {
225 	int	ret = 1;
226 
227 	if (gen_get_link_speed(phy_addr)) {
228 		/* Try another time */
229 		ret = gen_get_link_speed(phy_addr);
230 	}
231 
232 	return(ret);
233 }
234 
235 static int gen_is_phy_connected(int phy_addr)
236 {
237 	u_int16_t	dummy;
238 
239 	return(davinci_eth_phy_read(phy_addr, MII_PHYSID1, &dummy));
240 }
241 
242 static int gen_get_link_speed(int phy_addr)
243 {
244 	u_int16_t	tmp;
245 
246 	if (davinci_eth_phy_read(phy_addr, MII_STATUS_REG, &tmp) &&
247 			(tmp & 0x04)) {
248 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
249 		defined(CONFIG_MACH_DAVINCI_DA850_EVM)
250 		davinci_eth_phy_read(phy_addr, MII_LPA, &tmp);
251 
252 		/* Speed doesn't matter, there is no setting for it in EMAC. */
253 		if (tmp & (LPA_100FULL | LPA_10FULL)) {
254 			/* set EMAC for Full Duplex  */
255 			writel(EMAC_MACCONTROL_MIIEN_ENABLE |
256 					EMAC_MACCONTROL_FULLDUPLEX_ENABLE,
257 					&adap_emac->MACCONTROL);
258 		} else {
259 			/*set EMAC for Half Duplex  */
260 			writel(EMAC_MACCONTROL_MIIEN_ENABLE,
261 					&adap_emac->MACCONTROL);
262 		}
263 
264 		if (tmp & (LPA_100FULL | LPA_100HALF))
265 			writel(readl(&adap_emac->MACCONTROL) |
266 					EMAC_MACCONTROL_RMIISPEED_100,
267 					 &adap_emac->MACCONTROL);
268 		else
269 			writel(readl(&adap_emac->MACCONTROL) &
270 					~EMAC_MACCONTROL_RMIISPEED_100,
271 					 &adap_emac->MACCONTROL);
272 #endif
273 		return(1);
274 	}
275 
276 	return(0);
277 }
278 
279 static int gen_auto_negotiate(int phy_addr)
280 {
281 	u_int16_t	tmp;
282 	u_int16_t	val;
283 	unsigned long	cntr = 0;
284 
285 	if (!davinci_eth_phy_read(phy_addr, MII_BMCR, &tmp))
286 		return 0;
287 
288 	val = tmp | BMCR_FULLDPLX | BMCR_ANENABLE |
289 						BMCR_SPEED100;
290 	davinci_eth_phy_write(phy_addr, MII_BMCR, val);
291 
292 	if (!davinci_eth_phy_read(phy_addr, MII_ADVERTISE, &val))
293 		return 0;
294 
295 	val |= (ADVERTISE_100FULL | ADVERTISE_100HALF | ADVERTISE_10FULL |
296 							ADVERTISE_10HALF);
297 	davinci_eth_phy_write(phy_addr, MII_ADVERTISE, val);
298 
299 	if (!davinci_eth_phy_read(phy_addr, MII_BMCR, &tmp))
300 		return(0);
301 
302 	/* Restart Auto_negotiation  */
303 	tmp |= BMCR_ANRESTART;
304 	davinci_eth_phy_write(phy_addr, MII_BMCR, tmp);
305 
306 	/*check AutoNegotiate complete */
307 	do {
308 		udelay(40000);
309 		if (!davinci_eth_phy_read(phy_addr, MII_BMSR, &tmp))
310 			return 0;
311 
312 		if (tmp & BMSR_ANEGCOMPLETE)
313 			break;
314 
315 		cntr++;
316 	} while (cntr < 200);
317 
318 	if (!davinci_eth_phy_read(phy_addr, MII_BMSR, &tmp))
319 		return(0);
320 
321 	if (!(tmp & BMSR_ANEGCOMPLETE))
322 		return(0);
323 
324 	return(gen_get_link_speed(phy_addr));
325 }
326 /* End of generic PHY functions */
327 
328 
329 #if defined(CONFIG_MII) || defined(CONFIG_CMD_MII)
330 static int davinci_mii_phy_read(const char *devname, unsigned char addr, unsigned char reg, unsigned short *value)
331 {
332 	return(davinci_eth_phy_read(addr, reg, value) ? 0 : 1);
333 }
334 
335 static int davinci_mii_phy_write(const char *devname, unsigned char addr, unsigned char reg, unsigned short value)
336 {
337 	return(davinci_eth_phy_write(addr, reg, value) ? 0 : 1);
338 }
339 #endif
340 
341 static void  __attribute__((unused)) davinci_eth_gigabit_enable(void)
342 {
343 	u_int16_t data;
344 
345 	if (davinci_eth_phy_read(EMAC_MDIO_PHY_NUM, 0, &data)) {
346 		if (data & (1 << 6)) { /* speed selection MSB */
347 			/*
348 			 * Check if link detected is giga-bit
349 			 * If Gigabit mode detected, enable gigbit in MAC
350 			 */
351 			writel(readl(&adap_emac->MACCONTROL) |
352 				EMAC_MACCONTROL_GIGFORCE |
353 				EMAC_MACCONTROL_GIGABIT_ENABLE,
354 				&adap_emac->MACCONTROL);
355 		}
356 	}
357 }
358 
359 /* Eth device open */
360 static int davinci_eth_open(struct eth_device *dev, bd_t *bis)
361 {
362 	dv_reg_p		addr;
363 	u_int32_t		clkdiv, cnt;
364 	volatile emac_desc	*rx_desc;
365 
366 	debug_emac("+ emac_open\n");
367 
368 	/* Reset EMAC module and disable interrupts in wrapper */
369 	writel(1, &adap_emac->SOFTRESET);
370 	while (readl(&adap_emac->SOFTRESET) != 0)
371 		;
372 #if defined(DAVINCI_EMAC_VERSION2)
373 	writel(1, &adap_ewrap->softrst);
374 	while (readl(&adap_ewrap->softrst) != 0)
375 		;
376 #else
377 	writel(0, &adap_ewrap->EWCTL);
378 	for (cnt = 0; cnt < 5; cnt++) {
379 		clkdiv = readl(&adap_ewrap->EWCTL);
380 	}
381 #endif
382 
383 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
384 	defined(CONFIG_MACH_DAVINCI_DA850_EVM)
385 	adap_ewrap->c0rxen = adap_ewrap->c1rxen = adap_ewrap->c2rxen = 0;
386 	adap_ewrap->c0txen = adap_ewrap->c1txen = adap_ewrap->c2txen = 0;
387 	adap_ewrap->c0miscen = adap_ewrap->c1miscen = adap_ewrap->c2miscen = 0;
388 #endif
389 	rx_desc = emac_rx_desc;
390 
391 	writel(1, &adap_emac->TXCONTROL);
392 	writel(1, &adap_emac->RXCONTROL);
393 
394 	davinci_eth_set_mac_addr(dev);
395 
396 	/* Set DMA 8 TX / 8 RX Head pointers to 0 */
397 	addr = &adap_emac->TX0HDP;
398 	for(cnt = 0; cnt < 16; cnt++)
399 		writel(0, addr++);
400 
401 	addr = &adap_emac->RX0HDP;
402 	for(cnt = 0; cnt < 16; cnt++)
403 		writel(0, addr++);
404 
405 	/* Clear Statistics (do this before setting MacControl register) */
406 	addr = &adap_emac->RXGOODFRAMES;
407 	for(cnt = 0; cnt < EMAC_NUM_STATS; cnt++)
408 		writel(0, addr++);
409 
410 	/* No multicast addressing */
411 	writel(0, &adap_emac->MACHASH1);
412 	writel(0, &adap_emac->MACHASH2);
413 
414 	/* Create RX queue and set receive process in place */
415 	emac_rx_active_head = emac_rx_desc;
416 	for (cnt = 0; cnt < EMAC_MAX_RX_BUFFERS; cnt++) {
417 		rx_desc->next = (u_int32_t)(rx_desc + 1);
418 		rx_desc->buffer = &emac_rx_buffers[cnt * (EMAC_MAX_ETHERNET_PKT_SIZE + EMAC_PKT_ALIGN)];
419 		rx_desc->buff_off_len = EMAC_MAX_ETHERNET_PKT_SIZE;
420 		rx_desc->pkt_flag_len = EMAC_CPPI_OWNERSHIP_BIT;
421 		rx_desc++;
422 	}
423 
424 	/* Finalize the rx desc list */
425 	rx_desc--;
426 	rx_desc->next = 0;
427 	emac_rx_active_tail = rx_desc;
428 	emac_rx_queue_active = 1;
429 
430 	/* Enable TX/RX */
431 	writel(EMAC_MAX_ETHERNET_PKT_SIZE, &adap_emac->RXMAXLEN);
432 	writel(0, &adap_emac->RXBUFFEROFFSET);
433 
434 	/*
435 	 * No fancy configs - Use this for promiscous debug
436 	 *   - EMAC_RXMBPENABLE_RXCAFEN_ENABLE
437 	 */
438 	writel(EMAC_RXMBPENABLE_RXBROADEN, &adap_emac->RXMBPENABLE);
439 
440 	/* Enable ch 0 only */
441 	writel(1, &adap_emac->RXUNICASTSET);
442 
443 	/* Enable MII interface and Full duplex mode */
444 #ifdef CONFIG_SOC_DA8XX
445 	writel((EMAC_MACCONTROL_MIIEN_ENABLE |
446 		EMAC_MACCONTROL_FULLDUPLEX_ENABLE |
447 		EMAC_MACCONTROL_RMIISPEED_100),
448 	       &adap_emac->MACCONTROL);
449 #else
450 	writel((EMAC_MACCONTROL_MIIEN_ENABLE |
451 		EMAC_MACCONTROL_FULLDUPLEX_ENABLE),
452 	       &adap_emac->MACCONTROL);
453 #endif
454 
455 	/* Init MDIO & get link state */
456 	clkdiv = (EMAC_MDIO_BUS_FREQ / EMAC_MDIO_CLOCK_FREQ) - 1;
457 	writel((clkdiv & 0xff) | MDIO_CONTROL_ENABLE | MDIO_CONTROL_FAULT,
458 	       &adap_mdio->CONTROL);
459 
460 	/* We need to wait for MDIO to start */
461 	udelay(1000);
462 
463 	if (!phy.get_link_speed(active_phy_addr))
464 		return(0);
465 
466 	emac_gigabit_enable();
467 
468 	/* Start receive process */
469 	writel((u_int32_t)emac_rx_desc, &adap_emac->RX0HDP);
470 
471 	debug_emac("- emac_open\n");
472 
473 	return(1);
474 }
475 
476 /* EMAC Channel Teardown */
477 static void davinci_eth_ch_teardown(int ch)
478 {
479 	dv_reg		dly = 0xff;
480 	dv_reg		cnt;
481 
482 	debug_emac("+ emac_ch_teardown\n");
483 
484 	if (ch == EMAC_CH_TX) {
485 		/* Init TX channel teardown */
486 		writel(0, &adap_emac->TXTEARDOWN);
487 		do {
488 			/*
489 			 * Wait here for Tx teardown completion interrupt to
490 			 * occur. Note: A task delay can be called here to pend
491 			 * rather than occupying CPU cycles - anyway it has
492 			 * been found that teardown takes very few cpu cycles
493 			 * and does not affect functionality
494 			 */
495 			dly--;
496 			udelay(1);
497 			if (dly == 0)
498 				break;
499 			cnt = readl(&adap_emac->TX0CP);
500 		} while (cnt != 0xfffffffc);
501 		writel(cnt, &adap_emac->TX0CP);
502 		writel(0, &adap_emac->TX0HDP);
503 	} else {
504 		/* Init RX channel teardown */
505 		writel(0, &adap_emac->RXTEARDOWN);
506 		do {
507 			/*
508 			 * Wait here for Rx teardown completion interrupt to
509 			 * occur. Note: A task delay can be called here to pend
510 			 * rather than occupying CPU cycles - anyway it has
511 			 * been found that teardown takes very few cpu cycles
512 			 * and does not affect functionality
513 			 */
514 			dly--;
515 			udelay(1);
516 			if (dly == 0)
517 				break;
518 			cnt = readl(&adap_emac->RX0CP);
519 		} while (cnt != 0xfffffffc);
520 		writel(cnt, &adap_emac->RX0CP);
521 		writel(0, &adap_emac->RX0HDP);
522 	}
523 
524 	debug_emac("- emac_ch_teardown\n");
525 }
526 
527 /* Eth device close */
528 static void davinci_eth_close(struct eth_device *dev)
529 {
530 	debug_emac("+ emac_close\n");
531 
532 	davinci_eth_ch_teardown(EMAC_CH_TX);	/* TX Channel teardown */
533 	davinci_eth_ch_teardown(EMAC_CH_RX);	/* RX Channel teardown */
534 
535 	/* Reset EMAC module and disable interrupts in wrapper */
536 	writel(1, &adap_emac->SOFTRESET);
537 #if defined(DAVINCI_EMAC_VERSION2)
538 	writel(1, &adap_ewrap->softrst);
539 #else
540 	writel(0, &adap_ewrap->EWCTL);
541 #endif
542 
543 #if defined(CONFIG_DRIVER_TI_EMAC_USE_RMII) && \
544 	defined(CONFIG_MACH_DAVINCI_DA850_EVM)
545 	adap_ewrap->c0rxen = adap_ewrap->c1rxen = adap_ewrap->c2rxen = 0;
546 	adap_ewrap->c0txen = adap_ewrap->c1txen = adap_ewrap->c2txen = 0;
547 	adap_ewrap->c0miscen = adap_ewrap->c1miscen = adap_ewrap->c2miscen = 0;
548 #endif
549 	debug_emac("- emac_close\n");
550 }
551 
552 static int tx_send_loop = 0;
553 
554 /*
555  * This function sends a single packet on the network and returns
556  * positive number (number of bytes transmitted) or negative for error
557  */
558 static int davinci_eth_send_packet (struct eth_device *dev,
559 					volatile void *packet, int length)
560 {
561 	int ret_status = -1;
562 
563 	tx_send_loop = 0;
564 
565 	/* Return error if no link */
566 	if (!phy.get_link_speed (active_phy_addr)) {
567 		printf ("WARN: emac_send_packet: No link\n");
568 		return (ret_status);
569 	}
570 
571 	emac_gigabit_enable();
572 
573 	/* Check packet size and if < EMAC_MIN_ETHERNET_PKT_SIZE, pad it up */
574 	if (length < EMAC_MIN_ETHERNET_PKT_SIZE) {
575 		length = EMAC_MIN_ETHERNET_PKT_SIZE;
576 	}
577 
578 	/* Populate the TX descriptor */
579 	emac_tx_desc->next = 0;
580 	emac_tx_desc->buffer = (u_int8_t *) packet;
581 	emac_tx_desc->buff_off_len = (length & 0xffff);
582 	emac_tx_desc->pkt_flag_len = ((length & 0xffff) |
583 				      EMAC_CPPI_SOP_BIT |
584 				      EMAC_CPPI_OWNERSHIP_BIT |
585 				      EMAC_CPPI_EOP_BIT);
586 	/* Send the packet */
587 	writel((unsigned long)emac_tx_desc, &adap_emac->TX0HDP);
588 
589 	/* Wait for packet to complete or link down */
590 	while (1) {
591 		if (!phy.get_link_speed (active_phy_addr)) {
592 			davinci_eth_ch_teardown (EMAC_CH_TX);
593 			return (ret_status);
594 		}
595 
596 		emac_gigabit_enable();
597 
598 		if (readl(&adap_emac->TXINTSTATRAW) & 0x01) {
599 			ret_status = length;
600 			break;
601 		}
602 		tx_send_loop++;
603 	}
604 
605 	return (ret_status);
606 }
607 
608 /*
609  * This function handles receipt of a packet from the network
610  */
611 static int davinci_eth_rcv_packet (struct eth_device *dev)
612 {
613 	volatile emac_desc *rx_curr_desc;
614 	volatile emac_desc *curr_desc;
615 	volatile emac_desc *tail_desc;
616 	int status, ret = -1;
617 
618 	rx_curr_desc = emac_rx_active_head;
619 	status = rx_curr_desc->pkt_flag_len;
620 	if ((rx_curr_desc) && ((status & EMAC_CPPI_OWNERSHIP_BIT) == 0)) {
621 		if (status & EMAC_CPPI_RX_ERROR_FRAME) {
622 			/* Error in packet - discard it and requeue desc */
623 			printf ("WARN: emac_rcv_pkt: Error in packet\n");
624 		} else {
625 			NetReceive (rx_curr_desc->buffer,
626 				    (rx_curr_desc->buff_off_len & 0xffff));
627 			ret = rx_curr_desc->buff_off_len & 0xffff;
628 		}
629 
630 		/* Ack received packet descriptor */
631 		writel((unsigned long)rx_curr_desc, &adap_emac->RX0CP);
632 		curr_desc = rx_curr_desc;
633 		emac_rx_active_head =
634 			(volatile emac_desc *) rx_curr_desc->next;
635 
636 		if (status & EMAC_CPPI_EOQ_BIT) {
637 			if (emac_rx_active_head) {
638 				writel((unsigned long)emac_rx_active_head,
639 				       &adap_emac->RX0HDP);
640 			} else {
641 				emac_rx_queue_active = 0;
642 				printf ("INFO:emac_rcv_packet: RX Queue not active\n");
643 			}
644 		}
645 
646 		/* Recycle RX descriptor */
647 		rx_curr_desc->buff_off_len = EMAC_MAX_ETHERNET_PKT_SIZE;
648 		rx_curr_desc->pkt_flag_len = EMAC_CPPI_OWNERSHIP_BIT;
649 		rx_curr_desc->next = 0;
650 
651 		if (emac_rx_active_head == 0) {
652 			printf ("INFO: emac_rcv_pkt: active queue head = 0\n");
653 			emac_rx_active_head = curr_desc;
654 			emac_rx_active_tail = curr_desc;
655 			if (emac_rx_queue_active != 0) {
656 				writel((unsigned long)emac_rx_active_head,
657 				       &adap_emac->RX0HDP);
658 				printf ("INFO: emac_rcv_pkt: active queue head = 0, HDP fired\n");
659 				emac_rx_queue_active = 1;
660 			}
661 		} else {
662 			tail_desc = emac_rx_active_tail;
663 			emac_rx_active_tail = curr_desc;
664 			tail_desc->next = (unsigned int) curr_desc;
665 			status = tail_desc->pkt_flag_len;
666 			if (status & EMAC_CPPI_EOQ_BIT) {
667 				writel((unsigned long)curr_desc,
668 				       &adap_emac->RX0HDP);
669 				status &= ~EMAC_CPPI_EOQ_BIT;
670 				tail_desc->pkt_flag_len = status;
671 			}
672 		}
673 		return (ret);
674 	}
675 	return (0);
676 }
677 
678 /*
679  * This function initializes the emac hardware. It does NOT initialize
680  * EMAC modules power or pin multiplexors, that is done by board_init()
681  * much earlier in bootup process. Returns 1 on success, 0 otherwise.
682  */
683 int davinci_emac_initialize(void)
684 {
685 	u_int32_t	phy_id;
686 	u_int16_t	tmp;
687 	int		i;
688 	struct eth_device *dev;
689 
690 	dev = malloc(sizeof *dev);
691 
692 	if (dev == NULL)
693 		return -1;
694 
695 	memset(dev, 0, sizeof *dev);
696 	sprintf(dev->name, "DaVinci-EMAC");
697 
698 	dev->iobase = 0;
699 	dev->init = davinci_eth_open;
700 	dev->halt = davinci_eth_close;
701 	dev->send = davinci_eth_send_packet;
702 	dev->recv = davinci_eth_rcv_packet;
703 	dev->write_hwaddr = davinci_eth_set_mac_addr;
704 
705 	eth_register(dev);
706 
707 	davinci_eth_mdio_enable();
708 
709 	/* let the EMAC detect the PHYs */
710 	udelay(5000);
711 
712 	for (i = 0; i < 256; i++) {
713 		if (readl(&adap_mdio->ALIVE))
714 			break;
715 		udelay(10);
716 	}
717 
718 	if (i >= 256) {
719 		printf("No ETH PHY detected!!!\n");
720 		return(0);
721 	}
722 
723 	/* Find if a PHY is connected and get it's address */
724 	if (!davinci_eth_phy_detect())
725 		return(0);
726 
727 	/* Get PHY ID and initialize phy_ops for a detected PHY */
728 	if (!davinci_eth_phy_read(active_phy_addr, MII_PHYSID1, &tmp)) {
729 		active_phy_addr = 0xff;
730 		return(0);
731 	}
732 
733 	phy_id = (tmp << 16) & 0xffff0000;
734 
735 	if (!davinci_eth_phy_read(active_phy_addr, MII_PHYSID2, &tmp)) {
736 		active_phy_addr = 0xff;
737 		return(0);
738 	}
739 
740 	phy_id |= tmp & 0x0000ffff;
741 
742 	switch (phy_id) {
743 	case PHY_KSZ8873:
744 		sprintf(phy.name, "KSZ8873 @ 0x%02x", active_phy_addr);
745 		phy.init = ksz8873_init_phy;
746 		phy.is_phy_connected = ksz8873_is_phy_connected;
747 		phy.get_link_speed = ksz8873_get_link_speed;
748 		phy.auto_negotiate = ksz8873_auto_negotiate;
749 		break;
750 		case PHY_LXT972:
751 			sprintf(phy.name, "LXT972 @ 0x%02x", active_phy_addr);
752 			phy.init = lxt972_init_phy;
753 			phy.is_phy_connected = lxt972_is_phy_connected;
754 			phy.get_link_speed = lxt972_get_link_speed;
755 			phy.auto_negotiate = lxt972_auto_negotiate;
756 			break;
757 		case PHY_DP83848:
758 			sprintf(phy.name, "DP83848 @ 0x%02x", active_phy_addr);
759 			phy.init = dp83848_init_phy;
760 			phy.is_phy_connected = dp83848_is_phy_connected;
761 			phy.get_link_speed = dp83848_get_link_speed;
762 			phy.auto_negotiate = dp83848_auto_negotiate;
763 			break;
764 		case PHY_ET1011C:
765 			sprintf(phy.name, "ET1011C @ 0x%02x", active_phy_addr);
766 			phy.init = gen_init_phy;
767 			phy.is_phy_connected = gen_is_phy_connected;
768 			phy.get_link_speed = et1011c_get_link_speed;
769 			phy.auto_negotiate = gen_auto_negotiate;
770 			break;
771 		default:
772 			sprintf(phy.name, "GENERIC @ 0x%02x", active_phy_addr);
773 			phy.init = gen_init_phy;
774 			phy.is_phy_connected = gen_is_phy_connected;
775 			phy.get_link_speed = gen_get_link_speed;
776 			phy.auto_negotiate = gen_auto_negotiate;
777 	}
778 
779 	debug("Ethernet PHY: %s\n", phy.name);
780 
781 	miiphy_register(phy.name, davinci_mii_phy_read, davinci_mii_phy_write);
782 	return(1);
783 }
784