xref: /inferno-os/os/pc/ether2000.c (revision e1bd49a1e1823eab71c293efd1bd0c9b83c350c9)
174a4d8c2SCharles.Forsyth #include "u.h"
274a4d8c2SCharles.Forsyth #include "../port/lib.h"
374a4d8c2SCharles.Forsyth #include "mem.h"
474a4d8c2SCharles.Forsyth #include "dat.h"
574a4d8c2SCharles.Forsyth #include "fns.h"
674a4d8c2SCharles.Forsyth #include "io.h"
774a4d8c2SCharles.Forsyth #include "../port/error.h"
874a4d8c2SCharles.Forsyth #include "../port/netif.h"
974a4d8c2SCharles.Forsyth 
1074a4d8c2SCharles.Forsyth #include "etherif.h"
1174a4d8c2SCharles.Forsyth #include "ether8390.h"
1274a4d8c2SCharles.Forsyth 
1374a4d8c2SCharles.Forsyth /*
1474a4d8c2SCharles.Forsyth  * Driver written for the 'Notebook Computer Ethernet LAN Adapter',
1574a4d8c2SCharles.Forsyth  * a plug-in to the bus-slot on the rear of the Gateway NOMAD 425DXL
1674a4d8c2SCharles.Forsyth  * laptop. The manual says NE2000 compatible.
1774a4d8c2SCharles.Forsyth  * The interface appears to be pretty well described in the National
1874a4d8c2SCharles.Forsyth  * Semiconductor Local Area Network Databook (1992) as one of the
1974a4d8c2SCharles.Forsyth  * AT evaluation cards.
2074a4d8c2SCharles.Forsyth  *
2174a4d8c2SCharles.Forsyth  * The NE2000 is really just a DP8390[12] plus a data port
2274a4d8c2SCharles.Forsyth  * and a reset port.
2374a4d8c2SCharles.Forsyth  */
2474a4d8c2SCharles.Forsyth enum {
2574a4d8c2SCharles.Forsyth 	Data		= 0x10,		/* offset from I/O base of data port */
2674a4d8c2SCharles.Forsyth 	Reset		= 0x1F,		/* offset from I/O base of reset port */
2774a4d8c2SCharles.Forsyth };
2874a4d8c2SCharles.Forsyth 
2974a4d8c2SCharles.Forsyth typedef struct Ctlr Ctlr;
3074a4d8c2SCharles.Forsyth typedef struct Ctlr {
3174a4d8c2SCharles.Forsyth 	Pcidev*	pcidev;
3274a4d8c2SCharles.Forsyth 	Ctlr*	next;
3374a4d8c2SCharles.Forsyth 	int	active;
3474a4d8c2SCharles.Forsyth } Ctlr;
3574a4d8c2SCharles.Forsyth 
3674a4d8c2SCharles.Forsyth static Ctlr* ctlrhead;
3774a4d8c2SCharles.Forsyth static Ctlr* ctlrtail;
3874a4d8c2SCharles.Forsyth 
3974a4d8c2SCharles.Forsyth static struct {
4074a4d8c2SCharles.Forsyth 	char*	name;
4174a4d8c2SCharles.Forsyth 	int	id;
4274a4d8c2SCharles.Forsyth } ne2000pci[] = {
4374a4d8c2SCharles.Forsyth 	{ "Realtek 8029",	(0x8029<<16)|0x10EC, },
4474a4d8c2SCharles.Forsyth 	{ "Winbond 89C940",	(0x0940<<16)|0x1050, },
4574a4d8c2SCharles.Forsyth 	{ nil },
4674a4d8c2SCharles.Forsyth };
4774a4d8c2SCharles.Forsyth 
4874a4d8c2SCharles.Forsyth static Ctlr*
ne2000match(Ether * edev,int id)4974a4d8c2SCharles.Forsyth ne2000match(Ether* edev, int id)
5074a4d8c2SCharles.Forsyth {
5174a4d8c2SCharles.Forsyth 	int port;
5274a4d8c2SCharles.Forsyth 	Pcidev *p;
5374a4d8c2SCharles.Forsyth 	Ctlr *ctlr;
5474a4d8c2SCharles.Forsyth 
5574a4d8c2SCharles.Forsyth 	/*
5674a4d8c2SCharles.Forsyth 	 * Any adapter matches if no edev->port is supplied,
5774a4d8c2SCharles.Forsyth 	 * otherwise the ports must match.
5874a4d8c2SCharles.Forsyth 	 */
5974a4d8c2SCharles.Forsyth 	for(ctlr = ctlrhead; ctlr != nil; ctlr = ctlr->next){
6074a4d8c2SCharles.Forsyth 		if(ctlr->active)
6174a4d8c2SCharles.Forsyth 			continue;
6274a4d8c2SCharles.Forsyth 		p = ctlr->pcidev;
6374a4d8c2SCharles.Forsyth 		if(((p->did<<16)|p->vid) != id)
6474a4d8c2SCharles.Forsyth 			continue;
6574a4d8c2SCharles.Forsyth 		port = p->mem[0].bar & ~0x01;
6674a4d8c2SCharles.Forsyth 		if(edev->port != 0 && edev->port != port)
6774a4d8c2SCharles.Forsyth 			continue;
6874a4d8c2SCharles.Forsyth 
6974a4d8c2SCharles.Forsyth 		/*
7074a4d8c2SCharles.Forsyth 		 * It suffices to fill these in,
7174a4d8c2SCharles.Forsyth 		 * the rest is gleaned from the card.
7274a4d8c2SCharles.Forsyth 		 */
7374a4d8c2SCharles.Forsyth 		edev->port = port;
7474a4d8c2SCharles.Forsyth 		edev->irq = p->intl;
7574a4d8c2SCharles.Forsyth 
7674a4d8c2SCharles.Forsyth 		ctlr->active = 1;
7774a4d8c2SCharles.Forsyth 
7874a4d8c2SCharles.Forsyth 		return ctlr;
7974a4d8c2SCharles.Forsyth 	}
8074a4d8c2SCharles.Forsyth 
8174a4d8c2SCharles.Forsyth 	return nil;
8274a4d8c2SCharles.Forsyth }
8374a4d8c2SCharles.Forsyth 
8474a4d8c2SCharles.Forsyth static void
ne2000pnp(Ether * edev)8574a4d8c2SCharles.Forsyth ne2000pnp(Ether* edev)
8674a4d8c2SCharles.Forsyth {
8774a4d8c2SCharles.Forsyth 	int i, id;
8874a4d8c2SCharles.Forsyth 	Pcidev *p;
8974a4d8c2SCharles.Forsyth 	Ctlr *ctlr;
9074a4d8c2SCharles.Forsyth 
9174a4d8c2SCharles.Forsyth 	/*
9274a4d8c2SCharles.Forsyth 	 * Make a list of all ethernet controllers
9374a4d8c2SCharles.Forsyth 	 * if not already done.
9474a4d8c2SCharles.Forsyth 	 */
9574a4d8c2SCharles.Forsyth 	if(ctlrhead == nil){
9674a4d8c2SCharles.Forsyth 		p = nil;
9774a4d8c2SCharles.Forsyth 		while(p = pcimatch(p, 0, 0)){
9874a4d8c2SCharles.Forsyth 			if(p->ccrb != 0x02 || p->ccru != 0)
9974a4d8c2SCharles.Forsyth 				continue;
10074a4d8c2SCharles.Forsyth 			ctlr = malloc(sizeof(Ctlr));
10174a4d8c2SCharles.Forsyth 			ctlr->pcidev = p;
10274a4d8c2SCharles.Forsyth 
10374a4d8c2SCharles.Forsyth 			if(ctlrhead != nil)
10474a4d8c2SCharles.Forsyth 				ctlrtail->next = ctlr;
10574a4d8c2SCharles.Forsyth 			else
10674a4d8c2SCharles.Forsyth 				ctlrhead = ctlr;
10774a4d8c2SCharles.Forsyth 			ctlrtail = ctlr;
10874a4d8c2SCharles.Forsyth 		}
10974a4d8c2SCharles.Forsyth 	}
11074a4d8c2SCharles.Forsyth 
11174a4d8c2SCharles.Forsyth 	/*
11274a4d8c2SCharles.Forsyth 	 * Is it a card with an unrecognised vid+did?
11374a4d8c2SCharles.Forsyth 	 * Normally a search is made through all the found controllers
11474a4d8c2SCharles.Forsyth 	 * for one which matches any of the known vid+did pairs.
11574a4d8c2SCharles.Forsyth 	 * If a vid+did pair is specified a search is made for that
11674a4d8c2SCharles.Forsyth 	 * specific controller only.
11774a4d8c2SCharles.Forsyth 	 */
11874a4d8c2SCharles.Forsyth 	id = 0;
11974a4d8c2SCharles.Forsyth 	for(i = 0; i < edev->nopt; i++){
12074a4d8c2SCharles.Forsyth 		if(cistrncmp(edev->opt[i], "id=", 3) == 0)
12174a4d8c2SCharles.Forsyth 			id = strtol(&edev->opt[i][3], nil, 0);
12274a4d8c2SCharles.Forsyth 	}
12374a4d8c2SCharles.Forsyth 
12474a4d8c2SCharles.Forsyth 	if(id != 0)
12574a4d8c2SCharles.Forsyth 		ne2000match(edev, id);
12674a4d8c2SCharles.Forsyth 	else for(i = 0; ne2000pci[i].name; i++){
12774a4d8c2SCharles.Forsyth 		if(ne2000match(edev, ne2000pci[i].id) != nil)
12874a4d8c2SCharles.Forsyth 			break;
12974a4d8c2SCharles.Forsyth 	}
13074a4d8c2SCharles.Forsyth }
13174a4d8c2SCharles.Forsyth 
13274a4d8c2SCharles.Forsyth static int
ne2000reset(Ether * edev)13374a4d8c2SCharles.Forsyth ne2000reset(Ether* edev)
13474a4d8c2SCharles.Forsyth {
13574a4d8c2SCharles.Forsyth 	ushort buf[16];
13674a4d8c2SCharles.Forsyth 	ulong port;
13774a4d8c2SCharles.Forsyth 	Dp8390 *dp8390;
13874a4d8c2SCharles.Forsyth 	int i;
13974a4d8c2SCharles.Forsyth 	uchar ea[Eaddrlen];
14074a4d8c2SCharles.Forsyth 
14174a4d8c2SCharles.Forsyth 	if(edev->port == 0)
14274a4d8c2SCharles.Forsyth 		ne2000pnp(edev);
14374a4d8c2SCharles.Forsyth 
14474a4d8c2SCharles.Forsyth 	/*
14574a4d8c2SCharles.Forsyth 	 * Set up the software configuration.
14674a4d8c2SCharles.Forsyth 	 * Use defaults for irq, mem and size
14774a4d8c2SCharles.Forsyth 	 * if not specified.
14874a4d8c2SCharles.Forsyth 	 * Must have a port, no more default.
14974a4d8c2SCharles.Forsyth 	 */
15074a4d8c2SCharles.Forsyth 	if(edev->port == 0)
15174a4d8c2SCharles.Forsyth 		return -1;
15274a4d8c2SCharles.Forsyth 	if(edev->irq == 0)
15374a4d8c2SCharles.Forsyth 		edev->irq = 2;
15474a4d8c2SCharles.Forsyth 	if(edev->mem == 0)
15574a4d8c2SCharles.Forsyth 		edev->mem = 0x4000;
15674a4d8c2SCharles.Forsyth 	if(edev->size == 0)
15774a4d8c2SCharles.Forsyth 		edev->size = 16*1024;
15874a4d8c2SCharles.Forsyth 	port = edev->port;
15974a4d8c2SCharles.Forsyth 
16074a4d8c2SCharles.Forsyth 	if(ioalloc(edev->port, 0x20, 0, "ne2000") < 0)
16174a4d8c2SCharles.Forsyth 		return -1;
16274a4d8c2SCharles.Forsyth 
16374a4d8c2SCharles.Forsyth 	edev->ctlr = malloc(sizeof(Dp8390));
16474a4d8c2SCharles.Forsyth 	dp8390 = edev->ctlr;
16574a4d8c2SCharles.Forsyth 	dp8390->width = 2;
16674a4d8c2SCharles.Forsyth 	dp8390->ram = 0;
16774a4d8c2SCharles.Forsyth 
16874a4d8c2SCharles.Forsyth 	dp8390->port = port;
16974a4d8c2SCharles.Forsyth 	dp8390->data = port+Data;
17074a4d8c2SCharles.Forsyth 
17174a4d8c2SCharles.Forsyth 	dp8390->tstart = HOWMANY(edev->mem, Dp8390BufSz);
17274a4d8c2SCharles.Forsyth 	dp8390->pstart = dp8390->tstart + HOWMANY(sizeof(Etherpkt), Dp8390BufSz);
17374a4d8c2SCharles.Forsyth 	dp8390->pstop = dp8390->tstart + HOWMANY(edev->size, Dp8390BufSz);
17474a4d8c2SCharles.Forsyth 
17574a4d8c2SCharles.Forsyth 	dp8390->dummyrr = 1;
17674a4d8c2SCharles.Forsyth 	for(i = 0; i < edev->nopt; i++){
17774a4d8c2SCharles.Forsyth 		if(strcmp(edev->opt[i], "nodummyrr"))
17874a4d8c2SCharles.Forsyth 			continue;
17974a4d8c2SCharles.Forsyth 		dp8390->dummyrr = 0;
18074a4d8c2SCharles.Forsyth 		break;
18174a4d8c2SCharles.Forsyth 	}
18274a4d8c2SCharles.Forsyth 
18374a4d8c2SCharles.Forsyth 	/*
18474a4d8c2SCharles.Forsyth 	 * Reset the board. This is done by doing a read
18574a4d8c2SCharles.Forsyth 	 * followed by a write to the Reset address.
18674a4d8c2SCharles.Forsyth 	 */
18774a4d8c2SCharles.Forsyth 	buf[0] = inb(port+Reset);
18874a4d8c2SCharles.Forsyth 	delay(2);
18974a4d8c2SCharles.Forsyth 	outb(port+Reset, buf[0]);
19074a4d8c2SCharles.Forsyth 	delay(2);
19174a4d8c2SCharles.Forsyth 
19274a4d8c2SCharles.Forsyth 	/*
19374a4d8c2SCharles.Forsyth 	 * Init the (possible) chip, then use the (possible)
19474a4d8c2SCharles.Forsyth 	 * chip to read the (possible) PROM for ethernet address
19574a4d8c2SCharles.Forsyth 	 * and a marker byte.
19674a4d8c2SCharles.Forsyth 	 * Could just look at the DP8390 command register after
19774a4d8c2SCharles.Forsyth 	 * initialisation has been tried, but that wouldn't be
19874a4d8c2SCharles.Forsyth 	 * enough, there are other ethernet boards which could
19974a4d8c2SCharles.Forsyth 	 * match.
200*e1bd49a1SCharles.Forsyth 	 * Parallels has buf[0x0E] == 0x00 whereas real hardware
201*e1bd49a1SCharles.Forsyth 	 * usually has 0x57.
20274a4d8c2SCharles.Forsyth 	 */
20374a4d8c2SCharles.Forsyth 	dp8390reset(edev);
20474a4d8c2SCharles.Forsyth 	memset(buf, 0, sizeof(buf));
20574a4d8c2SCharles.Forsyth 	dp8390read(dp8390, buf, 0, sizeof(buf));
206*e1bd49a1SCharles.Forsyth 	i = buf[0x0E] & 0xFF;
207*e1bd49a1SCharles.Forsyth 	if((i != 0x00 && i != 0x57) || (buf[0x0F] & 0xFF) != 0x57){
20874a4d8c2SCharles.Forsyth 		iofree(edev->port);
20974a4d8c2SCharles.Forsyth 		free(edev->ctlr);
21074a4d8c2SCharles.Forsyth 		return -1;
21174a4d8c2SCharles.Forsyth 	}
21274a4d8c2SCharles.Forsyth 
21374a4d8c2SCharles.Forsyth 	/*
21474a4d8c2SCharles.Forsyth 	 * Stupid machine. Shorts were asked for,
21574a4d8c2SCharles.Forsyth 	 * shorts were delivered, although the PROM is a byte array.
21674a4d8c2SCharles.Forsyth 	 * Set the ethernet address.
21774a4d8c2SCharles.Forsyth 	 */
21874a4d8c2SCharles.Forsyth 	memset(ea, 0, Eaddrlen);
21974a4d8c2SCharles.Forsyth 	if(memcmp(ea, edev->ea, Eaddrlen) == 0){
22074a4d8c2SCharles.Forsyth 		for(i = 0; i < sizeof(edev->ea); i++)
22174a4d8c2SCharles.Forsyth 			edev->ea[i] = buf[i];
22274a4d8c2SCharles.Forsyth 	}
22374a4d8c2SCharles.Forsyth 	dp8390setea(edev);
22474a4d8c2SCharles.Forsyth 
22574a4d8c2SCharles.Forsyth 	return 0;
22674a4d8c2SCharles.Forsyth }
22774a4d8c2SCharles.Forsyth 
22874a4d8c2SCharles.Forsyth void
ether2000link(void)22974a4d8c2SCharles.Forsyth ether2000link(void)
23074a4d8c2SCharles.Forsyth {
23174a4d8c2SCharles.Forsyth 	addethercard("NE2000", ne2000reset);
23274a4d8c2SCharles.Forsyth }
233