[people/ms/u-boot.git] / net / eth.c

/*
 * (C) Copyright 2001-2004
 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program 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 2 of
 * the License, or (at your option) any later version.
 *
 * This program 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 */

#include <common.h>
#include <command.h>
#include <net.h>
#include <miiphy.h>

#if defined(CONFIG_CMD_NET) && defined(CONFIG_NET_MULTI)

#ifdef CFG_GT_6426x
extern int gt6426x_eth_initialize(bd_t *bis);
#endif

extern int au1x00_enet_initialize(bd_t*);
extern int dc21x4x_initialize(bd_t*);
extern int e1000_initialize(bd_t*);
extern int eepro100_initialize(bd_t*);
extern int eth_3com_initialize(bd_t*);
extern int fec_initialize(bd_t*);
extern int inca_switch_initialize(bd_t*);
extern int mpc5xxx_fec_initialize(bd_t*);
extern int mpc512x_fec_initialize(bd_t*);
extern int mpc8220_fec_initialize(bd_t*);
extern int mv6436x_eth_initialize(bd_t *);
extern int mv6446x_eth_initialize(bd_t *);
extern int natsemi_initialize(bd_t*);
extern int ns8382x_initialize(bd_t*);
extern int pcnet_initialize(bd_t*);
extern int plb2800_eth_initialize(bd_t*);
extern int ppc_4xx_eth_initialize(bd_t *);
extern int rtl8139_initialize(bd_t*);
extern int rtl8169_initialize(bd_t*);
extern int scc_initialize(bd_t*);
extern int skge_initialize(bd_t*);
extern int tsi108_eth_initialize(bd_t*);
extern int uli526x_initialize(bd_t *);
extern int tsec_initialize(bd_t*, int, char *);
extern int npe_initialize(bd_t *);
extern int uec_initialize(int);
extern int bfin_EMAC_initialize(bd_t *);
extern int atstk1000_eth_initialize(bd_t *);
extern int greth_initialize(bd_t *);
extern int atngw100_eth_initialize(bd_t *);
extern int mcffec_initialize(bd_t*);
extern int mcdmafec_initialize(bd_t*);
extern int at91sam9_eth_initialize(bd_t *);

#ifdef CONFIG_API
extern void (*push_packet)(volatile void *, int);

static struct {
	uchar data[PKTSIZE];
	int length;
} eth_rcv_bufs[PKTBUFSRX];

static unsigned int eth_rcv_current = 0, eth_rcv_last = 0;
#endif

static struct eth_device *eth_devices, *eth_current;

struct eth_device *eth_get_dev(void)
{
	return eth_current;
}

struct eth_device *eth_get_dev_by_name(char *devname)
{
	struct eth_device *dev, *target_dev;

	if (!eth_devices)
		return NULL;

	dev = eth_devices;
	target_dev = NULL;
	do {
		if (strcmp(devname, dev->name) == 0) {
			target_dev = dev;
			break;
		}
		dev = dev->next;
	} while (dev != eth_devices);

	return target_dev;
}

int eth_get_dev_index (void)
{
	struct eth_device *dev;
	int num = 0;

	if (!eth_devices) {
		return (-1);
	}

	for (dev = eth_devices; dev; dev = dev->next) {
		if (dev == eth_current)
			break;
		++num;
	}

	if (dev) {
		return (num);
	}

	return (0);
}

int eth_register(struct eth_device* dev)
{
	struct eth_device *d;

	if (!eth_devices) {
		eth_current = eth_devices = dev;
#ifdef CONFIG_NET_MULTI
		/* update current ethernet name */
		{
			char *act = getenv("ethact");
			if (act == NULL || strcmp(act, eth_current->name) != 0)
				setenv("ethact", eth_current->name);
		}
#endif
	} else {
		for (d=eth_devices; d->next!=eth_devices; d=d->next);
		d->next = dev;
	}

	dev->state = ETH_STATE_INIT;
	dev->next  = eth_devices;

	return 0;
}

