1 /* e2100.c: A Cabletron E2100 series ethernet driver for linux. */
2 /*
3 	Written 1993-1994 by Donald Becker.
4 
5 	Copyright 1994 by Donald Becker.
6 	Copyright 1993 United States Government as represented by the
7 	Director, National Security Agency.  This software may be used and
8 	distributed according to the terms of the GNU General Public License,
9 	incorporated herein by reference.
10 
11 	This is a driver for the Cabletron E2100 series ethercards.
12 
13 	The Author may be reached as becker@scyld.com, or C/O
14 	Scyld Computing Corporation
15 	410 Severn Ave., Suite 210
16 	Annapolis MD 21403
17 
18 	The E2100 series ethercard is a fairly generic shared memory 8390
19 	implementation.  The only unusual aspect is the way the shared memory
20 	registers are set: first you do an inb() in what is normally the
21 	station address region, and the low three bits of next outb() *address*
22 	is used	as the write value for that register.  Either someone wasn't
23 	too used to dem bit en bites, or they were trying to obfuscate the
24 	programming interface.
25 
26 	There is an additional complication when setting the window on the packet
27 	buffer.  You must first do a read into the packet buffer region with the
28 	low 8 address bits the address setting the page for the start of the packet
29 	buffer window, and then do the above operation.  See mem_on() for details.
30 
31 	One bug on the chip is that even a hard reset won't disable the memory
32 	window, usually resulting in a hung machine if mem_off() isn't called.
33 	If this happens, you must power down the machine for about 30 seconds.
34 */
35 
36 static const char version[] =
37 	"e2100.c:v1.01 7/21/94 Donald Becker (becker@cesdis.gsfc.nasa.gov)\n";
38 
39 #include <linux/module.h>
40 #include <linux/kernel.h>
41 #include <linux/errno.h>
42 #include <linux/string.h>
43 #include <linux/ioport.h>
44 #include <linux/netdevice.h>
45 #include <linux/etherdevice.h>
46 #include <linux/init.h>
47 #include <linux/interrupt.h>
48 #include <linux/delay.h>
49 
50 #include <asm/io.h>
51 
52 #include "8390.h"
53 
54 #define DRV_NAME "e2100"
55 
56 static int e21_probe_list[] = {0x300, 0x280, 0x380, 0x220, 0};
57 
58 /* Offsets from the base_addr.
59    Read from the ASIC register, and the low three bits of the next outb()
60    address is used to set the corresponding register. */
61 #define E21_NIC_OFFSET  0		/* Offset to the 8390 NIC. */
62 #define E21_ASIC		0x10
63 #define E21_MEM_ENABLE	0x10
64 #define  E21_MEM_ON		0x05	/* Enable memory in 16 bit mode. */
65 #define  E21_MEM_ON_8	0x07	/* Enable memory in  8 bit mode. */
66 #define E21_MEM_BASE	0x11
67 #define E21_IRQ_LOW		0x12	/* The low three bits of the IRQ number. */
68 #define E21_IRQ_HIGH	0x14	/* The high IRQ bit and media select ...  */
69 #define E21_MEDIA		0x14	/* (alias). */
70 #define  E21_ALT_IFPORT 0x02	/* Set to use the other (BNC,AUI) port. */
71 #define  E21_BIG_MEM	0x04	/* Use a bigger (64K) buffer (we don't) */
72 #define E21_SAPROM		0x10	/* Offset to station address data. */
73 #define E21_IO_EXTENT	 0x20
74 
mem_on(short port,volatile char __iomem * mem_base,unsigned char start_page)75 static inline void mem_on(short port, volatile char __iomem *mem_base,
76 						  unsigned char start_page )
77 {
78 	/* This is a little weird: set the shared memory window by doing a
79 	   read.  The low address bits specify the starting page. */
80 	readb(mem_base+start_page);
81 	inb(port + E21_MEM_ENABLE);
82 	outb(E21_MEM_ON, port + E21_MEM_ENABLE + E21_MEM_ON);
83 }
84 
mem_off(short port)85 static inline void mem_off(short port)
86 {
87 	inb(port + E21_MEM_ENABLE);
88 	outb(0x00, port + E21_MEM_ENABLE);
89 }
90 
91 /* In other drivers I put the TX pages first, but the E2100 window circuitry
92    is designed to have a 4K Tx region last. The windowing circuitry wraps the
93    window at 0x2fff->0x0000 so that the packets at e.g. 0x2f00 in the RX ring
94    appear contiguously in the window. */
95 #define E21_RX_START_PG		0x00	/* First page of RX buffer */
96 #define E21_RX_STOP_PG		0x30	/* Last page +1 of RX ring */
97 #define E21_BIG_RX_STOP_PG	0xF0	/* Last page +1 of RX ring */
98 #define E21_TX_START_PG		E21_RX_STOP_PG	/* First page of TX buffer */
99 
100 static int e21_probe1(struct net_device *dev, int ioaddr);
101 
102 static int e21_open(struct net_device *dev);
103 static void e21_reset_8390(struct net_device *dev);
104 static void e21_block_input(struct net_device *dev, int count,
105 						   struct sk_buff *skb, int ring_offset);
106 static void e21_block_output(struct net_device *dev, int count,
107 							 const unsigned char *buf, int start_page);
108 static void e21_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
109 							int ring_page);
110 static int e21_open(struct net_device *dev);
111 static int e21_close(struct net_device *dev);
112 
113 
114 /*  Probe for the E2100 series ethercards.  These cards have an 8390 at the
115 	base address and the station address at both offset 0x10 and 0x18.  I read
116 	the station address from offset 0x18 to avoid the dataport of NE2000
117 	ethercards, and look for Ctron's unique ID (first three octets of the
118 	station address).
119  */
120 
do_e2100_probe(struct net_device * dev)121 static int  __init do_e2100_probe(struct net_device *dev)
122 {
123 	int *port;
124 	int base_addr = dev->base_addr;
125 	int irq = dev->irq;
126 
127 	if (base_addr > 0x1ff)		/* Check a single specified location. */
128 		return e21_probe1(dev, base_addr);
129 	else if (base_addr != 0)	/* Don't probe at all. */
130 		return -ENXIO;
131 
132 	for (port = e21_probe_list; *port; port++) {
133 		dev->irq = irq;
134 		if (e21_probe1(dev, *port) == 0)
135 			return 0;
136 	}
137 
138 	return -ENODEV;
139 }
140 
141 #ifndef MODULE
e2100_probe(int unit)142 struct net_device * __init e2100_probe(int unit)
143 {
144 	struct net_device *dev = alloc_ei_netdev();
145 	int err;
146 
147 	if (!dev)
148 		return ERR_PTR(-ENOMEM);
149 
150 	sprintf(dev->name, "eth%d", unit);
151 	netdev_boot_setup_check(dev);
152 
153 	err = do_e2100_probe(dev);
154 	if (err)
155 		goto out;
156 	return dev;
157 out:
158 	free_netdev(dev);
159 	return ERR_PTR(err);
160 }
161 #endif
162 
163 static const struct net_device_ops e21_netdev_ops = {
164 	.ndo_open		= e21_open,
165 	.ndo_stop		= e21_close,
166 
167 	.ndo_start_xmit		= ei_start_xmit,
168 	.ndo_tx_timeout		= ei_tx_timeout,
169 	.ndo_get_stats		= ei_get_stats,
170 	.ndo_set_rx_mode	= ei_set_multicast_list,
171 	.ndo_validate_addr	= eth_validate_addr,
172 	.ndo_set_mac_address 	= eth_mac_addr,
173 	.ndo_change_mtu		= eth_change_mtu,
174 #ifdef CONFIG_NET_POLL_CONTROLLER
175 	.ndo_poll_controller 	= ei_poll,
176 #endif
177 };
178 
e21_probe1(struct net_device * dev,int ioaddr)179 static int __init e21_probe1(struct net_device *dev, int ioaddr)
180 {
181 	int i, status, retval;
182 	unsigned char *station_addr = dev->dev_addr;
183 	static unsigned version_printed;
184 
185 	if (!request_region(ioaddr, E21_IO_EXTENT, DRV_NAME))
186 		return -EBUSY;
187 
188 	/* First check the station address for the Ctron prefix. */
189 	if (inb(ioaddr + E21_SAPROM + 0) != 0x00 ||
190 	    inb(ioaddr + E21_SAPROM + 1) != 0x00 ||
191 	    inb(ioaddr + E21_SAPROM + 2) != 0x1d) {
192 		retval = -ENODEV;
193 		goto out;
194 	}
195 
196 	/* Verify by making certain that there is a 8390 at there. */
197 	outb(E8390_NODMA + E8390_STOP, ioaddr);
198 	udelay(1);	/* we want to delay one I/O cycle - which is 2MHz */
199 	status = inb(ioaddr);
200 	if (status != 0x21 && status != 0x23) {
201 		retval = -ENODEV;
202 		goto out;
203 	}
204 
205 	/* Read the station address PROM.  */
206 	for (i = 0; i < 6; i++)
207 		station_addr[i] = inb(ioaddr + E21_SAPROM + i);
208 
209 	inb(ioaddr + E21_MEDIA); 		/* Point to media selection. */
210 	outb(0, ioaddr + E21_ASIC); 	/* and disable the secondary interface. */
211 
212 	if (ei_debug  &&  version_printed++ == 0)
213 		printk(version);
214 
215 	for (i = 0; i < 6; i++)
216 		printk(" %02X", station_addr[i]);
217 
218 	if (dev->irq < 2) {
219 		static const int irqlist[] = {15, 11, 10, 12, 5, 9, 3, 4};
220 		for (i = 0; i < ARRAY_SIZE(irqlist); i++)
221 			if (request_irq (irqlist[i], NULL, 0, "bogus", NULL) != -EBUSY) {
222 				dev->irq = irqlist[i];
223 				break;
224 			}
225 		if (i >= ARRAY_SIZE(irqlist)) {
226 			printk(" unable to get IRQ %d.\n", dev->irq);
227 			retval = -EAGAIN;
228 			goto out;
229 		}
230 	} else if (dev->irq == 2)	/* Fixup luser bogosity: IRQ2 is really IRQ9 */
231 		dev->irq = 9;
232 
233 	/* The 8390 is at the base address. */
234 	dev->base_addr = ioaddr;
235 
236 	ei_status.name = "E2100";
237 	ei_status.word16 = 1;
238 	ei_status.tx_start_page = E21_TX_START_PG;
239 	ei_status.rx_start_page = E21_RX_START_PG;
240 	ei_status.stop_page = E21_RX_STOP_PG;
241 	ei_status.saved_irq = dev->irq;
242 
243 	/* Check the media port used.  The port can be passed in on the
244 	   low mem_end bits. */
245 	if (dev->mem_end & 15)
246 		dev->if_port = dev->mem_end & 7;
247 	else {
248 		dev->if_port = 0;
249 		inb(ioaddr + E21_MEDIA); 	/* Turn automatic media detection on. */
250 		for(i = 0; i < 6; i++)
251 			if (station_addr[i] != inb(ioaddr + E21_SAPROM + 8 + i)) {
252 				dev->if_port = 1;
253 				break;
254 			}
255 	}
256 
257 	/* Never map in the E21 shared memory unless you are actively using it.
258 	   Also, the shared memory has effective only one setting -- spread all
259 	   over the 128K region! */
260 	if (dev->mem_start == 0)
261 		dev->mem_start = 0xd0000;
262 
263 	ei_status.mem = ioremap(dev->mem_start, 2*1024);
264 	if (!ei_status.mem) {
265 		printk("unable to remap memory\n");
266 		retval = -EAGAIN;
267 		goto out;
268 	}
269 
270 #ifdef notdef
271 	/* These values are unused.  The E2100 has a 2K window into the packet
272 	   buffer.  The window can be set to start on any page boundary. */
273 	ei_status.rmem_start = dev->mem_start + TX_PAGES*256;
274 	dev->mem_end = ei_status.rmem_end = dev->mem_start + 2*1024;
275 #endif
276 
277 	printk(", IRQ %d, %s media, memory @ %#lx.\n", dev->irq,
278 		   dev->if_port ? "secondary" : "primary", dev->mem_start);
279 
280 	ei_status.reset_8390 = &e21_reset_8390;
281 	ei_status.block_input = &e21_block_input;
282 	ei_status.block_output = &e21_block_output;
283 	ei_status.get_8390_hdr = &e21_get_8390_hdr;
284 
285 	dev->netdev_ops = &e21_netdev_ops;
286 	NS8390_init(dev, 0);
287 
288 	retval = register_netdev(dev);
289 	if (retval)
290 		goto out;
291 	return 0;
292 out:
293 	release_region(ioaddr, E21_IO_EXTENT);
294 	return retval;
295 }
296 
297 static int
e21_open(struct net_device * dev)298 e21_open(struct net_device *dev)
299 {
300 	short ioaddr = dev->base_addr;
301 	int retval;
302 
303 	if ((retval = request_irq(dev->irq, ei_interrupt, 0, dev->name, dev)))
304 		return retval;
305 
306 	/* Set the interrupt line and memory base on the hardware. */
307 	inb(ioaddr + E21_IRQ_LOW);
308 	outb(0, ioaddr + E21_ASIC + (dev->irq & 7));
309 	inb(ioaddr + E21_IRQ_HIGH); 			/* High IRQ bit, and if_port. */
310 	outb(0, ioaddr + E21_ASIC + (dev->irq > 7 ? 1:0)
311 		   + (dev->if_port ? E21_ALT_IFPORT : 0));
312 	inb(ioaddr + E21_MEM_BASE);
313 	outb(0, ioaddr + E21_ASIC + ((dev->mem_start >> 17) & 7));
314 
315 	ei_open(dev);
316 	return 0;
317 }
318 
319 static void
e21_reset_8390(struct net_device * dev)320 e21_reset_8390(struct net_device *dev)
321 {
322 	short ioaddr = dev->base_addr;
323 
324 	outb(0x01, ioaddr);
325 	if (ei_debug > 1) printk("resetting the E2180x3 t=%ld...", jiffies);
326 	ei_status.txing = 0;
327 
328 	/* Set up the ASIC registers, just in case something changed them. */
329 
330 	if (ei_debug > 1) printk("reset done\n");
331 }
332 
333 /* Grab the 8390 specific header. We put the 2k window so the header page
334    appears at the start of the shared memory. */
335 
336 static void
e21_get_8390_hdr(struct net_device * dev,struct e8390_pkt_hdr * hdr,int ring_page)337 e21_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
338 {
339 
340 	short ioaddr = dev->base_addr;
341 	char __iomem *shared_mem = ei_status.mem;
342 
343 	mem_on(ioaddr, shared_mem, ring_page);
344 
345 #ifdef notdef
346 	/* Officially this is what we are doing, but the readl() is faster */
347 	memcpy_fromio(hdr, shared_mem, sizeof(struct e8390_pkt_hdr));
348 #else
349 	((unsigned int*)hdr)[0] = readl(shared_mem);
350 #endif
351 
352 	/* Turn off memory access: we would need to reprogram the window anyway. */
353 	mem_off(ioaddr);
354 
355 }
356 
357 /*  Block input and output are easy on shared memory ethercards.
358 	The E21xx makes block_input() especially easy by wrapping the top
359 	ring buffer to the bottom automatically. */
360 static void
e21_block_input(struct net_device * dev,int count,struct sk_buff * skb,int ring_offset)361 e21_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
362 {
363 	short ioaddr = dev->base_addr;
364 	char __iomem *shared_mem = ei_status.mem;
365 
366 	mem_on(ioaddr, shared_mem, (ring_offset>>8));
367 
368 	memcpy_fromio(skb->data, ei_status.mem + (ring_offset & 0xff), count);
369 
370 	mem_off(ioaddr);
371 }
372 
373 static void
e21_block_output(struct net_device * dev,int count,const unsigned char * buf,int start_page)374 e21_block_output(struct net_device *dev, int count, const unsigned char *buf,
375 				 int start_page)
376 {
377 	short ioaddr = dev->base_addr;
378 	volatile char __iomem *shared_mem = ei_status.mem;
379 
380 	/* Set the shared memory window start by doing a read, with the low address
381 	   bits specifying the starting page. */
382 	readb(shared_mem + start_page);
383 	mem_on(ioaddr, shared_mem, start_page);
384 
385 	memcpy_toio(shared_mem, buf, count);
386 	mem_off(ioaddr);
387 }
388 
389 static int
e21_close(struct net_device * dev)390 e21_close(struct net_device *dev)
391 {
392 	short ioaddr = dev->base_addr;
393 
394 	if (ei_debug > 1)
395 		printk("%s: Shutting down ethercard.\n", dev->name);
396 
397 	free_irq(dev->irq, dev);
398 	dev->irq = ei_status.saved_irq;
399 
400 	/* Shut off the interrupt line and secondary interface. */
401 	inb(ioaddr + E21_IRQ_LOW);
402 	outb(0, ioaddr + E21_ASIC);
403 	inb(ioaddr + E21_IRQ_HIGH); 			/* High IRQ bit, and if_port. */
404 	outb(0, ioaddr + E21_ASIC);
405 
406 	ei_close(dev);
407 
408 	/* Double-check that the memory has been turned off, because really
409 	   really bad things happen if it isn't. */
410 	mem_off(ioaddr);
411 
412 	return 0;
413 }
414 
415 
416 #ifdef MODULE
417 #define MAX_E21_CARDS	4	/* Max number of E21 cards per module */
418 static struct net_device *dev_e21[MAX_E21_CARDS];
419 static int io[MAX_E21_CARDS];
420 static int irq[MAX_E21_CARDS];
421 static int mem[MAX_E21_CARDS];
422 static int xcvr[MAX_E21_CARDS];		/* choose int. or ext. xcvr */
423 
424 module_param_array(io, int, NULL, 0);
425 module_param_array(irq, int, NULL, 0);
426 module_param_array(mem, int, NULL, 0);
427 module_param_array(xcvr, int, NULL, 0);
428 MODULE_PARM_DESC(io, "I/O base address(es)");
429 MODULE_PARM_DESC(irq, "IRQ number(s)");
430 MODULE_PARM_DESC(mem, " memory base address(es)");
431 MODULE_PARM_DESC(xcvr, "transceiver(s) (0=internal, 1=external)");
432 MODULE_DESCRIPTION("Cabletron E2100 ISA ethernet driver");
433 MODULE_LICENSE("GPL");
434 
435 /* This is set up so that only a single autoprobe takes place per call.
436 ISA device autoprobes on a running machine are not recommended. */
437 
init_module(void)438 int __init init_module(void)
439 {
440 	struct net_device *dev;
441 	int this_dev, found = 0;
442 
443 	for (this_dev = 0; this_dev < MAX_E21_CARDS; this_dev++) {
444 		if (io[this_dev] == 0)  {
445 			if (this_dev != 0) break; /* only autoprobe 1st one */
446 			printk(KERN_NOTICE "e2100.c: Presently autoprobing (not recommended) for a single card.\n");
447 		}
448 		dev = alloc_ei_netdev();
449 		if (!dev)
450 			break;
451 		dev->irq = irq[this_dev];
452 		dev->base_addr = io[this_dev];
453 		dev->mem_start = mem[this_dev];
454 		dev->mem_end = xcvr[this_dev];	/* low 4bits = xcvr sel. */
455 		if (do_e2100_probe(dev) == 0) {
456 			dev_e21[found++] = dev;
457 			continue;
458 		}
459 		free_netdev(dev);
460 		printk(KERN_WARNING "e2100.c: No E2100 card found (i/o = 0x%x).\n", io[this_dev]);
461 		break;
462 	}
463 	if (found)
464 		return 0;
465 	return -ENXIO;
466 }
467 
cleanup_card(struct net_device * dev)468 static void cleanup_card(struct net_device *dev)
469 {
470 	/* NB: e21_close() handles free_irq */
471 	iounmap(ei_status.mem);
472 	release_region(dev->base_addr, E21_IO_EXTENT);
473 }
474 
475 void __exit
cleanup_module(void)476 cleanup_module(void)
477 {
478 	int this_dev;
479 
480 	for (this_dev = 0; this_dev < MAX_E21_CARDS; this_dev++) {
481 		struct net_device *dev = dev_e21[this_dev];
482 		if (dev) {
483 			unregister_netdev(dev);
484 			cleanup_card(dev);
485 			free_netdev(dev);
486 		}
487 	}
488 }
489 #endif /* MODULE */
490