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