int eth_initialize(bd_t *bis)
{
	char enetvar[32];
	unsigned char env_enetaddr[6];
	int i, eth_number = 0;
	char *tmp, *end;

	eth_devices = NULL;
	eth_current = NULL;

	show_boot_progress (64);
#if defined(CONFIG_MII) || defined(CONFIG_CMD_MII)
	miiphy_init();
#endif

#if defined(CONFIG_DB64360) || defined(CONFIG_CPCI750)
	mv6436x_eth_initialize(bis);
#endif
#if defined(CONFIG_DB64460) || defined(CONFIG_P3Mx)
	mv6446x_eth_initialize(bis);
#endif
#if defined(CONFIG_4xx) && !defined(CONFIG_IOP480) && !defined(CONFIG_AP1000)
	ppc_4xx_eth_initialize(bis);
#endif
#ifdef CONFIG_INCA_IP_SWITCH
	inca_switch_initialize(bis);
#endif
#ifdef CONFIG_PLB2800_ETHER
	plb2800_eth_initialize(bis);
#endif
#ifdef SCC_ENET
	scc_initialize(bis);
#endif
#if defined(CONFIG_MPC5xxx_FEC)
	mpc5xxx_fec_initialize(bis);
#endif
#if defined(CONFIG_MPC512x_FEC)
	mpc512x_fec_initialize (bis);
#endif
#if defined(CONFIG_MPC8220_FEC)
	mpc8220_fec_initialize(bis);
#endif
#if defined(CONFIG_SK98)
	skge_initialize(bis);
#endif
#if defined(CONFIG_TSEC1)
	tsec_initialize(bis, 0, CONFIG_TSEC1_NAME);
#endif
#if defined(CONFIG_TSEC2)
	tsec_initialize(bis, 1, CONFIG_TSEC2_NAME);
#endif
#if defined(CONFIG_MPC85XX_FEC)
	tsec_initialize(bis, 2, CONFIG_MPC85XX_FEC_NAME);
#else
#    if defined(CONFIG_TSEC3)
	tsec_initialize(bis, 2, CONFIG_TSEC3_NAME);
#    endif
#    if defined(CONFIG_TSEC4)
	tsec_initialize(bis, 3, CONFIG_TSEC4_NAME);
#    endif
#endif
#if defined(CONFIG_UEC_ETH1)
	uec_initialize(0);
#endif
#if defined(CONFIG_UEC_ETH2)
	uec_initialize(1);
#endif
#if defined(CONFIG_UEC_ETH3)
	uec_initialize(2);
#endif
#if defined(CONFIG_UEC_ETH4)
	uec_initialize(3);
#endif

#if defined(FEC_ENET) || defined(CONFIG_ETHER_ON_FCC)
	fec_initialize(bis);
#endif
#if defined(CONFIG_AU1X00)
	au1x00_enet_initialize(bis);
#endif
#if defined(CONFIG_IXP4XX_NPE)
	npe_initialize(bis);
#endif
#ifdef CONFIG_E1000
	e1000_initialize(bis);
#endif
#ifdef CONFIG_EEPRO100
	eepro100_initialize(bis);
#endif
#ifdef CONFIG_TULIP
	dc21x4x_initialize(bis);
#endif
#ifdef CONFIG_3COM
	eth_3com_initialize(bis);
#endif
#ifdef CONFIG_PCNET
	pcnet_initialize(bis);
#endif
#ifdef CFG_GT_6426x
	gt6426x_eth_initialize(bis);
#endif
#ifdef CONFIG_NATSEMI
	natsemi_initialize(bis);
#endif
#ifdef CONFIG_NS8382X
	ns8382x_initialize(bis);
#endif
#if defined(CONFIG_TSI108_ETH)
	tsi108_eth_initialize(bis);
#endif
#if defined(CONFIG_ULI526X)
	uli526x_initialize(bis);
#endif
#if defined(CONFIG_RTL8139)
	rtl8139_initialize(bis);
#endif
#if defined(CONFIG_RTL8169)
	rtl8169_initialize(bis);
#endif
#if defined(CONFIG_BF537)
	bfin_EMAC_initialize(bis);
#endif
#if defined(CONFIG_ATSTK1000)
	atstk1000_eth_initialize(bis);
#endif
#if defined(CONFIG_GRETH)
	greth_initialize(bis);
#endif
#if defined(CONFIG_ATNGW100)
	atngw100_eth_initialize(bis);
#endif
#if defined(CONFIG_MCFFEC)
	mcffec_initialize(bis);
#endif
#if defined(CONFIG_FSLDMAFEC)
	mcdmafec_initialize(bis);
#endif
#if defined(CONFIG_AT91CAP9) || defined(CONFIG_AT91SAM9260) || \
    defined(CONFIG_AT91SAM9263)
	at91sam9_eth_initialize(bis);
#endif

	if (!eth_devices) {
		puts ("No ethernet found.\n");
		show_boot_progress (-64);
	} else {
		struct eth_device *dev = eth_devices;
		char *ethprime = getenv ("ethprime");

		show_boot_progress (65);
		do {
			if (eth_number)
				puts (", ");

			printf("%s", dev->name);

			if (ethprime && strcmp (dev->name, ethprime) == 0) {
				eth_current = dev;
				puts (" [PRIME]");
			}

			sprintf(enetvar, eth_number ? "eth%daddr" : "ethaddr", eth_number);
			tmp = getenv (enetvar);

			for (i=0; i<6; i++) {
				env_enetaddr[i] = tmp ? simple_strtoul(tmp, &end, 16) : 0;
				if (tmp)
					tmp = (*end) ? end+1 : end;
			}

			if (memcmp(env_enetaddr, "\0\0\0\0\0\0", 6)) {
				if (memcmp(dev->enetaddr, "\0\0\0\0\0\0", 6) &&
				    memcmp(dev->enetaddr, env_enetaddr, 6))
				{
					printf ("\nWarning: %s MAC addresses don't match:\n",
						dev->name);
					printf ("Address in SROM is         "
					       "%02X:%02X:%02X:%02X:%02X:%02X\n",
					       dev->enetaddr[0], dev->enetaddr[1],
					       dev->enetaddr[2], dev->enetaddr[3],
					       dev->enetaddr[4], dev->enetaddr[5]);
					printf ("Address in environment is  "
					       "%02X:%02X:%02X:%02X:%02X:%02X\n",
					       env_enetaddr[0], env_enetaddr[1],
					       env_enetaddr[2], env_enetaddr[3],
					       env_enetaddr[4], env_enetaddr[5]);
				}

				memcpy(dev->enetaddr, env_enetaddr, 6);
			}

			eth_number++;
			dev = dev->next;
		} while(dev != eth_devices);

#ifdef CONFIG_NET_MULTI
		/* update current ethernet name */
		if (eth_current) {
			char *act = getenv("ethact");
			if (act == NULL || strcmp(act, eth_current->name) != 0)
				setenv("ethact", eth_current->name);
		} else
			setenv("ethact", NULL);
#endif

		putc ('\n');
	}

	return eth_number;
}

