kmemtrace: SLOB hooks.
[linux-2.6/kmemtrace.git] / drivers / net / apne.c
blob867f6fff543c848bfd95a741173c746005344017
1 /*
2 * Amiga Linux/68k 8390 based PCMCIA Ethernet Driver for the Amiga 1200
4 * (C) Copyright 1997 Alain Malek
5 * (Alain.Malek@cryogen.com)
7 * ----------------------------------------------------------------------------
9 * This program is based on
11 * ne.c: A general non-shared-memory NS8390 ethernet driver for linux
12 * Written 1992-94 by Donald Becker.
14 * 8390.c: A general NS8390 ethernet driver core for linux.
15 * Written 1992-94 by Donald Becker.
17 * cnetdevice: A Sana-II ethernet driver for AmigaOS
18 * Written by Bruce Abbott (bhabbott@inhb.co.nz)
20 * ----------------------------------------------------------------------------
22 * This file is subject to the terms and conditions of the GNU General Public
23 * License. See the file COPYING in the main directory of the Linux
24 * distribution for more details.
26 * ----------------------------------------------------------------------------
31 #include <linux/module.h>
32 #include <linux/kernel.h>
33 #include <linux/errno.h>
34 #include <linux/pci.h>
35 #include <linux/init.h>
36 #include <linux/delay.h>
37 #include <linux/netdevice.h>
38 #include <linux/etherdevice.h>
39 #include <linux/jiffies.h>
41 #include <asm/system.h>
42 #include <asm/io.h>
43 #include <asm/setup.h>
44 #include <asm/amigaints.h>
45 #include <asm/amigahw.h>
46 #include <asm/amigayle.h>
47 #include <asm/amipcmcia.h>
49 #include "8390.h"
51 /* ---- No user-serviceable parts below ---- */
53 #define DRV_NAME "apne"
55 #define NE_BASE (dev->base_addr)
56 #define NE_CMD 0x00
57 #define NE_DATAPORT 0x10 /* NatSemi-defined port window offset. */
58 #define NE_RESET 0x1f /* Issue a read to reset, a write to clear. */
59 #define NE_IO_EXTENT 0x20
61 #define NE_EN0_ISR 0x07
62 #define NE_EN0_DCFG 0x0e
64 #define NE_EN0_RSARLO 0x08
65 #define NE_EN0_RSARHI 0x09
66 #define NE_EN0_RCNTLO 0x0a
67 #define NE_EN0_RXCR 0x0c
68 #define NE_EN0_TXCR 0x0d
69 #define NE_EN0_RCNTHI 0x0b
70 #define NE_EN0_IMR 0x0f
72 #define NE1SM_START_PG 0x20 /* First page of TX buffer */
73 #define NE1SM_STOP_PG 0x40 /* Last page +1 of RX ring */
74 #define NESM_START_PG 0x40 /* First page of TX buffer */
75 #define NESM_STOP_PG 0x80 /* Last page +1 of RX ring */
78 struct net_device * __init apne_probe(int unit);
79 static int apne_probe1(struct net_device *dev, int ioaddr);
81 static int apne_open(struct net_device *dev);
82 static int apne_close(struct net_device *dev);
84 static void apne_reset_8390(struct net_device *dev);
85 static void apne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
86 int ring_page);
87 static void apne_block_input(struct net_device *dev, int count,
88 struct sk_buff *skb, int ring_offset);
89 static void apne_block_output(struct net_device *dev, const int count,
90 const unsigned char *buf, const int start_page);
91 static irqreturn_t apne_interrupt(int irq, void *dev_id);
93 static int init_pcmcia(void);
95 /* IO base address used for nic */
97 #define IOBASE 0x300
100 use MANUAL_CONFIG and MANUAL_OFFSET for enabling IO by hand
101 you can find the values to use by looking at the cnet.device
102 config file example (the default values are for the CNET40BC card)
106 #define MANUAL_CONFIG 0x20
107 #define MANUAL_OFFSET 0x3f8
109 #define MANUAL_HWADDR0 0x00
110 #define MANUAL_HWADDR1 0x12
111 #define MANUAL_HWADDR2 0x34
112 #define MANUAL_HWADDR3 0x56
113 #define MANUAL_HWADDR4 0x78
114 #define MANUAL_HWADDR5 0x9a
117 static const char version[] =
118 "apne.c:v1.1 7/10/98 Alain Malek (Alain.Malek@cryogen.ch)\n";
120 static int apne_owned; /* signal if card already owned */
122 struct net_device * __init apne_probe(int unit)
124 struct net_device *dev;
125 #ifndef MANUAL_CONFIG
126 char tuple[8];
127 #endif
128 int err;
130 if (!MACH_IS_AMIGA)
131 return ERR_PTR(-ENODEV);
133 if (apne_owned)
134 return ERR_PTR(-ENODEV);
136 if ( !(AMIGAHW_PRESENT(PCMCIA)) )
137 return ERR_PTR(-ENODEV);
139 printk("Looking for PCMCIA ethernet card : ");
141 /* check if a card is inserted */
142 if (!(PCMCIA_INSERTED)) {
143 printk("NO PCMCIA card inserted\n");
144 return ERR_PTR(-ENODEV);
147 dev = alloc_ei_netdev();
148 if (!dev)
149 return ERR_PTR(-ENOMEM);
150 if (unit >= 0) {
151 sprintf(dev->name, "eth%d", unit);
152 netdev_boot_setup_check(dev);
155 /* disable pcmcia irq for readtuple */
156 pcmcia_disable_irq();
158 #ifndef MANUAL_CONFIG
159 if ((pcmcia_copy_tuple(CISTPL_FUNCID, tuple, 8) < 3) ||
160 (tuple[2] != CISTPL_FUNCID_NETWORK)) {
161 printk("not an ethernet card\n");
162 /* XXX: shouldn't we re-enable irq here? */
163 free_netdev(dev);
164 return ERR_PTR(-ENODEV);
166 #endif
168 printk("ethernet PCMCIA card inserted\n");
170 if (!init_pcmcia()) {
171 /* XXX: shouldn't we re-enable irq here? */
172 free_netdev(dev);
173 return ERR_PTR(-ENODEV);
176 if (!request_region(IOBASE, 0x20, DRV_NAME)) {
177 free_netdev(dev);
178 return ERR_PTR(-EBUSY);
181 err = apne_probe1(dev, IOBASE);
182 if (err) {
183 release_region(IOBASE, 0x20);
184 free_netdev(dev);
185 return ERR_PTR(err);
187 err = register_netdev(dev);
188 if (!err)
189 return dev;
191 pcmcia_disable_irq();
192 free_irq(IRQ_AMIGA_PORTS, dev);
193 pcmcia_reset();
194 release_region(IOBASE, 0x20);
195 free_netdev(dev);
196 return ERR_PTR(err);
199 static int __init apne_probe1(struct net_device *dev, int ioaddr)
201 int i;
202 unsigned char SA_prom[32];
203 int wordlength = 2;
204 const char *name = NULL;
205 int start_page, stop_page;
206 #ifndef MANUAL_HWADDR0
207 int neX000, ctron;
208 #endif
209 static unsigned version_printed;
210 DECLARE_MAC_BUF(mac);
212 if (ei_debug && version_printed++ == 0)
213 printk(version);
215 printk("PCMCIA NE*000 ethercard probe");
217 /* Reset card. Who knows what dain-bramaged state it was left in. */
218 { unsigned long reset_start_time = jiffies;
220 outb(inb(ioaddr + NE_RESET), ioaddr + NE_RESET);
222 while ((inb(ioaddr + NE_EN0_ISR) & ENISR_RESET) == 0)
223 if (time_after(jiffies, reset_start_time + 2*HZ/100)) {
224 printk(" not found (no reset ack).\n");
225 return -ENODEV;
228 outb(0xff, ioaddr + NE_EN0_ISR); /* Ack all intr. */
231 #ifndef MANUAL_HWADDR0
233 /* Read the 16 bytes of station address PROM.
234 We must first initialize registers, similar to NS8390_init(eifdev, 0).
235 We can't reliably read the SAPROM address without this.
236 (I learned the hard way!). */
238 struct {unsigned long value, offset; } program_seq[] = {
239 {E8390_NODMA+E8390_PAGE0+E8390_STOP, NE_CMD}, /* Select page 0*/
240 {0x48, NE_EN0_DCFG}, /* Set byte-wide (0x48) access. */
241 {0x00, NE_EN0_RCNTLO}, /* Clear the count regs. */
242 {0x00, NE_EN0_RCNTHI},
243 {0x00, NE_EN0_IMR}, /* Mask completion irq. */
244 {0xFF, NE_EN0_ISR},
245 {E8390_RXOFF, NE_EN0_RXCR}, /* 0x20 Set to monitor */
246 {E8390_TXOFF, NE_EN0_TXCR}, /* 0x02 and loopback mode. */
247 {32, NE_EN0_RCNTLO},
248 {0x00, NE_EN0_RCNTHI},
249 {0x00, NE_EN0_RSARLO}, /* DMA starting at 0x0000. */
250 {0x00, NE_EN0_RSARHI},
251 {E8390_RREAD+E8390_START, NE_CMD},
253 for (i = 0; i < ARRAY_SIZE(program_seq); i++) {
254 outb(program_seq[i].value, ioaddr + program_seq[i].offset);
258 for(i = 0; i < 32 /*sizeof(SA_prom)*/; i+=2) {
259 SA_prom[i] = inb(ioaddr + NE_DATAPORT);
260 SA_prom[i+1] = inb(ioaddr + NE_DATAPORT);
261 if (SA_prom[i] != SA_prom[i+1])
262 wordlength = 1;
265 /* At this point, wordlength *only* tells us if the SA_prom is doubled
266 up or not because some broken PCI cards don't respect the byte-wide
267 request in program_seq above, and hence don't have doubled up values.
268 These broken cards would otherwise be detected as an ne1000. */
270 if (wordlength == 2)
271 for (i = 0; i < 16; i++)
272 SA_prom[i] = SA_prom[i+i];
274 if (wordlength == 2) {
275 /* We must set the 8390 for word mode. */
276 outb(0x49, ioaddr + NE_EN0_DCFG);
277 start_page = NESM_START_PG;
278 stop_page = NESM_STOP_PG;
279 } else {
280 start_page = NE1SM_START_PG;
281 stop_page = NE1SM_STOP_PG;
284 neX000 = (SA_prom[14] == 0x57 && SA_prom[15] == 0x57);
285 ctron = (SA_prom[0] == 0x00 && SA_prom[1] == 0x00 && SA_prom[2] == 0x1d);
287 /* Set up the rest of the parameters. */
288 if (neX000) {
289 name = (wordlength == 2) ? "NE2000" : "NE1000";
290 } else if (ctron) {
291 name = (wordlength == 2) ? "Ctron-8" : "Ctron-16";
292 start_page = 0x01;
293 stop_page = (wordlength == 2) ? 0x40 : 0x20;
294 } else {
295 printk(" not found.\n");
296 return -ENXIO;
300 #else
301 wordlength = 2;
302 /* We must set the 8390 for word mode. */
303 outb(0x49, ioaddr + NE_EN0_DCFG);
304 start_page = NESM_START_PG;
305 stop_page = NESM_STOP_PG;
307 SA_prom[0] = MANUAL_HWADDR0;
308 SA_prom[1] = MANUAL_HWADDR1;
309 SA_prom[2] = MANUAL_HWADDR2;
310 SA_prom[3] = MANUAL_HWADDR3;
311 SA_prom[4] = MANUAL_HWADDR4;
312 SA_prom[5] = MANUAL_HWADDR5;
313 name = "NE2000";
314 #endif
316 dev->base_addr = ioaddr;
317 dev->irq = IRQ_AMIGA_PORTS;
319 /* Install the Interrupt handler */
320 i = request_irq(dev->irq, apne_interrupt, IRQF_SHARED, DRV_NAME, dev);
321 if (i) return i;
323 for(i = 0; i < ETHER_ADDR_LEN; i++)
324 dev->dev_addr[i] = SA_prom[i];
326 printk(" %s\n", print_mac(mac, dev->dev_addr));
328 printk("%s: %s found.\n", dev->name, name);
330 ei_status.name = name;
331 ei_status.tx_start_page = start_page;
332 ei_status.stop_page = stop_page;
333 ei_status.word16 = (wordlength == 2);
335 ei_status.rx_start_page = start_page + TX_PAGES;
337 ei_status.reset_8390 = &apne_reset_8390;
338 ei_status.block_input = &apne_block_input;
339 ei_status.block_output = &apne_block_output;
340 ei_status.get_8390_hdr = &apne_get_8390_hdr;
341 dev->open = &apne_open;
342 dev->stop = &apne_close;
343 #ifdef CONFIG_NET_POLL_CONTROLLER
344 dev->poll_controller = ei_poll;
345 #endif
346 NS8390_init(dev, 0);
348 pcmcia_ack_int(pcmcia_get_intreq()); /* ack PCMCIA int req */
349 pcmcia_enable_irq();
351 apne_owned = 1;
353 return 0;
356 static int
357 apne_open(struct net_device *dev)
359 ei_open(dev);
360 return 0;
363 static int
364 apne_close(struct net_device *dev)
366 if (ei_debug > 1)
367 printk("%s: Shutting down ethercard.\n", dev->name);
368 ei_close(dev);
369 return 0;
372 /* Hard reset the card. This used to pause for the same period that a
373 8390 reset command required, but that shouldn't be necessary. */
374 static void
375 apne_reset_8390(struct net_device *dev)
377 unsigned long reset_start_time = jiffies;
379 init_pcmcia();
381 if (ei_debug > 1) printk("resetting the 8390 t=%ld...", jiffies);
383 outb(inb(NE_BASE + NE_RESET), NE_BASE + NE_RESET);
385 ei_status.txing = 0;
386 ei_status.dmaing = 0;
388 /* This check _should_not_ be necessary, omit eventually. */
389 while ((inb(NE_BASE+NE_EN0_ISR) & ENISR_RESET) == 0)
390 if (time_after(jiffies, reset_start_time + 2*HZ/100)) {
391 printk("%s: ne_reset_8390() did not complete.\n", dev->name);
392 break;
394 outb(ENISR_RESET, NE_BASE + NE_EN0_ISR); /* Ack intr. */
397 /* Grab the 8390 specific header. Similar to the block_input routine, but
398 we don't need to be concerned with ring wrap as the header will be at
399 the start of a page, so we optimize accordingly. */
401 static void
402 apne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
405 int nic_base = dev->base_addr;
406 int cnt;
407 char *ptrc;
408 short *ptrs;
410 /* This *shouldn't* happen. If it does, it's the last thing you'll see */
411 if (ei_status.dmaing) {
412 printk("%s: DMAing conflict in ne_get_8390_hdr "
413 "[DMAstat:%d][irqlock:%d][intr:%d].\n",
414 dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
415 return;
418 ei_status.dmaing |= 0x01;
419 outb(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
420 outb(ENISR_RDC, nic_base + NE_EN0_ISR);
421 outb(sizeof(struct e8390_pkt_hdr), nic_base + NE_EN0_RCNTLO);
422 outb(0, nic_base + NE_EN0_RCNTHI);
423 outb(0, nic_base + NE_EN0_RSARLO); /* On page boundary */
424 outb(ring_page, nic_base + NE_EN0_RSARHI);
425 outb(E8390_RREAD+E8390_START, nic_base + NE_CMD);
427 if (ei_status.word16) {
428 ptrs = (short*)hdr;
429 for(cnt = 0; cnt < (sizeof(struct e8390_pkt_hdr)>>1); cnt++)
430 *ptrs++ = inw(NE_BASE + NE_DATAPORT);
431 } else {
432 ptrc = (char*)hdr;
433 for(cnt = 0; cnt < sizeof(struct e8390_pkt_hdr); cnt++)
434 *ptrc++ = inb(NE_BASE + NE_DATAPORT);
437 outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
438 ei_status.dmaing &= ~0x01;
440 le16_to_cpus(&hdr->count);
443 /* Block input and output, similar to the Crynwr packet driver. If you
444 are porting to a new ethercard, look at the packet driver source for hints.
445 The NEx000 doesn't share the on-board packet memory -- you have to put
446 the packet out through the "remote DMA" dataport using outb. */
448 static void
449 apne_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
451 int nic_base = dev->base_addr;
452 char *buf = skb->data;
453 char *ptrc;
454 short *ptrs;
455 int cnt;
457 /* This *shouldn't* happen. If it does, it's the last thing you'll see */
458 if (ei_status.dmaing) {
459 printk("%s: DMAing conflict in ne_block_input "
460 "[DMAstat:%d][irqlock:%d][intr:%d].\n",
461 dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
462 return;
464 ei_status.dmaing |= 0x01;
465 outb(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
466 outb(ENISR_RDC, nic_base + NE_EN0_ISR);
467 outb(count & 0xff, nic_base + NE_EN0_RCNTLO);
468 outb(count >> 8, nic_base + NE_EN0_RCNTHI);
469 outb(ring_offset & 0xff, nic_base + NE_EN0_RSARLO);
470 outb(ring_offset >> 8, nic_base + NE_EN0_RSARHI);
471 outb(E8390_RREAD+E8390_START, nic_base + NE_CMD);
472 if (ei_status.word16) {
473 ptrs = (short*)buf;
474 for (cnt = 0; cnt < (count>>1); cnt++)
475 *ptrs++ = inw(NE_BASE + NE_DATAPORT);
476 if (count & 0x01) {
477 buf[count-1] = inb(NE_BASE + NE_DATAPORT);
479 } else {
480 ptrc = (char*)buf;
481 for (cnt = 0; cnt < count; cnt++)
482 *ptrc++ = inb(NE_BASE + NE_DATAPORT);
485 outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
486 ei_status.dmaing &= ~0x01;
489 static void
490 apne_block_output(struct net_device *dev, int count,
491 const unsigned char *buf, const int start_page)
493 int nic_base = NE_BASE;
494 unsigned long dma_start;
495 char *ptrc;
496 short *ptrs;
497 int cnt;
499 /* Round the count up for word writes. Do we need to do this?
500 What effect will an odd byte count have on the 8390?
501 I should check someday. */
502 if (ei_status.word16 && (count & 0x01))
503 count++;
505 /* This *shouldn't* happen. If it does, it's the last thing you'll see */
506 if (ei_status.dmaing) {
507 printk("%s: DMAing conflict in ne_block_output."
508 "[DMAstat:%d][irqlock:%d][intr:%d]\n",
509 dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
510 return;
512 ei_status.dmaing |= 0x01;
513 /* We should already be in page 0, but to be safe... */
514 outb(E8390_PAGE0+E8390_START+E8390_NODMA, nic_base + NE_CMD);
516 outb(ENISR_RDC, nic_base + NE_EN0_ISR);
518 /* Now the normal output. */
519 outb(count & 0xff, nic_base + NE_EN0_RCNTLO);
520 outb(count >> 8, nic_base + NE_EN0_RCNTHI);
521 outb(0x00, nic_base + NE_EN0_RSARLO);
522 outb(start_page, nic_base + NE_EN0_RSARHI);
524 outb(E8390_RWRITE+E8390_START, nic_base + NE_CMD);
525 if (ei_status.word16) {
526 ptrs = (short*)buf;
527 for (cnt = 0; cnt < count>>1; cnt++)
528 outw(*ptrs++, NE_BASE+NE_DATAPORT);
529 } else {
530 ptrc = (char*)buf;
531 for (cnt = 0; cnt < count; cnt++)
532 outb(*ptrc++, NE_BASE + NE_DATAPORT);
535 dma_start = jiffies;
537 while ((inb(NE_BASE + NE_EN0_ISR) & ENISR_RDC) == 0)
538 if (time_after(jiffies, dma_start + 2*HZ/100)) { /* 20ms */
539 printk("%s: timeout waiting for Tx RDC.\n", dev->name);
540 apne_reset_8390(dev);
541 NS8390_init(dev,1);
542 break;
545 outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
546 ei_status.dmaing &= ~0x01;
547 return;
550 static irqreturn_t apne_interrupt(int irq, void *dev_id)
552 unsigned char pcmcia_intreq;
554 if (!(gayle.inten & GAYLE_IRQ_IRQ))
555 return IRQ_NONE;
557 pcmcia_intreq = pcmcia_get_intreq();
559 if (!(pcmcia_intreq & GAYLE_IRQ_IRQ)) {
560 pcmcia_ack_int(pcmcia_intreq);
561 return IRQ_NONE;
563 if (ei_debug > 3)
564 printk("pcmcia intreq = %x\n", pcmcia_intreq);
565 pcmcia_disable_irq(); /* to get rid of the sti() within ei_interrupt */
566 ei_interrupt(irq, dev_id);
567 pcmcia_ack_int(pcmcia_get_intreq());
568 pcmcia_enable_irq();
569 return IRQ_HANDLED;
572 #ifdef MODULE
573 static struct net_device *apne_dev;
575 static int __init apne_module_init(void)
577 apne_dev = apne_probe(-1);
578 if (IS_ERR(apne_dev))
579 return PTR_ERR(apne_dev);
580 return 0;
583 static void __exit apne_module_exit(void)
585 unregister_netdev(apne_dev);
587 pcmcia_disable_irq();
589 free_irq(IRQ_AMIGA_PORTS, apne_dev);
591 pcmcia_reset();
593 release_region(IOBASE, 0x20);
595 free_netdev(apne_dev);
597 module_init(apne_module_init);
598 module_exit(apne_module_exit);
599 #endif
601 static int init_pcmcia(void)
603 u_char config;
604 #ifndef MANUAL_CONFIG
605 u_char tuple[32];
606 int offset_len;
607 #endif
608 u_long offset;
610 pcmcia_reset();
611 pcmcia_program_voltage(PCMCIA_0V);
612 pcmcia_access_speed(PCMCIA_SPEED_250NS);
613 pcmcia_write_enable();
615 #ifdef MANUAL_CONFIG
616 config = MANUAL_CONFIG;
617 #else
618 /* get and write config byte to enable IO port */
620 if (pcmcia_copy_tuple(CISTPL_CFTABLE_ENTRY, tuple, 32) < 3)
621 return 0;
623 config = tuple[2] & 0x3f;
624 #endif
625 #ifdef MANUAL_OFFSET
626 offset = MANUAL_OFFSET;
627 #else
628 if (pcmcia_copy_tuple(CISTPL_CONFIG, tuple, 32) < 6)
629 return 0;
631 offset_len = (tuple[2] & 0x3) + 1;
632 offset = 0;
633 while(offset_len--) {
634 offset = (offset << 8) | tuple[4+offset_len];
636 #endif
638 out_8(GAYLE_ATTRIBUTE+offset, config);
640 return 1;
643 MODULE_LICENSE("GPL");