Merge branch 'for-linus' of master.kernel.org:/pub/scm/linux/kernel/git/jikos/hid
[linux-2.6] / drivers / net / depca.c
1 /*  depca.c: A DIGITAL DEPCA & EtherWORKS ethernet driver for linux.
2
3     Written 1994, 1995 by David C. Davies.
4
5
6                       Copyright 1994 David C. Davies
7                                    and
8                          United States Government
9          (as represented by the Director, National Security Agency).
10
11                Copyright 1995  Digital Equipment Corporation.
12
13
14     This software may be used and distributed according to the terms of
15     the GNU General Public License, incorporated herein by reference.
16
17     This driver is written for the Digital Equipment Corporation series
18     of DEPCA and EtherWORKS ethernet cards:
19
20         DEPCA       (the original)
21         DE100
22         DE101
23         DE200 Turbo
24         DE201 Turbo
25         DE202 Turbo (TP BNC)
26         DE210
27         DE422       (EISA)
28
29     The  driver has been tested on DE100, DE200 and DE202 cards  in  a
30     relatively busy network. The DE422 has been tested a little.
31
32     This  driver will NOT work   for the DE203,  DE204  and DE205 series  of
33     cards,  since they have  a  new custom ASIC in   place of the AMD  LANCE
34     chip.  See the 'ewrk3.c'   driver in the  Linux  source tree for running
35     those cards.
36
37     I have benchmarked the driver with a  DE100 at 595kB/s to (542kB/s from)
38     a DECstation 5000/200.
39
40     The author may be reached at davies@maniac.ultranet.com
41
42     =========================================================================
43
44     The  driver was originally based  on   the 'lance.c' driver from  Donald
45     Becker   which  is included with  the  standard  driver distribution for
46     linux.  V0.4  is  a complete  re-write  with only  the kernel  interface
47     remaining from the original code.
48
49     1) Lance.c code in /linux/drivers/net/
50     2) "Ethernet/IEEE 802.3 Family. 1992 World Network Data Book/Handbook",
51        AMD, 1992 [(800) 222-9323].
52     3) "Am79C90 CMOS Local Area Network Controller for Ethernet (C-LANCE)",
53        AMD, Pub. #17881, May 1993.
54     4) "Am79C960 PCnet-ISA(tm), Single-Chip Ethernet Controller for ISA",
55        AMD, Pub. #16907, May 1992
56     5) "DEC EtherWORKS LC Ethernet Controller Owners Manual",
57        Digital Equipment corporation, 1990, Pub. #EK-DE100-OM.003
58     6) "DEC EtherWORKS Turbo Ethernet Controller Owners Manual",
59        Digital Equipment corporation, 1990, Pub. #EK-DE200-OM.003
60     7) "DEPCA Hardware Reference Manual", Pub. #EK-DEPCA-PR
61        Digital Equipment Corporation, 1989
62     8) "DEC EtherWORKS Turbo_(TP BNC) Ethernet Controller Owners Manual",
63        Digital Equipment corporation, 1991, Pub. #EK-DE202-OM.001
64
65
66     Peter Bauer's depca.c (V0.5) was referred to when debugging V0.1 of this
67     driver.
68
69     The original DEPCA  card requires that the  ethernet ROM address counter
70     be enabled to count and has an 8 bit NICSR.  The ROM counter enabling is
71     only  done when a  0x08 is read as the  first address octet (to minimise
72     the chances  of writing over some  other hardware's  I/O register).  The
73     NICSR accesses   have been changed  to  byte accesses  for all the cards
74     supported by this driver, since there is only one  useful bit in the MSB
75     (remote boot timeout) and it  is not used.  Also, there  is a maximum of
76     only 48kB network  RAM for this  card.  My thanks  to Torbjorn Lindh for
77     help debugging all this (and holding my feet to  the fire until I got it
78     right).
79
80     The DE200  series  boards have  on-board 64kB  RAM for  use  as a shared
81     memory network  buffer. Only the DE100  cards make use  of a  2kB buffer
82     mode which has not  been implemented in  this driver (only the 32kB  and
83     64kB modes are supported [16kB/48kB for the original DEPCA]).
84
85     At the most only 2 DEPCA cards can  be supported on  the ISA bus because
86     there is only provision  for two I/O base addresses  on each card (0x300
87     and 0x200). The I/O address is detected by searching for a byte sequence
88     in the Ethernet station address PROM at the expected I/O address for the
89     Ethernet  PROM.   The shared memory  base   address  is 'autoprobed'  by
90     looking  for the self  test PROM  and detecting the  card name.   When a
91     second  DEPCA is  detected,  information  is   placed in the   base_addr
92     variable of the  next device structure (which  is created if necessary),
93     thus  enabling ethif_probe  initialization  for the device.  More than 2
94     EISA cards can  be  supported, but  care will  be  needed assigning  the
95     shared memory to ensure that each slot has the  correct IRQ, I/O address
96     and shared memory address assigned.
97
98     ************************************************************************
99
100     NOTE: If you are using two  ISA DEPCAs, it is  important that you assign
101     the base memory addresses correctly.   The  driver autoprobes I/O  0x300
102     then 0x200.  The  base memory address for  the first device must be less
103     than that of the second so that the auto probe will correctly assign the
104     I/O and memory addresses on the same card.  I can't think of a way to do
105     this unambiguously at the moment, since there is nothing on the cards to
106     tie I/O and memory information together.
107
108     I am unable  to  test  2 cards   together for now,    so this  code   is
109     unchecked. All reports, good or bad, are welcome.
110
111     ************************************************************************
112
113     The board IRQ   setting must be  at an  unused IRQ which  is auto-probed
114     using Donald Becker's autoprobe routines. DEPCA and DE100 board IRQs are
115     {2,3,4,5,7}, whereas the  DE200 is at {5,9,10,11,15}.  Note that IRQ2 is
116     really IRQ9 in machines with 16 IRQ lines.
117
118     No 16MB memory  limitation should exist with this  driver as DMA is  not
119     used and the common memory area is in low memory on the network card (my
120     current system has 20MB and I've not had problems yet).
121
122     The ability to load this driver as a loadable module has been added. To
123     utilise this ability, you have to do <8 things:
124
125     0) have a copy of the loadable modules code installed on your system.
126     1) copy depca.c from the  /linux/drivers/net directory to your favourite
127     temporary directory.
128     2) if you wish, edit the  source code near  line 1530 to reflect the I/O
129     address and IRQ you're using (see also 5).
130     3) compile  depca.c, but include -DMODULE in  the command line to ensure
131     that the correct bits are compiled (see end of source code).
132     4) if you are wanting to add a new  card, goto 5. Otherwise, recompile a
133     kernel with the depca configuration turned off and reboot.
134     5) insmod depca.o [irq=7] [io=0x200] [mem=0xd0000] [adapter_name=DE100]
135        [Alan Cox: Changed the code to allow command line irq/io assignments]
136        [Dave Davies: Changed the code to allow command line mem/name
137                                                                 assignments]
138     6) run the net startup bits for your eth?? interface manually
139     (usually /etc/rc.inet[12] at boot time).
140     7) enjoy!
141
142     Note that autoprobing is not allowed in loadable modules - the system is
143     already up and running and you're messing with interrupts.
144
145     To unload a module, turn off the associated interface
146     'ifconfig eth?? down' then 'rmmod depca'.
147
148     To assign a base memory address for the shared memory  when running as a
149     loadable module, see 5 above.  To include the adapter  name (if you have
150     no PROM  but know the card name)  also see 5  above. Note that this last
151     option  will not work  with kernel  built-in  depca's.
152
153     The shared memory assignment for a loadable module  makes sense to avoid
154     the 'memory autoprobe' picking the wrong shared memory  (for the case of
155     2 depca's in a PC).
156
157     ************************************************************************
158     Support for MCA EtherWORKS cards added 11-3-98.
159     Verified to work with up to 2 DE212 cards in a system (although not
160       fully stress-tested).
161
162     Currently known bugs/limitations:
163
164     Note:  with the MCA stuff as a module, it trusts the MCA configuration,
165            not the command line for IRQ and memory address.  You can
166            specify them if you want, but it will throw your values out.
167            You still have to pass the IO address it was configured as
168            though.
169
170     ************************************************************************
171     TO DO:
172     ------
173
174
175     Revision History
176     ----------------
177
178     Version   Date        Description
179
180       0.1     25-jan-94   Initial writing.
181       0.2     27-jan-94   Added LANCE TX hardware buffer chaining.
182       0.3      1-feb-94   Added multiple DEPCA support.
183       0.31     4-feb-94   Added DE202 recognition.
184       0.32    19-feb-94   Tidy up. Improve multi-DEPCA support.
185       0.33    25-feb-94   Fix DEPCA ethernet ROM counter enable.
186                           Add jabber packet fix from murf@perftech.com
187                           and becker@super.org
188       0.34     7-mar-94   Fix DEPCA max network memory RAM & NICSR access.
189       0.35     8-mar-94   Added DE201 recognition. Tidied up.
190       0.351   30-apr-94   Added EISA support. Added DE422 recognition.
191       0.36    16-may-94   DE422 fix released.
192       0.37    22-jul-94   Added MODULE support
193       0.38    15-aug-94   Added DBR ROM switch in depca_close().
194                           Multi DEPCA bug fix.
195       0.38axp 15-sep-94   Special version for Alpha AXP Linux V1.0.
196       0.381   12-dec-94   Added DE101 recognition, fix multicast bug.
197       0.382    9-feb-95   Fix recognition bug reported by <bkm@star.rl.ac.uk>.
198       0.383   22-feb-95   Fix for conflict with VESA SCSI reported by
199                           <stromain@alf.dec.com>
200       0.384   17-mar-95   Fix a ring full bug reported by <bkm@star.rl.ac.uk>
201       0.385    3-apr-95   Fix a recognition bug reported by
202                                                 <ryan.niemi@lastfrontier.com>
203       0.386   21-apr-95   Fix the last fix...sorry, must be galloping senility
204       0.40    25-May-95   Rewrite for portability & updated.
205                           ALPHA support from <jestabro@amt.tay1.dec.com>
206       0.41    26-Jun-95   Added verify_area() calls in depca_ioctl() from
207                           suggestion by <heiko@colossus.escape.de>
208       0.42    27-Dec-95   Add 'mem' shared memory assignment for loadable
209                           modules.
210                           Add 'adapter_name' for loadable modules when no PROM.
211                           Both above from a suggestion by
212                           <pchen@woodruffs121.residence.gatech.edu>.
213                           Add new multicasting code.
214       0.421   22-Apr-96   Fix alloc_device() bug <jari@markkus2.fimr.fi>
215       0.422   29-Apr-96   Fix depca_hw_init() bug <jari@markkus2.fimr.fi>
216       0.423    7-Jun-96   Fix module load bug <kmg@barco.be>
217       0.43    16-Aug-96   Update alloc_device() to conform to de4x5.c
218       0.44     1-Sep-97   Fix *_probe() to test check_region() first - bug
219                            reported by <mmogilvi@elbert.uccs.edu>
220       0.45     3-Nov-98   Added support for MCA EtherWORKS (DE210/DE212) cards
221                            by <tymm@computer.org>
222       0.451    5-Nov-98   Fixed mca stuff cuz I'm a dummy. <tymm@computer.org>
223       0.5     14-Nov-98   Re-spin for 2.1.x kernels.
224       0.51    27-Jun-99   Correct received packet length for CRC from
225                            report by <worm@dkik.dk>
226       0.52    16-Oct-00   Fixes for 2.3 io memory accesses
227                           Fix show-stopper (ints left masked) in depca_interrupt
228                            by <peterd@pnd-pc.demon.co.uk>
229       0.53    12-Jan-01   Release resources on failure, bss tidbits
230                            by acme@conectiva.com.br
231       0.54    08-Nov-01   use library crc32 functions
232                            by Matt_Domsch@dell.com
233       0.55    01-Mar-03   Use EISA/sysfs framework <maz@wild-wind.fr.eu.org>
234
235     =========================================================================
236 */
237
238 #include <linux/module.h>
239 #include <linux/kernel.h>
240 #include <linux/string.h>
241 #include <linux/errno.h>
242 #include <linux/ioport.h>
243 #include <linux/slab.h>
244 #include <linux/interrupt.h>
245 #include <linux/delay.h>
246 #include <linux/init.h>
247 #include <linux/crc32.h>
248 #include <linux/netdevice.h>
249 #include <linux/etherdevice.h>
250 #include <linux/skbuff.h>
251 #include <linux/time.h>
252 #include <linux/types.h>
253 #include <linux/unistd.h>
254 #include <linux/ctype.h>
255 #include <linux/moduleparam.h>
256 #include <linux/platform_device.h>
257 #include <linux/bitops.h>
258
259 #include <asm/uaccess.h>
260 #include <asm/io.h>
261 #include <asm/dma.h>
262
263 #ifdef CONFIG_MCA
264 #include <linux/mca.h>
265 #endif
266
267 #ifdef CONFIG_EISA
268 #include <linux/eisa.h>
269 #endif
270
271 #include "depca.h"
272
273 static char version[] __initdata = "depca.c:v0.53 2001/1/12 davies@maniac.ultranet.com\n";
274
275 #ifdef DEPCA_DEBUG
276 static int depca_debug = DEPCA_DEBUG;
277 #else
278 static int depca_debug = 1;
279 #endif
280
281 #define DEPCA_NDA 0xffe0        /* No Device Address */
282
283 #define TX_TIMEOUT (1*HZ)
284
285 /*
286 ** Ethernet PROM defines
287 */
288 #define PROBE_LENGTH    32
289 #define ETH_PROM_SIG    0xAA5500FFUL
290
291 /*
292 ** Set the number of Tx and Rx buffers. Ensure that the memory requested
293 ** here is <= to the amount of shared memory set up by the board switches.
294 ** The number of descriptors MUST BE A POWER OF 2.
295 **
296 ** total_memory = NUM_RX_DESC*(8+RX_BUFF_SZ) + NUM_TX_DESC*(8+TX_BUFF_SZ)
297 */
298 #define NUM_RX_DESC     8       /* Number of RX descriptors */
299 #define NUM_TX_DESC     8       /* Number of TX descriptors */
300 #define RX_BUFF_SZ      1536    /* Buffer size for each Rx buffer */
301 #define TX_BUFF_SZ      1536    /* Buffer size for each Tx buffer */
302
303 /*
304 ** EISA bus defines
305 */
306 #define DEPCA_EISA_IO_PORTS 0x0c00      /* I/O port base address, slot 0 */
307
308 /*
309 ** ISA Bus defines
310 */
311 #define DEPCA_RAM_BASE_ADDRESSES {0xc0000,0xd0000,0xe0000,0x00000}
312 #define DEPCA_TOTAL_SIZE 0x10
313
314 static struct {
315         u_long iobase;
316         struct platform_device *device;
317 } depca_io_ports[] = {
318         { 0x300, NULL },
319         { 0x200, NULL },
320         { 0    , NULL },
321 };
322
323 /*
324 ** Name <-> Adapter mapping
325 */
326 #define DEPCA_SIGNATURE {"DEPCA",\
327                          "DE100","DE101",\
328                          "DE200","DE201","DE202",\
329                          "DE210","DE212",\
330                          "DE422",\
331                          ""}
332
333 static char* __initdata depca_signature[] = DEPCA_SIGNATURE;
334
335 enum depca_type {
336         DEPCA, de100, de101, de200, de201, de202, de210, de212, de422, unknown
337 };
338
339 static char depca_string[] = "depca";
340
341 static int depca_device_remove (struct device *device);
342
343 #ifdef CONFIG_EISA
344 static struct eisa_device_id depca_eisa_ids[] = {
345         { "DEC4220", de422 },
346         { "" }
347 };
348 MODULE_DEVICE_TABLE(eisa, depca_eisa_ids);
349
350 static int depca_eisa_probe  (struct device *device);
351
352 static struct eisa_driver depca_eisa_driver = {
353         .id_table = depca_eisa_ids,
354         .driver   = {
355                 .name    = depca_string,
356                 .probe   = depca_eisa_probe,
357                 .remove  = __devexit_p (depca_device_remove)
358         }
359 };
360 #endif
361
362 #ifdef CONFIG_MCA
363 /*
364 ** Adapter ID for the MCA EtherWORKS DE210/212 adapter
365 */
366 #define DE210_ID 0x628d
367 #define DE212_ID 0x6def
368
369 static short depca_mca_adapter_ids[] = {
370         DE210_ID,
371         DE212_ID,
372         0x0000
373 };
374
375 static char *depca_mca_adapter_name[] = {
376         "DEC EtherWORKS MC Adapter (DE210)",
377         "DEC EtherWORKS MC Adapter (DE212)",
378         NULL
379 };
380
381 static enum depca_type depca_mca_adapter_type[] = {
382         de210,
383         de212,
384         0
385 };
386
387 static int depca_mca_probe (struct device *);
388
389 static struct mca_driver depca_mca_driver = {
390         .id_table = depca_mca_adapter_ids,
391         .driver   = {
392                 .name   = depca_string,
393                 .bus    = &mca_bus_type,
394                 .probe  = depca_mca_probe,
395                 .remove = __devexit_p(depca_device_remove),
396         },
397 };
398 #endif
399
400 static int depca_isa_probe (struct platform_device *);
401
402 static int __devexit depca_isa_remove(struct platform_device *pdev)
403 {
404         return depca_device_remove(&pdev->dev);
405 }
406
407 static struct platform_driver depca_isa_driver = {
408         .probe  = depca_isa_probe,
409         .remove = __devexit_p(depca_isa_remove),
410         .driver = {
411                 .name   = depca_string,
412         },
413 };
414
415 /*
416 ** Miscellaneous info...
417 */
418 #define DEPCA_STRLEN 16
419
420 /*
421 ** Memory Alignment. Each descriptor is 4 longwords long. To force a
422 ** particular alignment on the TX descriptor, adjust DESC_SKIP_LEN and
423 ** DESC_ALIGN. DEPCA_ALIGN aligns the start address of the private memory area
424 ** and hence the RX descriptor ring's first entry.
425 */
426 #define DEPCA_ALIGN4      ((u_long)4 - 1)       /* 1 longword align */
427 #define DEPCA_ALIGN8      ((u_long)8 - 1)       /* 2 longword (quadword) align */
428 #define DEPCA_ALIGN         DEPCA_ALIGN8        /* Keep the LANCE happy... */
429
430 /*
431 ** The DEPCA Rx and Tx ring descriptors.
432 */
433 struct depca_rx_desc {
434         volatile s32 base;
435         s16 buf_length;         /* This length is negative 2's complement! */
436         s16 msg_length;         /* This length is "normal". */
437 };
438
439 struct depca_tx_desc {
440         volatile s32 base;
441         s16 length;             /* This length is negative 2's complement! */
442         s16 misc;               /* Errors and TDR info */
443 };
444
445 #define LA_MASK 0x0000ffff      /* LANCE address mask for mapping network RAM
446                                    to LANCE memory address space */
447
448 /*
449 ** The Lance initialization block, described in databook, in common memory.
450 */
451 struct depca_init {
452         u16 mode;               /* Mode register */
453         u8 phys_addr[ETH_ALEN]; /* Physical ethernet address */
454         u8 mcast_table[8];      /* Multicast Hash Table. */
455         u32 rx_ring;            /* Rx ring base pointer & ring length */
456         u32 tx_ring;            /* Tx ring base pointer & ring length */
457 };
458
459 #define DEPCA_PKT_STAT_SZ 16
460 #define DEPCA_PKT_BIN_SZ  128   /* Should be >=100 unless you
461                                    increase DEPCA_PKT_STAT_SZ */
462 struct depca_private {
463         char adapter_name[DEPCA_STRLEN];        /* /proc/ioports string                  */
464         enum depca_type adapter;                /* Adapter type */
465         enum {
466                 DEPCA_BUS_MCA = 1,
467                 DEPCA_BUS_ISA,
468                 DEPCA_BUS_EISA,
469         } depca_bus;            /* type of bus */
470         struct depca_init init_block;   /* Shadow Initialization block            */
471 /* CPU address space fields */
472         struct depca_rx_desc __iomem *rx_ring;  /* Pointer to start of RX descriptor ring */
473         struct depca_tx_desc __iomem *tx_ring;  /* Pointer to start of TX descriptor ring */
474         void __iomem *rx_buff[NUM_RX_DESC];     /* CPU virt address of sh'd memory buffs  */
475         void __iomem *tx_buff[NUM_TX_DESC];     /* CPU virt address of sh'd memory buffs  */
476         void __iomem *sh_mem;   /* CPU mapped virt address of device RAM  */
477         u_long mem_start;       /* Bus address of device RAM (before remap) */
478         u_long mem_len;         /* device memory size */
479 /* Device address space fields */
480         u_long device_ram_start;        /* Start of RAM in device addr space      */
481 /* Offsets used in both address spaces */
482         u_long rx_ring_offset;  /* Offset from start of RAM to rx_ring    */
483         u_long tx_ring_offset;  /* Offset from start of RAM to tx_ring    */
484         u_long buffs_offset;    /* LANCE Rx and Tx buffers start address. */
485 /* Kernel-only (not device) fields */
486         int rx_new, tx_new;     /* The next free ring entry               */
487         int rx_old, tx_old;     /* The ring entries to be free()ed.       */
488         struct net_device_stats stats;
489         spinlock_t lock;
490         struct {                /* Private stats counters                 */
491                 u32 bins[DEPCA_PKT_STAT_SZ];
492                 u32 unicast;
493                 u32 multicast;
494                 u32 broadcast;
495                 u32 excessive_collisions;
496                 u32 tx_underruns;
497                 u32 excessive_underruns;
498         } pktStats;
499         int txRingMask;         /* TX ring mask                           */
500         int rxRingMask;         /* RX ring mask                           */
501         s32 rx_rlen;            /* log2(rxRingMask+1) for the descriptors */
502         s32 tx_rlen;            /* log2(txRingMask+1) for the descriptors */
503 };
504
505 /*
506 ** The transmit ring full condition is described by the tx_old and tx_new
507 ** pointers by:
508 **    tx_old            = tx_new    Empty ring
509 **    tx_old            = tx_new+1  Full ring
510 **    tx_old+txRingMask = tx_new    Full ring  (wrapped condition)
511 */
512 #define TX_BUFFS_AVAIL ((lp->tx_old<=lp->tx_new)?\
513                          lp->tx_old+lp->txRingMask-lp->tx_new:\
514                          lp->tx_old               -lp->tx_new-1)
515
516 /*
517 ** Public Functions
518 */
519 static int depca_open(struct net_device *dev);
520 static int depca_start_xmit(struct sk_buff *skb, struct net_device *dev);
521 static irqreturn_t depca_interrupt(int irq, void *dev_id);
522 static int depca_close(struct net_device *dev);
523 static int depca_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
524 static void depca_tx_timeout(struct net_device *dev);
525 static struct net_device_stats *depca_get_stats(struct net_device *dev);
526 static void set_multicast_list(struct net_device *dev);
527
528 /*
529 ** Private functions
530 */
531 static void depca_init_ring(struct net_device *dev);
532 static int depca_rx(struct net_device *dev);
533 static int depca_tx(struct net_device *dev);
534
535 static void LoadCSRs(struct net_device *dev);
536 static int InitRestartDepca(struct net_device *dev);
537 static int DepcaSignature(char *name, u_long paddr);
538 static int DevicePresent(u_long ioaddr);
539 static int get_hw_addr(struct net_device *dev);
540 static void SetMulticastFilter(struct net_device *dev);
541 static int load_packet(struct net_device *dev, struct sk_buff *skb);
542 static void depca_dbg_open(struct net_device *dev);
543
544 static u_char de1xx_irq[] __initdata = { 2, 3, 4, 5, 7, 9, 0 };
545 static u_char de2xx_irq[] __initdata = { 5, 9, 10, 11, 15, 0 };
546 static u_char de422_irq[] __initdata = { 5, 9, 10, 11, 0 };
547 static u_char *depca_irq;
548
549 static int irq;
550 static int io;
551 static char *adapter_name;
552 static int mem;                 /* For loadable module assignment
553                                    use insmod mem=0x????? .... */
554 module_param (irq, int, 0);
555 module_param (io, int, 0);
556 module_param (adapter_name, charp, 0);
557 module_param (mem, int, 0);
558 MODULE_PARM_DESC(irq, "DEPCA IRQ number");
559 MODULE_PARM_DESC(io, "DEPCA I/O base address");
560 MODULE_PARM_DESC(adapter_name, "DEPCA adapter name");
561 MODULE_PARM_DESC(mem, "DEPCA shared memory address");
562 MODULE_LICENSE("GPL");
563
564 /*
565 ** Miscellaneous defines...
566 */
567 #define STOP_DEPCA \
568     outw(CSR0, DEPCA_ADDR);\
569     outw(STOP, DEPCA_DATA)
570
571 static int __init depca_hw_init (struct net_device *dev, struct device *device)
572 {
573         struct depca_private *lp;
574         int i, j, offset, netRAM, mem_len, status = 0;
575         s16 nicsr;
576         u_long ioaddr;
577         u_long mem_start;
578
579         /*
580          * We are now supposed to enter this function with the
581          * following fields filled with proper values :
582          *
583          * dev->base_addr
584          * lp->mem_start
585          * lp->depca_bus
586          * lp->adapter
587          *
588          * dev->irq can be set if known from device configuration (on
589          * MCA or EISA) or module option. Otherwise, it will be auto
590          * detected.
591          */
592
593         ioaddr = dev->base_addr;
594
595         STOP_DEPCA;
596
597         nicsr = inb(DEPCA_NICSR);
598         nicsr = ((nicsr & ~SHE & ~RBE & ~IEN) | IM);
599         outb(nicsr, DEPCA_NICSR);
600
601         if (inw(DEPCA_DATA) != STOP) {
602                 return -ENXIO;
603         }
604
605         lp = (struct depca_private *) dev->priv;
606         mem_start = lp->mem_start;
607
608         if (!mem_start || lp->adapter < DEPCA || lp->adapter >=unknown)
609                 return -ENXIO;
610
611         printk ("%s: %s at 0x%04lx",
612                 device->bus_id, depca_signature[lp->adapter], ioaddr);
613
614         switch (lp->depca_bus) {
615 #ifdef CONFIG_MCA
616         case DEPCA_BUS_MCA:
617                 printk(" (MCA slot %d)", to_mca_device(device)->slot + 1);
618                 break;
619 #endif
620
621 #ifdef CONFIG_EISA
622         case DEPCA_BUS_EISA:
623                 printk(" (EISA slot %d)", to_eisa_device(device)->slot);
624                 break;
625 #endif
626
627         case DEPCA_BUS_ISA:
628                 break;
629
630         default:
631                 printk("Unknown DEPCA bus %d\n", lp->depca_bus);
632                 return -ENXIO;
633         }
634
635         printk(", h/w address ");
636         status = get_hw_addr(dev);
637         if (status != 0) {
638                 printk("      which has an Ethernet PROM CRC error.\n");
639                 return -ENXIO;
640         }
641         for (i = 0; i < ETH_ALEN - 1; i++) {    /* get the ethernet address */
642                 printk("%2.2x:", dev->dev_addr[i]);
643         }
644         printk("%2.2x", dev->dev_addr[i]);
645
646         /* Set up the maximum amount of network RAM(kB) */
647         netRAM = ((lp->adapter != DEPCA) ? 64 : 48);
648         if ((nicsr & _128KB) && (lp->adapter == de422))
649                 netRAM = 128;
650
651         /* Shared Memory Base Address */
652         if (nicsr & BUF) {
653                 nicsr &= ~BS;   /* DEPCA RAM in top 32k */
654                 netRAM -= 32;
655
656                 /* Only EISA/ISA needs start address to be re-computed */
657                 if (lp->depca_bus != DEPCA_BUS_MCA)
658                         mem_start += 0x8000;
659         }
660
661         if ((mem_len = (NUM_RX_DESC * (sizeof(struct depca_rx_desc) + RX_BUFF_SZ) + NUM_TX_DESC * (sizeof(struct depca_tx_desc) + TX_BUFF_SZ) + sizeof(struct depca_init)))
662             > (netRAM << 10)) {
663                 printk(",\n       requests %dkB RAM: only %dkB is available!\n", (mem_len >> 10), netRAM);
664                 return -ENXIO;
665         }
666
667         printk(",\n      has %dkB RAM at 0x%.5lx", netRAM, mem_start);
668
669         /* Enable the shadow RAM. */
670         if (lp->adapter != DEPCA) {
671                 nicsr |= SHE;
672                 outb(nicsr, DEPCA_NICSR);
673         }
674
675         spin_lock_init(&lp->lock);
676         sprintf(lp->adapter_name, "%s (%s)",
677                 depca_signature[lp->adapter], device->bus_id);
678         status = -EBUSY;
679
680         /* Initialisation Block */
681         if (!request_mem_region (mem_start, mem_len, lp->adapter_name)) {
682                 printk(KERN_ERR "depca: cannot request ISA memory, aborting\n");
683                 goto out_priv;
684         }
685
686         status = -EIO;
687         lp->sh_mem = ioremap(mem_start, mem_len);
688         if (lp->sh_mem == NULL) {
689                 printk(KERN_ERR "depca: cannot remap ISA memory, aborting\n");
690                 goto out1;
691         }
692
693         lp->mem_start = mem_start;
694         lp->mem_len   = mem_len;
695         lp->device_ram_start = mem_start & LA_MASK;
696
697         offset = 0;
698         offset += sizeof(struct depca_init);
699
700         /* Tx & Rx descriptors (aligned to a quadword boundary) */
701         offset = (offset + DEPCA_ALIGN) & ~DEPCA_ALIGN;
702         lp->rx_ring = (struct depca_rx_desc __iomem *) (lp->sh_mem + offset);
703         lp->rx_ring_offset = offset;
704
705         offset += (sizeof(struct depca_rx_desc) * NUM_RX_DESC);
706         lp->tx_ring = (struct depca_tx_desc __iomem *) (lp->sh_mem + offset);
707         lp->tx_ring_offset = offset;
708
709         offset += (sizeof(struct depca_tx_desc) * NUM_TX_DESC);
710
711         lp->buffs_offset = offset;
712
713         /* Finish initialising the ring information. */
714         lp->rxRingMask = NUM_RX_DESC - 1;
715         lp->txRingMask = NUM_TX_DESC - 1;
716
717         /* Calculate Tx/Rx RLEN size for the descriptors. */
718         for (i = 0, j = lp->rxRingMask; j > 0; i++) {
719                 j >>= 1;
720         }
721         lp->rx_rlen = (s32) (i << 29);
722         for (i = 0, j = lp->txRingMask; j > 0; i++) {
723                 j >>= 1;
724         }
725         lp->tx_rlen = (s32) (i << 29);
726
727         /* Load the initialisation block */
728         depca_init_ring(dev);
729
730         /* Initialise the control and status registers */
731         LoadCSRs(dev);
732
733         /* Enable DEPCA board interrupts for autoprobing */
734         nicsr = ((nicsr & ~IM) | IEN);
735         outb(nicsr, DEPCA_NICSR);
736
737         /* To auto-IRQ we enable the initialization-done and DMA err,
738            interrupts. For now we will always get a DMA error. */
739         if (dev->irq < 2) {
740                 unsigned char irqnum;
741                 unsigned long irq_mask, delay;
742
743                 irq_mask = probe_irq_on();
744
745                 /* Assign the correct irq list */
746                 switch (lp->adapter) {
747                 case DEPCA:
748                 case de100:
749                 case de101:
750                         depca_irq = de1xx_irq;
751                         break;
752                 case de200:
753                 case de201:
754                 case de202:
755                 case de210:
756                 case de212:
757                         depca_irq = de2xx_irq;
758                         break;
759                 case de422:
760                         depca_irq = de422_irq;
761                         break;
762
763                 default:
764                         break;  /* Not reached */
765                 }
766
767                 /* Trigger an initialization just for the interrupt. */
768                 outw(INEA | INIT, DEPCA_DATA);
769
770                 delay = jiffies + HZ/50;
771                 while (time_before(jiffies, delay))
772                         yield();
773
774                 irqnum = probe_irq_off(irq_mask);
775
776                 status = -ENXIO;
777                 if (!irqnum) {
778                         printk(" and failed to detect IRQ line.\n");
779                         goto out2;
780                 } else {
781                         for (dev->irq = 0, i = 0; (depca_irq[i]) && (!dev->irq); i++)
782                                 if (irqnum == depca_irq[i]) {
783                                         dev->irq = irqnum;
784                                         printk(" and uses IRQ%d.\n", dev->irq);
785                                 }
786
787                         if (!dev->irq) {
788                                 printk(" but incorrect IRQ line detected.\n");
789                                 goto out2;
790                         }
791                 }
792         } else {
793                 printk(" and assigned IRQ%d.\n", dev->irq);
794         }
795
796         if (depca_debug > 1) {
797                 printk(version);
798         }
799
800         /* The DEPCA-specific entries in the device structure. */
801         dev->open = &depca_open;
802         dev->hard_start_xmit = &depca_start_xmit;
803         dev->stop = &depca_close;
804         dev->get_stats = &depca_get_stats;
805         dev->set_multicast_list = &set_multicast_list;
806         dev->do_ioctl = &depca_ioctl;
807         dev->tx_timeout = depca_tx_timeout;
808         dev->watchdog_timeo = TX_TIMEOUT;
809
810         dev->mem_start = 0;
811
812         device->driver_data = dev;
813         SET_NETDEV_DEV (dev, device);
814
815         status = register_netdev(dev);
816         if (status == 0)
817                 return 0;
818 out2:
819         iounmap(lp->sh_mem);
820 out1:
821         release_mem_region (mem_start, mem_len);
822 out_priv:
823         return status;
824 }
825
826
827 static int depca_open(struct net_device *dev)
828 {
829         struct depca_private *lp = (struct depca_private *) dev->priv;
830         u_long ioaddr = dev->base_addr;
831         s16 nicsr;
832         int status = 0;
833
834         STOP_DEPCA;
835         nicsr = inb(DEPCA_NICSR);
836
837         /* Make sure the shadow RAM is enabled */
838         if (lp->adapter != DEPCA) {
839                 nicsr |= SHE;
840                 outb(nicsr, DEPCA_NICSR);
841         }
842
843         /* Re-initialize the DEPCA... */
844         depca_init_ring(dev);
845         LoadCSRs(dev);
846
847         depca_dbg_open(dev);
848
849         if (request_irq(dev->irq, &depca_interrupt, 0, lp->adapter_name, dev)) {
850                 printk("depca_open(): Requested IRQ%d is busy\n", dev->irq);
851                 status = -EAGAIN;
852         } else {
853
854                 /* Enable DEPCA board interrupts and turn off LED */
855                 nicsr = ((nicsr & ~IM & ~LED) | IEN);
856                 outb(nicsr, DEPCA_NICSR);
857                 outw(CSR0, DEPCA_ADDR);
858
859                 netif_start_queue(dev);
860
861                 status = InitRestartDepca(dev);
862
863                 if (depca_debug > 1) {
864                         printk("CSR0: 0x%4.4x\n", inw(DEPCA_DATA));
865                         printk("nicsr: 0x%02x\n", inb(DEPCA_NICSR));
866                 }
867         }
868         return status;
869 }
870
871 /* Initialize the lance Rx and Tx descriptor rings. */
872 static void depca_init_ring(struct net_device *dev)
873 {
874         struct depca_private *lp = (struct depca_private *) dev->priv;
875         u_int i;
876         u_long offset;
877
878         /* Lock out other processes whilst setting up the hardware */
879         netif_stop_queue(dev);
880
881         lp->rx_new = lp->tx_new = 0;
882         lp->rx_old = lp->tx_old = 0;
883
884         /* Initialize the base address and length of each buffer in the ring */
885         for (i = 0; i <= lp->rxRingMask; i++) {
886                 offset = lp->buffs_offset + i * RX_BUFF_SZ;
887                 writel((lp->device_ram_start + offset) | R_OWN, &lp->rx_ring[i].base);
888                 writew(-RX_BUFF_SZ, &lp->rx_ring[i].buf_length);
889                 lp->rx_buff[i] = lp->sh_mem + offset;
890         }
891
892         for (i = 0; i <= lp->txRingMask; i++) {
893                 offset = lp->buffs_offset + (i + lp->rxRingMask + 1) * TX_BUFF_SZ;
894                 writel((lp->device_ram_start + offset) & 0x00ffffff, &lp->tx_ring[i].base);
895                 lp->tx_buff[i] = lp->sh_mem + offset;
896         }
897
898         /* Set up the initialization block */
899         lp->init_block.rx_ring = (lp->device_ram_start + lp->rx_ring_offset) | lp->rx_rlen;
900         lp->init_block.tx_ring = (lp->device_ram_start + lp->tx_ring_offset) | lp->tx_rlen;
901
902         SetMulticastFilter(dev);
903
904         for (i = 0; i < ETH_ALEN; i++) {
905                 lp->init_block.phys_addr[i] = dev->dev_addr[i];
906         }
907
908         lp->init_block.mode = 0x0000;   /* Enable the Tx and Rx */
909 }
910
911
912 static void depca_tx_timeout(struct net_device *dev)
913 {
914         u_long ioaddr = dev->base_addr;
915
916         printk("%s: transmit timed out, status %04x, resetting.\n", dev->name, inw(DEPCA_DATA));
917
918         STOP_DEPCA;
919         depca_init_ring(dev);
920         LoadCSRs(dev);
921         dev->trans_start = jiffies;
922         netif_wake_queue(dev);
923         InitRestartDepca(dev);
924 }
925
926
927 /*
928 ** Writes a socket buffer to TX descriptor ring and starts transmission
929 */
930 static int depca_start_xmit(struct sk_buff *skb, struct net_device *dev)
931 {
932         struct depca_private *lp = (struct depca_private *) dev->priv;
933         u_long ioaddr = dev->base_addr;
934         int status = 0;
935
936         /* Transmitter timeout, serious problems. */
937         if (skb->len < 1)
938                 goto out;
939
940         if (skb_padto(skb, ETH_ZLEN))
941                 goto out;
942
943         netif_stop_queue(dev);
944
945         if (TX_BUFFS_AVAIL) {   /* Fill in a Tx ring entry */
946                 status = load_packet(dev, skb);
947
948                 if (!status) {
949                         /* Trigger an immediate send demand. */
950                         outw(CSR0, DEPCA_ADDR);
951                         outw(INEA | TDMD, DEPCA_DATA);
952
953                         dev->trans_start = jiffies;
954                         dev_kfree_skb(skb);
955                 }
956                 if (TX_BUFFS_AVAIL)
957                         netif_start_queue(dev);
958         } else
959                 status = -1;
960
961       out:
962         return status;
963 }
964
965 /*
966 ** The DEPCA interrupt handler.
967 */
968 static irqreturn_t depca_interrupt(int irq, void *dev_id)
969 {
970         struct net_device *dev = dev_id;
971         struct depca_private *lp;
972         s16 csr0, nicsr;
973         u_long ioaddr;
974
975         if (dev == NULL) {
976                 printk("depca_interrupt(): irq %d for unknown device.\n", irq);
977                 return IRQ_NONE;
978         }
979
980         lp = (struct depca_private *) dev->priv;
981         ioaddr = dev->base_addr;
982
983         spin_lock(&lp->lock);
984
985         /* mask the DEPCA board interrupts and turn on the LED */
986         nicsr = inb(DEPCA_NICSR);
987         nicsr |= (IM | LED);
988         outb(nicsr, DEPCA_NICSR);
989
990         outw(CSR0, DEPCA_ADDR);
991         csr0 = inw(DEPCA_DATA);
992
993         /* Acknowledge all of the current interrupt sources ASAP. */
994         outw(csr0 & INTE, DEPCA_DATA);
995
996         if (csr0 & RINT)        /* Rx interrupt (packet arrived) */
997                 depca_rx(dev);
998
999         if (csr0 & TINT)        /* Tx interrupt (packet sent) */
1000                 depca_tx(dev);
1001
1002         /* Any resources available? */
1003         if ((TX_BUFFS_AVAIL >= 0) && netif_queue_stopped(dev)) {
1004                 netif_wake_queue(dev);
1005         }
1006
1007         /* Unmask the DEPCA board interrupts and turn off the LED */
1008         nicsr = (nicsr & ~IM & ~LED);
1009         outb(nicsr, DEPCA_NICSR);
1010
1011         spin_unlock(&lp->lock);
1012         return IRQ_HANDLED;
1013 }
1014
1015 /* Called with lp->lock held */
1016 static int depca_rx(struct net_device *dev)
1017 {
1018         struct depca_private *lp = (struct depca_private *) dev->priv;
1019         int i, entry;
1020         s32 status;
1021
1022         for (entry = lp->rx_new; !(readl(&lp->rx_ring[entry].base) & R_OWN); entry = lp->rx_new) {
1023                 status = readl(&lp->rx_ring[entry].base) >> 16;
1024                 if (status & R_STP) {   /* Remember start of frame */
1025                         lp->rx_old = entry;
1026                 }
1027                 if (status & R_ENP) {   /* Valid frame status */
1028                         if (status & R_ERR) {   /* There was an error. */
1029                                 lp->stats.rx_errors++;  /* Update the error stats. */
1030                                 if (status & R_FRAM)
1031                                         lp->stats.rx_frame_errors++;
1032                                 if (status & R_OFLO)
1033                                         lp->stats.rx_over_errors++;
1034                                 if (status & R_CRC)
1035                                         lp->stats.rx_crc_errors++;
1036                                 if (status & R_BUFF)
1037                                         lp->stats.rx_fifo_errors++;
1038                         } else {
1039                                 short len, pkt_len = readw(&lp->rx_ring[entry].msg_length) - 4;
1040                                 struct sk_buff *skb;
1041
1042                                 skb = dev_alloc_skb(pkt_len + 2);
1043                                 if (skb != NULL) {
1044                                         unsigned char *buf;
1045                                         skb_reserve(skb, 2);    /* 16 byte align the IP header */
1046                                         buf = skb_put(skb, pkt_len);
1047                                         if (entry < lp->rx_old) {       /* Wrapped buffer */
1048                                                 len = (lp->rxRingMask - lp->rx_old + 1) * RX_BUFF_SZ;
1049                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], len);
1050                                                 memcpy_fromio(buf + len, lp->rx_buff[0], pkt_len - len);
1051                                         } else {        /* Linear buffer */
1052                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], pkt_len);
1053                                         }
1054
1055                                         /*
1056                                            ** Notify the upper protocol layers that there is another
1057                                            ** packet to handle
1058                                          */
1059                                         skb->protocol = eth_type_trans(skb, dev);
1060                                         netif_rx(skb);
1061
1062                                         /*
1063                                            ** Update stats
1064                                          */
1065                                         dev->last_rx = jiffies;
1066                                         lp->stats.rx_packets++;
1067                                         lp->stats.rx_bytes += pkt_len;
1068                                         for (i = 1; i < DEPCA_PKT_STAT_SZ - 1; i++) {
1069                                                 if (pkt_len < (i * DEPCA_PKT_BIN_SZ)) {
1070                                                         lp->pktStats.bins[i]++;
1071                                                         i = DEPCA_PKT_STAT_SZ;
1072                                                 }
1073                                         }
1074                                         if (buf[0] & 0x01) {    /* Multicast/Broadcast */
1075                                                 if ((*(s16 *) & buf[0] == -1) && (*(s16 *) & buf[2] == -1) && (*(s16 *) & buf[4] == -1)) {
1076                                                         lp->pktStats.broadcast++;
1077                                                 } else {
1078                                                         lp->pktStats.multicast++;
1079                                                 }
1080                                         } else if ((*(s16 *) & buf[0] == *(s16 *) & dev->dev_addr[0]) && (*(s16 *) & buf[2] == *(s16 *) & dev->dev_addr[2]) && (*(s16 *) & buf[4] == *(s16 *) & dev->dev_addr[4])) {
1081                                                 lp->pktStats.unicast++;
1082                                         }
1083
1084                                         lp->pktStats.bins[0]++; /* Duplicates stats.rx_packets */
1085                                         if (lp->pktStats.bins[0] == 0) {        /* Reset counters */
1086                                                 memset((char *) &lp->pktStats, 0, sizeof(lp->pktStats));
1087                                         }
1088                                 } else {
1089                                         printk("%s: Memory squeeze, deferring packet.\n", dev->name);
1090                                         lp->stats.rx_dropped++; /* Really, deferred. */
1091                                         break;
1092                                 }
1093                         }
1094                         /* Change buffer ownership for this last frame, back to the adapter */
1095                         for (; lp->rx_old != entry; lp->rx_old = (++lp->rx_old) & lp->rxRingMask) {
1096                                 writel(readl(&lp->rx_ring[lp->rx_old].base) | R_OWN, &lp->rx_ring[lp->rx_old].base);
1097                         }
1098                         writel(readl(&lp->rx_ring[entry].base) | R_OWN, &lp->rx_ring[entry].base);
1099                 }
1100
1101                 /*
1102                    ** Update entry information
1103                  */
1104                 lp->rx_new = (++lp->rx_new) & lp->rxRingMask;
1105         }
1106
1107         return 0;
1108 }
1109
1110 /*
1111 ** Buffer sent - check for buffer errors.
1112 ** Called with lp->lock held
1113 */
1114 static int depca_tx(struct net_device *dev)
1115 {
1116         struct depca_private *lp = (struct depca_private *) dev->priv;
1117         int entry;
1118         s32 status;
1119         u_long ioaddr = dev->base_addr;
1120
1121         for (entry = lp->tx_old; entry != lp->tx_new; entry = lp->tx_old) {
1122                 status = readl(&lp->tx_ring[entry].base) >> 16;
1123
1124                 if (status < 0) {       /* Packet not yet sent! */
1125                         break;
1126                 } else if (status & T_ERR) {    /* An error occurred. */
1127                         status = readl(&lp->tx_ring[entry].misc);
1128                         lp->stats.tx_errors++;
1129                         if (status & TMD3_RTRY)
1130                                 lp->stats.tx_aborted_errors++;
1131                         if (status & TMD3_LCAR)
1132                                 lp->stats.tx_carrier_errors++;
1133                         if (status & TMD3_LCOL)
1134                                 lp->stats.tx_window_errors++;
1135                         if (status & TMD3_UFLO)
1136                                 lp->stats.tx_fifo_errors++;
1137                         if (status & (TMD3_BUFF | TMD3_UFLO)) {
1138                                 /* Trigger an immediate send demand. */
1139                                 outw(CSR0, DEPCA_ADDR);
1140                                 outw(INEA | TDMD, DEPCA_DATA);
1141                         }
1142                 } else if (status & (T_MORE | T_ONE)) {
1143                         lp->stats.collisions++;
1144                 } else {
1145                         lp->stats.tx_packets++;
1146                 }
1147
1148                 /* Update all the pointers */
1149                 lp->tx_old = (++lp->tx_old) & lp->txRingMask;
1150         }
1151
1152         return 0;
1153 }
1154
1155 static int depca_close(struct net_device *dev)
1156 {
1157         struct depca_private *lp = (struct depca_private *) dev->priv;
1158         s16 nicsr;
1159         u_long ioaddr = dev->base_addr;
1160
1161         netif_stop_queue(dev);
1162
1163         outw(CSR0, DEPCA_ADDR);
1164
1165         if (depca_debug > 1) {
1166                 printk("%s: Shutting down ethercard, status was %2.2x.\n", dev->name, inw(DEPCA_DATA));
1167         }
1168
1169         /*
1170            ** We stop the DEPCA here -- it occasionally polls
1171            ** memory if we don't.
1172          */
1173         outw(STOP, DEPCA_DATA);
1174
1175         /*
1176            ** Give back the ROM in case the user wants to go to DOS
1177          */
1178         if (lp->adapter != DEPCA) {
1179                 nicsr = inb(DEPCA_NICSR);
1180                 nicsr &= ~SHE;
1181                 outb(nicsr, DEPCA_NICSR);
1182         }
1183
1184         /*
1185            ** Free the associated irq
1186          */
1187         free_irq(dev->irq, dev);
1188         return 0;
1189 }
1190
1191 static void LoadCSRs(struct net_device *dev)
1192 {
1193         struct depca_private *lp = (struct depca_private *) dev->priv;
1194         u_long ioaddr = dev->base_addr;
1195
1196         outw(CSR1, DEPCA_ADDR); /* initialisation block address LSW */
1197         outw((u16) lp->device_ram_start, DEPCA_DATA);
1198         outw(CSR2, DEPCA_ADDR); /* initialisation block address MSW */
1199         outw((u16) (lp->device_ram_start >> 16), DEPCA_DATA);
1200         outw(CSR3, DEPCA_ADDR); /* ALE control */
1201         outw(ACON, DEPCA_DATA);
1202
1203         outw(CSR0, DEPCA_ADDR); /* Point back to CSR0 */
1204
1205         return;
1206 }
1207
1208 static int InitRestartDepca(struct net_device *dev)
1209 {
1210         struct depca_private *lp = (struct depca_private *) dev->priv;
1211         u_long ioaddr = dev->base_addr;
1212         int i, status = 0;
1213
1214         /* Copy the shadow init_block to shared memory */
1215         memcpy_toio(lp->sh_mem, &lp->init_block, sizeof(struct depca_init));
1216
1217         outw(CSR0, DEPCA_ADDR); /* point back to CSR0 */
1218         outw(INIT, DEPCA_DATA); /* initialize DEPCA */
1219
1220         /* wait for lance to complete initialisation */
1221         for (i = 0; (i < 100) && !(inw(DEPCA_DATA) & IDON); i++);
1222
1223         if (i != 100) {
1224                 /* clear IDON by writing a "1", enable interrupts and start lance */
1225                 outw(IDON | INEA | STRT, DEPCA_DATA);
1226                 if (depca_debug > 2) {
1227                         printk("%s: DEPCA open after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1228                 }
1229         } else {
1230                 printk("%s: DEPCA unopen after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1231                 status = -1;
1232         }
1233
1234         return status;
1235 }
1236
1237 static struct net_device_stats *depca_get_stats(struct net_device *dev)
1238 {
1239         struct depca_private *lp = (struct depca_private *) dev->priv;
1240
1241         /* Null body since there is no framing error counter */
1242
1243         return &lp->stats;
1244 }
1245
1246 /*
1247 ** Set or clear the multicast filter for this adaptor.
1248 */
1249 static void set_multicast_list(struct net_device *dev)
1250 {
1251         struct depca_private *lp = (struct depca_private *) dev->priv;
1252         u_long ioaddr = dev->base_addr;
1253
1254         netif_stop_queue(dev);
1255         while (lp->tx_old != lp->tx_new);       /* Wait for the ring to empty */
1256
1257         STOP_DEPCA;     /* Temporarily stop the depca.  */
1258         depca_init_ring(dev);   /* Initialize the descriptor rings */
1259
1260         if (dev->flags & IFF_PROMISC) { /* Set promiscuous mode */
1261                 lp->init_block.mode |= PROM;
1262         } else {
1263                 SetMulticastFilter(dev);
1264                 lp->init_block.mode &= ~PROM;   /* Unset promiscuous mode */
1265         }
1266
1267         LoadCSRs(dev);  /* Reload CSR3 */
1268         InitRestartDepca(dev);  /* Resume normal operation. */
1269         netif_start_queue(dev); /* Unlock the TX ring */
1270 }
1271
1272 /*
1273 ** Calculate the hash code and update the logical address filter
1274 ** from a list of ethernet multicast addresses.
1275 ** Big endian crc one liner is mine, all mine, ha ha ha ha!
1276 ** LANCE calculates its hash codes big endian.
1277 */
1278 static void SetMulticastFilter(struct net_device *dev)
1279 {
1280         struct depca_private *lp = (struct depca_private *) dev->priv;
1281         struct dev_mc_list *dmi = dev->mc_list;
1282         char *addrs;
1283         int i, j, bit, byte;
1284         u16 hashcode;
1285         u32 crc;
1286
1287         if (dev->flags & IFF_ALLMULTI) {        /* Set all multicast bits */
1288                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {
1289                         lp->init_block.mcast_table[i] = (char) 0xff;
1290                 }
1291         } else {
1292                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {   /* Clear the multicast table */
1293                         lp->init_block.mcast_table[i] = 0;
1294                 }
1295                 /* Add multicast addresses */
1296                 for (i = 0; i < dev->mc_count; i++) {   /* for each address in the list */
1297                         addrs = dmi->dmi_addr;
1298                         dmi = dmi->next;
1299                         if ((*addrs & 0x01) == 1) {     /* multicast address? */
1300                                 crc = ether_crc(ETH_ALEN, addrs);
1301                                 hashcode = (crc & 1);   /* hashcode is 6 LSb of CRC ... */
1302                                 for (j = 0; j < 5; j++) {       /* ... in reverse order. */
1303                                         hashcode = (hashcode << 1) | ((crc >>= 1) & 1);
1304                                 }
1305
1306
1307                                 byte = hashcode >> 3;   /* bit[3-5] -> byte in filter */
1308                                 bit = 1 << (hashcode & 0x07);   /* bit[0-2] -> bit in byte */
1309                                 lp->init_block.mcast_table[byte] |= bit;
1310                         }
1311                 }
1312         }
1313
1314         return;
1315 }
1316
1317 static int __init depca_common_init (u_long ioaddr, struct net_device **devp)
1318 {
1319         int status = 0;
1320
1321         if (!request_region (ioaddr, DEPCA_TOTAL_SIZE, depca_string)) {
1322                 status = -EBUSY;
1323                 goto out;
1324         }
1325
1326         if (DevicePresent(ioaddr)) {
1327                 status = -ENODEV;
1328                 goto out_release;
1329         }
1330
1331         if (!(*devp = alloc_etherdev (sizeof (struct depca_private)))) {
1332                 status = -ENOMEM;
1333                 goto out_release;
1334         }
1335
1336         return 0;
1337
1338  out_release:
1339         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1340  out:
1341         return status;
1342 }
1343
1344 #ifdef CONFIG_MCA
1345 /*
1346 ** Microchannel bus I/O device probe
1347 */
1348 static int __init depca_mca_probe(struct device *device)
1349 {
1350         unsigned char pos[2];
1351         unsigned char where;
1352         unsigned long iobase, mem_start;
1353         int irq, err;
1354         struct mca_device *mdev = to_mca_device (device);
1355         struct net_device *dev;
1356         struct depca_private *lp;
1357
1358         /*
1359         ** Search for the adapter.  If an address has been given, search
1360         ** specifically for the card at that address.  Otherwise find the
1361         ** first card in the system.
1362         */
1363
1364         pos[0] = mca_device_read_stored_pos(mdev, 2);
1365         pos[1] = mca_device_read_stored_pos(mdev, 3);
1366
1367         /*
1368         ** IO of card is handled by bits 1 and 2 of pos0.
1369         **
1370         **    bit2 bit1    IO
1371         **       0    0    0x2c00
1372         **       0    1    0x2c10
1373         **       1    0    0x2c20
1374         **       1    1    0x2c30
1375         */
1376         where = (pos[0] & 6) >> 1;
1377         iobase = 0x2c00 + (0x10 * where);
1378
1379         /*
1380         ** Found the adapter we were looking for. Now start setting it up.
1381         **
1382         ** First work on decoding the IRQ.  It's stored in the lower 4 bits
1383         ** of pos1.  Bits are as follows (from the ADF file):
1384         **
1385         **      Bits
1386         **   3   2   1   0    IRQ
1387         **   --------------------
1388         **   0   0   1   0     5
1389         **   0   0   0   1     9
1390         **   0   1   0   0    10
1391         **   1   0   0   0    11
1392         */
1393         where = pos[1] & 0x0f;
1394         switch (where) {
1395         case 1:
1396                 irq = 9;
1397                 break;
1398         case 2:
1399                 irq = 5;
1400                 break;
1401         case 4:
1402                 irq = 10;
1403                 break;
1404         case 8:
1405                 irq = 11;
1406                 break;
1407         default:
1408                 printk("%s: mca_probe IRQ error.  You should never get here (%d).\n", mdev->name, where);
1409                 return -EINVAL;
1410         }
1411
1412         /*
1413         ** Shared memory address of adapter is stored in bits 3-5 of pos0.
1414         ** They are mapped as follows:
1415         **
1416         **    Bit
1417         **   5  4  3       Memory Addresses
1418         **   0  0  0       C0000-CFFFF (64K)
1419         **   1  0  0       C8000-CFFFF (32K)
1420         **   0  0  1       D0000-DFFFF (64K)
1421         **   1  0  1       D8000-DFFFF (32K)
1422         **   0  1  0       E0000-EFFFF (64K)
1423         **   1  1  0       E8000-EFFFF (32K)
1424         */
1425         where = (pos[0] & 0x18) >> 3;
1426         mem_start = 0xc0000 + (where * 0x10000);
1427         if (pos[0] & 0x20) {
1428                 mem_start += 0x8000;
1429         }
1430
1431         /* claim the slot */
1432         strncpy(mdev->name, depca_mca_adapter_name[mdev->index],
1433                 sizeof(mdev->name));
1434         mca_device_set_claim(mdev, 1);
1435
1436         /*
1437         ** Get everything allocated and initialized...  (almost just
1438         ** like the ISA and EISA probes)
1439         */
1440         irq = mca_device_transform_irq(mdev, irq);
1441         iobase = mca_device_transform_ioport(mdev, iobase);
1442
1443         if ((err = depca_common_init (iobase, &dev)))
1444                 goto out_unclaim;
1445
1446         dev->irq = irq;
1447         dev->base_addr = iobase;
1448         lp = dev->priv;
1449         lp->depca_bus = DEPCA_BUS_MCA;
1450         lp->adapter = depca_mca_adapter_type[mdev->index];
1451         lp->mem_start = mem_start;
1452
1453         if ((err = depca_hw_init(dev, device)))
1454                 goto out_free;
1455
1456         return 0;
1457
1458  out_free:
1459         free_netdev (dev);
1460         release_region (iobase, DEPCA_TOTAL_SIZE);
1461  out_unclaim:
1462         mca_device_set_claim(mdev, 0);
1463
1464         return err;
1465 }
1466 #endif
1467
1468 /*
1469 ** ISA bus I/O device probe
1470 */
1471
1472 static void __init depca_platform_probe (void)
1473 {
1474         int i;
1475         struct platform_device *pldev;
1476
1477         for (i = 0; depca_io_ports[i].iobase; i++) {
1478                 depca_io_ports[i].device = NULL;
1479
1480                 /* if an address has been specified on the command
1481                  * line, use it (if valid) */
1482                 if (io && io != depca_io_ports[i].iobase)
1483                         continue;
1484
1485                 pldev = platform_device_alloc(depca_string, i);
1486                 if (!pldev)
1487                         continue;
1488
1489                 pldev->dev.platform_data = (void *) depca_io_ports[i].iobase;
1490                 depca_io_ports[i].device = pldev;
1491
1492                 if (platform_device_add(pldev)) {
1493                         depca_io_ports[i].device = NULL;
1494                         pldev->dev.platform_data = NULL;
1495                         platform_device_put(pldev);
1496                         continue;
1497                 }
1498
1499                 if (!pldev->dev.driver) {
1500                 /* The driver was not bound to this device, there was
1501                  * no hardware at this address. Unregister it, as the
1502                  * release fuction will take care of freeing the
1503                  * allocated structure */
1504
1505                         depca_io_ports[i].device = NULL;
1506                         pldev->dev.platform_data = NULL;
1507                         platform_device_unregister (pldev);
1508                 }
1509         }
1510 }
1511
1512 static enum depca_type __init depca_shmem_probe (ulong *mem_start)
1513 {
1514         u_long mem_base[] = DEPCA_RAM_BASE_ADDRESSES;
1515         enum depca_type adapter = unknown;
1516         int i;
1517
1518         for (i = 0; mem_base[i]; i++) {
1519                 *mem_start = mem ? mem : mem_base[i];
1520                 adapter = DepcaSignature (adapter_name, *mem_start);
1521                 if (adapter != unknown)
1522                         break;
1523         }
1524
1525         return adapter;
1526 }
1527
1528 static int __init depca_isa_probe (struct platform_device *device)
1529 {
1530         struct net_device *dev;
1531         struct depca_private *lp;
1532         u_long ioaddr, mem_start = 0;
1533         enum depca_type adapter = unknown;
1534         int status = 0;
1535
1536         ioaddr = (u_long) device->dev.platform_data;
1537
1538         if ((status = depca_common_init (ioaddr, &dev)))
1539                 goto out;
1540
1541         adapter = depca_shmem_probe (&mem_start);
1542
1543         if (adapter == unknown) {
1544                 status = -ENODEV;
1545                 goto out_free;
1546         }
1547
1548         dev->base_addr = ioaddr;
1549         dev->irq = irq;         /* Use whatever value the user gave
1550                                  * us, and 0 if he didn't. */
1551         lp = dev->priv;
1552         lp->depca_bus = DEPCA_BUS_ISA;
1553         lp->adapter = adapter;
1554         lp->mem_start = mem_start;
1555
1556         if ((status = depca_hw_init(dev, &device->dev)))
1557                 goto out_free;
1558
1559         return 0;
1560
1561  out_free:
1562         free_netdev (dev);
1563         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1564  out:
1565         return status;
1566 }
1567
1568 /*
1569 ** EISA callbacks from sysfs.
1570 */
1571
1572 #ifdef CONFIG_EISA
1573 static int __init depca_eisa_probe (struct device *device)
1574 {
1575         struct eisa_device *edev;
1576         struct net_device *dev;
1577         struct depca_private *lp;
1578         u_long ioaddr, mem_start;
1579         int status = 0;
1580
1581         edev = to_eisa_device (device);
1582         ioaddr = edev->base_addr + DEPCA_EISA_IO_PORTS;
1583
1584         if ((status = depca_common_init (ioaddr, &dev)))
1585                 goto out;
1586
1587         /* It would have been nice to get card configuration from the
1588          * card. Unfortunately, this register is write-only (shares
1589          * it's address with the ethernet prom)... As we don't parse
1590          * the EISA configuration structures (yet... :-), just rely on
1591          * the ISA probing to sort it out... */
1592
1593         depca_shmem_probe (&mem_start);
1594
1595         dev->base_addr = ioaddr;
1596         dev->irq = irq;
1597         lp = dev->priv;
1598         lp->depca_bus = DEPCA_BUS_EISA;
1599         lp->adapter = edev->id.driver_data;
1600         lp->mem_start = mem_start;
1601
1602         if ((status = depca_hw_init(dev, device)))
1603                 goto out_free;
1604
1605         return 0;
1606
1607  out_free:
1608         free_netdev (dev);
1609         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1610  out:
1611         return status;
1612 }
1613 #endif
1614
1615 static int __devexit depca_device_remove (struct device *device)
1616 {
1617         struct net_device *dev;
1618         struct depca_private *lp;
1619         int bus;
1620
1621         dev  = device->driver_data;
1622         lp   = dev->priv;
1623
1624         unregister_netdev (dev);
1625         iounmap (lp->sh_mem);
1626         release_mem_region (lp->mem_start, lp->mem_len);
1627         release_region (dev->base_addr, DEPCA_TOTAL_SIZE);
1628         bus = lp->depca_bus;
1629         free_netdev (dev);
1630
1631         return 0;
1632 }
1633
1634 /*
1635 ** Look for a particular board name in the on-board Remote Diagnostics
1636 ** and Boot (readb) ROM. This will also give us a clue to the network RAM
1637 ** base address.
1638 */
1639 static int __init DepcaSignature(char *name, u_long base_addr)
1640 {
1641         u_int i, j, k;
1642         void __iomem *ptr;
1643         char tmpstr[16];
1644         u_long prom_addr = base_addr + 0xc000;
1645         u_long mem_addr = base_addr + 0x8000; /* 32KB */
1646
1647         /* Can't reserve the prom region, it is already marked as
1648          * used, at least on x86. Instead, reserve a memory region a
1649          * board would certainly use. If it works, go ahead. If not,
1650          * run like hell... */
1651
1652         if (!request_mem_region (mem_addr, 16, depca_string))
1653                 return unknown;
1654
1655         /* Copy the first 16 bytes of ROM */
1656
1657         ptr = ioremap(prom_addr, 16);
1658         if (ptr == NULL) {
1659                 printk(KERN_ERR "depca: I/O remap failed at %lx\n", prom_addr);
1660                 return unknown;
1661         }
1662         for (i = 0; i < 16; i++) {
1663                 tmpstr[i] = readb(ptr + i);
1664         }
1665         iounmap(ptr);
1666
1667         release_mem_region (mem_addr, 16);
1668
1669         /* Check if PROM contains a valid string */
1670         for (i = 0; *depca_signature[i] != '\0'; i++) {
1671                 for (j = 0, k = 0; j < 16 && k < strlen(depca_signature[i]); j++) {
1672                         if (depca_signature[i][k] == tmpstr[j]) {       /* track signature */
1673                                 k++;
1674                         } else {        /* lost signature; begin search again */
1675                                 k = 0;
1676                         }
1677                 }
1678                 if (k == strlen(depca_signature[i]))
1679                         break;
1680         }
1681
1682         /* Check if name string is valid, provided there's no PROM */
1683         if (name && *name && (i == unknown)) {
1684                 for (i = 0; *depca_signature[i] != '\0'; i++) {
1685                         if (strcmp(name, depca_signature[i]) == 0)
1686                                 break;
1687                 }
1688         }
1689
1690         return i;
1691 }
1692
1693 /*
1694 ** Look for a special sequence in the Ethernet station address PROM that
1695 ** is common across all DEPCA products. Note that the original DEPCA needs
1696 ** its ROM address counter to be initialized and enabled. Only enable
1697 ** if the first address octet is a 0x08 - this minimises the chances of
1698 ** messing around with some other hardware, but it assumes that this DEPCA
1699 ** card initialized itself correctly.
1700 **
1701 ** Search the Ethernet address ROM for the signature. Since the ROM address
1702 ** counter can start at an arbitrary point, the search must include the entire
1703 ** probe sequence length plus the (length_of_the_signature - 1).
1704 ** Stop the search IMMEDIATELY after the signature is found so that the
1705 ** PROM address counter is correctly positioned at the start of the
1706 ** ethernet address for later read out.
1707 */
1708 static int __init DevicePresent(u_long ioaddr)
1709 {
1710         union {
1711                 struct {
1712                         u32 a;
1713                         u32 b;
1714                 } llsig;
1715                 char Sig[sizeof(u32) << 1];
1716         }
1717         dev;
1718         short sigLength = 0;
1719         s8 data;
1720         s16 nicsr;
1721         int i, j, status = 0;
1722
1723         data = inb(DEPCA_PROM); /* clear counter on DEPCA */
1724         data = inb(DEPCA_PROM); /* read data */
1725
1726         if (data == 0x08) {     /* Enable counter on DEPCA */
1727                 nicsr = inb(DEPCA_NICSR);
1728                 nicsr |= AAC;
1729                 outb(nicsr, DEPCA_NICSR);
1730         }
1731
1732         dev.llsig.a = ETH_PROM_SIG;
1733         dev.llsig.b = ETH_PROM_SIG;
1734         sigLength = sizeof(u32) << 1;
1735
1736         for (i = 0, j = 0; j < sigLength && i < PROBE_LENGTH + sigLength - 1; i++) {
1737                 data = inb(DEPCA_PROM);
1738                 if (dev.Sig[j] == data) {       /* track signature */
1739                         j++;
1740                 } else {        /* lost signature; begin search again */
1741                         if (data == dev.Sig[0]) {       /* rare case.... */
1742                                 j = 1;
1743                         } else {
1744                                 j = 0;
1745                         }
1746                 }
1747         }
1748
1749         if (j != sigLength) {
1750                 status = -ENODEV;       /* search failed */
1751         }
1752
1753         return status;
1754 }
1755
1756 /*
1757 ** The DE100 and DE101 PROM accesses were made non-standard for some bizarre
1758 ** reason: access the upper half of the PROM with x=0; access the lower half
1759 ** with x=1.
1760 */
1761 static int __init get_hw_addr(struct net_device *dev)
1762 {
1763         u_long ioaddr = dev->base_addr;
1764         struct depca_private *lp = dev->priv;
1765         int i, k, tmp, status = 0;
1766         u_short j, x, chksum;
1767
1768         x = (((lp->adapter == de100) || (lp->adapter == de101)) ? 1 : 0);
1769
1770         for (i = 0, k = 0, j = 0; j < 3; j++) {
1771                 k <<= 1;
1772                 if (k > 0xffff)
1773                         k -= 0xffff;
1774
1775                 k += (u_char) (tmp = inb(DEPCA_PROM + x));
1776                 dev->dev_addr[i++] = (u_char) tmp;
1777                 k += (u_short) ((tmp = inb(DEPCA_PROM + x)) << 8);
1778                 dev->dev_addr[i++] = (u_char) tmp;
1779
1780                 if (k > 0xffff)
1781                         k -= 0xffff;
1782         }
1783         if (k == 0xffff)
1784                 k = 0;
1785
1786         chksum = (u_char) inb(DEPCA_PROM + x);
1787         chksum |= (u_short) (inb(DEPCA_PROM + x) << 8);
1788         if (k != chksum)
1789                 status = -1;
1790
1791         return status;
1792 }
1793
1794 /*
1795 ** Load a packet into the shared memory
1796 */
1797 static int load_packet(struct net_device *dev, struct sk_buff *skb)
1798 {
1799         struct depca_private *lp = (struct depca_private *) dev->priv;
1800         int i, entry, end, len, status = 0;
1801
1802         entry = lp->tx_new;     /* Ring around buffer number. */
1803         end = (entry + (skb->len - 1) / TX_BUFF_SZ) & lp->txRingMask;
1804         if (!(readl(&lp->tx_ring[end].base) & T_OWN)) { /* Enough room? */
1805                 /*
1806                    ** Caution: the write order is important here... don't set up the
1807                    ** ownership rights until all the other information is in place.
1808                  */
1809                 if (end < entry) {      /* wrapped buffer */
1810                         len = (lp->txRingMask - entry + 1) * TX_BUFF_SZ;
1811                         memcpy_toio(lp->tx_buff[entry], skb->data, len);
1812                         memcpy_toio(lp->tx_buff[0], skb->data + len, skb->len - len);
1813                 } else {        /* linear buffer */
1814                         memcpy_toio(lp->tx_buff[entry], skb->data, skb->len);
1815                 }
1816
1817                 /* set up the buffer descriptors */
1818                 len = (skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;
1819                 for (i = entry; i != end; i = (i+1) & lp->txRingMask) {
1820                         /* clean out flags */
1821                         writel(readl(&lp->tx_ring[i].base) & ~T_FLAGS, &lp->tx_ring[i].base);
1822                         writew(0x0000, &lp->tx_ring[i].misc);   /* clears other error flags */
1823                         writew(-TX_BUFF_SZ, &lp->tx_ring[i].length);    /* packet length in buffer */
1824                         len -= TX_BUFF_SZ;
1825                 }
1826                 /* clean out flags */
1827                 writel(readl(&lp->tx_ring[end].base) & ~T_FLAGS, &lp->tx_ring[end].base);
1828                 writew(0x0000, &lp->tx_ring[end].misc); /* clears other error flags */
1829                 writew(-len, &lp->tx_ring[end].length); /* packet length in last buff */
1830
1831                 /* start of packet */
1832                 writel(readl(&lp->tx_ring[entry].base) | T_STP, &lp->tx_ring[entry].base);
1833                 /* end of packet */
1834                 writel(readl(&lp->tx_ring[end].base) | T_ENP, &lp->tx_ring[end].base);
1835
1836                 for (i = end; i != entry; --i) {
1837                         /* ownership of packet */
1838                         writel(readl(&lp->tx_ring[i].base) | T_OWN, &lp->tx_ring[i].base);
1839                         if (i == 0)
1840                                 i = lp->txRingMask + 1;
1841                 }
1842                 writel(readl(&lp->tx_ring[entry].base) | T_OWN, &lp->tx_ring[entry].base);
1843
1844                 lp->tx_new = (++end) & lp->txRingMask;  /* update current pointers */
1845         } else {
1846                 status = -1;
1847         }
1848
1849         return status;
1850 }
1851
1852 static void depca_dbg_open(struct net_device *dev)
1853 {
1854         struct depca_private *lp = (struct depca_private *) dev->priv;
1855         u_long ioaddr = dev->base_addr;
1856         struct depca_init *p = &lp->init_block;
1857         int i;
1858
1859         if (depca_debug > 1) {
1860                 /* Do not copy the shadow init block into shared memory */
1861                 /* Debugging should not affect normal operation! */
1862                 /* The shadow init block will get copied across during InitRestartDepca */
1863                 printk("%s: depca open with irq %d\n", dev->name, dev->irq);
1864                 printk("Descriptor head addresses (CPU):\n");
1865                 printk("        0x%lx  0x%lx\n", (u_long) lp->rx_ring, (u_long) lp->tx_ring);
1866                 printk("Descriptor addresses (CPU):\nRX: ");
1867                 for (i = 0; i < lp->rxRingMask; i++) {
1868                         if (i < 3) {
1869                                 printk("%p ", &lp->rx_ring[i].base);
1870                         }
1871                 }
1872                 printk("...%p\n", &lp->rx_ring[i].base);
1873                 printk("TX: ");
1874                 for (i = 0; i < lp->txRingMask; i++) {
1875                         if (i < 3) {
1876                                 printk("%p ", &lp->tx_ring[i].base);
1877                         }
1878                 }
1879                 printk("...%p\n", &lp->tx_ring[i].base);
1880                 printk("\nDescriptor buffers (Device):\nRX: ");
1881                 for (i = 0; i < lp->rxRingMask; i++) {
1882                         if (i < 3) {
1883                                 printk("0x%8.8x  ", readl(&lp->rx_ring[i].base));
1884                         }
1885                 }
1886                 printk("...0x%8.8x\n", readl(&lp->rx_ring[i].base));
1887                 printk("TX: ");
1888                 for (i = 0; i < lp->txRingMask; i++) {
1889                         if (i < 3) {
1890                                 printk("0x%8.8x  ", readl(&lp->tx_ring[i].base));
1891                         }
1892                 }
1893                 printk("...0x%8.8x\n", readl(&lp->tx_ring[i].base));
1894                 printk("Initialisation block at 0x%8.8lx(Phys)\n", lp->mem_start);
1895                 printk("        mode: 0x%4.4x\n", p->mode);
1896                 printk("        physical address: ");
1897                 for (i = 0; i < ETH_ALEN - 1; i++) {
1898                         printk("%2.2x:", p->phys_addr[i]);
1899                 }
1900                 printk("%2.2x\n", p->phys_addr[i]);
1901                 printk("        multicast hash table: ");
1902                 for (i = 0; i < (HASH_TABLE_LEN >> 3) - 1; i++) {
1903                         printk("%2.2x:", p->mcast_table[i]);
1904                 }
1905                 printk("%2.2x\n", p->mcast_table[i]);
1906                 printk("        rx_ring at: 0x%8.8x\n", p->rx_ring);
1907                 printk("        tx_ring at: 0x%8.8x\n", p->tx_ring);
1908                 printk("buffers (Phys): 0x%8.8lx\n", lp->mem_start + lp->buffs_offset);
1909                 printk("Ring size:\nRX: %d  Log2(rxRingMask): 0x%8.8x\n", (int) lp->rxRingMask + 1, lp->rx_rlen);
1910                 printk("TX: %d  Log2(txRingMask): 0x%8.8x\n", (int) lp->txRingMask + 1, lp->tx_rlen);
1911                 outw(CSR2, DEPCA_ADDR);
1912                 printk("CSR2&1: 0x%4.4x", inw(DEPCA_DATA));
1913                 outw(CSR1, DEPCA_ADDR);
1914                 printk("%4.4x\n", inw(DEPCA_DATA));
1915                 outw(CSR3, DEPCA_ADDR);
1916                 printk("CSR3: 0x%4.4x\n", inw(DEPCA_DATA));
1917         }
1918
1919         return;
1920 }
1921
1922 /*
1923 ** Perform IOCTL call functions here. Some are privileged operations and the
1924 ** effective uid is checked in those cases.
1925 ** All multicast IOCTLs will not work here and are for testing purposes only.
1926 */
1927 static int depca_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1928 {
1929         struct depca_private *lp = (struct depca_private *) dev->priv;
1930         struct depca_ioctl *ioc = (struct depca_ioctl *) &rq->ifr_ifru;
1931         int i, status = 0;
1932         u_long ioaddr = dev->base_addr;
1933         union {
1934                 u8 addr[(HASH_TABLE_LEN * ETH_ALEN)];
1935                 u16 sval[(HASH_TABLE_LEN * ETH_ALEN) >> 1];
1936                 u32 lval[(HASH_TABLE_LEN * ETH_ALEN) >> 2];
1937         } tmp;
1938         unsigned long flags;
1939         void *buf;
1940
1941         switch (ioc->cmd) {
1942         case DEPCA_GET_HWADDR:  /* Get the hardware address */
1943                 for (i = 0; i < ETH_ALEN; i++) {
1944                         tmp.addr[i] = dev->dev_addr[i];
1945                 }
1946                 ioc->len = ETH_ALEN;
1947                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
1948                         return -EFAULT;
1949                 break;
1950
1951         case DEPCA_SET_HWADDR:  /* Set the hardware address */
1952                 if (!capable(CAP_NET_ADMIN))
1953                         return -EPERM;
1954                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN))
1955                         return -EFAULT;
1956                 for (i = 0; i < ETH_ALEN; i++) {
1957                         dev->dev_addr[i] = tmp.addr[i];
1958                 }
1959                 netif_stop_queue(dev);
1960                 while (lp->tx_old != lp->tx_new)
1961                         cpu_relax();    /* Wait for the ring to empty */
1962
1963                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1964                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1965                 LoadCSRs(dev);  /* Reload CSR3 */
1966                 InitRestartDepca(dev);  /* Resume normal operation. */
1967                 netif_start_queue(dev); /* Unlock the TX ring */
1968                 break;
1969
1970         case DEPCA_SET_PROM:    /* Set Promiscuous Mode */
1971                 if (!capable(CAP_NET_ADMIN))
1972                         return -EPERM;
1973                 netif_stop_queue(dev);
1974                 while (lp->tx_old != lp->tx_new)
1975                         cpu_relax();    /* Wait for the ring to empty */
1976
1977                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1978                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1979                 lp->init_block.mode |= PROM;    /* Set promiscuous mode */
1980
1981                 LoadCSRs(dev);  /* Reload CSR3 */
1982                 InitRestartDepca(dev);  /* Resume normal operation. */
1983                 netif_start_queue(dev); /* Unlock the TX ring */
1984                 break;
1985
1986         case DEPCA_CLR_PROM:    /* Clear Promiscuous Mode */
1987                 if (!capable(CAP_NET_ADMIN))
1988                         return -EPERM;
1989                 netif_stop_queue(dev);
1990                 while (lp->tx_old != lp->tx_new)
1991                         cpu_relax();    /* Wait for the ring to empty */
1992
1993                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1994                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1995                 lp->init_block.mode &= ~PROM;   /* Clear promiscuous mode */
1996
1997                 LoadCSRs(dev);  /* Reload CSR3 */
1998                 InitRestartDepca(dev);  /* Resume normal operation. */
1999                 netif_start_queue(dev); /* Unlock the TX ring */
2000                 break;
2001
2002         case DEPCA_SAY_BOO:     /* Say "Boo!" to the kernel log file */
2003                 if(!capable(CAP_NET_ADMIN))
2004                         return -EPERM;
2005                 printk("%s: Boo!\n", dev->name);
2006                 break;
2007
2008         case DEPCA_GET_MCA:     /* Get the multicast address table */
2009                 ioc->len = (HASH_TABLE_LEN >> 3);
2010                 if (copy_to_user(ioc->data, lp->init_block.mcast_table, ioc->len))
2011                         return -EFAULT;
2012                 break;
2013
2014         case DEPCA_SET_MCA:     /* Set a multicast address */
2015                 if (!capable(CAP_NET_ADMIN))
2016                         return -EPERM;
2017                 if (ioc->len >= HASH_TABLE_LEN)
2018                         return -EINVAL;
2019                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN * ioc->len))
2020                         return -EFAULT;
2021                 set_multicast_list(dev);
2022                 break;
2023
2024         case DEPCA_CLR_MCA:     /* Clear all multicast addresses */
2025                 if (!capable(CAP_NET_ADMIN))
2026                         return -EPERM;
2027                 set_multicast_list(dev);
2028                 break;
2029
2030         case DEPCA_MCA_EN:      /* Enable pass all multicast addressing */
2031                 if (!capable(CAP_NET_ADMIN))
2032                         return -EPERM;
2033                 set_multicast_list(dev);
2034                 break;
2035
2036         case DEPCA_GET_STATS:   /* Get the driver statistics */
2037                 ioc->len = sizeof(lp->pktStats);
2038                 buf = kmalloc(ioc->len, GFP_KERNEL);
2039                 if(!buf)
2040                         return -ENOMEM;
2041                 spin_lock_irqsave(&lp->lock, flags);
2042                 memcpy(buf, &lp->pktStats, ioc->len);
2043                 spin_unlock_irqrestore(&lp->lock, flags);
2044                 if (copy_to_user(ioc->data, buf, ioc->len))
2045                         status = -EFAULT;
2046                 kfree(buf);
2047                 break;
2048
2049         case DEPCA_CLR_STATS:   /* Zero out the driver statistics */
2050                 if (!capable(CAP_NET_ADMIN))
2051                         return -EPERM;
2052                 spin_lock_irqsave(&lp->lock, flags);
2053                 memset(&lp->pktStats, 0, sizeof(lp->pktStats));
2054                 spin_unlock_irqrestore(&lp->lock, flags);
2055                 break;
2056
2057         case DEPCA_GET_REG:     /* Get the DEPCA Registers */
2058                 i = 0;
2059                 tmp.sval[i++] = inw(DEPCA_NICSR);
2060                 outw(CSR0, DEPCA_ADDR); /* status register */
2061                 tmp.sval[i++] = inw(DEPCA_DATA);
2062                 memcpy(&tmp.sval[i], &lp->init_block, sizeof(struct depca_init));
2063                 ioc->len = i + sizeof(struct depca_init);
2064                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
2065                         return -EFAULT;
2066                 break;
2067
2068         default:
2069                 return -EOPNOTSUPP;
2070         }
2071
2072         return status;
2073 }
2074
2075 static int __init depca_module_init (void)
2076 {
2077         int err = 0;
2078
2079 #ifdef CONFIG_MCA
2080         err = mca_register_driver (&depca_mca_driver);
2081 #endif
2082 #ifdef CONFIG_EISA
2083         err |= eisa_driver_register (&depca_eisa_driver);
2084 #endif
2085         err |= platform_driver_register (&depca_isa_driver);
2086         depca_platform_probe ();
2087
2088         return err;
2089 }
2090
2091 static void __exit depca_module_exit (void)
2092 {
2093         int i;
2094 #ifdef CONFIG_MCA
2095         mca_unregister_driver (&depca_mca_driver);
2096 #endif
2097 #ifdef CONFIG_EISA
2098         eisa_driver_unregister (&depca_eisa_driver);
2099 #endif
2100         platform_driver_unregister (&depca_isa_driver);
2101
2102         for (i = 0; depca_io_ports[i].iobase; i++) {
2103                 if (depca_io_ports[i].device) {
2104                         depca_io_ports[i].device->dev.platform_data = NULL;
2105                         platform_device_unregister (depca_io_ports[i].device);
2106                         depca_io_ports[i].device = NULL;
2107                 }
2108         }
2109 }
2110
2111 module_init (depca_module_init);
2112 module_exit (depca_module_exit);