void eth_set_enetaddr(int num, char *addr) {
	struct eth_device *dev;
	unsigned char enetaddr[6];
	char *end;
	int i;

	debug ("eth_set_enetaddr(num=%d, addr=%s)\n", num, addr);

	if (!eth_devices)
		return;

	for (i=0; i<6; i++) {
		enetaddr[i] = addr ? simple_strtoul(addr, &end, 16) : 0;
		if (addr)
			addr = (*end) ? end+1 : end;
	}

	dev = eth_devices;
	while(num-- > 0) {
		dev = dev->next;

		if (dev == eth_devices)
			return;
	}

	debug ( "Setting new HW address on %s\n"
		"New Address is             %02X:%02X:%02X:%02X:%02X:%02X\n",
		dev->name,
		enetaddr[0], enetaddr[1],
		enetaddr[2], enetaddr[3],
		enetaddr[4], enetaddr[5]);

	memcpy(dev->enetaddr, enetaddr, 6);
}
#ifdef CONFIG_MCAST_TFTP
/* Multicast.
 * mcast_addr: multicast ipaddr from which multicast Mac is made
 * join: 1=join, 0=leave.
 */
int eth_mcast_join( IPaddr_t mcast_ip, u8 join)
{
 u8 mcast_mac[6];
	if (!eth_current || !eth_current->mcast)
		return -1;
	mcast_mac[5] = htonl(mcast_ip) & 0xff;
	mcast_mac[4] = (htonl(mcast_ip)>>8) & 0xff;
	mcast_mac[3] = (htonl(mcast_ip)>>16) & 0x7f;
	mcast_mac[2] = 0x5e;
	mcast_mac[1] = 0x0;
	mcast_mac[0] = 0x1;
	return eth_current->mcast(eth_current, mcast_mac, join);
}

/* the 'way' for ethernet-CRC-32. Spliced in from Linux lib/crc32.c
 * and this is the ethernet-crc method needed for TSEC -- and perhaps
 * some other adapter -- hash tables
 */
#define CRCPOLY_LE 0xedb88320
u32 ether_crc (size_t len, unsigned char const *p)
{
	int i;
	u32 crc;
	crc = ~0;
	while (len--) {
		crc ^= *p++;
		for (i = 0; i < 8; i++)
			crc = (crc >> 1) ^ ((crc & 1) ? CRCPOLY_LE : 0);
	}
	/* an reverse the bits, cuz of way they arrive -- last-first */
	crc = (crc >> 16) | (crc << 16);
	crc = (crc >> 8 & 0x00ff00ff) | (crc << 8 & 0xff00ff00);
	crc = (crc >> 4 & 0x0f0f0f0f) | (crc << 4 & 0xf0f0f0f0);
	crc = (crc >> 2 & 0x33333333) | (crc << 2 & 0xcccccccc);
	crc = (crc >> 1 & 0x55555555) | (crc << 1 & 0xaaaaaaaa);
	return crc;
}

#endif


int eth_init(bd_t *bis)
{
	struct eth_device* old_current;

	if (!eth_current) {
		puts ("No ethernet found.\n");
		return -1;
	}

	old_current = eth_current;
	do {
		debug ("Trying %s\n", eth_current->name);

		if (eth_current->init(eth_current,bis) >= 0) {
			eth_current->state = ETH_STATE_ACTIVE;

			return 0;
		}
		debug  ("FAIL\n");

		eth_try_another(0);
	} while (old_current != eth_current);

	return -1;
}

void eth_halt(void)
{
	if (!eth_current)
		return;

	eth_current->halt(eth_current);

	eth_current->state = ETH_STATE_PASSIVE;
}

int eth_send(volatile void *packet, int length)
{
	if (!eth_current)
		return -1;

	return eth_current->send(eth_current, packet, length);
}

int eth_rx(void)
{
	if (!eth_current)
		return -1;

	return eth_current->recv(eth_current);
}

#ifdef CONFIG_API
static void eth_save_packet(volatile void *packet, int length)
{
	volatile char *p = packet;
	int i;

	if ((eth_rcv_last+1) % PKTBUFSRX == eth_rcv_current)
		return;

	if (PKTSIZE < length)
		return;

	for (i = 0; i < length; i++)
		eth_rcv_bufs[eth_rcv_last].data[i] = p[i];

	eth_rcv_bufs[eth_rcv_last].length = length;
	eth_rcv_last = (eth_rcv_last + 1) % PKTBUFSRX;
}

int eth_receive(volatile void *packet, int length)
{
	volatile char *p = packet;
	void *pp = push_packet;
	int i;

	if (eth_rcv_current == eth_rcv_last) {
		push_packet = eth_save_packet;
		eth_rx();
		push_packet = pp;

		if (eth_rcv_current == eth_rcv_last)
			return -1;
	}

	if (length < eth_rcv_bufs[eth_rcv_current].length)
		return -1;

	length = eth_rcv_bufs[eth_rcv_current].length;

	for (i = 0; i < length; i++)
		p[i] = eth_rcv_bufs[eth_rcv_current].data[i];

	eth_rcv_current = (eth_rcv_current + 1) % PKTBUFSRX;
	return length;
}
#endif /* CONFIG_API */

void eth_try_another(int first_restart)
{
	static struct eth_device *first_failed = NULL;
	char *ethrotate;

	/*
	 * Do not rotate between network interfaces when
	 * 'ethrotate' variable is set to 'no'.
	 */
	if (((ethrotate = getenv ("ethrotate")) != NULL) &&
	    (strcmp(ethrotate, "no") == 0))
		return;

	if (!eth_current)
		return;

	if (first_restart) {
		first_failed = eth_current;
	}

	eth_current = eth_current->next;

#ifdef CONFIG_NET_MULTI
	/* update current ethernet name */
	{
		char *act = getenv("ethact");
		if (act == NULL || strcmp(act, eth_current->name) != 0)
			setenv("ethact", eth_current->name);
	}
#endif

	if (first_failed == eth_current) {
		NetRestartWrap = 1;
	}
}

