tjh.dev
Linux kernel mirror (for testing)
git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux.git
kernel
os
linux
1/* mac8390.c: New driver for 8390-based Nubus (or Nubus-alike)
2 Ethernet cards on Linux */
3/* Based on the former daynaport.c driver, by Alan Cox. Some code
4 taken from or inspired by skeleton.c by Donald Becker, acenic.c by
5 Jes Sorensen, and ne2k-pci.c by Donald Becker and Paul Gortmaker.
6
7 This software may be used and distributed according to the terms of
8 the GNU Public License, incorporated herein by reference. */
9
10/* 2000-02-28: support added for Dayna and Kinetics cards by
11 A.G.deWijn@phys.uu.nl */
12/* 2000-04-04: support added for Dayna2 by bart@etpmod.phys.tue.nl */
13/* 2001-04-18: support for DaynaPort E/LC-M by rayk@knightsmanor.org */
14/* 2001-05-15: support for Cabletron ported from old daynaport driver
15 * and fixed access to Sonic Sys card which masquerades as a Farallon
16 * by rayk@knightsmanor.org */
17/* 2002-12-30: Try to support more cards, some clues from NetBSD driver */
18/* 2003-12-26: Make sure Asante cards always work. */
19
20#include <linux/module.h>
21#include <linux/kernel.h>
22#include <linux/types.h>
23#include <linux/fcntl.h>
24#include <linux/interrupt.h>
25#include <linux/ptrace.h>
26#include <linux/ioport.h>
27#include <linux/nubus.h>
28#include <linux/in.h>
29#include <linux/slab.h>
30#include <linux/string.h>
31#include <linux/errno.h>
32#include <linux/init.h>
33#include <linux/netdevice.h>
34#include <linux/etherdevice.h>
35#include <linux/skbuff.h>
36#include <linux/bitops.h>
37
38#include <asm/system.h>
39#include <asm/io.h>
40#include <asm/dma.h>
41#include <asm/hwtest.h>
42#include <asm/macints.h>
43
44static char version[] =
45 "mac8390.c: v0.4 2001-05-15 David Huggins-Daines <dhd@debian.org> and others\n";
46
47#define EI_SHIFT(x) (ei_local->reg_offset[x])
48#define ei_inb(port) in_8(port)
49#define ei_outb(val,port) out_8(port,val)
50#define ei_inb_p(port) in_8(port)
51#define ei_outb_p(val,port) out_8(port,val)
52
53#include "lib8390.c"
54
55#define WD_START_PG 0x00 /* First page of TX buffer */
56#define CABLETRON_RX_START_PG 0x00 /* First page of RX buffer */
57#define CABLETRON_RX_STOP_PG 0x30 /* Last page +1 of RX ring */
58#define CABLETRON_TX_START_PG CABLETRON_RX_STOP_PG /* First page of TX buffer */
59
60/* Unfortunately it seems we have to hardcode these for the moment */
61/* Shouldn't the card know about this? Does anyone know where to read it off the card? Do we trust the data provided by the card? */
62
63#define DAYNA_8390_BASE 0x80000
64#define DAYNA_8390_MEM 0x00000
65
66#define CABLETRON_8390_BASE 0x90000
67#define CABLETRON_8390_MEM 0x00000
68
69#define INTERLAN_8390_BASE 0xE0000
70#define INTERLAN_8390_MEM 0xD0000
71
72enum mac8390_type {
73 MAC8390_NONE = -1,
74 MAC8390_APPLE,
75 MAC8390_ASANTE,
76 MAC8390_FARALLON,
77 MAC8390_CABLETRON,
78 MAC8390_DAYNA,
79 MAC8390_INTERLAN,
80 MAC8390_KINETICS,
81};
82
83static const char * cardname[] = {
84 "apple",
85 "asante",
86 "farallon",
87 "cabletron",
88 "dayna",
89 "interlan",
90 "kinetics",
91};
92
93static int word16[] = {
94 1, /* apple */
95 1, /* asante */
96 1, /* farallon */
97 1, /* cabletron */
98 0, /* dayna */
99 1, /* interlan */
100 0, /* kinetics */
101};
102
103/* on which cards do we use NuBus resources? */
104static int useresources[] = {
105 1, /* apple */
106 1, /* asante */
107 1, /* farallon */
108 0, /* cabletron */
109 0, /* dayna */
110 0, /* interlan */
111 0, /* kinetics */
112};
113
114enum mac8390_access {
115 ACCESS_UNKNOWN = 0,
116 ACCESS_32,
117 ACCESS_16,
118};
119
120extern int mac8390_memtest(struct net_device * dev);
121static int mac8390_initdev(struct net_device * dev, struct nubus_dev * ndev,
122 enum mac8390_type type);
123
124static int mac8390_open(struct net_device * dev);
125static int mac8390_close(struct net_device * dev);
126static void mac8390_no_reset(struct net_device *dev);
127static void interlan_reset(struct net_device *dev);
128
129/* Sane (32-bit chunk memory read/write) - Some Farallon and Apple do this*/
130static void sane_get_8390_hdr(struct net_device *dev,
131 struct e8390_pkt_hdr *hdr, int ring_page);
132static void sane_block_input(struct net_device * dev, int count,
133 struct sk_buff * skb, int ring_offset);
134static void sane_block_output(struct net_device * dev, int count,
135 const unsigned char * buf, const int start_page);
136
137/* dayna_memcpy to and from card */
138static void dayna_memcpy_fromcard(struct net_device *dev, void *to,
139 int from, int count);
140static void dayna_memcpy_tocard(struct net_device *dev, int to,
141 const void *from, int count);
142
143/* Dayna - Dayna/Kinetics use this */
144static void dayna_get_8390_hdr(struct net_device *dev,
145 struct e8390_pkt_hdr *hdr, int ring_page);
146static void dayna_block_input(struct net_device *dev, int count,
147 struct sk_buff *skb, int ring_offset);
148static void dayna_block_output(struct net_device *dev, int count,
149 const unsigned char *buf, int start_page);
150
151#define memcpy_fromio(a,b,c) memcpy((a),(void *)(b),(c))
152#define memcpy_toio(a,b,c) memcpy((void *)(a),(b),(c))
153
154/* Slow Sane (16-bit chunk memory read/write) Cabletron uses this */
155static void slow_sane_get_8390_hdr(struct net_device *dev,
156 struct e8390_pkt_hdr *hdr, int ring_page);
157static void slow_sane_block_input(struct net_device *dev, int count,
158 struct sk_buff *skb, int ring_offset);
159static void slow_sane_block_output(struct net_device *dev, int count,
160 const unsigned char *buf, int start_page);
161static void word_memcpy_tocard(void *tp, const void *fp, int count);
162static void word_memcpy_fromcard(void *tp, const void *fp, int count);
163
164static enum mac8390_type __init mac8390_ident(struct nubus_dev *dev)
165{
166 switch (dev->dr_sw) {
167 case NUBUS_DRSW_3COM:
168 switch (dev->dr_hw) {
169 case NUBUS_DRHW_APPLE_SONIC_NB:
170 case NUBUS_DRHW_APPLE_SONIC_LC:
171 case NUBUS_DRHW_SONNET:
172 return MAC8390_NONE;
173 break;
174 default:
175 return MAC8390_APPLE;
176 break;
177 }
178 break;
179
180 case NUBUS_DRSW_APPLE:
181 switch (dev->dr_hw) {
182 case NUBUS_DRHW_ASANTE_LC:
183 return MAC8390_NONE;
184 break;
185 case NUBUS_DRHW_CABLETRON:
186 return MAC8390_CABLETRON;
187 break;
188 default:
189 return MAC8390_APPLE;
190 break;
191 }
192 break;
193
194 case NUBUS_DRSW_ASANTE:
195 return MAC8390_ASANTE;
196 break;
197
198 case NUBUS_DRSW_TECHWORKS:
199 case NUBUS_DRSW_DAYNA2:
200 case NUBUS_DRSW_DAYNA_LC:
201 if (dev->dr_hw == NUBUS_DRHW_CABLETRON)
202 return MAC8390_CABLETRON;
203 else
204 return MAC8390_APPLE;
205 break;
206
207 case NUBUS_DRSW_FARALLON:
208 return MAC8390_FARALLON;
209 break;
210
211 case NUBUS_DRSW_KINETICS:
212 switch (dev->dr_hw) {
213 case NUBUS_DRHW_INTERLAN:
214 return MAC8390_INTERLAN;
215 break;
216 default:
217 return MAC8390_KINETICS;
218 break;
219 }
220 break;
221
222 case NUBUS_DRSW_DAYNA:
223 // These correspond to Dayna Sonic cards
224 // which use the macsonic driver
225 if (dev->dr_hw == NUBUS_DRHW_SMC9194 ||
226 dev->dr_hw == NUBUS_DRHW_INTERLAN )
227 return MAC8390_NONE;
228 else
229 return MAC8390_DAYNA;
230 break;
231 }
232 return MAC8390_NONE;
233}
234
235static enum mac8390_access __init mac8390_testio(volatile unsigned long membase)
236{
237 unsigned long outdata = 0xA5A0B5B0;
238 unsigned long indata = 0x00000000;
239 /* Try writing 32 bits */
240 memcpy((char *)membase, (char *)&outdata, 4);
241 /* Now compare them */
242 if (memcmp((char *)&outdata, (char *)membase, 4) == 0)
243 return ACCESS_32;
244 /* Write 16 bit output */
245 word_memcpy_tocard((char *)membase, (char *)&outdata, 4);
246 /* Now read it back */
247 word_memcpy_fromcard((char *)&indata, (char *)membase, 4);
248 if (outdata == indata)
249 return ACCESS_16;
250 return ACCESS_UNKNOWN;
251}
252
253static int __init mac8390_memsize(unsigned long membase)
254{
255 unsigned long flags;
256 int i, j;
257
258 local_irq_save(flags);
259 /* Check up to 32K in 4K increments */
260 for (i = 0; i < 8; i++) {
261 volatile unsigned short *m = (unsigned short *) (membase + (i * 0x1000));
262
263 /* Unwriteable - we have a fully decoded card and the
264 RAM end located */
265 if (hwreg_present(m) == 0)
266 break;
267
268 /* write a distinctive byte */
269 *m = 0xA5A0 | i;
270 /* check that we read back what we wrote */
271 if (*m != (0xA5A0 | i))
272 break;
273
274 /* check for partial decode and wrap */
275 for (j = 0; j < i; j++) {
276 volatile unsigned short *p = (unsigned short *) (membase + (j * 0x1000));
277 if (*p != (0xA5A0 | j))
278 break;
279 }
280 }
281 local_irq_restore(flags);
282 /* in any case, we stopped once we tried one block too many,
283 or once we reached 32K */
284 return i * 0x1000;
285}
286
287struct net_device * __init mac8390_probe(int unit)
288{
289 struct net_device *dev;
290 volatile unsigned short *i;
291 int version_disp = 0;
292 struct nubus_dev * ndev = NULL;
293 int err = -ENODEV;
294
295 struct nubus_dir dir;
296 struct nubus_dirent ent;
297 int offset;
298 static unsigned int slots;
299
300 enum mac8390_type cardtype;
301
302 /* probably should check for Nubus instead */
303
304 if (!MACH_IS_MAC)
305 return ERR_PTR(-ENODEV);
306
307 dev = ____alloc_ei_netdev(0);
308 if (!dev)
309 return ERR_PTR(-ENOMEM);
310
311 if (unit >= 0)
312 sprintf(dev->name, "eth%d", unit);
313
314 while ((ndev = nubus_find_type(NUBUS_CAT_NETWORK, NUBUS_TYPE_ETHERNET, ndev))) {
315 /* Have we seen it already? */
316 if (slots & (1<<ndev->board->slot))
317 continue;
318 slots |= 1<<ndev->board->slot;
319
320 if ((cardtype = mac8390_ident(ndev)) == MAC8390_NONE)
321 continue;
322
323 if (version_disp == 0) {
324 version_disp = 1;
325 printk(version);
326 }
327
328 dev->irq = SLOT2IRQ(ndev->board->slot);
329 /* This is getting to be a habit */
330 dev->base_addr = ndev->board->slot_addr | ((ndev->board->slot&0xf) << 20);
331
332 /* Get some Nubus info - we will trust the card's idea
333 of where its memory and registers are. */
334
335 if (nubus_get_func_dir(ndev, &dir) == -1) {
336 printk(KERN_ERR "%s: Unable to get Nubus functional"
337 " directory for slot %X!\n",
338 dev->name, ndev->board->slot);
339 continue;
340 }
341
342 /* Get the MAC address */
343 if ((nubus_find_rsrc(&dir, NUBUS_RESID_MAC_ADDRESS, &ent)) == -1) {
344 printk(KERN_INFO "%s: Couldn't get MAC address!\n",
345 dev->name);
346 continue;
347 } else {
348 nubus_get_rsrc_mem(dev->dev_addr, &ent, 6);
349 }
350
351 if (useresources[cardtype] == 1) {
352 nubus_rewinddir(&dir);
353 if (nubus_find_rsrc(&dir, NUBUS_RESID_MINOR_BASEOS, &ent) == -1) {
354 printk(KERN_ERR "%s: Memory offset resource"
355 " for slot %X not found!\n",
356 dev->name, ndev->board->slot);
357 continue;
358 }
359 nubus_get_rsrc_mem(&offset, &ent, 4);
360 dev->mem_start = dev->base_addr + offset;
361 /* yes, this is how the Apple driver does it */
362 dev->base_addr = dev->mem_start + 0x10000;
363 nubus_rewinddir(&dir);
364 if (nubus_find_rsrc(&dir, NUBUS_RESID_MINOR_LENGTH, &ent) == -1) {
365 printk(KERN_INFO "%s: Memory length resource"
366 " for slot %X not found"
367 ", probing\n",
368 dev->name, ndev->board->slot);
369 offset = mac8390_memsize(dev->mem_start);
370 } else {
371 nubus_get_rsrc_mem(&offset, &ent, 4);
372 }
373 dev->mem_end = dev->mem_start + offset;
374 } else {
375 switch (cardtype) {
376 case MAC8390_KINETICS:
377 case MAC8390_DAYNA: /* it's the same */
378 dev->base_addr =
379 (int)(ndev->board->slot_addr +
380 DAYNA_8390_BASE);
381 dev->mem_start =
382 (int)(ndev->board->slot_addr +
383 DAYNA_8390_MEM);
384 dev->mem_end =
385 dev->mem_start +
386 mac8390_memsize(dev->mem_start);
387 break;
388 case MAC8390_INTERLAN:
389 dev->base_addr =
390 (int)(ndev->board->slot_addr +
391 INTERLAN_8390_BASE);
392 dev->mem_start =
393 (int)(ndev->board->slot_addr +
394 INTERLAN_8390_MEM);
395 dev->mem_end =
396 dev->mem_start +
397 mac8390_memsize(dev->mem_start);
398 break;
399 case MAC8390_CABLETRON:
400 dev->base_addr =
401 (int)(ndev->board->slot_addr +
402 CABLETRON_8390_BASE);
403 dev->mem_start =
404 (int)(ndev->board->slot_addr +
405 CABLETRON_8390_MEM);
406 /* The base address is unreadable if 0x00
407 * has been written to the command register
408 * Reset the chip by writing E8390_NODMA +
409 * E8390_PAGE0 + E8390_STOP just to be
410 * sure
411 */
412 i = (void *)dev->base_addr;
413 *i = 0x21;
414 dev->mem_end =
415 dev->mem_start +
416 mac8390_memsize(dev->mem_start);
417 break;
418
419 default:
420 printk(KERN_ERR "Card type %s is"
421 " unsupported, sorry\n",
422 ndev->board->name);
423 continue;
424 }
425 }
426
427 /* Do the nasty 8390 stuff */
428 if (!mac8390_initdev(dev, ndev, cardtype))
429 break;
430 }
431
432 if (!ndev)
433 goto out;
434 err = register_netdev(dev);
435 if (err)
436 goto out;
437 return dev;
438
439out:
440 free_netdev(dev);
441 return ERR_PTR(err);
442}
443
444#ifdef MODULE
445MODULE_AUTHOR("David Huggins-Daines <dhd@debian.org> and others");
446MODULE_DESCRIPTION("Macintosh NS8390-based Nubus Ethernet driver");
447MODULE_LICENSE("GPL");
448
449/* overkill, of course */
450static struct net_device *dev_mac8390[15];
451int init_module(void)
452{
453 int i;
454 for (i = 0; i < 15; i++) {
455 struct net_device *dev = mac8390_probe(-1);
456 if (IS_ERR(dev))
457 break;
458 dev_mac890[i] = dev;
459 }
460 if (!i) {
461 printk(KERN_NOTICE "mac8390.c: No useable cards found, driver NOT installed.\n");
462 return -ENODEV;
463 }
464 return 0;
465}
466
467void cleanup_module(void)
468{
469 int i;
470 for (i = 0; i < 15; i++) {
471 struct net_device *dev = dev_mac890[i];
472 if (dev) {
473 unregister_netdev(dev);
474 free_netdev(dev);
475 }
476 }
477}
478
479#endif /* MODULE */
480
481static int __init mac8390_initdev(struct net_device * dev, struct nubus_dev * ndev,
482 enum mac8390_type type)
483{
484 static u32 fwrd4_offsets[16]={
485 0, 4, 8, 12,
486 16, 20, 24, 28,
487 32, 36, 40, 44,
488 48, 52, 56, 60
489 };
490 static u32 back4_offsets[16]={
491 60, 56, 52, 48,
492 44, 40, 36, 32,
493 28, 24, 20, 16,
494 12, 8, 4, 0
495 };
496 static u32 fwrd2_offsets[16]={
497 0, 2, 4, 6,
498 8, 10, 12, 14,
499 16, 18, 20, 22,
500 24, 26, 28, 30
501 };
502
503 int access_bitmode = 0;
504
505 /* Now fill in our stuff */
506 dev->open = &mac8390_open;
507 dev->stop = &mac8390_close;
508#ifdef CONFIG_NET_POLL_CONTROLLER
509 dev->poll_controller = __ei_poll;
510#endif
511
512 /* GAR, ei_status is actually a macro even though it looks global */
513 ei_status.name = cardname[type];
514 ei_status.word16 = word16[type];
515
516 /* Cabletron's TX/RX buffers are backwards */
517 if (type == MAC8390_CABLETRON) {
518 ei_status.tx_start_page = CABLETRON_TX_START_PG;
519 ei_status.rx_start_page = CABLETRON_RX_START_PG;
520 ei_status.stop_page = CABLETRON_RX_STOP_PG;
521 ei_status.rmem_start = dev->mem_start;
522 ei_status.rmem_end = dev->mem_start + CABLETRON_RX_STOP_PG*256;
523 } else {
524 ei_status.tx_start_page = WD_START_PG;
525 ei_status.rx_start_page = WD_START_PG + TX_PAGES;
526 ei_status.stop_page = (dev->mem_end - dev->mem_start)/256;
527 ei_status.rmem_start = dev->mem_start + TX_PAGES*256;
528 ei_status.rmem_end = dev->mem_end;
529 }
530
531 /* Fill in model-specific information and functions */
532 switch(type) {
533 case MAC8390_FARALLON:
534 case MAC8390_APPLE:
535 switch(mac8390_testio(dev->mem_start)) {
536 case ACCESS_UNKNOWN:
537 printk("Don't know how to access card memory!\n");
538 return -ENODEV;
539 break;
540
541 case ACCESS_16:
542 /* 16 bit card, register map is reversed */
543 ei_status.reset_8390 = &mac8390_no_reset;
544 ei_status.block_input = &slow_sane_block_input;
545 ei_status.block_output = &slow_sane_block_output;
546 ei_status.get_8390_hdr = &slow_sane_get_8390_hdr;
547 ei_status.reg_offset = back4_offsets;
548 break;
549
550 case ACCESS_32:
551 /* 32 bit card, register map is reversed */
552 ei_status.reset_8390 = &mac8390_no_reset;
553 ei_status.block_input = &sane_block_input;
554 ei_status.block_output = &sane_block_output;
555 ei_status.get_8390_hdr = &sane_get_8390_hdr;
556 ei_status.reg_offset = back4_offsets;
557 access_bitmode = 1;
558 break;
559 }
560 break;
561
562 case MAC8390_ASANTE:
563 /* Some Asante cards pass the 32 bit test
564 * but overwrite system memory when run at 32 bit.
565 * so we run them all at 16 bit.
566 */
567 ei_status.reset_8390 = &mac8390_no_reset;
568 ei_status.block_input = &slow_sane_block_input;
569 ei_status.block_output = &slow_sane_block_output;
570 ei_status.get_8390_hdr = &slow_sane_get_8390_hdr;
571 ei_status.reg_offset = back4_offsets;
572 break;
573
574 case MAC8390_CABLETRON:
575 /* 16 bit card, register map is short forward */
576 ei_status.reset_8390 = &mac8390_no_reset;
577 ei_status.block_input = &slow_sane_block_input;
578 ei_status.block_output = &slow_sane_block_output;
579 ei_status.get_8390_hdr = &slow_sane_get_8390_hdr;
580 ei_status.reg_offset = fwrd2_offsets;
581 break;
582
583 case MAC8390_DAYNA:
584 case MAC8390_KINETICS:
585 /* 16 bit memory, register map is forward */
586 /* dayna and similar */
587 ei_status.reset_8390 = &mac8390_no_reset;
588 ei_status.block_input = &dayna_block_input;
589 ei_status.block_output = &dayna_block_output;
590 ei_status.get_8390_hdr = &dayna_get_8390_hdr;
591 ei_status.reg_offset = fwrd4_offsets;
592 break;
593
594 case MAC8390_INTERLAN:
595 /* 16 bit memory, register map is forward */
596 ei_status.reset_8390 = &interlan_reset;
597 ei_status.block_input = &slow_sane_block_input;
598 ei_status.block_output = &slow_sane_block_output;
599 ei_status.get_8390_hdr = &slow_sane_get_8390_hdr;
600 ei_status.reg_offset = fwrd4_offsets;
601 break;
602
603 default:
604 printk(KERN_ERR "Card type %s is unsupported, sorry\n", ndev->board->name);
605 return -ENODEV;
606 }
607
608 __NS8390_init(dev, 0);
609
610 /* Good, done, now spit out some messages */
611 printk(KERN_INFO "%s: %s in slot %X (type %s)\n",
612 dev->name, ndev->board->name, ndev->board->slot, cardname[type]);
613 printk(KERN_INFO "MAC ");
614 {
615 int i;
616 for (i = 0; i < 6; i++) {
617 printk("%2.2x", dev->dev_addr[i]);
618 if (i < 5)
619 printk(":");
620 }
621 }
622 printk(" IRQ %d, %d KB shared memory at %#lx, %d-bit access.\n",
623 dev->irq, (int)((dev->mem_end - dev->mem_start)/0x1000) * 4,
624 dev->mem_start, access_bitmode?32:16);
625 return 0;
626}
627
628static int mac8390_open(struct net_device *dev)
629{
630 __ei_open(dev);
631 if (request_irq(dev->irq, __ei_interrupt, 0, "8390 Ethernet", dev)) {
632 printk ("%s: unable to get IRQ %d.\n", dev->name, dev->irq);
633 return -EAGAIN;
634 }
635 return 0;
636}
637
638static int mac8390_close(struct net_device *dev)
639{
640 free_irq(dev->irq, dev);
641 __ei_close(dev);
642 return 0;
643}
644
645static void mac8390_no_reset(struct net_device *dev)
646{
647 ei_status.txing = 0;
648 if (ei_debug > 1)
649 printk("reset not supported\n");
650 return;
651}
652
653static void interlan_reset(struct net_device *dev)
654{
655 unsigned char *target=nubus_slot_addr(IRQ2SLOT(dev->irq));
656 if (ei_debug > 1)
657 printk("Need to reset the NS8390 t=%lu...", jiffies);
658 ei_status.txing = 0;
659 target[0xC0000] = 0;
660 if (ei_debug > 1)
661 printk("reset complete\n");
662 return;
663}
664
665/* dayna_memcpy_fromio/dayna_memcpy_toio */
666/* directly from daynaport.c by Alan Cox */
667static void dayna_memcpy_fromcard(struct net_device *dev, void *to, int from, int count)
668{
669 volatile unsigned char *ptr;
670 unsigned char *target=to;
671 from<<=1; /* word, skip overhead */
672 ptr=(unsigned char *)(dev->mem_start+from);
673 /* Leading byte? */
674 if (from&2) {
675 *target++ = ptr[-1];
676 ptr += 2;
677 count--;
678 }
679 while(count>=2)
680 {
681 *(unsigned short *)target = *(unsigned short volatile *)ptr;
682 ptr += 4; /* skip cruft */
683 target += 2;
684 count-=2;
685 }
686 /* Trailing byte? */
687 if(count)
688 *target = *ptr;
689}
690
691static void dayna_memcpy_tocard(struct net_device *dev, int to, const void *from, int count)
692{
693 volatile unsigned short *ptr;
694 const unsigned char *src=from;
695 to<<=1; /* word, skip overhead */
696 ptr=(unsigned short *)(dev->mem_start+to);
697 /* Leading byte? */
698 if (to&2) { /* avoid a byte write (stomps on other data) */
699 ptr[-1] = (ptr[-1]&0xFF00)|*src++;
700 ptr++;
701 count--;
702 }
703 while(count>=2)
704 {
705 *ptr++=*(unsigned short *)src; /* Copy and */
706 ptr++; /* skip cruft */
707 src += 2;
708 count-=2;
709 }
710 /* Trailing byte? */
711 if(count)
712 {
713 /* card doesn't like byte writes */
714 *ptr=(*ptr&0x00FF)|(*src << 8);
715 }
716}
717
718/* sane block input/output */
719static void sane_get_8390_hdr(struct net_device *dev,
720 struct e8390_pkt_hdr *hdr, int ring_page)
721{
722 unsigned long hdr_start = (ring_page - WD_START_PG)<<8;
723 memcpy_fromio((void *)hdr, (char *)dev->mem_start + hdr_start, 4);
724 /* Fix endianness */
725 hdr->count = swab16(hdr->count);
726}
727
728static void sane_block_input(struct net_device *dev, int count,
729 struct sk_buff *skb, int ring_offset)
730{
731 unsigned long xfer_base = ring_offset - (WD_START_PG<<8);
732 unsigned long xfer_start = xfer_base + dev->mem_start;
733
734 if (xfer_start + count > ei_status.rmem_end) {
735 /* We must wrap the input move. */
736 int semi_count = ei_status.rmem_end - xfer_start;
737 memcpy_fromio(skb->data, (char *)dev->mem_start + xfer_base, semi_count);
738 count -= semi_count;
739 memcpy_toio(skb->data + semi_count, (char *)ei_status.rmem_start, count);
740 } else {
741 memcpy_fromio(skb->data, (char *)dev->mem_start + xfer_base, count);
742 }
743}
744
745static void sane_block_output(struct net_device *dev, int count,
746 const unsigned char *buf, int start_page)
747{
748 long shmem = (start_page - WD_START_PG)<<8;
749
750 memcpy_toio((char *)dev->mem_start + shmem, buf, count);
751}
752
753/* dayna block input/output */
754static void dayna_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
755{
756 unsigned long hdr_start = (ring_page - WD_START_PG)<<8;
757
758 dayna_memcpy_fromcard(dev, (void *)hdr, hdr_start, 4);
759 /* Fix endianness */
760 hdr->count=(hdr->count&0xFF)<<8|(hdr->count>>8);
761}
762
763static void dayna_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
764{
765 unsigned long xfer_base = ring_offset - (WD_START_PG<<8);
766 unsigned long xfer_start = xfer_base+dev->mem_start;
767
768 /* Note the offset math is done in card memory space which is word
769 per long onto our space. */
770
771 if (xfer_start + count > ei_status.rmem_end)
772 {
773 /* We must wrap the input move. */
774 int semi_count = ei_status.rmem_end - xfer_start;
775 dayna_memcpy_fromcard(dev, skb->data, xfer_base, semi_count);
776 count -= semi_count;
777 dayna_memcpy_fromcard(dev, skb->data + semi_count,
778 ei_status.rmem_start - dev->mem_start,
779 count);
780 }
781 else
782 {
783 dayna_memcpy_fromcard(dev, skb->data, xfer_base, count);
784 }
785}
786
787static void dayna_block_output(struct net_device *dev, int count, const unsigned char *buf,
788 int start_page)
789{
790 long shmem = (start_page - WD_START_PG)<<8;
791
792 dayna_memcpy_tocard(dev, shmem, buf, count);
793}
794
795/* Cabletron block I/O */
796static void slow_sane_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
797 int ring_page)
798{
799 unsigned long hdr_start = (ring_page - WD_START_PG)<<8;
800 word_memcpy_fromcard((void *)hdr, (char *)dev->mem_start+hdr_start, 4);
801 /* Register endianism - fix here rather than 8390.c */
802 hdr->count = (hdr->count&0xFF)<<8|(hdr->count>>8);
803}
804
805static void slow_sane_block_input(struct net_device *dev, int count, struct sk_buff *skb,
806 int ring_offset)
807{
808 unsigned long xfer_base = ring_offset - (WD_START_PG<<8);
809 unsigned long xfer_start = xfer_base+dev->mem_start;
810
811 if (xfer_start + count > ei_status.rmem_end)
812 {
813 /* We must wrap the input move. */
814 int semi_count = ei_status.rmem_end - xfer_start;
815 word_memcpy_fromcard(skb->data, (char *)dev->mem_start +
816 xfer_base, semi_count);
817 count -= semi_count;
818 word_memcpy_fromcard(skb->data + semi_count,
819 (char *)ei_status.rmem_start, count);
820 }
821 else
822 {
823 word_memcpy_fromcard(skb->data, (char *)dev->mem_start +
824 xfer_base, count);
825 }
826}
827
828static void slow_sane_block_output(struct net_device *dev, int count, const unsigned char *buf,
829 int start_page)
830{
831 long shmem = (start_page - WD_START_PG)<<8;
832
833 word_memcpy_tocard((char *)dev->mem_start + shmem, buf, count);
834}
835
836static void word_memcpy_tocard(void *tp, const void *fp, int count)
837{
838 volatile unsigned short *to = tp;
839 const unsigned short *from = fp;
840
841 count++;
842 count/=2;
843
844 while(count--)
845 *to++=*from++;
846}
847
848static void word_memcpy_fromcard(void *tp, const void *fp, int count)
849{
850 unsigned short *to = tp;
851 const volatile unsigned short *from = fp;
852
853 count++;
854 count/=2;
855
856 while(count--)
857 *to++=*from++;
858}
859
860