xref: /rk3399_rockchip-uboot/drivers/net/davinci_emac.c (revision 6f726f9584eb19e7bcef435eef8b3f8a0838e6e0)
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, PHY_PHYIDR1, &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, PHY_ANLPAR, &tmp);
251 
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);
258 		} else {
259 			/*set EMAC for Half Duplex  */
260 			writel(EMAC_MACCONTROL_MIIEN_ENABLE,
261 					&adap_emac->MACCONTROL);
262 		}
263 
264 		if (tmp & (PHY_ANLPAR_TXFD | PHY_ANLPAR_TX))
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 
283 	if (!davinci_eth_phy_read(phy_addr, PHY_BMCR, &tmp))
284 		return(0);
285 
286 	/* Restart Auto_negotiation  */
287 	tmp |= PHY_BMCR_AUTON;
288 	davinci_eth_phy_write(phy_addr, PHY_BMCR, tmp);
289 
290 	/*check AutoNegotiate complete */
291 	udelay (10000);
292 	if (!davinci_eth_phy_read(phy_addr, PHY_BMSR, &tmp))
293 		return(0);
294 
295 	if (!(tmp & PHY_BMSR_AUTN_COMP))
296 		return(0);
297 
298 	return(gen_get_link_speed(phy_addr));
299 }
300 /* End of generic PHY functions */
301 
302 
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)
305 {
306 	return(davinci_eth_phy_read(addr, reg, value) ? 0 : 1);
307 }
308 
309 static int davinci_mii_phy_write(const char *devname, unsigned char addr, unsigned char reg, unsigned short value)
310 {
311 	return(davinci_eth_phy_write(addr, reg, value) ? 0 : 1);
312 }
313 #endif
314 
315 static void  __attribute__((unused)) davinci_eth_gigabit_enable(void)
316 {
317 	u_int16_t data;
318 
319 	if (davinci_eth_phy_read(EMAC_MDIO_PHY_NUM, 0, &data)) {
320 		if (data & (1 << 6)) { /* speed selection MSB */
321 			/*
322 			 * Check if link detected is giga-bit
323 			 * If Gigabit mode detected, enable gigbit in MAC
324 			 */
325 			writel(EMAC_MACCONTROL_GIGFORCE |
326 			       EMAC_MACCONTROL_GIGABIT_ENABLE,
327 			       &adap_emac->MACCONTROL);
328 		}
329 	}
330 }
331 
332 /* Eth device open */
333 static int davinci_eth_open(struct eth_device *dev, bd_t *bis)
334 {
335 	dv_reg_p		addr;
336 	u_int32_t		clkdiv, cnt;
337 	volatile emac_desc	*rx_desc;
338 
339 	debug_emac("+ emac_open\n");
340 
341 	/* Reset EMAC module and disable interrupts in wrapper */
342 	writel(1, &adap_emac->SOFTRESET);
343 	while (readl(&adap_emac->SOFTRESET) != 0)
344 		;
345 #if defined(DAVINCI_EMAC_VERSION2)
346 	writel(1, &adap_ewrap->softrst);
347 	while (readl(&adap_ewrap->softrst) != 0)
348 		;
349 #else
350 	writel(0, &adap_ewrap->EWCTL);
351 	for (cnt = 0; cnt < 5; cnt++) {
352 		clkdiv = readl(&adap_ewrap->EWCTL);
353 	}
354 #endif
355 
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;
361 #endif
362 	rx_desc = emac_rx_desc;
363 
364 	writel(1, &adap_emac->TXCONTROL);
365 	writel(1, &adap_emac->RXCONTROL);
366 
367 	davinci_eth_set_mac_addr(dev);
368 
369 	/* Set DMA 8 TX / 8 RX Head pointers to 0 */
370 	addr = &adap_emac->TX0HDP;
371 	for(cnt = 0; cnt < 16; cnt++)
372 		writel(0, addr++);
373 
374 	addr = &adap_emac->RX0HDP;
375 	for(cnt = 0; cnt < 16; cnt++)
376 		writel(0, addr++);
377 
378 	/* Clear Statistics (do this before setting MacControl register) */
379 	addr = &adap_emac->RXGOODFRAMES;
380 	for(cnt = 0; cnt < EMAC_NUM_STATS; cnt++)
381 		writel(0, addr++);
382 
383 	/* No multicast addressing */
384 	writel(0, &adap_emac->MACHASH1);
385 	writel(0, &adap_emac->MACHASH2);
386 
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;
394 		rx_desc++;
395 	}
396 
397 	/* Finalize the rx desc list */
398 	rx_desc--;
399 	rx_desc->next = 0;
400 	emac_rx_active_tail = rx_desc;
401 	emac_rx_queue_active = 1;
402 
403 	/* Enable TX/RX */
404 	writel(EMAC_MAX_ETHERNET_PKT_SIZE, &adap_emac->RXMAXLEN);
405 	writel(0, &adap_emac->RXBUFFEROFFSET);
406 
407 	/*
408 	 * No fancy configs - Use this for promiscous debug
409 	 *   - EMAC_RXMBPENABLE_RXCAFEN_ENABLE
410 	 */
411 	writel(EMAC_RXMBPENABLE_RXBROADEN, &adap_emac->RXMBPENABLE);
412 
413 	/* Enable ch 0 only */
414 	writel(1, &adap_emac->RXUNICASTSET);
415 
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);
422 #else
423 	writel((EMAC_MACCONTROL_MIIEN_ENABLE |
424 		EMAC_MACCONTROL_FULLDUPLEX_ENABLE),
425 	       &adap_emac->MACCONTROL);
426 #endif
427 
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);
432 
433 	/* We need to wait for MDIO to start */
434 	udelay(1000);
435 
436 	if (!phy.get_link_speed(active_phy_addr))
437 		return(0);
438 
439 	emac_gigabit_enable();
440 
441 	/* Start receive process */
442 	writel((u_int32_t)emac_rx_desc, &adap_emac->RX0HDP);
443 
444 	debug_emac("- emac_open\n");
445 
446 	return(1);
447 }
448 
449 /* EMAC Channel Teardown */
450 static void davinci_eth_ch_teardown(int ch)
451 {
452 	dv_reg		dly = 0xff;
453 	dv_reg		cnt;
454 
455 	debug_emac("+ emac_ch_teardown\n");
456 
457 	if (ch == EMAC_CH_TX) {
458 		/* Init TX channel teardown */
459 		writel(1, &adap_emac->TXTEARDOWN);
460 		do {
461 			/*
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
467 			 */
468 			dly--;
469 			udelay(1);
470 			if (dly == 0)
471 				break;
472 			cnt = readl(&adap_emac->TX0CP);
473 		} while (cnt != 0xfffffffc);
474 		writel(cnt, &adap_emac->TX0CP);
475 		writel(0, &adap_emac->TX0HDP);
476 	} else {
477 		/* Init RX channel teardown */
478 		writel(1, &adap_emac->RXTEARDOWN);
479 		do {
480 			/*
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
486 			 */
487 			dly--;
488 			udelay(1);
489 			if (dly == 0)
490 				break;
491 			cnt = readl(&adap_emac->RX0CP);
492 		} while (cnt != 0xfffffffc);
493 		writel(cnt, &adap_emac->RX0CP);
494 		writel(0, &adap_emac->RX0HDP);
495 	}
496 
497 	debug_emac("- emac_ch_teardown\n");
498 }
499 
500 /* Eth device close */
501 static void davinci_eth_close(struct eth_device *dev)
502 {
503 	debug_emac("+ emac_close\n");
504 
505 	davinci_eth_ch_teardown(EMAC_CH_TX);	/* TX Channel teardown */
506 	davinci_eth_ch_teardown(EMAC_CH_RX);	/* RX Channel teardown */
507 
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);
512 #else
513 	writel(0, &adap_ewrap->EWCTL);
514 #endif
515 
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;
521 #endif
522 	debug_emac("- emac_close\n");
523 }
524 
525 static int tx_send_loop = 0;
526 
527 /*
528  * This function sends a single packet on the network and returns
529  * positive number (number of bytes transmitted) or negative for error
530  */
531 static int davinci_eth_send_packet (struct eth_device *dev,
532 					volatile void *packet, int length)
533 {
534 	int ret_status = -1;
535 
536 	tx_send_loop = 0;
537 
538 	/* Return error if no link */
539 	if (!phy.get_link_speed (active_phy_addr)) {
540 		printf ("WARN: emac_send_packet: No link\n");
541 		return (ret_status);
542 	}
543 
544 	emac_gigabit_enable();
545 
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;
549 	}
550 
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) |
556 				      EMAC_CPPI_SOP_BIT |
557 				      EMAC_CPPI_OWNERSHIP_BIT |
558 				      EMAC_CPPI_EOP_BIT);
559 	/* Send the packet */
560 	writel((unsigned long)emac_tx_desc, &adap_emac->TX0HDP);
561 
562 	/* Wait for packet to complete or link down */
563 	while (1) {
564 		if (!phy.get_link_speed (active_phy_addr)) {
565 			davinci_eth_ch_teardown (EMAC_CH_TX);
566 			return (ret_status);
567 		}
568 
569 		emac_gigabit_enable();
570 
571 		if (readl(&adap_emac->TXINTSTATRAW) & 0x01) {
572 			ret_status = length;
573 			break;
574 		}
575 		tx_send_loop++;
576 	}
577 
578 	return (ret_status);
579 }
580 
581 /*
582  * This function handles receipt of a packet from the network
583  */
584 static int davinci_eth_rcv_packet (struct eth_device *dev)
585 {
586 	volatile emac_desc *rx_curr_desc;
587 	volatile emac_desc *curr_desc;
588 	volatile emac_desc *tail_desc;
589 	int status, ret = -1;
590 
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");
597 		} else {
598 			NetReceive (rx_curr_desc->buffer,
599 				    (rx_curr_desc->buff_off_len & 0xffff));
600 			ret = rx_curr_desc->buff_off_len & 0xffff;
601 		}
602 
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;
608 
609 		if (status & EMAC_CPPI_EOQ_BIT) {
610 			if (emac_rx_active_head) {
611 				writel((unsigned long)emac_rx_active_head,
612 				       &adap_emac->RX0HDP);
613 			} else {
614 				emac_rx_queue_active = 0;
615 				printf ("INFO:emac_rcv_packet: RX Queue not active\n");
616 			}
617 		}
618 
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;
623 
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,
630 				       &adap_emac->RX0HDP);
631 				printf ("INFO: emac_rcv_pkt: active queue head = 0, HDP fired\n");
632 				emac_rx_queue_active = 1;
633 			}
634 		} else {
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,
641 				       &adap_emac->RX0HDP);
642 				status &= ~EMAC_CPPI_EOQ_BIT;
643 				tail_desc->pkt_flag_len = status;
644 			}
645 		}
646 		return (ret);
647 	}
648 	return (0);
649 }
650 
651 /*
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.
655  */
656 int davinci_emac_initialize(void)
657 {
658 	u_int32_t	phy_id;
659 	u_int16_t	tmp;
660 	int		i;
661 	struct eth_device *dev;
662 
663 	dev = malloc(sizeof *dev);
664 
665 	if (dev == NULL)
666 		return -1;
667 
668 	memset(dev, 0, sizeof *dev);
669 
670 	dev->iobase = 0;
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;
676 
677 	eth_register(dev);
678 
679 	davinci_eth_mdio_enable();
680 
681 	for (i = 0; i < 256; i++) {
682 		if (readl(&adap_mdio->ALIVE))
683 			break;
684 		udelay(10);
685 	}
686 
687 	if (i >= 256) {
688 		printf("No ETH PHY detected!!!\n");
689 		return(0);
690 	}
691 
692 	/* Find if a PHY is connected and get it's address */
693 	if (!davinci_eth_phy_detect())
694 		return(0);
695 
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;
699 		return(0);
700 	}
701 
702 	phy_id = (tmp << 16) & 0xffff0000;
703 
704 	if (!davinci_eth_phy_read(active_phy_addr, PHY_PHYIDR2, &tmp)) {
705 		active_phy_addr = 0xff;
706 		return(0);
707 	}
708 
709 	phy_id |= tmp & 0x0000ffff;
710 
711 	switch (phy_id) {
712 		case PHY_LXT972:
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;
718 			break;
719 		case PHY_DP83848:
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;
725 			break;
726 		default:
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;
732 	}
733 
734 	printf("Ethernet PHY: %s\n", phy.name);
735 
736 	miiphy_register(phy.name, davinci_mii_phy_read, davinci_mii_phy_write);
737 	return(1);
738 }
739