#ifdef CONFIG_NET_MULTI
void eth_set_current(void)
{
	char *act;
	struct eth_device* old_current;

	if (!eth_current)	/* XXX no current */
		return;

	act = getenv("ethact");
	if (act != NULL) {
		old_current = eth_current;
		do {
			if (strcmp(eth_current->name, act) == 0)
				return;
			eth_current = eth_current->next;
		} while (old_current != eth_current);
	}

	setenv("ethact", eth_current->name);
}
#endif

char *eth_get_name (void)
{
	return (eth_current ? eth_current->name : "unknown");
}
#elif defined(CONFIG_CMD_NET) && !defined(CONFIG_NET_MULTI)

extern int at91rm9200_miiphy_initialize(bd_t *bis);
extern int emac4xx_miiphy_initialize(bd_t *bis);
extern int mcf52x2_miiphy_initialize(bd_t *bis);
extern int ns7520_miiphy_initialize(bd_t *bis);
extern int dm644x_eth_miiphy_initialize(bd_t *bis);


int eth_initialize(bd_t *bis)
{
#if defined(CONFIG_MII) || defined(CONFIG_CMD_MII)
	miiphy_init();
#endif

#if defined(CONFIG_AT91RM9200)
	at91rm9200_miiphy_initialize(bis);
#endif
#if defined(CONFIG_4xx) && !defined(CONFIG_IOP480) \
	&& !defined(CONFIG_AP1000) && !defined(CONFIG_405)
	emac4xx_miiphy_initialize(bis);
#endif
#if defined(CONFIG_MCF52x2)
	mcf52x2_miiphy_initialize(bis);
#endif
#if defined(CONFIG_NETARM)
	ns7520_miiphy_initialize(bis);
#endif
#if defined(CONFIG_DRIVER_TI_EMAC)
	dm644x_eth_miiphy_initialize(bis);
#endif
	return 0;
}
#endif
Commit	Line	Data
c609719b	1	/*
d4ca31c4	2	* (C) Copyright 2001-2004
c609719b WD	3	* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
	4	*
	5	* See file CREDITS for list of people who contributed to this
	6	* project.
	7	*
	8	* This program is free software; you can redistribute it and/or
	9	* modify it under the terms of the GNU General Public License as
	10	* published by the Free Software Foundation; either version 2 of
	11	* the License, or (at your option) any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU General Public License
	19	* along with this program; if not, write to the Free Software
	20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	21	* MA 02111-1307 USA
	22	*/
	23
	24	#include <common.h>
	25	#include <command.h>
	26	#include <net.h>
d9785c14	27	#include <miiphy.h>
c609719b	28
643d1ab2	29	#if defined(CONFIG_CMD_NET) && defined(CONFIG_NET_MULTI)
c609719b WD	30
	31	#ifdef CFG_GT_6426x
	32	extern int gt6426x_eth_initialize(bd_t *bis);
	33	#endif
	34
3a473b2a WD	35	extern int au1x00_enet_initialize(bd_t*);
3a473b2a WD	36	extern int dc21x4x_initialize(bd_t*);
682011ff	37	extern int e1000_initialize(bd_t*);
c609719b	38	extern int eepro100_initialize(bd_t*);
c7de829c	39	extern int eth_3com_initialize(bd_t*);
c609719b	40	extern int fec_initialize(bd_t*);
6069ff26	41	extern int inca_switch_initialize(bd_t*);
945af8d7	42	extern int mpc5xxx_fec_initialize(bd_t*);
8993e54b	43	extern int mpc512x_fec_initialize(bd_t*);
983fda83	44	extern int mpc8220_fec_initialize(bd_t*);
3a473b2a WD	45	extern int mv6436x_eth_initialize(bd_t *);
	46	extern int mv6446x_eth_initialize(bd_t *);
	47	extern int natsemi_initialize(bd_t*);
	48	extern int ns8382x_initialize(bd_t*);
	49	extern int pcnet_initialize(bd_t*);
	50	extern int plb2800_eth_initialize(bd_t*);
	51	extern int ppc_4xx_eth_initialize(bd_t *);
	52	extern int rtl8139_initialize(bd_t*);
a8bd82de	53	extern int rtl8169_initialize(bd_t*);
3a473b2a	54	extern int scc_initialize(bd_t*);
7152b1d0	55	extern int skge_initialize(bd_t*);
d1927cee	56	extern int tsi108_eth_initialize(bd_t*);
1f103105	57	extern int uli526x_initialize(bd_t *);
d9b94f28	58	extern int tsec_initialize(bd_t, int, char );
ba94a1bb	59	extern int npe_initialize(bd_t *);
7737d5c6	60	extern int uec_initialize(int);
9fd437bb	61	extern int bfin_EMAC_initialize(bd_t *);
9a24f477	62	extern int atstk1000_eth_initialize(bd_t *);
c2b7da55	63	extern int greth_initialize(bd_t *);
6b443944	64	extern int atngw100_eth_initialize(bd_t *);
8e585f02	65	extern int mcffec_initialize(bd_t*);
777d1abd	66	extern int mcdmafec_initialize(bd_t*);
a8a78f2d	67	extern int at91sam9_eth_initialize(bd_t *);
c609719b	68
f85b6071 RJ	69	#ifdef CONFIG_API
	70	extern void (push_packet)(volatile void , int);
	71
	72	static struct {
	73	uchar data[PKTSIZE];
	74	int length;
	75	} eth_rcv_bufs[PKTBUFSRX];
	76
	77	static unsigned int eth_rcv_current = 0, eth_rcv_last = 0;
	78	#endif
	79
