Automatic merge of /spare/repo/netdev-2.6 branch ns83820
[linux-2.6] / drivers / net / e2100.c
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/delay.h>
48
49 #include <asm/io.h>
50 #include <asm/system.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
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
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
111 static int e21_close(struct net_device *dev);
112
113 \f
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
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         SET_MODULE_OWNER(dev);
128
129         if (base_addr > 0x1ff)          /* Check a single specified location. */
130                 return e21_probe1(dev, base_addr);
131         else if (base_addr != 0)        /* Don't probe at all. */
132                 return -ENXIO;
133
134         for (port = e21_probe_list; *port; port++) {
135                 dev->irq = irq;
136                 if (e21_probe1(dev, *port) == 0)
137                         return 0;
138         }
139
140         return -ENODEV;
141 }
142
143 static void cleanup_card(struct net_device *dev)
144 {
145         /* NB: e21_close() handles free_irq */
146         iounmap(ei_status.mem);
147         release_region(dev->base_addr, E21_IO_EXTENT);
148 }
149
150 #ifndef MODULE
151 struct net_device * __init e2100_probe(int unit)
152 {
153         struct net_device *dev = alloc_ei_netdev();
154         int err;
155
156         if (!dev)
157                 return ERR_PTR(-ENOMEM);
158
159         sprintf(dev->name, "eth%d", unit);
160         netdev_boot_setup_check(dev);
161
162         err = do_e2100_probe(dev);
163         if (err)
164                 goto out;
165         err = register_netdev(dev);
166         if (err)
167                 goto out1;
168         return dev;
169 out1:
170         cleanup_card(dev);
171 out:
172         free_netdev(dev);
173         return ERR_PTR(err);
174 }
175 #endif
176
177 static int __init e21_probe1(struct net_device *dev, int ioaddr)
178 {
179         int i, status, retval;
180         unsigned char *station_addr = dev->dev_addr;
181         static unsigned version_printed;
182
183         if (!request_region(ioaddr, E21_IO_EXTENT, DRV_NAME))
184                 return -EBUSY;
185
186         /* First check the station address for the Ctron prefix. */
187         if (inb(ioaddr + E21_SAPROM + 0) != 0x00
188                 || inb(ioaddr + E21_SAPROM + 1) != 0x00
189                 || inb(ioaddr + E21_SAPROM + 2) != 0x1d) {
190                 retval = -ENODEV;
191                 goto out;
192         }
193
194         /* Verify by making certain that there is a 8390 at there. */
195         outb(E8390_NODMA + E8390_STOP, ioaddr);
196         udelay(1);      /* we want to delay one I/O cycle - which is 2MHz */
197         status = inb(ioaddr);
198         if (status != 0x21 && status != 0x23) {
199                 retval = -ENODEV;
200                 goto out;
201         }
202
203         /* Read the station address PROM.  */
204         for (i = 0; i < 6; i++)
205                 station_addr[i] = inb(ioaddr + E21_SAPROM + i);
206
207         inb(ioaddr + E21_MEDIA);                /* Point to media selection. */
208         outb(0, ioaddr + E21_ASIC);     /* and disable the secondary interface. */
209
210         if (ei_debug  &&  version_printed++ == 0)
211                 printk(version);
212
213         for (i = 0; i < 6; i++)
214                 printk(" %02X", station_addr[i]);
215
216         if (dev->irq < 2) {
217                 int irqlist[] = {15,11,10,12,5,9,3,4}, i;
218                 for (i = 0; i < 8; i++)
219                         if (request_irq (irqlist[i], NULL, 0, "bogus", NULL) != -EBUSY) {
220                                 dev->irq = irqlist[i];
221                                 break;
222                         }
223                 if (i >= 8) {
224                         printk(" unable to get IRQ %d.\n", dev->irq);
225                         retval = -EAGAIN;
226                         goto out;
227                 }
228         } else if (dev->irq == 2)       /* Fixup luser bogosity: IRQ2 is really IRQ9 */
229                 dev->irq = 9;
230
231         /* The 8390 is at the base address. */
232         dev->base_addr = ioaddr;
233
234         ei_status.name = "E2100";
235         ei_status.word16 = 1;
236         ei_status.tx_start_page = E21_TX_START_PG;
237         ei_status.rx_start_page = E21_RX_START_PG;
238         ei_status.stop_page = E21_RX_STOP_PG;
239         ei_status.saved_irq = dev->irq;
240
241         /* Check the media port used.  The port can be passed in on the
242            low mem_end bits. */
243         if (dev->mem_end & 15)
244                 dev->if_port = dev->mem_end & 7;
245         else {
246                 dev->if_port = 0;
247                 inb(ioaddr + E21_MEDIA);        /* Turn automatic media detection on. */
248                 for(i = 0; i < 6; i++)
249                         if (station_addr[i] != inb(ioaddr + E21_SAPROM + 8 + i)) {
250                                 dev->if_port = 1;
251                                 break;
252                         }
253         }
254
255         /* Never map in the E21 shared memory unless you are actively using it.
256            Also, the shared memory has effective only one setting -- spread all
257            over the 128K region! */
258         if (dev->mem_start == 0)
259                 dev->mem_start = 0xd0000;
260
261         ei_status.mem = ioremap(dev->mem_start, 2*1024);
262         if (!ei_status.mem) {
263                 printk("unable to remap memory\n");
264                 retval = -EAGAIN;
265                 goto out;
266         }
267
268 #ifdef notdef
269         /* These values are unused.  The E2100 has a 2K window into the packet
270            buffer.  The window can be set to start on any page boundary. */
271         ei_status.rmem_start = dev->mem_start + TX_PAGES*256;
272         dev->mem_end = ei_status.rmem_end = dev->mem_start + 2*1024;
273 #endif
274
275         printk(", IRQ %d, %s media, memory @ %#lx.\n", dev->irq,
276                    dev->if_port ? "secondary" : "primary", dev->mem_start);
277
278         ei_status.reset_8390 = &e21_reset_8390;
279         ei_status.block_input = &e21_block_input;
280         ei_status.block_output = &e21_block_output;
281         ei_status.get_8390_hdr = &e21_get_8390_hdr;
282         dev->open = &e21_open;
283         dev->stop = &e21_close;
284 #ifdef CONFIG_NET_POLL_CONTROLLER
285         dev->poll_controller = ei_poll;
286 #endif
287         NS8390_init(dev, 0);
288
289         return 0;
290 out:
291         release_region(ioaddr, E21_IO_EXTENT);
292         return retval;
293 }
294
295 static int
296 e21_open(struct net_device *dev)
297 {
298         short ioaddr = dev->base_addr;
299         int retval;
300
301         if ((retval = request_irq(dev->irq, ei_interrupt, 0, dev->name, dev)))
302                 return retval;
303
304         /* Set the interrupt line and memory base on the hardware. */
305         inb(ioaddr + E21_IRQ_LOW);
306         outb(0, ioaddr + E21_ASIC + (dev->irq & 7));
307         inb(ioaddr + E21_IRQ_HIGH);                     /* High IRQ bit, and if_port. */
308         outb(0, ioaddr + E21_ASIC + (dev->irq > 7 ? 1:0)
309                    + (dev->if_port ? E21_ALT_IFPORT : 0));
310         inb(ioaddr + E21_MEM_BASE);
311         outb(0, ioaddr + E21_ASIC + ((dev->mem_start >> 17) & 7));
312
313         ei_open(dev);
314         return 0;
315 }
316
317 static void
318 e21_reset_8390(struct net_device *dev)
319 {
320         short ioaddr = dev->base_addr;
321
322         outb(0x01, ioaddr);
323         if (ei_debug > 1) printk("resetting the E2180x3 t=%ld...", jiffies);
324         ei_status.txing = 0;
325
326         /* Set up the ASIC registers, just in case something changed them. */
327
328         if (ei_debug > 1) printk("reset done\n");
329         return;
330 }
331
332 /* Grab the 8390 specific header. We put the 2k window so the header page
333    appears at the start of the shared memory. */
334
335 static void
336 e21_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
337 {
338
339         short ioaddr = dev->base_addr;
340         char __iomem *shared_mem = ei_status.mem;
341
342         mem_on(ioaddr, shared_mem, ring_page);
343
344 #ifdef notdef
345         /* Officially this is what we are doing, but the readl() is faster */
346         memcpy_fromio(hdr, shared_mem, sizeof(struct e8390_pkt_hdr));
347 #else
348         ((unsigned int*)hdr)[0] = readl(shared_mem);
349 #endif
350
351         /* Turn off memory access: we would need to reprogram the window anyway. */
352         mem_off(ioaddr);
353
354 }
355
356 /*  Block input and output are easy on shared memory ethercards.
357         The E21xx makes block_input() especially easy by wrapping the top
358         ring buffer to the bottom automatically. */
359 static void
360 e21_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
361 {
362         short ioaddr = dev->base_addr;
363         char __iomem *shared_mem = ei_status.mem;
364
365         mem_on(ioaddr, shared_mem, (ring_offset>>8));
366
367         /* Packet is always in one chunk -- we can copy + cksum. */
368         eth_io_copy_and_sum(skb, ei_status.mem + (ring_offset & 0xff), count, 0);
369
370         mem_off(ioaddr);
371 }
372
373 static void
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
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 \f
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 int
438 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                         if (register_netdev(dev) == 0) {
457                                 dev_e21[found++] = dev;
458                                 continue;
459                         }
460                         cleanup_card(dev);
461                 }
462                 free_netdev(dev);
463                 printk(KERN_WARNING "e2100.c: No E2100 card found (i/o = 0x%x).\n", io[this_dev]);
464                 break;
465         }
466         if (found)
467                 return 0;
468         return -ENXIO;
469 }
470
471 void
472 cleanup_module(void)
473 {
474         int this_dev;
475
476         for (this_dev = 0; this_dev < MAX_E21_CARDS; this_dev++) {
477                 struct net_device *dev = dev_e21[this_dev];
478                 if (dev) {
479                         unregister_netdev(dev);
480                         cleanup_card(dev);
481                         free_netdev(dev);
482                 }
483         }
484 }
485 #endif /* MODULE */