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

/*
 * (C) Copyright 2001, 2002
 * 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 e1000_initialize(bd_t*);
extern int eepro100_initialize(bd_t*);
extern int natsemi_initialize(bd_t*);
extern int ns8382x_initialize(bd_t*);
extern int dc21x4x_initialize(bd_t*);
extern int eth_3com_initialize(bd_t*);
extern int pcnet_initialize(bd_t*);
extern int fec_initialize(bd_t*);
extern int scc_initialize(bd_t*);
extern int inca_switch_initialize(bd_t*);
extern int ppc_4xx_eth_initialize(bd_t *);
extern int plb2800_eth_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;

#if defined(CONFIG_405GP) || defined(CONFIG_440) || defined(CONFIG_405EP)
        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 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 (!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;

#ifdef DEBUG
	printf("eth_set_enetaddr(num=%d, addr=%s)\n", num, addr);
#endif
	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;
	}

#ifdef DEBUG
	printf("Setting new HW address on %s\n", dev->name);
	printf("New Address 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]);
#endif

	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 {
#ifdef DEBUG
		printf("Trying %s\n", eth_current->name);
#endif

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

			return 1;
		}

#ifdef DEBUG
		puts ("FAIL\n");
#endif

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

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