c609719b WD	80	static struct eth_device eth_devices, eth_current;
	81
	82	struct eth_device *eth_get_dev(void)
	83	{
	84	return eth_current;
	85	}
	86
63ff004c MB	87	struct eth_device eth_get_dev_by_name(char devname)
	88	{
	89	struct eth_device dev, target_dev;
	90
	91	if (!eth_devices)
	92	return NULL;
	93
	94	dev = eth_devices;
	95	target_dev = NULL;
	96	do {
	97	if (strcmp(devname, dev->name) == 0) {
	98	target_dev = dev;
	99	break;
	100	}
	101	dev = dev->next;
	102	} while (dev != eth_devices);
	103
	104	return target_dev;
	105	}
	106
c609719b WD	107	int eth_get_dev_index (void)
	108	{
	109	struct eth_device *dev;
	110	int num = 0;
	111
	112	if (!eth_devices) {
	113	return (-1);
	114	}
	115
	116	for (dev = eth_devices; dev; dev = dev->next) {
	117	if (dev == eth_current)
	118	break;
	119	++num;
	120	}
	121
	122	if (dev) {
	123	return (num);
	124	}
	125
	126	return (0);
	127	}
	128
	129	int eth_register(struct eth_device* dev)
	130	{
	131	struct eth_device *d;
	132
	133	if (!eth_devices) {
	134	eth_current = eth_devices = dev;
a3d991bd WD	135	#ifdef CONFIG_NET_MULTI
	136	/* update current ethernet name */
	137	{
	138	char *act = getenv("ethact");
	139	if (act == NULL \|\| strcmp(act, eth_current->name) != 0)
	140	setenv("ethact", eth_current->name);
	141	}
	142	#endif
c609719b WD	143	} else {
	144	for (d=eth_devices; d->next!=eth_devices; d=d->next);
	145	d->next = dev;
	146	}
	147
	148	dev->state = ETH_STATE_INIT;
	149	dev->next = eth_devices;
	150
	151	return 0;
	152	}
	153
	154	int eth_initialize(bd_t *bis)
	155	{
5ca2d095 SK	156	char enetvar[32];
5ca2d095 SK	157	unsigned char env_enetaddr[6];
c609719b WD	158	int i, eth_number = 0;
	159	char tmp, end;
	160
	161	eth_devices = NULL;
	162	eth_current = NULL;
	163
fad63407	164	show_boot_progress (64);
643d1ab2	165	#if defined(CONFIG_MII) \|\| defined(CONFIG_CMD_MII)
d9785c14 MB	166	miiphy_init();
	167	#endif
	168
1eac2a71	169	#if defined(CONFIG_DB64360) \|\| defined(CONFIG_CPCI750)
3a473b2a WD	170	mv6436x_eth_initialize(bis);
3a473b2a WD	171	#endif
1eac2a71	172	#if defined(CONFIG_DB64460) \|\| defined(CONFIG_P3Mx)
3a473b2a WD	173	mv6446x_eth_initialize(bis);
3a473b2a WD	174	#endif
7521af1c	175	#if defined(CONFIG_4xx) && !defined(CONFIG_IOP480) && !defined(CONFIG_AP1000)
8bde7f77	176	ppc_4xx_eth_initialize(bis);
a3ed3996	177	#endif
6069ff26 WD	178	#ifdef CONFIG_INCA_IP_SWITCH
	179	inca_switch_initialize(bis);
	180	#endif
3e38691e WD	181	#ifdef CONFIG_PLB2800_ETHER
	182	plb2800_eth_initialize(bis);
	183	#endif
baac607c WD	184	#ifdef SCC_ENET
	185	scc_initialize(bis);
	186	#endif
baac607c WD	187	#if defined(CONFIG_MPC5xxx_FEC)
	188	mpc5xxx_fec_initialize(bis);
	189	#endif
8993e54b RJ	190	#if defined(CONFIG_MPC512x_FEC)
	191	mpc512x_fec_initialize (bis);
	192	#endif
7680c140	193	#if defined(CONFIG_MPC8220_FEC)
983fda83 WD	194	mpc8220_fec_initialize(bis);
983fda83 WD	195	#endif
baac607c WD	196	#if defined(CONFIG_SK98)
	197	skge_initialize(bis);
	198	#endif
255a3577 KP	199	#if defined(CONFIG_TSEC1)
255a3577 KP	200	tsec_initialize(bis, 0, CONFIG_TSEC1_NAME);
0ac6f8b7	201	#endif
255a3577 KP	202	#if defined(CONFIG_TSEC2)
255a3577 KP	203	tsec_initialize(bis, 1, CONFIG_TSEC2_NAME);
0ac6f8b7 WD	204	#endif
0ac6f8b7 WD	205	#if defined(CONFIG_MPC85XX_FEC)
d9b94f28 JL	206	tsec_initialize(bis, 2, CONFIG_MPC85XX_FEC_NAME);
d9b94f28 JL	207	#else
255a3577 KP	208	# if defined(CONFIG_TSEC3)
255a3577 KP	209	tsec_initialize(bis, 2, CONFIG_TSEC3_NAME);
d9b94f28	210	# endif
255a3577 KP	211	# if defined(CONFIG_TSEC4)
255a3577 KP	212	tsec_initialize(bis, 3, CONFIG_TSEC4_NAME);
d9b94f28	213	# endif
baac607c	214	#endif
7737d5c6 DL	215	#if defined(CONFIG_UEC_ETH1)
	216	uec_initialize(0);
	217	#endif
	218	#if defined(CONFIG_UEC_ETH2)
	219	uec_initialize(1);
	220	#endif
ccf21c31 JT	221	#if defined(CONFIG_UEC_ETH3)
	222	uec_initialize(2);
	223	#endif
2465665b DS	224	#if defined(CONFIG_UEC_ETH4)
	225	uec_initialize(3);
	226	#endif
debb7354	227
d96f41e0 SR	228	#if defined(FEC_ENET) \|\| defined(CONFIG_ETHER_ON_FCC)
	229	fec_initialize(bis);
	230	#endif
baac607c WD	231	#if defined(CONFIG_AU1X00)
	232	au1x00_enet_initialize(bis);
	233	#endif
ba94a1bb WD	234	#if defined(CONFIG_IXP4XX_NPE)
	235	npe_initialize(bis);
	236	#endif
682011ff WD	237	#ifdef CONFIG_E1000
	238	e1000_initialize(bis);
	239	#endif
c609719b WD	240	#ifdef CONFIG_EEPRO100
	241	eepro100_initialize(bis);
	242	#endif
	243	#ifdef CONFIG_TULIP
	244	dc21x4x_initialize(bis);
	245	#endif
c7de829c WD	246	#ifdef CONFIG_3COM
	247	eth_3com_initialize(bis);
	248	#endif
c609719b WD	249	#ifdef CONFIG_PCNET
	250	pcnet_initialize(bis);
	251	#endif
	252	#ifdef CFG_GT_6426x
	253	gt6426x_eth_initialize(bis);
	254	#endif
	255	#ifdef CONFIG_NATSEMI
	256	natsemi_initialize(bis);
	257	#endif
	258	#ifdef CONFIG_NS8382X
	259	ns8382x_initialize(bis);
	260	#endif
d1927cee	261	#if defined(CONFIG_TSI108_ETH)
d1927cee	262	tsi108_eth_initialize(bis);
c609719b	263	#endif
1f103105 RZ	264	#if defined(CONFIG_ULI526X)
	265	uli526x_initialize(bis);
	266	#endif
63f34912 WD	267	#if defined(CONFIG_RTL8139)
	268	rtl8139_initialize(bis);
	269	#endif
a8bd82de WD	270	#if defined(CONFIG_RTL8169)
	271	rtl8169_initialize(bis);
	272	#endif
9fd437bb AL	273	#if defined(CONFIG_BF537)
	274	bfin_EMAC_initialize(bis);
	275	#endif
9a24f477 HS	276	#if defined(CONFIG_ATSTK1000)
	277	atstk1000_eth_initialize(bis);
	278	#endif
c2b7da55 DH	279	#if defined(CONFIG_GRETH)
	280	greth_initialize(bis);
	281	#endif
6b443944 HS	282	#if defined(CONFIG_ATNGW100)
	283	atngw100_eth_initialize(bis);
	284	#endif
2870e98a TL	285	#if defined(CONFIG_MCFFEC)
	286	mcffec_initialize(bis);
	287	#endif
777d1abd TL	288	#if defined(CONFIG_FSLDMAFEC)
	289	mcdmafec_initialize(bis);
	290	#endif
8e429b3e SP	291	#if defined(CONFIG_AT91CAP9) \|\| defined(CONFIG_AT91SAM9260) \|\| \
8e429b3e SP	292	defined(CONFIG_AT91SAM9263)
a8a78f2d	293	at91sam9_eth_initialize(bis);
20b197c6	294	#endif
c609719b WD	295
	296	if (!eth_devices) {
	297	puts ("No ethernet found.\n");
fad63407	298	show_boot_progress (-64);
c609719b WD	299	} else {
	300	struct eth_device *dev = eth_devices;
	301	char *ethprime = getenv ("ethprime");
	302
fad63407	303	show_boot_progress (65);
c609719b WD	304	do {
	305	if (eth_number)
	306	puts (", ");
	307
	308	printf("%s", dev->name);
	309
	310	if (ethprime && strcmp (dev->name, ethprime) == 0) {
	311	eth_current = dev;
	312	puts (" [PRIME]");
	313	}
	314
	315	sprintf(enetvar, eth_number ? "eth%daddr" : "ethaddr", eth_number);
	316	tmp = getenv (enetvar);
	317
	318	for (i=0; i<6; i++) {
	319	env_enetaddr[i] = tmp ? simple_strtoul(tmp, &end, 16) : 0;
	320	if (tmp)
	321	tmp = (*end) ? end+1 : end;
	322	}
	323
	324	if (memcmp(env_enetaddr, "\0\0\0\0\0\0", 6)) {
	325	if (memcmp(dev->enetaddr, "\0\0\0\0\0\0", 6) &&
	326	memcmp(dev->enetaddr, env_enetaddr, 6))
	327	{
baac607c WD	328	printf ("\nWarning: %s MAC addresses don't match:\n",
	329	dev->name);
	330	printf ("Address in SROM is "
c609719b WD	331	"%02X:%02X:%02X:%02X:%02X:%02X\n",
	332	dev->enetaddr[0], dev->enetaddr[1],
	333	dev->enetaddr[2], dev->enetaddr[3],
	334	dev->enetaddr[4], dev->enetaddr[5]);
baac607c	335	printf ("Address in environment is "
c609719b WD	336	"%02X:%02X:%02X:%02X:%02X:%02X\n",
	337	env_enetaddr[0], env_enetaddr[1],
	338	env_enetaddr[2], env_enetaddr[3],
	339	env_enetaddr[4], env_enetaddr[5]);
	340	}
	341
	342	memcpy(dev->enetaddr, env_enetaddr, 6);
	343	}
	344
	345	eth_number++;
	346	dev = dev->next;
	347	} while(dev != eth_devices);
	348
a3d991bd WD	349	#ifdef CONFIG_NET_MULTI
	350	/* update current ethernet name */
	351	if (eth_current) {
	352	char *act = getenv("ethact");
	353	if (act == NULL \|\| strcmp(act, eth_current->name) != 0)
	354	setenv("ethact", eth_current->name);
	355	} else
	356	setenv("ethact", NULL);
	357	#endif
	358
c609719b WD	359	putc ('\n');
	360	}
	361
	362	return eth_number;
	363	}
	364
	365	void eth_set_enetaddr(int num, char *addr) {
	366	struct eth_device *dev;
	367	unsigned char enetaddr[6];
	368	char *end;
	369	int i;
	370
d4ca31c4 WD	371	debug ("eth_set_enetaddr(num=%d, addr=%s)\n", num, addr);
d4ca31c4 WD	372
c609719b WD	373	if (!eth_devices)
	374	return;
	375
	376	for (i=0; i<6; i++) {
	377	enetaddr[i] = addr ? simple_strtoul(addr, &end, 16) : 0;
	378	if (addr)
	379	addr = (*end) ? end+1 : end;
	380	}
	381
	382	dev = eth_devices;
	383	while(num-- > 0) {
	384	dev = dev->next;
	385
	386	if (dev == eth_devices)
	387	return;
	388	}
	389
d4ca31c4 WD	390	debug ( "Setting new HW address on %s\n"
	391	"New Address is %02X:%02X:%02X:%02X:%02X:%02X\n",
	392	dev->name,
a188b585 WD	393	enetaddr[0], enetaddr[1],
	394	enetaddr[2], enetaddr[3],
	395	enetaddr[4], enetaddr[5]);
c609719b WD	396
	397	memcpy(dev->enetaddr, enetaddr, 6);
	398	}
