[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>

#if (CONFIG_COMMANDS & CFG_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 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 ppc_440x_eth_initialize(bd_t *);
extern int rtl8139_initialize(bd_t*);
extern int scc_initialize(bd_t*);
extern int skge_initialize(bd_t*);
extern int tsec_initialize(bd_t*);

static struct eth_device *eth_devices, *eth_current;

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

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;
	} 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)
{
	unsigned char enetvar[32], env_enetaddr[6];
	int i, eth_number = 0;
	char *tmp, *end;

	eth_devices = NULL;
	eth_current = NULL;

#ifdef CONFIG_DB64360
	mv6436x_eth_initialize(bis);
#endif
#ifdef CONFIG_DB64460
	mv6446x_eth_initialize(bis);
#endif
#if defined(CONFIG_405GP) || defined(CONFIG_405EP) || ( defined(CONFIG_440) && !defined(CONFIG_NET_MULTI) )
	ppc_4xx_eth_initialize(bis);
#endif
#if defined(CONFIG_440) && defined(CONFIG_NET_MULTI)
	ppc_440x_eth_initialize(bis);
#endif
#ifdef CONFIG_INCA_IP_SWITCH
	inca_switch_initialize(bis);
#endif
#ifdef CONFIG_PLB2800_ETHER
	plb2800_eth_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
#ifdef SCC_ENET
	scc_initialize(bis);
#endif
#if defined(FEC_ENET) || defined(CONFIG_ETHER_ON_FCC)
	fec_initialize(bis);
#endif
#if defined(CONFIG_MPC5XXX_FEC)
	mpc5xxx_fec_initialize(bis);
#endif
#if defined(CONFIG_SK98)
	skge_initialize(bis);
#endif
#ifdef CONFIG_TSEC_ENET
       tsec_initialize(bis);
#endif
#if defined(CONFIG_AU1X00)
	au1x00_enet_initialize(bis);
#endif
#if defined(CONFIG_RTL8139)
	rtl8139_initialize(bis);
#endif

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

		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);

		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,
		dev->enetaddr[0], dev->enetaddr[1],
		dev->enetaddr[2], dev->enetaddr[3],
		dev->enetaddr[4], dev->enetaddr[5]);

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

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

	if (!eth_current)
		return 0;

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

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

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

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

	return 0;
}

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);
}

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

	if (!eth_current)
		return;

	if (first_restart)
	{
		first_failed = eth_current;
	}

	eth_current = eth_current->next;

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

char *eth_get_name (void)
{
	return (eth_current ? eth_current->name : "unknown");
}
#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>
	27
	28	#if (CONFIG_COMMANDS & CFG_CMD_NET) && defined(CONFIG_NET_MULTI)
	29
	30	#ifdef CFG_GT_6426x
	31	extern int gt6426x_eth_initialize(bd_t *bis);
	32	#endif
	33
3a473b2a WD	34	extern int au1x00_enet_initialize(bd_t*);
3a473b2a WD	35	extern int dc21x4x_initialize(bd_t*);
682011ff	36	extern int e1000_initialize(bd_t*);
c609719b	37	extern int eepro100_initialize(bd_t*);
c7de829c	38	extern int eth_3com_initialize(bd_t*);
c609719b	39	extern int fec_initialize(bd_t*);
6069ff26	40	extern int inca_switch_initialize(bd_t*);
945af8d7	41	extern int mpc5xxx_fec_initialize(bd_t*);
3a473b2a WD	42	extern int mv6436x_eth_initialize(bd_t *);
	43	extern int mv6446x_eth_initialize(bd_t *);
	44	extern int natsemi_initialize(bd_t*);
	45	extern int ns8382x_initialize(bd_t*);
	46	extern int pcnet_initialize(bd_t*);
	47	extern int plb2800_eth_initialize(bd_t*);
	48	extern int ppc_4xx_eth_initialize(bd_t *);
