fda1226d8ec164b652ff97965d910f2a128c430b
[linux-2.6.git] / 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         spinlock_t lock;
489         struct {                /* Private stats counters                 */
490                 u32 bins[DEPCA_PKT_STAT_SZ];
491                 u32 unicast;
492                 u32 multicast;
493                 u32 broadcast;
494                 u32 excessive_collisions;
495                 u32 tx_underruns;
496                 u32 excessive_underruns;
497         } pktStats;
498         int txRingMask;         /* TX ring mask                           */
499         int rxRingMask;         /* RX ring mask                           */
500         s32 rx_rlen;            /* log2(rxRingMask+1) for the descriptors */
501         s32 tx_rlen;            /* log2(txRingMask+1) for the descriptors */
502 };
503
504 /*
505 ** The transmit ring full condition is described by the tx_old and tx_new
506 ** pointers by:
507 **    tx_old            = tx_new    Empty ring
508 **    tx_old            = tx_new+1  Full ring
509 **    tx_old+txRingMask = tx_new    Full ring  (wrapped condition)
510 */
511 #define TX_BUFFS_AVAIL ((lp->tx_old<=lp->tx_new)?\
512                          lp->tx_old+lp->txRingMask-lp->tx_new:\
513                          lp->tx_old               -lp->tx_new-1)
514
515 /*
516 ** Public Functions
517 */
518 static int depca_open(struct net_device *dev);
519 static int depca_start_xmit(struct sk_buff *skb, struct net_device *dev);
520 static irqreturn_t depca_interrupt(int irq, void *dev_id);
521 static int depca_close(struct net_device *dev);
522 static int depca_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
523 static void depca_tx_timeout(struct net_device *dev);
524 static void set_multicast_list(struct net_device *dev);
525
526 /*
527 ** Private functions
528 */
529 static void depca_init_ring(struct net_device *dev);
530 static int depca_rx(struct net_device *dev);
531 static int depca_tx(struct net_device *dev);
532
533 static void LoadCSRs(struct net_device *dev);
534 static int InitRestartDepca(struct net_device *dev);
535 static int DepcaSignature(char *name, u_long paddr);
536 static int DevicePresent(u_long ioaddr);
537 static int get_hw_addr(struct net_device *dev);
538 static void SetMulticastFilter(struct net_device *dev);
539 static int load_packet(struct net_device *dev, struct sk_buff *skb);
540 static void depca_dbg_open(struct net_device *dev);
541
542 static u_char de1xx_irq[] __initdata = { 2, 3, 4, 5, 7, 9, 0 };
543 static u_char de2xx_irq[] __initdata = { 5, 9, 10, 11, 15, 0 };
544 static u_char de422_irq[] __initdata = { 5, 9, 10, 11, 0 };
545 static u_char *depca_irq;
546
547 static int irq;
548 static int io;
549 static char *adapter_name;
550 static int mem;                 /* For loadable module assignment
551                                    use insmod mem=0x????? .... */
552 module_param (irq, int, 0);
553 module_param (io, int, 0);
554 module_param (adapter_name, charp, 0);
555 module_param (mem, int, 0);
556 MODULE_PARM_DESC(irq, "DEPCA IRQ number");
557 MODULE_PARM_DESC(io, "DEPCA I/O base address");
558 MODULE_PARM_DESC(adapter_name, "DEPCA adapter name");
559 MODULE_PARM_DESC(mem, "DEPCA shared memory address");
560 MODULE_LICENSE("GPL");
561
562 /*
563 ** Miscellaneous defines...
564 */
565 #define STOP_DEPCA \
566     outw(CSR0, DEPCA_ADDR);\
567     outw(STOP, DEPCA_DATA)
568
569 static int __init depca_hw_init (struct net_device *dev, struct device *device)
570 {
571         struct depca_private *lp;
572         int i, j, offset, netRAM, mem_len, status = 0;
573         s16 nicsr;
574         u_long ioaddr;
575         u_long mem_start;
576
577         /*
578          * We are now supposed to enter this function with the
579          * following fields filled with proper values :
580          *
581          * dev->base_addr
582          * lp->mem_start
583          * lp->depca_bus
584          * lp->adapter
585          *
586          * dev->irq can be set if known from device configuration (on
587          * MCA or EISA) or module option. Otherwise, it will be auto
588          * detected.
589          */
590
591         ioaddr = dev->base_addr;
592
593         STOP_DEPCA;
594
595         nicsr = inb(DEPCA_NICSR);
596         nicsr = ((nicsr & ~SHE & ~RBE & ~IEN) | IM);
597         outb(nicsr, DEPCA_NICSR);
598
599         if (inw(DEPCA_DATA) != STOP) {
600                 return -ENXIO;
601         }
602
603         lp = (struct depca_private *) dev->priv;
604         mem_start = lp->mem_start;
605
606         if (!mem_start || lp->adapter < DEPCA || lp->adapter >=unknown)
607                 return -ENXIO;
608
609         printk ("%s: %s at 0x%04lx",
610                 device->bus_id, depca_signature[lp->adapter], ioaddr);
611
612         switch (lp->depca_bus) {
613 #ifdef CONFIG_MCA
614         case DEPCA_BUS_MCA:
615                 printk(" (MCA slot %d)", to_mca_device(device)->slot + 1);
616                 break;
617 #endif
618
619 #ifdef CONFIG_EISA
620         case DEPCA_BUS_EISA:
621                 printk(" (EISA slot %d)", to_eisa_device(device)->slot);
622                 break;
623 #endif
624
625         case DEPCA_BUS_ISA:
626                 break;
627
628         default:
629                 printk("Unknown DEPCA bus %d\n", lp->depca_bus);
630                 return -ENXIO;
631         }
632
633         printk(", h/w address ");
634         status = get_hw_addr(dev);
635         printk("%pM", dev->dev_addr);
636         if (status != 0) {
637                 printk("      which has an Ethernet PROM CRC error.\n");
638                 return -ENXIO;
639         }
640
641         /* Set up the maximum amount of network RAM(kB) */
642         netRAM = ((lp->adapter != DEPCA) ? 64 : 48);
643         if ((nicsr & _128KB) && (lp->adapter == de422))
644                 netRAM = 128;
645
646         /* Shared Memory Base Address */
647         if (nicsr & BUF) {
648                 nicsr &= ~BS;   /* DEPCA RAM in top 32k */
649                 netRAM -= 32;
650
651                 /* Only EISA/ISA needs start address to be re-computed */
652                 if (lp->depca_bus != DEPCA_BUS_MCA)
653                         mem_start += 0x8000;
654         }
655
656         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)))
657             > (netRAM << 10)) {
658                 printk(",\n       requests %dkB RAM: only %dkB is available!\n", (mem_len >> 10), netRAM);
659                 return -ENXIO;
660         }
661
662         printk(",\n      has %dkB RAM at 0x%.5lx", netRAM, mem_start);
663
664         /* Enable the shadow RAM. */
665         if (lp->adapter != DEPCA) {
666                 nicsr |= SHE;
667                 outb(nicsr, DEPCA_NICSR);
668         }
669
670         spin_lock_init(&lp->lock);
671         sprintf(lp->adapter_name, "%s (%s)",
672                 depca_signature[lp->adapter], device->bus_id);
673         status = -EBUSY;
674
675         /* Initialisation Block */
676         if (!request_mem_region (mem_start, mem_len, lp->adapter_name)) {
677                 printk(KERN_ERR "depca: cannot request ISA memory, aborting\n");
678                 goto out_priv;
679         }
680
681         status = -EIO;
682         lp->sh_mem = ioremap(mem_start, mem_len);
683         if (lp->sh_mem == NULL) {
684                 printk(KERN_ERR "depca: cannot remap ISA memory, aborting\n");
685                 goto out1;
686         }
687
688         lp->mem_start = mem_start;
689         lp->mem_len   = mem_len;
690         lp->device_ram_start = mem_start & LA_MASK;
691
692         offset = 0;
693         offset += sizeof(struct depca_init);
694
695         /* Tx & Rx descriptors (aligned to a quadword boundary) */
696         offset = (offset + DEPCA_ALIGN) & ~DEPCA_ALIGN;
697         lp->rx_ring = (struct depca_rx_desc __iomem *) (lp->sh_mem + offset);
698         lp->rx_ring_offset = offset;
699
700         offset += (sizeof(struct depca_rx_desc) * NUM_RX_DESC);
701         lp->tx_ring = (struct depca_tx_desc __iomem *) (lp->sh_mem + offset);
702         lp->tx_ring_offset = offset;
703
704         offset += (sizeof(struct depca_tx_desc) * NUM_TX_DESC);
705
706         lp->buffs_offset = offset;
707
708         /* Finish initialising the ring information. */
709         lp->rxRingMask = NUM_RX_DESC - 1;
710         lp->txRingMask = NUM_TX_DESC - 1;
711
712         /* Calculate Tx/Rx RLEN size for the descriptors. */
713         for (i = 0, j = lp->rxRingMask; j > 0; i++) {
714                 j >>= 1;
715         }
716         lp->rx_rlen = (s32) (i << 29);
717         for (i = 0, j = lp->txRingMask; j > 0; i++) {
718                 j >>= 1;
719         }
720         lp->tx_rlen = (s32) (i << 29);
721
722         /* Load the initialisation block */
723         depca_init_ring(dev);
724
725         /* Initialise the control and status registers */
726         LoadCSRs(dev);
727
728         /* Enable DEPCA board interrupts for autoprobing */
729         nicsr = ((nicsr & ~IM) | IEN);
730         outb(nicsr, DEPCA_NICSR);
731
732         /* To auto-IRQ we enable the initialization-done and DMA err,
733            interrupts. For now we will always get a DMA error. */
734         if (dev->irq < 2) {
735                 unsigned char irqnum;
736                 unsigned long irq_mask, delay;
737
738                 irq_mask = probe_irq_on();
739
740                 /* Assign the correct irq list */
741                 switch (lp->adapter) {
742                 case DEPCA:
743                 case de100:
744                 case de101:
745                         depca_irq = de1xx_irq;
746                         break;
747                 case de200:
748                 case de201:
749                 case de202:
750                 case de210:
751                 case de212:
752                         depca_irq = de2xx_irq;
753                         break;
754                 case de422:
755                         depca_irq = de422_irq;
756                         break;
757
758                 default:
759                         break;  /* Not reached */
760                 }
761
762                 /* Trigger an initialization just for the interrupt. */
763                 outw(INEA | INIT, DEPCA_DATA);
764
765                 delay = jiffies + HZ/50;
766                 while (time_before(jiffies, delay))
767                         yield();
768
769                 irqnum = probe_irq_off(irq_mask);
770
771                 status = -ENXIO;
772                 if (!irqnum) {
773                         printk(" and failed to detect IRQ line.\n");
774                         goto out2;
775                 } else {
776                         for (dev->irq = 0, i = 0; (depca_irq[i]) && (!dev->irq); i++)
777                                 if (irqnum == depca_irq[i]) {
778                                         dev->irq = irqnum;
779                                         printk(" and uses IRQ%d.\n", dev->irq);
780                                 }
781
782                         if (!dev->irq) {
783                                 printk(" but incorrect IRQ line detected.\n");
784                                 goto out2;
785                         }
786                 }
787         } else {
788                 printk(" and assigned IRQ%d.\n", dev->irq);
789         }
790
791         if (depca_debug > 1) {
792                 printk(version);
793         }
794
795         /* The DEPCA-specific entries in the device structure. */
796         dev->open = &depca_open;
797         dev->hard_start_xmit = &depca_start_xmit;
798         dev->stop = &depca_close;
799         dev->set_multicast_list = &set_multicast_list;
800         dev->do_ioctl = &depca_ioctl;
801         dev->tx_timeout = depca_tx_timeout;
802         dev->watchdog_timeo = TX_TIMEOUT;
803
804         dev->mem_start = 0;
805
806         device->driver_data = dev;
807         SET_NETDEV_DEV (dev, device);
808
809         status = register_netdev(dev);
810         if (status == 0)
811                 return 0;
812 out2:
813         iounmap(lp->sh_mem);
814 out1:
815         release_mem_region (mem_start, mem_len);
816 out_priv:
817         return status;
818 }
819
820
821 static int depca_open(struct net_device *dev)
822 {
823         struct depca_private *lp = (struct depca_private *) dev->priv;
824         u_long ioaddr = dev->base_addr;
825         s16 nicsr;
826         int status = 0;
827
828         STOP_DEPCA;
829         nicsr = inb(DEPCA_NICSR);
830
831         /* Make sure the shadow RAM is enabled */
832         if (lp->adapter != DEPCA) {
833                 nicsr |= SHE;
834                 outb(nicsr, DEPCA_NICSR);
835         }
836
837         /* Re-initialize the DEPCA... */
838         depca_init_ring(dev);
839         LoadCSRs(dev);
840
841         depca_dbg_open(dev);
842
843         if (request_irq(dev->irq, &depca_interrupt, 0, lp->adapter_name, dev)) {
844                 printk("depca_open(): Requested IRQ%d is busy\n", dev->irq);
845                 status = -EAGAIN;
846         } else {
847
848                 /* Enable DEPCA board interrupts and turn off LED */
849                 nicsr = ((nicsr & ~IM & ~LED) | IEN);
850                 outb(nicsr, DEPCA_NICSR);
851                 outw(CSR0, DEPCA_ADDR);
852
853                 netif_start_queue(dev);
854
855                 status = InitRestartDepca(dev);
856
857                 if (depca_debug > 1) {
858                         printk("CSR0: 0x%4.4x\n", inw(DEPCA_DATA));
859                         printk("nicsr: 0x%02x\n", inb(DEPCA_NICSR));
860                 }
861         }
862         return status;
863 }
864
865 /* Initialize the lance Rx and Tx descriptor rings. */
866 static void depca_init_ring(struct net_device *dev)
867 {
868         struct depca_private *lp = (struct depca_private *) dev->priv;
869         u_int i;
870         u_long offset;
871
872         /* Lock out other processes whilst setting up the hardware */
873         netif_stop_queue(dev);
874
875         lp->rx_new = lp->tx_new = 0;
876         lp->rx_old = lp->tx_old = 0;
877
878         /* Initialize the base address and length of each buffer in the ring */
879         for (i = 0; i <= lp->rxRingMask; i++) {
880                 offset = lp->buffs_offset + i * RX_BUFF_SZ;
881                 writel((lp->device_ram_start + offset) | R_OWN, &lp->rx_ring[i].base);
882                 writew(-RX_BUFF_SZ, &lp->rx_ring[i].buf_length);
883                 lp->rx_buff[i] = lp->sh_mem + offset;
884         }
885
886         for (i = 0; i <= lp->txRingMask; i++) {
887                 offset = lp->buffs_offset + (i + lp->rxRingMask + 1) * TX_BUFF_SZ;
888                 writel((lp->device_ram_start + offset) & 0x00ffffff, &lp->tx_ring[i].base);
889                 lp->tx_buff[i] = lp->sh_mem + offset;
890         }
891
892         /* Set up the initialization block */
893         lp->init_block.rx_ring = (lp->device_ram_start + lp->rx_ring_offset) | lp->rx_rlen;
894         lp->init_block.tx_ring = (lp->device_ram_start + lp->tx_ring_offset) | lp->tx_rlen;
895
896         SetMulticastFilter(dev);
897
898         for (i = 0; i < ETH_ALEN; i++) {
899                 lp->init_block.phys_addr[i] = dev->dev_addr[i];
900         }
901
902         lp->init_block.mode = 0x0000;   /* Enable the Tx and Rx */
903 }
904
905
906 static void depca_tx_timeout(struct net_device *dev)
907 {
908         u_long ioaddr = dev->base_addr;
909
910         printk("%s: transmit timed out, status %04x, resetting.\n", dev->name, inw(DEPCA_DATA));
911
912         STOP_DEPCA;
913         depca_init_ring(dev);
914         LoadCSRs(dev);
915         dev->trans_start = jiffies;
916         netif_wake_queue(dev);
917         InitRestartDepca(dev);
918 }
919
920
921 /*
922 ** Writes a socket buffer to TX descriptor ring and starts transmission
923 */
924 static int depca_start_xmit(struct sk_buff *skb, struct net_device *dev)
925 {
926         struct depca_private *lp = (struct depca_private *) dev->priv;
927         u_long ioaddr = dev->base_addr;
928         int status = 0;
929
930         /* Transmitter timeout, serious problems. */
931         if (skb->len < 1)
932                 goto out;
933
934         if (skb_padto(skb, ETH_ZLEN))
935                 goto out;
936
937         netif_stop_queue(dev);
938
939         if (TX_BUFFS_AVAIL) {   /* Fill in a Tx ring entry */
940                 status = load_packet(dev, skb);
941
942                 if (!status) {
943                         /* Trigger an immediate send demand. */
944                         outw(CSR0, DEPCA_ADDR);
945                         outw(INEA | TDMD, DEPCA_DATA);
946
947                         dev->trans_start = jiffies;
948                         dev_kfree_skb(skb);
949                 }
950                 if (TX_BUFFS_AVAIL)
951                         netif_start_queue(dev);
952         } else
953                 status = -1;
954
955       out:
956         return status;
957 }
958
959 /*
960 ** The DEPCA interrupt handler.
961 */
962 static irqreturn_t depca_interrupt(int irq, void *dev_id)
963 {
964         struct net_device *dev = dev_id;
965         struct depca_private *lp;
966         s16 csr0, nicsr;
967         u_long ioaddr;
968
969         if (dev == NULL) {
970                 printk("depca_interrupt(): irq %d for unknown device.\n", irq);
971                 return IRQ_NONE;
972         }
973
974         lp = (struct depca_private *) dev->priv;
975         ioaddr = dev->base_addr;
976
977         spin_lock(&lp->lock);
978
979         /* mask the DEPCA board interrupts and turn on the LED */
980         nicsr = inb(DEPCA_NICSR);
981         nicsr |= (IM | LED);
982         outb(nicsr, DEPCA_NICSR);
983
984         outw(CSR0, DEPCA_ADDR);
985         csr0 = inw(DEPCA_DATA);
986
987         /* Acknowledge all of the current interrupt sources ASAP. */
988         outw(csr0 & INTE, DEPCA_DATA);
989
990         if (csr0 & RINT)        /* Rx interrupt (packet arrived) */
991                 depca_rx(dev);
992
993         if (csr0 & TINT)        /* Tx interrupt (packet sent) */
994                 depca_tx(dev);
995
996         /* Any resources available? */
997         if ((TX_BUFFS_AVAIL >= 0) && netif_queue_stopped(dev)) {
998                 netif_wake_queue(dev);
999         }
1000
1001         /* Unmask the DEPCA board interrupts and turn off the LED */
1002         nicsr = (nicsr & ~IM & ~LED);
1003         outb(nicsr, DEPCA_NICSR);
1004
1005         spin_unlock(&lp->lock);
1006         return IRQ_HANDLED;
1007 }
1008
1009 /* Called with lp->lock held */
1010 static int depca_rx(struct net_device *dev)
1011 {
1012         struct depca_private *lp = (struct depca_private *) dev->priv;
1013         int i, entry;
1014         s32 status;
1015
1016         for (entry = lp->rx_new; !(readl(&lp->rx_ring[entry].base) & R_OWN); entry = lp->rx_new) {
1017                 status = readl(&lp->rx_ring[entry].base) >> 16;
1018                 if (status & R_STP) {   /* Remember start of frame */
1019                         lp->rx_old = entry;
1020                 }
1021                 if (status & R_ENP) {   /* Valid frame status */
1022                         if (status & R_ERR) {   /* There was an error. */
1023                                 dev->stats.rx_errors++; /* Update the error stats. */
1024                                 if (status & R_FRAM)
1025                                         dev->stats.rx_frame_errors++;
1026                                 if (status & R_OFLO)
1027                                         dev->stats.rx_over_errors++;
1028                                 if (status & R_CRC)
1029                                         dev->stats.rx_crc_errors++;
1030                                 if (status & R_BUFF)
1031                                         dev->stats.rx_fifo_errors++;
1032                         } else {
1033                                 short len, pkt_len = readw(&lp->rx_ring[entry].msg_length) - 4;
1034                                 struct sk_buff *skb;
1035
1036                                 skb = dev_alloc_skb(pkt_len + 2);
1037                                 if (skb != NULL) {
1038                                         unsigned char *buf;
1039                                         skb_reserve(skb, 2);    /* 16 byte align the IP header */
1040                                         buf = skb_put(skb, pkt_len);
1041                                         if (entry < lp->rx_old) {       /* Wrapped buffer */
1042                                                 len = (lp->rxRingMask - lp->rx_old + 1) * RX_BUFF_SZ;
1043                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], len);
1044                                                 memcpy_fromio(buf + len, lp->rx_buff[0], pkt_len - len);
1045                                         } else {        /* Linear buffer */
1046                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], pkt_len);
1047                                         }
1048
1049                                         /*
1050                                            ** Notify the upper protocol layers that there is another
1051                                            ** packet to handle
1052                                          */
1053                                         skb->protocol = eth_type_trans(skb, dev);
1054                                         netif_rx(skb);
1055
1056                                         /*
1057                                            ** Update stats
1058                                          */
1059                                         dev->stats.rx_packets++;
1060                                         dev->stats.rx_bytes += pkt_len;
1061                                         for (i = 1; i < DEPCA_PKT_STAT_SZ - 1; i++) {
1062                                                 if (pkt_len < (i * DEPCA_PKT_BIN_SZ)) {
1063                                                         lp->pktStats.bins[i]++;
1064                                                         i = DEPCA_PKT_STAT_SZ;
1065                                                 }
1066                                         }
1067                                         if (buf[0] & 0x01) {    /* Multicast/Broadcast */
1068                                                 if ((*(s16 *) & buf[0] == -1) && (*(s16 *) & buf[2] == -1) && (*(s16 *) & buf[4] == -1)) {
1069                                                         lp->pktStats.broadcast++;
1070                                                 } else {
1071                                                         lp->pktStats.multicast++;
1072                                                 }
1073                                         } 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])) {
1074                                                 lp->pktStats.unicast++;
1075                                         }
1076
1077                                         lp->pktStats.bins[0]++; /* Duplicates stats.rx_packets */
1078                                         if (lp->pktStats.bins[0] == 0) {        /* Reset counters */
1079                                                 memset((char *) &lp->pktStats, 0, sizeof(lp->pktStats));
1080                                         }
1081                                 } else {
1082                                         printk("%s: Memory squeeze, deferring packet.\n", dev->name);
1083                                         dev->stats.rx_dropped++;        /* Really, deferred. */
1084                                         break;
1085                                 }
1086                         }
1087                         /* Change buffer ownership for this last frame, back to the adapter */
1088                         for (; lp->rx_old != entry; lp->rx_old = (++lp->rx_old) & lp->rxRingMask) {
1089                                 writel(readl(&lp->rx_ring[lp->rx_old].base) | R_OWN, &lp->rx_ring[lp->rx_old].base);
1090                         }
1091                         writel(readl(&lp->rx_ring[entry].base) | R_OWN, &lp->rx_ring[entry].base);
1092                 }
1093
1094                 /*
1095                    ** Update entry information
1096                  */
1097                 lp->rx_new = (++lp->rx_new) & lp->rxRingMask;
1098         }
1099
1100         return 0;
1101 }
1102
1103 /*
1104 ** Buffer sent - check for buffer errors.
1105 ** Called with lp->lock held
1106 */
1107 static int depca_tx(struct net_device *dev)
1108 {
1109         struct depca_private *lp = (struct depca_private *) dev->priv;
1110         int entry;
1111         s32 status;
1112         u_long ioaddr = dev->base_addr;
1113
1114         for (entry = lp->tx_old; entry != lp->tx_new; entry = lp->tx_old) {
1115                 status = readl(&lp->tx_ring[entry].base) >> 16;
1116
1117                 if (status < 0) {       /* Packet not yet sent! */
1118                         break;
1119                 } else if (status & T_ERR) {    /* An error occurred. */
1120                         status = readl(&lp->tx_ring[entry].misc);
1121                         dev->stats.tx_errors++;
1122                         if (status & TMD3_RTRY)
1123                                 dev->stats.tx_aborted_errors++;
1124                         if (status & TMD3_LCAR)
1125                                 dev->stats.tx_carrier_errors++;
1126                         if (status & TMD3_LCOL)
1127                                 dev->stats.tx_window_errors++;
1128                         if (status & TMD3_UFLO)
1129                                 dev->stats.tx_fifo_errors++;
1130                         if (status & (TMD3_BUFF | TMD3_UFLO)) {
1131                                 /* Trigger an immediate send demand. */
1132                                 outw(CSR0, DEPCA_ADDR);
1133                                 outw(INEA | TDMD, DEPCA_DATA);
1134                         }
1135                 } else if (status & (T_MORE | T_ONE)) {
1136                         dev->stats.collisions++;
1137                 } else {
1138                         dev->stats.tx_packets++;
1139                 }
1140
1141                 /* Update all the pointers */
1142                 lp->tx_old = (++lp->tx_old) & lp->txRingMask;
1143         }
1144
1145         return 0;
1146 }
1147
1148 static int depca_close(struct net_device *dev)
1149 {
1150         struct depca_private *lp = (struct depca_private *) dev->priv;
1151         s16 nicsr;
1152         u_long ioaddr = dev->base_addr;
1153
1154         netif_stop_queue(dev);
1155
1156         outw(CSR0, DEPCA_ADDR);
1157
1158         if (depca_debug > 1) {
1159                 printk("%s: Shutting down ethercard, status was %2.2x.\n", dev->name, inw(DEPCA_DATA));
1160         }
1161
1162         /*
1163            ** We stop the DEPCA here -- it occasionally polls
1164            ** memory if we don't.
1165          */
1166         outw(STOP, DEPCA_DATA);
1167
1168         /*
1169            ** Give back the ROM in case the user wants to go to DOS
1170          */
1171         if (lp->adapter != DEPCA) {
1172                 nicsr = inb(DEPCA_NICSR);
1173                 nicsr &= ~SHE;
1174                 outb(nicsr, DEPCA_NICSR);
1175         }
1176
1177         /*
1178            ** Free the associated irq
1179          */
1180         free_irq(dev->irq, dev);
1181         return 0;
1182 }
1183
1184 static void LoadCSRs(struct net_device *dev)
1185 {
1186         struct depca_private *lp = (struct depca_private *) dev->priv;
1187         u_long ioaddr = dev->base_addr;
1188
1189         outw(CSR1, DEPCA_ADDR); /* initialisation block address LSW */
1190         outw((u16) lp->device_ram_start, DEPCA_DATA);
1191         outw(CSR2, DEPCA_ADDR); /* initialisation block address MSW */
1192         outw((u16) (lp->device_ram_start >> 16), DEPCA_DATA);
1193         outw(CSR3, DEPCA_ADDR); /* ALE control */
1194         outw(ACON, DEPCA_DATA);
1195
1196         outw(CSR0, DEPCA_ADDR); /* Point back to CSR0 */
1197
1198         return;
1199 }
1200
1201 static int InitRestartDepca(struct net_device *dev)
1202 {
1203         struct depca_private *lp = (struct depca_private *) dev->priv;
1204         u_long ioaddr = dev->base_addr;
1205         int i, status = 0;
1206
1207         /* Copy the shadow init_block to shared memory */
1208         memcpy_toio(lp->sh_mem, &lp->init_block, sizeof(struct depca_init));
1209
1210         outw(CSR0, DEPCA_ADDR); /* point back to CSR0 */
1211         outw(INIT, DEPCA_DATA); /* initialize DEPCA */
1212
1213         /* wait for lance to complete initialisation */
1214         for (i = 0; (i < 100) && !(inw(DEPCA_DATA) & IDON); i++);
1215
1216         if (i != 100) {
1217                 /* clear IDON by writing a "1", enable interrupts and start lance */
1218                 outw(IDON | INEA | STRT, DEPCA_DATA);
1219                 if (depca_debug > 2) {
1220                         printk("%s: DEPCA open after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1221                 }
1222         } else {
1223                 printk("%s: DEPCA unopen after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1224                 status = -1;
1225         }
1226
1227         return status;
1228 }
1229
1230 /*
1231 ** Set or clear the multicast filter for this adaptor.
1232 */
1233 static void set_multicast_list(struct net_device *dev)
1234 {
1235         struct depca_private *lp = (struct depca_private *) dev->priv;
1236         u_long ioaddr = dev->base_addr;
1237
1238         netif_stop_queue(dev);
1239         while (lp->tx_old != lp->tx_new);       /* Wait for the ring to empty */
1240
1241         STOP_DEPCA;     /* Temporarily stop the depca.  */
1242         depca_init_ring(dev);   /* Initialize the descriptor rings */
1243
1244         if (dev->flags & IFF_PROMISC) { /* Set promiscuous mode */
1245                 lp->init_block.mode |= PROM;
1246         } else {
1247                 SetMulticastFilter(dev);
1248                 lp->init_block.mode &= ~PROM;   /* Unset promiscuous mode */
1249         }
1250
1251         LoadCSRs(dev);  /* Reload CSR3 */
1252         InitRestartDepca(dev);  /* Resume normal operation. */
1253         netif_start_queue(dev); /* Unlock the TX ring */
1254 }
1255
1256 /*
1257 ** Calculate the hash code and update the logical address filter
1258 ** from a list of ethernet multicast addresses.
1259 ** Big endian crc one liner is mine, all mine, ha ha ha ha!
1260 ** LANCE calculates its hash codes big endian.
1261 */
1262 static void SetMulticastFilter(struct net_device *dev)
1263 {
1264         struct depca_private *lp = (struct depca_private *) dev->priv;
1265         struct dev_mc_list *dmi = dev->mc_list;
1266         char *addrs;
1267         int i, j, bit, byte;
1268         u16 hashcode;
1269         u32 crc;
1270
1271         if (dev->flags & IFF_ALLMULTI) {        /* Set all multicast bits */
1272                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {
1273                         lp->init_block.mcast_table[i] = (char) 0xff;
1274                 }
1275         } else {
1276                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {   /* Clear the multicast table */
1277                         lp->init_block.mcast_table[i] = 0;
1278                 }
1279                 /* Add multicast addresses */
1280                 for (i = 0; i < dev->mc_count; i++) {   /* for each address in the list */
1281                         addrs = dmi->dmi_addr;
1282                         dmi = dmi->next;
1283                         if ((*addrs & 0x01) == 1) {     /* multicast address? */
1284                                 crc = ether_crc(ETH_ALEN, addrs);
1285                                 hashcode = (crc & 1);   /* hashcode is 6 LSb of CRC ... */
1286                                 for (j = 0; j < 5; j++) {       /* ... in reverse order. */
1287                                         hashcode = (hashcode << 1) | ((crc >>= 1) & 1);
1288                                 }
1289
1290
1291                                 byte = hashcode >> 3;   /* bit[3-5] -> byte in filter */
1292                                 bit = 1 << (hashcode & 0x07);   /* bit[0-2] -> bit in byte */
1293                                 lp->init_block.mcast_table[byte] |= bit;
1294                         }
1295                 }
1296         }
1297
1298         return;
1299 }
1300
1301 static int __init depca_common_init (u_long ioaddr, struct net_device **devp)
1302 {
1303         int status = 0;
1304
1305         if (!request_region (ioaddr, DEPCA_TOTAL_SIZE, depca_string)) {
1306                 status = -EBUSY;
1307                 goto out;
1308         }
1309
1310         if (DevicePresent(ioaddr)) {
1311                 status = -ENODEV;
1312                 goto out_release;
1313         }
1314
1315         if (!(*devp = alloc_etherdev (sizeof (struct depca_private)))) {
1316                 status = -ENOMEM;
1317                 goto out_release;
1318         }
1319
1320         return 0;
1321
1322  out_release:
1323         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1324  out:
1325         return status;
1326 }
1327
1328 #ifdef CONFIG_MCA
1329 /*
1330 ** Microchannel bus I/O device probe
1331 */
1332 static int __init depca_mca_probe(struct device *device)
1333 {
1334         unsigned char pos[2];
1335         unsigned char where;
1336         unsigned long iobase, mem_start;
1337         int irq, err;
1338         struct mca_device *mdev = to_mca_device (device);
1339         struct net_device *dev;
1340         struct depca_private *lp;
1341
1342         /*
1343         ** Search for the adapter.  If an address has been given, search
1344         ** specifically for the card at that address.  Otherwise find the
1345         ** first card in the system.
1346         */
1347
1348         pos[0] = mca_device_read_stored_pos(mdev, 2);
1349         pos[1] = mca_device_read_stored_pos(mdev, 3);
1350
1351         /*
1352         ** IO of card is handled by bits 1 and 2 of pos0.
1353         **
1354         **    bit2 bit1    IO
1355         **       0    0    0x2c00
1356         **       0    1    0x2c10
1357         **       1    0    0x2c20
1358         **       1    1    0x2c30
1359         */
1360         where = (pos[0] & 6) >> 1;
1361         iobase = 0x2c00 + (0x10 * where);
1362
1363         /*
1364         ** Found the adapter we were looking for. Now start setting it up.
1365         **
1366         ** First work on decoding the IRQ.  It's stored in the lower 4 bits
1367         ** of pos1.  Bits are as follows (from the ADF file):
1368         **
1369         **      Bits
1370         **   3   2   1   0    IRQ
1371         **   --------------------
1372         **   0   0   1   0     5
1373         **   0   0   0   1     9
1374         **   0   1   0   0    10
1375         **   1   0   0   0    11
1376         */
1377         where = pos[1] & 0x0f;
1378         switch (where) {
1379         case 1:
1380                 irq = 9;
1381                 break;
1382         case 2:
1383                 irq = 5;
1384                 break;
1385         case 4:
1386                 irq = 10;
1387                 break;
1388         case 8:
1389                 irq = 11;
1390                 break;
1391         default:
1392                 printk("%s: mca_probe IRQ error.  You should never get here (%d).\n", mdev->name, where);
1393                 return -EINVAL;
1394         }
1395
1396         /*
1397         ** Shared memory address of adapter is stored in bits 3-5 of pos0.
1398         ** They are mapped as follows:
1399         **
1400         **    Bit
1401         **   5  4  3       Memory Addresses
1402         **   0  0  0       C0000-CFFFF (64K)
1403         **   1  0  0       C8000-CFFFF (32K)
1404         **   0  0  1       D0000-DFFFF (64K)
1405         **   1  0  1       D8000-DFFFF (32K)
1406         **   0  1  0       E0000-EFFFF (64K)
1407         **   1  1  0       E8000-EFFFF (32K)
1408         */
1409         where = (pos[0] & 0x18) >> 3;
1410         mem_start = 0xc0000 + (where * 0x10000);
1411         if (pos[0] & 0x20) {
1412                 mem_start += 0x8000;
1413         }
1414
1415         /* claim the slot */
1416         strncpy(mdev->name, depca_mca_adapter_name[mdev->index],
1417                 sizeof(mdev->name));
1418         mca_device_set_claim(mdev, 1);
1419
1420         /*
1421         ** Get everything allocated and initialized...  (almost just
1422         ** like the ISA and EISA probes)
1423         */
1424         irq = mca_device_transform_irq(mdev, irq);
1425         iobase = mca_device_transform_ioport(mdev, iobase);
1426
1427         if ((err = depca_common_init (iobase, &dev)))
1428                 goto out_unclaim;
1429
1430         dev->irq = irq;
1431         dev->base_addr = iobase;
1432         lp = dev->priv;
1433         lp->depca_bus = DEPCA_BUS_MCA;
1434         lp->adapter = depca_mca_adapter_type[mdev->index];
1435         lp->mem_start = mem_start;
1436
1437         if ((err = depca_hw_init(dev, device)))
1438                 goto out_free;
1439
1440         return 0;
1441
1442  out_free:
1443         free_netdev (dev);
1444         release_region (iobase, DEPCA_TOTAL_SIZE);
1445  out_unclaim:
1446         mca_device_set_claim(mdev, 0);
1447
1448         return err;
1449 }
1450 #endif
1451
1452 /*
1453 ** ISA bus I/O device probe
1454 */
1455
1456 static void __init depca_platform_probe (void)
1457 {
1458         int i;
1459         struct platform_device *pldev;
1460
1461         for (i = 0; depca_io_ports[i].iobase; i++) {
1462                 depca_io_ports[i].device = NULL;
1463
1464                 /* if an address has been specified on the command
1465                  * line, use it (if valid) */
1466                 if (io && io != depca_io_ports[i].iobase)
1467                         continue;
1468
1469                 pldev = platform_device_alloc(depca_string, i);
1470                 if (!pldev)
1471                         continue;
1472
1473                 pldev->dev.platform_data = (void *) depca_io_ports[i].iobase;
1474                 depca_io_ports[i].device = pldev;
1475
1476                 if (platform_device_add(pldev)) {
1477                         depca_io_ports[i].device = NULL;
1478                         pldev->dev.platform_data = NULL;
1479                         platform_device_put(pldev);
1480                         continue;
1481                 }
1482
1483                 if (!pldev->dev.driver) {
1484                 /* The driver was not bound to this device, there was
1485                  * no hardware at this address. Unregister it, as the
1486                  * release fuction will take care of freeing the
1487                  * allocated structure */
1488
1489                         depca_io_ports[i].device = NULL;
1490                         pldev->dev.platform_data = NULL;
1491                         platform_device_unregister (pldev);
1492                 }
1493         }
1494 }
1495
1496 static enum depca_type __init depca_shmem_probe (ulong *mem_start)
1497 {
1498         u_long mem_base[] = DEPCA_RAM_BASE_ADDRESSES;
1499         enum depca_type adapter = unknown;
1500         int i;
1501
1502         for (i = 0; mem_base[i]; i++) {
1503                 *mem_start = mem ? mem : mem_base[i];
1504                 adapter = DepcaSignature (adapter_name, *mem_start);
1505                 if (adapter != unknown)
1506                         break;
1507         }
1508
1509         return adapter;
1510 }
1511
1512 static int __init depca_isa_probe (struct platform_device *device)
1513 {
1514         struct net_device *dev;
1515         struct depca_private *lp;
1516         u_long ioaddr, mem_start = 0;
1517         enum depca_type adapter = unknown;
1518         int status = 0;
1519
1520         ioaddr = (u_long) device->dev.platform_data;
1521
1522         if ((status = depca_common_init (ioaddr, &dev)))
1523                 goto out;
1524
1525         adapter = depca_shmem_probe (&mem_start);
1526
1527         if (adapter == unknown) {
1528                 status = -ENODEV;
1529                 goto out_free;
1530         }
1531
1532         dev->base_addr = ioaddr;
1533         dev->irq = irq;         /* Use whatever value the user gave
1534                                  * us, and 0 if he didn't. */
1535         lp = dev->priv;
1536         lp->depca_bus = DEPCA_BUS_ISA;
1537         lp->adapter = adapter;
1538         lp->mem_start = mem_start;
1539
1540         if ((status = depca_hw_init(dev, &device->dev)))
1541                 goto out_free;
1542
1543         return 0;
1544
1545  out_free:
1546         free_netdev (dev);
1547         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1548  out:
1549         return status;
1550 }
1551
1552 /*
1553 ** EISA callbacks from sysfs.
1554 */
1555
1556 #ifdef CONFIG_EISA
1557 static int __init depca_eisa_probe (struct device *device)
1558 {
1559         struct eisa_device *edev;
1560         struct net_device *dev;
1561         struct depca_private *lp;
1562         u_long ioaddr, mem_start;
1563         int status = 0;
1564
1565         edev = to_eisa_device (device);
1566         ioaddr = edev->base_addr + DEPCA_EISA_IO_PORTS;
1567
1568         if ((status = depca_common_init (ioaddr, &dev)))
1569                 goto out;
1570
1571         /* It would have been nice to get card configuration from the
1572          * card. Unfortunately, this register is write-only (shares
1573          * it's address with the ethernet prom)... As we don't parse
1574          * the EISA configuration structures (yet... :-), just rely on
1575          * the ISA probing to sort it out... */
1576
1577         depca_shmem_probe (&mem_start);
1578
1579         dev->base_addr = ioaddr;
1580         dev->irq = irq;
1581         lp = dev->priv;
1582         lp->depca_bus = DEPCA_BUS_EISA;
1583         lp->adapter = edev->id.driver_data;
1584         lp->mem_start = mem_start;
1585
1586         if ((status = depca_hw_init(dev, device)))
1587                 goto out_free;
1588
1589         return 0;
1590
1591  out_free:
1592         free_netdev (dev);
1593         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1594  out:
1595         return status;
1596 }
1597 #endif
1598
1599 static int __devexit depca_device_remove (struct device *device)
1600 {
1601         struct net_device *dev;
1602         struct depca_private *lp;
1603         int bus;
1604
1605         dev  = device->driver_data;
1606         lp   = dev->priv;
1607
1608         unregister_netdev (dev);
1609         iounmap (lp->sh_mem);
1610         release_mem_region (lp->mem_start, lp->mem_len);
1611         release_region (dev->base_addr, DEPCA_TOTAL_SIZE);
1612         bus = lp->depca_bus;
1613         free_netdev (dev);
1614
1615         return 0;
1616 }
1617
1618 /*
1619 ** Look for a particular board name in the on-board Remote Diagnostics
1620 ** and Boot (readb) ROM. This will also give us a clue to the network RAM
1621 ** base address.
1622 */
1623 static int __init DepcaSignature(char *name, u_long base_addr)
1624 {
1625         u_int i, j, k;
1626         void __iomem *ptr;
1627         char tmpstr[16];
1628         u_long prom_addr = base_addr + 0xc000;
1629         u_long mem_addr = base_addr + 0x8000; /* 32KB */
1630
1631         /* Can't reserve the prom region, it is already marked as
1632          * used, at least on x86. Instead, reserve a memory region a
1633          * board would certainly use. If it works, go ahead. If not,
1634          * run like hell... */
1635
1636         if (!request_mem_region (mem_addr, 16, depca_string))
1637                 return unknown;
1638
1639         /* Copy the first 16 bytes of ROM */
1640
1641         ptr = ioremap(prom_addr, 16);
1642         if (ptr == NULL) {
1643                 printk(KERN_ERR "depca: I/O remap failed at %lx\n", prom_addr);
1644                 return unknown;
1645         }
1646         for (i = 0; i < 16; i++) {
1647                 tmpstr[i] = readb(ptr + i);
1648         }
1649         iounmap(ptr);
1650
1651         release_mem_region (mem_addr, 16);
1652
1653         /* Check if PROM contains a valid string */
1654         for (i = 0; *depca_signature[i] != '\0'; i++) {
1655                 for (j = 0, k = 0; j < 16 && k < strlen(depca_signature[i]); j++) {
1656                         if (depca_signature[i][k] == tmpstr[j]) {       /* track signature */
1657                                 k++;
1658                         } else {        /* lost signature; begin search again */
1659                                 k = 0;
1660                         }
1661                 }
1662                 if (k == strlen(depca_signature[i]))
1663                         break;
1664         }
1665
1666         /* Check if name string is valid, provided there's no PROM */
1667         if (name && *name && (i == unknown)) {
1668                 for (i = 0; *depca_signature[i] != '\0'; i++) {
1669                         if (strcmp(name, depca_signature[i]) == 0)
1670                                 break;
1671                 }
1672         }
1673
1674         return i;
1675 }
1676
1677 /*
1678 ** Look for a special sequence in the Ethernet station address PROM that
1679 ** is common across all DEPCA products. Note that the original DEPCA needs
1680 ** its ROM address counter to be initialized and enabled. Only enable
1681 ** if the first address octet is a 0x08 - this minimises the chances of
1682 ** messing around with some other hardware, but it assumes that this DEPCA
1683 ** card initialized itself correctly.
1684 **
1685 ** Search the Ethernet address ROM for the signature. Since the ROM address
1686 ** counter can start at an arbitrary point, the search must include the entire
1687 ** probe sequence length plus the (length_of_the_signature - 1).
1688 ** Stop the search IMMEDIATELY after the signature is found so that the
1689 ** PROM address counter is correctly positioned at the start of the
1690 ** ethernet address for later read out.
1691 */
1692 static int __init DevicePresent(u_long ioaddr)
1693 {
1694         union {
1695                 struct {
1696                         u32 a;
1697                         u32 b;
1698                 } llsig;
1699                 char Sig[sizeof(u32) << 1];
1700         }
1701         dev;
1702         short sigLength = 0;
1703         s8 data;
1704         s16 nicsr;
1705         int i, j, status = 0;
1706
1707         data = inb(DEPCA_PROM); /* clear counter on DEPCA */
1708         data = inb(DEPCA_PROM); /* read data */
1709
1710         if (data == 0x08) {     /* Enable counter on DEPCA */
1711                 nicsr = inb(DEPCA_NICSR);
1712                 nicsr |= AAC;
1713                 outb(nicsr, DEPCA_NICSR);
1714         }
1715
1716         dev.llsig.a = ETH_PROM_SIG;
1717         dev.llsig.b = ETH_PROM_SIG;
1718         sigLength = sizeof(u32) << 1;
1719
1720         for (i = 0, j = 0; j < sigLength && i < PROBE_LENGTH + sigLength - 1; i++) {
1721                 data = inb(DEPCA_PROM);
1722                 if (dev.Sig[j] == data) {       /* track signature */
1723                         j++;
1724                 } else {        /* lost signature; begin search again */
1725                         if (data == dev.Sig[0]) {       /* rare case.... */
1726                                 j = 1;
1727                         } else {
1728                                 j = 0;
1729                         }
1730                 }
1731         }
1732
1733         if (j != sigLength) {
1734                 status = -ENODEV;       /* search failed */
1735         }
1736
1737         return status;
1738 }
1739
1740 /*
1741 ** The DE100 and DE101 PROM accesses were made non-standard for some bizarre
1742 ** reason: access the upper half of the PROM with x=0; access the lower half
1743 ** with x=1.
1744 */
1745 static int __init get_hw_addr(struct net_device *dev)
1746 {
1747         u_long ioaddr = dev->base_addr;
1748         struct depca_private *lp = dev->priv;
1749         int i, k, tmp, status = 0;
1750         u_short j, x, chksum;
1751
1752         x = (((lp->adapter == de100) || (lp->adapter == de101)) ? 1 : 0);
1753
1754         for (i = 0, k = 0, j = 0; j < 3; j++) {
1755                 k <<= 1;
1756                 if (k > 0xffff)
1757                         k -= 0xffff;
1758
1759                 k += (u_char) (tmp = inb(DEPCA_PROM + x));
1760                 dev->dev_addr[i++] = (u_char) tmp;
1761                 k += (u_short) ((tmp = inb(DEPCA_PROM + x)) << 8);
1762                 dev->dev_addr[i++] = (u_char) tmp;
1763
1764                 if (k > 0xffff)
1765                         k -= 0xffff;
1766         }
1767         if (k == 0xffff)
1768                 k = 0;
1769
1770         chksum = (u_char) inb(DEPCA_PROM + x);
1771         chksum |= (u_short) (inb(DEPCA_PROM + x) << 8);
1772         if (k != chksum)
1773                 status = -1;
1774
1775         return status;
1776 }
1777
1778 /*
1779 ** Load a packet into the shared memory
1780 */
1781 static int load_packet(struct net_device *dev, struct sk_buff *skb)
1782 {
1783         struct depca_private *lp = (struct depca_private *) dev->priv;
1784         int i, entry, end, len, status = 0;
1785
1786         entry = lp->tx_new;     /* Ring around buffer number. */
1787         end = (entry + (skb->len - 1) / TX_BUFF_SZ) & lp->txRingMask;
1788         if (!(readl(&lp->tx_ring[end].base) & T_OWN)) { /* Enough room? */
1789                 /*
1790                    ** Caution: the write order is important here... don't set up the
1791                    ** ownership rights until all the other information is in place.
1792                  */
1793                 if (end < entry) {      /* wrapped buffer */
1794                         len = (lp->txRingMask - entry + 1) * TX_BUFF_SZ;
1795                         memcpy_toio(lp->tx_buff[entry], skb->data, len);
1796                         memcpy_toio(lp->tx_buff[0], skb->data + len, skb->len - len);
1797                 } else {        /* linear buffer */
1798                         memcpy_toio(lp->tx_buff[entry], skb->data, skb->len);
1799                 }
1800
1801                 /* set up the buffer descriptors */
1802                 len = (skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;
1803                 for (i = entry; i != end; i = (i+1) & lp->txRingMask) {
1804                         /* clean out flags */
1805                         writel(readl(&lp->tx_ring[i].base) & ~T_FLAGS, &lp->tx_ring[i].base);
1806                         writew(0x0000, &lp->tx_ring[i].misc);   /* clears other error flags */
1807                         writew(-TX_BUFF_SZ, &lp->tx_ring[i].length);    /* packet length in buffer */
1808                         len -= TX_BUFF_SZ;
1809                 }
1810                 /* clean out flags */
1811                 writel(readl(&lp->tx_ring[end].base) & ~T_FLAGS, &lp->tx_ring[end].base);
1812                 writew(0x0000, &lp->tx_ring[end].misc); /* clears other error flags */
1813                 writew(-len, &lp->tx_ring[end].length); /* packet length in last buff */
1814
1815                 /* start of packet */
1816                 writel(readl(&lp->tx_ring[entry].base) | T_STP, &lp->tx_ring[entry].base);
1817                 /* end of packet */
1818                 writel(readl(&lp->tx_ring[end].base) | T_ENP, &lp->tx_ring[end].base);
1819
1820                 for (i = end; i != entry; --i) {
1821                         /* ownership of packet */
1822                         writel(readl(&lp->tx_ring[i].base) | T_OWN, &lp->tx_ring[i].base);
1823                         if (i == 0)
1824                                 i = lp->txRingMask + 1;
1825                 }
1826                 writel(readl(&lp->tx_ring[entry].base) | T_OWN, &lp->tx_ring[entry].base);
1827
1828                 lp->tx_new = (++end) & lp->txRingMask;  /* update current pointers */
1829         } else {
1830                 status = -1;
1831         }
1832
1833         return status;
1834 }
1835
1836 static void depca_dbg_open(struct net_device *dev)
1837 {
1838         struct depca_private *lp = (struct depca_private *) dev->priv;
1839         u_long ioaddr = dev->base_addr;
1840         struct depca_init *p = &lp->init_block;
1841         int i;
1842
1843         if (depca_debug > 1) {
1844                 /* Do not copy the shadow init block into shared memory */
1845                 /* Debugging should not affect normal operation! */
1846                 /* The shadow init block will get copied across during InitRestartDepca */
1847                 printk("%s: depca open with irq %d\n", dev->name, dev->irq);
1848                 printk("Descriptor head addresses (CPU):\n");
1849                 printk("        0x%lx  0x%lx\n", (u_long) lp->rx_ring, (u_long) lp->tx_ring);
1850                 printk("Descriptor addresses (CPU):\nRX: ");
1851                 for (i = 0; i < lp->rxRingMask; i++) {
1852                         if (i < 3) {
1853                                 printk("%p ", &lp->rx_ring[i].base);
1854                         }
1855                 }
1856                 printk("...%p\n", &lp->rx_ring[i].base);
1857                 printk("TX: ");
1858                 for (i = 0; i < lp->txRingMask; i++) {
1859                         if (i < 3) {
1860                                 printk("%p ", &lp->tx_ring[i].base);
1861                         }
1862                 }
1863                 printk("...%p\n", &lp->tx_ring[i].base);
1864                 printk("\nDescriptor buffers (Device):\nRX: ");
1865                 for (i = 0; i < lp->rxRingMask; i++) {
1866                         if (i < 3) {
1867                                 printk("0x%8.8x  ", readl(&lp->rx_ring[i].base));
1868                         }
1869                 }
1870                 printk("...0x%8.8x\n", readl(&lp->rx_ring[i].base));
1871                 printk("TX: ");
1872                 for (i = 0; i < lp->txRingMask; i++) {
1873                         if (i < 3) {
1874                                 printk("0x%8.8x  ", readl(&lp->tx_ring[i].base));
1875                         }
1876                 }
1877                 printk("...0x%8.8x\n", readl(&lp->tx_ring[i].base));
1878                 printk("Initialisation block at 0x%8.8lx(Phys)\n", lp->mem_start);
1879                 printk("        mode: 0x%4.4x\n", p->mode);
1880                 printk("        physical address: %pM\n", p->phys_addr);
1881                 printk("        multicast hash table: ");
1882                 for (i = 0; i < (HASH_TABLE_LEN >> 3) - 1; i++) {
1883                         printk("%2.2x:", p->mcast_table[i]);
1884                 }
1885                 printk("%2.2x\n", p->mcast_table[i]);
1886                 printk("        rx_ring at: 0x%8.8x\n", p->rx_ring);
1887                 printk("        tx_ring at: 0x%8.8x\n", p->tx_ring);
1888                 printk("buffers (Phys): 0x%8.8lx\n", lp->mem_start + lp->buffs_offset);
1889                 printk("Ring size:\nRX: %d  Log2(rxRingMask): 0x%8.8x\n", (int) lp->rxRingMask + 1, lp->rx_rlen);
1890                 printk("TX: %d  Log2(txRingMask): 0x%8.8x\n", (int) lp->txRingMask + 1, lp->tx_rlen);
1891                 outw(CSR2, DEPCA_ADDR);
1892                 printk("CSR2&1: 0x%4.4x", inw(DEPCA_DATA));
1893                 outw(CSR1, DEPCA_ADDR);
1894                 printk("%4.4x\n", inw(DEPCA_DATA));
1895                 outw(CSR3, DEPCA_ADDR);
1896                 printk("CSR3: 0x%4.4x\n", inw(DEPCA_DATA));
1897         }
1898
1899         return;
1900 }
1901
1902 /*
1903 ** Perform IOCTL call functions here. Some are privileged operations and the
1904 ** effective uid is checked in those cases.
1905 ** All multicast IOCTLs will not work here and are for testing purposes only.
1906 */
1907 static int depca_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1908 {
1909         struct depca_private *lp = (struct depca_private *) dev->priv;
1910         struct depca_ioctl *ioc = (struct depca_ioctl *) &rq->ifr_ifru;
1911         int i, status = 0;
1912         u_long ioaddr = dev->base_addr;
1913         union {
1914                 u8 addr[(HASH_TABLE_LEN * ETH_ALEN)];
1915                 u16 sval[(HASH_TABLE_LEN * ETH_ALEN) >> 1];
1916                 u32 lval[(HASH_TABLE_LEN * ETH_ALEN) >> 2];
1917         } tmp;
1918         unsigned long flags;
1919         void *buf;
1920
1921         switch (ioc->cmd) {
1922         case DEPCA_GET_HWADDR:  /* Get the hardware address */
1923                 for (i = 0; i < ETH_ALEN; i++) {
1924                         tmp.addr[i] = dev->dev_addr[i];
1925                 }
1926                 ioc->len = ETH_ALEN;
1927                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
1928                         return -EFAULT;
1929                 break;
1930
1931         case DEPCA_SET_HWADDR:  /* Set the hardware address */
1932                 if (!capable(CAP_NET_ADMIN))
1933                         return -EPERM;
1934                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN))
1935                         return -EFAULT;
1936                 for (i = 0; i < ETH_ALEN; i++) {
1937                         dev->dev_addr[i] = tmp.addr[i];
1938                 }
1939                 netif_stop_queue(dev);
1940                 while (lp->tx_old != lp->tx_new)
1941                         cpu_relax();    /* Wait for the ring to empty */
1942
1943                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1944                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1945                 LoadCSRs(dev);  /* Reload CSR3 */
1946                 InitRestartDepca(dev);  /* Resume normal operation. */
1947                 netif_start_queue(dev); /* Unlock the TX ring */
1948                 break;
1949
1950         case DEPCA_SET_PROM:    /* Set Promiscuous Mode */
1951                 if (!capable(CAP_NET_ADMIN))
1952                         return -EPERM;
1953                 netif_stop_queue(dev);
1954                 while (lp->tx_old != lp->tx_new)
1955                         cpu_relax();    /* Wait for the ring to empty */
1956
1957                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1958                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1959                 lp->init_block.mode |= PROM;    /* Set promiscuous mode */
1960
1961                 LoadCSRs(dev);  /* Reload CSR3 */
1962                 InitRestartDepca(dev);  /* Resume normal operation. */
1963                 netif_start_queue(dev); /* Unlock the TX ring */
1964                 break;
1965
1966         case DEPCA_CLR_PROM:    /* Clear Promiscuous Mode */
1967                 if (!capable(CAP_NET_ADMIN))
1968                         return -EPERM;
1969                 netif_stop_queue(dev);
1970                 while (lp->tx_old != lp->tx_new)
1971                         cpu_relax();    /* Wait for the ring to empty */
1972
1973                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1974                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1975                 lp->init_block.mode &= ~PROM;   /* Clear promiscuous mode */
1976
1977                 LoadCSRs(dev);  /* Reload CSR3 */
1978                 InitRestartDepca(dev);  /* Resume normal operation. */
1979                 netif_start_queue(dev); /* Unlock the TX ring */
1980                 break;
1981
1982         case DEPCA_SAY_BOO:     /* Say "Boo!" to the kernel log file */
1983                 if(!capable(CAP_NET_ADMIN))
1984                         return -EPERM;
1985                 printk("%s: Boo!\n", dev->name);
1986                 break;
1987
1988         case DEPCA_GET_MCA:     /* Get the multicast address table */
1989                 ioc->len = (HASH_TABLE_LEN >> 3);
1990                 if (copy_to_user(ioc->data, lp->init_block.mcast_table, ioc->len))
1991                         return -EFAULT;
1992                 break;
1993
1994         case DEPCA_SET_MCA:     /* Set a multicast address */
1995                 if (!capable(CAP_NET_ADMIN))
1996                         return -EPERM;
1997                 if (ioc->len >= HASH_TABLE_LEN)
1998                         return -EINVAL;
1999                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN * ioc->len))
2000                         return -EFAULT;
2001                 set_multicast_list(dev);
2002                 break;
2003
2004         case DEPCA_CLR_MCA:     /* Clear all multicast addresses */
2005                 if (!capable(CAP_NET_ADMIN))
2006                         return -EPERM;
2007                 set_multicast_list(dev);
2008                 break;
2009
2010         case DEPCA_MCA_EN:      /* Enable pass all multicast addressing */
2011                 if (!capable(CAP_NET_ADMIN))
2012                         return -EPERM;
2013                 set_multicast_list(dev);
2014                 break;
2015
2016         case DEPCA_GET_STATS:   /* Get the driver statistics */
2017                 ioc->len = sizeof(lp->pktStats);
2018                 buf = kmalloc(ioc->len, GFP_KERNEL);
2019                 if(!buf)
2020                         return -ENOMEM;
2021                 spin_lock_irqsave(&lp->lock, flags);
2022                 memcpy(buf, &lp->pktStats, ioc->len);
2023                 spin_unlock_irqrestore(&lp->lock, flags);
2024                 if (copy_to_user(ioc->data, buf, ioc->len))
2025                         status = -EFAULT;
2026                 kfree(buf);
2027                 break;
2028
2029         case DEPCA_CLR_STATS:   /* Zero out the driver statistics */
2030                 if (!capable(CAP_NET_ADMIN))
2031                         return -EPERM;
2032                 spin_lock_irqsave(&lp->lock, flags);
2033                 memset(&lp->pktStats, 0, sizeof(lp->pktStats));
2034                 spin_unlock_irqrestore(&lp->lock, flags);
2035                 break;
2036
2037         case DEPCA_GET_REG:     /* Get the DEPCA Registers */
2038                 i = 0;
2039                 tmp.sval[i++] = inw(DEPCA_NICSR);
2040                 outw(CSR0, DEPCA_ADDR); /* status register */
2041                 tmp.sval[i++] = inw(DEPCA_DATA);
2042                 memcpy(&tmp.sval[i], &lp->init_block, sizeof(struct depca_init));
2043                 ioc->len = i + sizeof(struct depca_init);
2044                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
2045                         return -EFAULT;
2046                 break;
2047
2048         default:
2049                 return -EOPNOTSUPP;
2050         }
2051
2052         return status;
2053 }
2054
2055 static int __init depca_module_init (void)
2056 {
2057         int err = 0;
2058
2059 #ifdef CONFIG_MCA
2060         err = mca_register_driver (&depca_mca_driver);
2061 #endif
2062 #ifdef CONFIG_EISA
2063         err |= eisa_driver_register (&depca_eisa_driver);
2064 #endif
2065         err |= platform_driver_register (&depca_isa_driver);
2066         depca_platform_probe ();
2067
2068         return err;
2069 }
2070
2071 static void __exit depca_module_exit (void)
2072 {
2073         int i;
2074 #ifdef CONFIG_MCA
2075         mca_unregister_driver (&depca_mca_driver);
2076 #endif
2077 #ifdef CONFIG_EISA
2078         eisa_driver_unregister (&depca_eisa_driver);
2079 #endif
2080         platform_driver_unregister (&depca_isa_driver);
2081
2082         for (i = 0; depca_io_ports[i].iobase; i++) {
2083                 if (depca_io_ports[i].device) {
2084                         depca_io_ports[i].device->dev.platform_data = NULL;
2085                         platform_device_unregister (depca_io_ports[i].device);
2086                         depca_io_ports[i].device = NULL;
2087                 }
2088         }
2089 }
2090
2091 module_init (depca_module_init);
2092 module_exit (depca_module_exit);