53a5c424 DU	399	#ifdef CONFIG_MCAST_TFTP
	400	/* Multicast.
	401	* mcast_addr: multicast ipaddr from which multicast Mac is made
85eb5caf	402	* join: 1=join, 0=leave.
53a5c424 DU	403	*/
	404	int eth_mcast_join( IPaddr_t mcast_ip, u8 join)
	405	{
	406	u8 mcast_mac[6];
85eb5caf	407	if (!eth_current \|\| !eth_current->mcast)
53a5c424 DU	408	return -1;
	409	mcast_mac[5] = htonl(mcast_ip) & 0xff;
	410	mcast_mac[4] = (htonl(mcast_ip)>>8) & 0xff;
	411	mcast_mac[3] = (htonl(mcast_ip)>>16) & 0x7f;
	412	mcast_mac[2] = 0x5e;
	413	mcast_mac[1] = 0x0;
	414	mcast_mac[0] = 0x1;
	415	return eth_current->mcast(eth_current, mcast_mac, join);
	416	}
	417
85eb5caf WD	418	/* the 'way' for ethernet-CRC-32. Spliced in from Linux lib/crc32.c
85eb5caf WD	419	* and this is the ethernet-crc method needed for TSEC -- and perhaps
53a5c424 DU	420	* some other adapter -- hash tables
	421	*/
	422	#define CRCPOLY_LE 0xedb88320
	423	u32 ether_crc (size_t len, unsigned char const *p)
	424	{
	425	int i;
	426	u32 crc;
	427	crc = ~0;
	428	while (len--) {
	429	crc ^= *p++;
	430	for (i = 0; i < 8; i++)
	431	crc = (crc >> 1) ^ ((crc & 1) ? CRCPOLY_LE : 0);
	432	}
	433	/* an reverse the bits, cuz of way they arrive -- last-first */
	434	crc = (crc >> 16) \| (crc << 16);
	435	crc = (crc >> 8 & 0x00ff00ff) \| (crc << 8 & 0xff00ff00);
	436	crc = (crc >> 4 & 0x0f0f0f0f) \| (crc << 4 & 0xf0f0f0f0);
	437	crc = (crc >> 2 & 0x33333333) \| (crc << 2 & 0xcccccccc);
	438	crc = (crc >> 1 & 0x55555555) \| (crc << 1 & 0xaaaaaaaa);
	439	return crc;
	440	}
	441
	442	#endif
	443