ba56f625	49	extern int ppc_440x_eth_initialize(bd_t *);
3a473b2a WD	50	extern int rtl8139_initialize(bd_t*);
3a473b2a WD	51	extern int scc_initialize(bd_t*);
7152b1d0	52	extern int skge_initialize(bd_t*);
42d1f039	53	extern int tsec_initialize(bd_t*);
c609719b WD	54
	55	static struct eth_device eth_devices, eth_current;
	56
	57	struct eth_device *eth_get_dev(void)
	58	{
	59	return eth_current;
	60	}
	61
	62	int eth_get_dev_index (void)
	63	{
	64	struct eth_device *dev;
	65	int num = 0;
	66
	67	if (!eth_devices) {
	68	return (-1);
	69	}
	70
	71	for (dev = eth_devices; dev; dev = dev->next) {
	72	if (dev == eth_current)
	73	break;
	74	++num;
	75	}
	76
	77	if (dev) {
	78	return (num);
	79	}
	80
	81	return (0);
	82	}
	83
	84	int eth_register(struct eth_device* dev)
	85	{
	86	struct eth_device *d;
	87
	88	if (!eth_devices) {
	89	eth_current = eth_devices = dev;
	90	} else {
	91	for (d=eth_devices; d->next!=eth_devices; d=d->next);
	92	d->next = dev;
	93	}
	94
	95	dev->state = ETH_STATE_INIT;
	96	dev->next = eth_devices;
	97
	98	return 0;
	99	}
	100
	101	int eth_initialize(bd_t *bis)
	102	{
	103	unsigned char enetvar[32], env_enetaddr[6];
	104	int i, eth_number = 0;
	105	char tmp, end;
	106
	107	eth_devices = NULL;
	108	eth_current = NULL;
	109
3a473b2a WD	110	#ifdef CONFIG_DB64360
	111	mv6436x_eth_initialize(bis);
	112	#endif
	113	#ifdef CONFIG_DB64460
	114	mv6446x_eth_initialize(bis);
	115	#endif
ba56f625	116	#if defined(CONFIG_405GP) \|\| defined(CONFIG_405EP) \|\| ( defined(CONFIG_440) && !defined(CONFIG_NET_MULTI) )
8bde7f77	117	ppc_4xx_eth_initialize(bis);
a3ed3996	118	#endif
ba56f625 WD	119	#if defined(CONFIG_440) && defined(CONFIG_NET_MULTI)
	120	ppc_440x_eth_initialize(bis);
	121	#endif
6069ff26 WD	122	#ifdef CONFIG_INCA_IP_SWITCH
	123	inca_switch_initialize(bis);
	124	#endif
3e38691e WD	125	#ifdef CONFIG_PLB2800_ETHER
	126	plb2800_eth_initialize(bis);
	127	#endif
682011ff WD	128	#ifdef CONFIG_E1000
	129	e1000_initialize(bis);
	130	#endif
c609719b WD	131	#ifdef CONFIG_EEPRO100
	132	eepro100_initialize(bis);
	133	#endif
	134	#ifdef CONFIG_TULIP
	135	dc21x4x_initialize(bis);
	136	#endif
c7de829c WD	137	#ifdef CONFIG_3COM
	138	eth_3com_initialize(bis);
	139	#endif
c609719b WD	140	#ifdef CONFIG_PCNET
	141	pcnet_initialize(bis);
	142	#endif
	143	#ifdef CFG_GT_6426x
	144	gt6426x_eth_initialize(bis);
	145	#endif
	146	#ifdef CONFIG_NATSEMI
	147	natsemi_initialize(bis);
	148	#endif
	149	#ifdef CONFIG_NS8382X
	150	ns8382x_initialize(bis);
	151	#endif
	152	#ifdef SCC_ENET
	153	scc_initialize(bis);
	154	#endif
aacf9a49	155	#if defined(FEC_ENET) \|\| defined(CONFIG_ETHER_ON_FCC)
c609719b WD	156	fec_initialize(bis);
c609719b WD	157	#endif
945af8d7 WD	158	#if defined(CONFIG_MPC5XXX_FEC)
	159	mpc5xxx_fec_initialize(bis);
	160	#endif
7152b1d0 WD	161	#if defined(CONFIG_SK98)
	162	skge_initialize(bis);
	163	#endif
42d1f039 WD	164	#ifdef CONFIG_TSEC_ENET
	165	tsec_initialize(bis);
	166	#endif
5da627a4 WD	167	#if defined(CONFIG_AU1X00)
	168	au1x00_enet_initialize(bis);
	169	#endif
63f34912 WD	170	#if defined(CONFIG_RTL8139)
	171	rtl8139_initialize(bis);
	172	#endif
c609719b WD	173
	174	if (!eth_devices) {
	175	puts ("No ethernet found.\n");
	176	} else {
	177	struct eth_device *dev = eth_devices;
	178	char *ethprime = getenv ("ethprime");
	179
	180	do {
	181	if (eth_number)
	182	puts (", ");
	183
	184	printf("%s", dev->name);
	185
	186	if (ethprime && strcmp (dev->name, ethprime) == 0) {
	187	eth_current = dev;
	188	puts (" [PRIME]");
	189	}
	190
	191	sprintf(enetvar, eth_number ? "eth%daddr" : "ethaddr", eth_number);
	192	tmp = getenv (enetvar);
	193
	194	for (i=0; i<6; i++) {
	195	env_enetaddr[i] = tmp ? simple_strtoul(tmp, &end, 16) : 0;
	196	if (tmp)
	197	tmp = (*end) ? end+1 : end;
	198	}
	199
	200	if (memcmp(env_enetaddr, "\0\0\0\0\0\0", 6)) {
	201	if (memcmp(dev->enetaddr, "\0\0\0\0\0\0", 6) &&
	202	memcmp(dev->enetaddr, env_enetaddr, 6))
	203	{
6069ff26	204	printf("\nWarning: %s MAC addresses don't match:\n", dev->name);
c609719b WD	205	printf("Address in SROM is "
	206	"%02X:%02X:%02X:%02X:%02X:%02X\n",
	207	dev->enetaddr[0], dev->enetaddr[1],
	208	dev->enetaddr[2], dev->enetaddr[3],
	209	dev->enetaddr[4], dev->enetaddr[5]);
	210	printf("Address in environment is "
	211	"%02X:%02X:%02X:%02X:%02X:%02X\n",
	212	env_enetaddr[0], env_enetaddr[1],
	213	env_enetaddr[2], env_enetaddr[3],
	214	env_enetaddr[4], env_enetaddr[5]);
	215	}
	216
	217	memcpy(dev->enetaddr, env_enetaddr, 6);
	218	}
	219
	220	eth_number++;
	221	dev = dev->next;
	222	} while(dev != eth_devices);
	223
	224	putc ('\n');
	225	}
	226
	227	return eth_number;
	228	}
	229
	230	void eth_set_enetaddr(int num, char *addr) {
	231	struct eth_device *dev;
	232	unsigned char enetaddr[6];
	233	char *end;
	234	int i;
	235
d4ca31c4 WD	236	debug ("eth_set_enetaddr(num=%d, addr=%s)\n", num, addr);
d4ca31c4 WD	237
c609719b WD	238	if (!eth_devices)
	239	return;
	240
	241	for (i=0; i<6; i++) {
	242	enetaddr[i] = addr ? simple_strtoul(addr, &end, 16) : 0;
	243	if (addr)
	244	addr = (*end) ? end+1 : end;
	245	}
	246
	247	dev = eth_devices;
	248	while(num-- > 0) {
	249	dev = dev->next;
	250
	251	if (dev == eth_devices)
	252	return;
	253	}
	254
d4ca31c4 WD	255	debug ( "Setting new HW address on %s\n"
	256	"New Address is %02X:%02X:%02X:%02X:%02X:%02X\n",
	257	dev->name,
	258	dev->enetaddr[0], dev->enetaddr[1],
	259	dev->enetaddr[2], dev->enetaddr[3],
	260	dev->enetaddr[4], dev->enetaddr[5]);
c609719b WD	261
	262	memcpy(dev->enetaddr, enetaddr, 6);
	263	}
	264
	265	int eth_init(bd_t *bis)
	266	{
	267	struct eth_device* old_current;
	268
	269	if (!eth_current)
	270	return 0;
	271
	272	old_current = eth_current;
	273	do {
d4ca31c4	274	debug ("Trying %s\n", eth_current->name);
c609719b WD	275
	276	if (eth_current->init(eth_current, bis)) {
	277	eth_current->state = ETH_STATE_ACTIVE;
	278
c609719b WD	279	return 1;
c609719b WD	280	}
d4ca31c4	281	debug ("FAIL\n");
c609719b WD	282
	283	eth_try_another(0);
	284	} while (old_current != eth_current);
	285
	286	return 0;
	287	}
	288
	289	void eth_halt(void)
	290	{
	291	if (!eth_current)
	292	return;
	293
	294	eth_current->halt(eth_current);
	295
	296	eth_current->state = ETH_STATE_PASSIVE;
	297	}
	298
	299	int eth_send(volatile void *packet, int length)
	300	{
	301	if (!eth_current)
	302	return -1;
	303
	304	return eth_current->send(eth_current, packet, length);
	305	}
	306
	307	int eth_rx(void)
	308	{
	309	if (!eth_current)
	310	return -1;
	311
	312	return eth_current->recv(eth_current);
	313	}
	314
	315	void eth_try_another(int first_restart)
	316	{
	317	static struct eth_device *first_failed = NULL;
	318
	319	if (!eth_current)
	320	return;
	321
	322	if (first_restart)
	323	{
	324	first_failed = eth_current;
	325	}
	326
	327	eth_current = eth_current->next;
	328
	329	if (first_failed == eth_current)
	330	{
	331	NetRestartWrap = 1;
	332	}
	333	}
	334
5bb226e8 WD	335	char *eth_get_name (void)
	336	{
	337	return (eth_current ? eth_current->name : "unknown");
	338	}
c609719b	339	#endif