b43/b43legacy: fix my copyright notices
[linux/fpc-iii.git] / drivers / net / lne390.c
blobb36989097883bc7b800bfd00269dd245b55323ff
1 /*
2 lne390.c
4 Linux driver for Mylex LNE390 EISA Network Adapter
6 Copyright (C) 1996-1998, Paul Gortmaker.
8 This software may be used and distributed according to the terms
9 of the GNU General Public License, incorporated herein by reference.
11 Information and Code Sources:
13 1) Based upon framework of es3210 driver.
14 2) The existing myriad of other Linux 8390 drivers by Donald Becker.
15 3) Russ Nelson's asm packet driver provided additional info.
16 4) Info for getting IRQ and sh-mem gleaned from the EISA cfg files.
18 The LNE390 is an EISA shared memory NS8390 implementation. Note
19 that all memory copies to/from the board must be 32bit transfers.
20 There are two versions of the card: the lne390a and the lne390b.
21 Going by the EISA cfg files, the "a" has jumpers to select between
22 BNC/AUI, but the "b" also has RJ-45 and selection is via the SCU.
23 The shared memory address selection is also slightly different.
24 Note that shared memory address > 1MB are supported with this driver.
26 You can try <http://www.mylex.com> if you want more info, as I've
27 never even seen one of these cards. :)
29 Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 2000/09/01
30 - get rid of check_region
31 - no need to check if dev == NULL in lne390_probe1
34 static const char *version =
35 "lne390.c: Driver revision v0.99.1, 01/09/2000\n";
37 #include <linux/module.h>
38 #include <linux/eisa.h>
39 #include <linux/kernel.h>
40 #include <linux/errno.h>
41 #include <linux/string.h>
42 #include <linux/delay.h>
43 #include <linux/init.h>
44 #include <linux/netdevice.h>
45 #include <linux/etherdevice.h>
47 #include <asm/io.h>
48 #include <asm/system.h>
50 #include "8390.h"
52 #define DRV_NAME "lne390"
54 static int lne390_probe1(struct net_device *dev, int ioaddr);
56 static int lne390_open(struct net_device *dev);
57 static int lne390_close(struct net_device *dev);
59 static void lne390_reset_8390(struct net_device *dev);
61 static void lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page);
62 static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset);
63 static void lne390_block_output(struct net_device *dev, int count, const unsigned char *buf, const int start_page);
65 #define LNE390_START_PG 0x00 /* First page of TX buffer */
66 #define LNE390_STOP_PG 0x80 /* Last page +1 of RX ring */
68 #define LNE390_ID_PORT 0xc80 /* Same for all EISA cards */
69 #define LNE390_IO_EXTENT 0x20
70 #define LNE390_SA_PROM 0x16 /* Start of e'net addr. */
71 #define LNE390_RESET_PORT 0xc84 /* From the pkt driver source */
72 #define LNE390_NIC_OFFSET 0x00 /* Hello, the 8390 is *here* */
74 #define LNE390_ADDR0 0x00 /* 3 byte vendor prefix */
75 #define LNE390_ADDR1 0x80
76 #define LNE390_ADDR2 0xe5
78 #define LNE390_ID0 0x10009835 /* 0x3598 = 01101 01100 11000 = mlx */
79 #define LNE390_ID1 0x11009835 /* above is the 390A, this is 390B */
81 #define LNE390_CFG1 0xc84 /* NB: 0xc84 is also "reset" port. */
82 #define LNE390_CFG2 0xc90
85 * You can OR any of the following bits together and assign it
86 * to LNE390_DEBUG to get verbose driver info during operation.
87 * Currently only the probe one is implemented.
90 #define LNE390_D_PROBE 0x01
91 #define LNE390_D_RX_PKT 0x02
92 #define LNE390_D_TX_PKT 0x04
93 #define LNE390_D_IRQ 0x08
95 #define LNE390_DEBUG 0
97 static unsigned char irq_map[] __initdata = {15, 12, 11, 10, 9, 7, 5, 3};
98 static unsigned int shmem_mapA[] __initdata = {0xff, 0xfe, 0xfd, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
99 static unsigned int shmem_mapB[] __initdata = {0xff, 0xfe, 0x0e, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
102 * Probe for the card. The best way is to read the EISA ID if it
103 * is known. Then we can check the prefix of the station address
104 * PROM for a match against the value assigned to Mylex.
107 static int __init do_lne390_probe(struct net_device *dev)
109 unsigned short ioaddr = dev->base_addr;
110 int irq = dev->irq;
111 int mem_start = dev->mem_start;
112 int ret;
114 if (ioaddr > 0x1ff) { /* Check a single specified location. */
115 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
116 return -EBUSY;
117 ret = lne390_probe1(dev, ioaddr);
118 if (ret)
119 release_region(ioaddr, LNE390_IO_EXTENT);
120 return ret;
122 else if (ioaddr > 0) /* Don't probe at all. */
123 return -ENXIO;
125 if (!EISA_bus) {
126 #if LNE390_DEBUG & LNE390_D_PROBE
127 printk("lne390-debug: Not an EISA bus. Not probing high ports.\n");
128 #endif
129 return -ENXIO;
132 /* EISA spec allows for up to 16 slots, but 8 is typical. */
133 for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
134 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
135 continue;
136 if (lne390_probe1(dev, ioaddr) == 0)
137 return 0;
138 release_region(ioaddr, LNE390_IO_EXTENT);
139 dev->irq = irq;
140 dev->mem_start = mem_start;
143 return -ENODEV;
146 #ifndef MODULE
147 struct net_device * __init lne390_probe(int unit)
149 struct net_device *dev = alloc_ei_netdev();
150 int err;
152 if (!dev)
153 return ERR_PTR(-ENOMEM);
155 sprintf(dev->name, "eth%d", unit);
156 netdev_boot_setup_check(dev);
158 err = do_lne390_probe(dev);
159 if (err)
160 goto out;
161 return dev;
162 out:
163 free_netdev(dev);
164 return ERR_PTR(err);
166 #endif
168 static int __init lne390_probe1(struct net_device *dev, int ioaddr)
170 int i, revision, ret;
171 unsigned long eisa_id;
172 DECLARE_MAC_BUF(mac);
174 if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV;
176 #if LNE390_DEBUG & LNE390_D_PROBE
177 printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT));
178 printk("lne390-debug: config regs: %#x %#x\n",
179 inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2));
180 #endif
183 /* Check the EISA ID of the card. */
184 eisa_id = inl(ioaddr + LNE390_ID_PORT);
185 if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) {
186 return -ENODEV;
189 revision = (eisa_id >> 24) & 0x01; /* 0 = rev A, 1 rev B */
191 #if 0
192 /* Check the Mylex vendor ID as well. Not really required. */
193 if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0
194 || inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1
195 || inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) {
196 printk("lne390.c: card not found");
197 for(i = 0; i < ETHER_ADDR_LEN; i++)
198 printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i));
199 printk(" (invalid prefix).\n");
200 return -ENODEV;
202 #endif
204 for(i = 0; i < ETHER_ADDR_LEN; i++)
205 dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i);
206 printk("lne390.c: LNE390%X in EISA slot %d, address %s.\n",
207 0xa+revision, ioaddr/0x1000, print_mac(mac, dev->dev_addr));
209 printk("lne390.c: ");
211 /* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */
212 if (dev->irq == 0) {
213 unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3;
214 dev->irq = irq_map[irq_reg & 0x07];
215 printk("using");
216 } else {
217 /* This is useless unless we reprogram the card here too */
218 if (dev->irq == 2) dev->irq = 9; /* Doh! */
219 printk("assigning");
221 printk(" IRQ %d,", dev->irq);
223 if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) {
224 printk (" unable to get IRQ %d.\n", dev->irq);
225 return ret;
228 if (dev->mem_start == 0) {
229 unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07;
231 if (revision) /* LNE390B */
232 dev->mem_start = shmem_mapB[mem_reg] * 0x10000;
233 else /* LNE390A */
234 dev->mem_start = shmem_mapA[mem_reg] * 0x10000;
235 printk(" using ");
236 } else {
237 /* Should check for value in shmem_map and reprogram the card to use it */
238 dev->mem_start &= 0xfff0000;
239 printk(" assigning ");
242 printk("%dkB memory at physical address %#lx\n",
243 LNE390_STOP_PG/4, dev->mem_start);
246 BEWARE!! Some dain-bramaged EISA SCUs will allow you to put
247 the card mem within the region covered by `normal' RAM !!!
249 ioremap() will fail in that case.
251 ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100);
252 if (!ei_status.mem) {
253 printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n");
254 printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n");
255 printk(KERN_ERR "lne390.c: Driver NOT installed.\n");
256 ret = -EAGAIN;
257 goto cleanup;
259 printk("lne390.c: remapped %dkB card memory to virtual address %p\n",
260 LNE390_STOP_PG/4, ei_status.mem);
262 dev->mem_start = (unsigned long)ei_status.mem;
263 dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256;
265 /* The 8390 offset is zero for the LNE390 */
266 dev->base_addr = ioaddr;
268 ei_status.name = "LNE390";
269 ei_status.tx_start_page = LNE390_START_PG;
270 ei_status.rx_start_page = LNE390_START_PG + TX_PAGES;
271 ei_status.stop_page = LNE390_STOP_PG;
272 ei_status.word16 = 1;
274 if (ei_debug > 0)
275 printk(version);
277 ei_status.reset_8390 = &lne390_reset_8390;
278 ei_status.block_input = &lne390_block_input;
279 ei_status.block_output = &lne390_block_output;
280 ei_status.get_8390_hdr = &lne390_get_8390_hdr;
282 dev->open = &lne390_open;
283 dev->stop = &lne390_close;
284 #ifdef CONFIG_NET_POLL_CONTROLLER
285 dev->poll_controller = ei_poll;
286 #endif
287 NS8390_init(dev, 0);
289 ret = register_netdev(dev);
290 if (ret)
291 goto unmap;
292 return 0;
293 unmap:
294 if (ei_status.reg0)
295 iounmap(ei_status.mem);
296 cleanup:
297 free_irq(dev->irq, dev);
298 return ret;
302 * Reset as per the packet driver method. Judging by the EISA cfg
303 * file, this just toggles the "Board Enable" bits (bit 2 and 0).
306 static void lne390_reset_8390(struct net_device *dev)
308 unsigned short ioaddr = dev->base_addr;
310 outb(0x04, ioaddr + LNE390_RESET_PORT);
311 if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name);
313 mdelay(2);
315 ei_status.txing = 0;
316 outb(0x01, ioaddr + LNE390_RESET_PORT);
317 if (ei_debug > 1) printk("reset done\n");
319 return;
323 * Note: In the following three functions is the implicit assumption
324 * that the associated memcpy will only use "rep; movsl" as long as
325 * we keep the counts as some multiple of doublewords. This is a
326 * requirement of the hardware, and also prevents us from using
327 * eth_io_copy_and_sum() since we can't guarantee it will limit
328 * itself to doubleword access.
332 * Grab the 8390 specific header. Similar to the block_input routine, but
333 * we don't need to be concerned with ring wrap as the header will be at
334 * the start of a page, so we optimize accordingly. (A single doubleword.)
337 static void
338 lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
340 void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8);
341 memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
342 hdr->count = (hdr->count + 3) & ~3; /* Round up allocation. */
346 * Block input and output are easy on shared memory ethercards, the only
347 * complication is when the ring buffer wraps. The count will already
348 * be rounded up to a doubleword value via lne390_get_8390_hdr() above.
351 static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb,
352 int ring_offset)
354 void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8);
356 if (ring_offset + count > (LNE390_STOP_PG<<8)) {
357 /* Packet wraps over end of ring buffer. */
358 int semi_count = (LNE390_STOP_PG<<8) - ring_offset;
359 memcpy_fromio(skb->data, xfer_start, semi_count);
360 count -= semi_count;
361 memcpy_fromio(skb->data + semi_count,
362 ei_status.mem + (TX_PAGES<<8), count);
363 } else {
364 /* Packet is in one chunk. */
365 memcpy_fromio(skb->data, xfer_start, count);
369 static void lne390_block_output(struct net_device *dev, int count,
370 const unsigned char *buf, int start_page)
372 void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8);
374 count = (count + 3) & ~3; /* Round up to doubleword */
375 memcpy_toio(shmem, buf, count);
378 static int lne390_open(struct net_device *dev)
380 ei_open(dev);
381 return 0;
384 static int lne390_close(struct net_device *dev)
387 if (ei_debug > 1)
388 printk("%s: Shutting down ethercard.\n", dev->name);
390 ei_close(dev);
391 return 0;
394 #ifdef MODULE
395 #define MAX_LNE_CARDS 4 /* Max number of LNE390 cards per module */
396 static struct net_device *dev_lne[MAX_LNE_CARDS];
397 static int io[MAX_LNE_CARDS];
398 static int irq[MAX_LNE_CARDS];
399 static int mem[MAX_LNE_CARDS];
401 module_param_array(io, int, NULL, 0);
402 module_param_array(irq, int, NULL, 0);
403 module_param_array(mem, int, NULL, 0);
404 MODULE_PARM_DESC(io, "I/O base address(es)");
405 MODULE_PARM_DESC(irq, "IRQ number(s)");
406 MODULE_PARM_DESC(mem, "memory base address(es)");
407 MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver");
408 MODULE_LICENSE("GPL");
410 int __init init_module(void)
412 struct net_device *dev;
413 int this_dev, found = 0;
415 for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
416 if (io[this_dev] == 0 && this_dev != 0)
417 break;
418 dev = alloc_ei_netdev();
419 if (!dev)
420 break;
421 dev->irq = irq[this_dev];
422 dev->base_addr = io[this_dev];
423 dev->mem_start = mem[this_dev];
424 if (do_lne390_probe(dev) == 0) {
425 dev_lne[found++] = dev;
426 continue;
428 free_netdev(dev);
429 printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]);
430 break;
432 if (found)
433 return 0;
434 return -ENXIO;
437 static void cleanup_card(struct net_device *dev)
439 free_irq(dev->irq, dev);
440 release_region(dev->base_addr, LNE390_IO_EXTENT);
441 iounmap(ei_status.mem);
444 void __exit cleanup_module(void)
446 int this_dev;
448 for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
449 struct net_device *dev = dev_lne[this_dev];
450 if (dev) {
451 unregister_netdev(dev);
452 cleanup_card(dev);
453 free_netdev(dev);
457 #endif /* MODULE */