c609719b WD	444
	445	int eth_init(bd_t *bis)
	446	{
	447	struct eth_device* old_current;
	448
6bc11388 SR	449	if (!eth_current) {
6bc11388 SR	450	puts ("No ethernet found.\n");
505be87a	451	return -1;
6bc11388	452	}
c609719b WD	453
	454	old_current = eth_current;
	455	do {
d4ca31c4	456	debug ("Trying %s\n", eth_current->name);
c609719b	457
422b1a01	458	if (eth_current->init(eth_current,bis) >= 0) {
c609719b WD	459	eth_current->state = ETH_STATE_ACTIVE;
c609719b WD	460
505be87a	461	return 0;
c609719b	462	}
d4ca31c4	463	debug ("FAIL\n");
c609719b WD	464
	465	eth_try_another(0);
	466	} while (old_current != eth_current);
	467
505be87a	468	return -1;
c609719b WD	469	}
	470
	471	void eth_halt(void)
	472	{
	473	if (!eth_current)
	474	return;
	475
	476	eth_current->halt(eth_current);
	477
	478	eth_current->state = ETH_STATE_PASSIVE;
	479	}
	480
	481	int eth_send(volatile void *packet, int length)
	482	{
	483	if (!eth_current)
	484	return -1;
	485
	486	return eth_current->send(eth_current, packet, length);
	487	}
	488
	489	int eth_rx(void)
	490	{
	491	if (!eth_current)
	492	return -1;
	493
	494	return eth_current->recv(eth_current);
	495	}
	496
