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