f85b6071 RJ	497	#ifdef CONFIG_API
	498	static void eth_save_packet(volatile void *packet, int length)
	499	{
	500	volatile char *p = packet;
	501	int i;
	502
	503	if ((eth_rcv_last+1) % PKTBUFSRX == eth_rcv_current)
	504	return;
	505
	506	if (PKTSIZE < length)
	507	return;
	508
	509	for (i = 0; i < length; i++)
	510	eth_rcv_bufs[eth_rcv_last].data[i] = p[i];
	511
	512	eth_rcv_bufs[eth_rcv_last].length = length;
	513	eth_rcv_last = (eth_rcv_last + 1) % PKTBUFSRX;
	514	}
	515
	516	int eth_receive(volatile void *packet, int length)
	517	{
	518	volatile char *p = packet;
	519	void *pp = push_packet;
	520	int i;
	521
	522	if (eth_rcv_current == eth_rcv_last) {
	523	push_packet = eth_save_packet;
	524	eth_rx();
	525	push_packet = pp;
	526
	527	if (eth_rcv_current == eth_rcv_last)
	528	return -1;
	529	}
	530
	531	if (length < eth_rcv_bufs[eth_rcv_current].length)
	532	return -1;
	533
	534	length = eth_rcv_bufs[eth_rcv_current].length;
	535
	536	for (i = 0; i < length; i++)
	537	p[i] = eth_rcv_bufs[eth_rcv_current].data[i];
	538
	539	eth_rcv_current = (eth_rcv_current + 1) % PKTBUFSRX;
	540	return length;
	541	}
	542	#endif /* CONFIG_API */
	543
c609719b WD	544	void eth_try_another(int first_restart)
	545	{
	546	static struct eth_device *first_failed = NULL;
e1692577 MF	547	char *ethrotate;
	548
	549	/*
	550	* Do not rotate between network interfaces when
	551	* 'ethrotate' variable is set to 'no'.
	552	*/
	553	if (((ethrotate = getenv ("ethrotate")) != NULL) &&
	554	(strcmp(ethrotate, "no") == 0))
	555	return;
c609719b WD	556
	557	if (!eth_current)
	558	return;
	559
baac607c	560	if (first_restart) {
c609719b WD	561	first_failed = eth_current;
	562	}
	563
	564	eth_current = eth_current->next;
	565
a3d991bd WD	566	#ifdef CONFIG_NET_MULTI
	567	/* update current ethernet name */
	568	{
	569	char *act = getenv("ethact");
	570	if (act == NULL \|\| strcmp(act, eth_current->name) != 0)
	571	setenv("ethact", eth_current->name);
	572	}
	573	#endif
	574
baac607c	575	if (first_failed == eth_current) {
c609719b WD	576	NetRestartWrap = 1;
	577	}
	578	}
	579
a3d991bd WD	580	#ifdef CONFIG_NET_MULTI
	581	void eth_set_current(void)
	582	{
	583	char *act;
	584	struct eth_device* old_current;
	585
	586	if (!eth_current) /* XXX no current */
	587	return;
	588
	589	act = getenv("ethact");
	590	if (act != NULL) {
	591	old_current = eth_current;
	592	do {
	593	if (strcmp(eth_current->name, act) == 0)
	594	return;
	595	eth_current = eth_current->next;
	596	} while (old_current != eth_current);
	597	}
	598
	599	setenv("ethact", eth_current->name);
	600	}
	601	#endif
	602
5bb226e8 WD	603	char *eth_get_name (void)
	604	{
	605	return (eth_current ? eth_current->name : "unknown");
	606	}
643d1ab2	607	#elif defined(CONFIG_CMD_NET) && !defined(CONFIG_NET_MULTI)
63ff004c MB	608
	609	extern int at91rm9200_miiphy_initialize(bd_t *bis);
	610	extern int emac4xx_miiphy_initialize(bd_t *bis);
	611	extern int mcf52x2_miiphy_initialize(bd_t *bis);
	612	extern int ns7520_miiphy_initialize(bd_t *bis);
c74b2108 SK	613	extern int dm644x_eth_miiphy_initialize(bd_t *bis);
c74b2108 SK	614
63ff004c MB	615
	616	int eth_initialize(bd_t *bis)
	617	{
643d1ab2	618	#if defined(CONFIG_MII) \|\| defined(CONFIG_CMD_MII)
d9785c14 MB	619	miiphy_init();
	620	#endif
	621
63ff004c MB	622	#if defined(CONFIG_AT91RM9200)
	623	at91rm9200_miiphy_initialize(bis);
	624	#endif
	625	#if defined(CONFIG_4xx) && !defined(CONFIG_IOP480) \
	626	&& !defined(CONFIG_AP1000) && !defined(CONFIG_405)
	627	emac4xx_miiphy_initialize(bis);
	628	#endif
	629	#if defined(CONFIG_MCF52x2)
	630	mcf52x2_miiphy_initialize(bis);
	631	#endif
	632	#if defined(CONFIG_NETARM)
	633	ns7520_miiphy_initialize(bis);
c74b2108 SK	634	#endif
	635	#if defined(CONFIG_DRIVER_TI_EMAC)
	636	dm644x_eth_miiphy_initialize(bis);
63ff004c MB	637	#endif
	638	return 0;
	639	}
c609719b	640	#endif