IRQ: Maintain regs pointer globally rather than passing to IRQ handlers
[sfrench/cifs-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         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                                         skb->dev = dev;
1048                                         if (entry < lp->rx_old) {       /* Wrapped buffer */
1049                                                 len = (lp->rxRingMask - lp->rx_old + 1) * RX_BUFF_SZ;
1050                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], len);
1051                                                 memcpy_fromio(buf + len, lp->rx_buff[0], pkt_len - len);
1052                                         } else {        /* Linear buffer */
1053                                                 memcpy_fromio(buf, lp->rx_buff[lp->rx_old], pkt_len);
1054                                         }
1055
1056                                         /*
1057                                            ** Notify the upper protocol layers that there is another
1058                                            ** packet to handle
1059                                          */
1060                                         skb->protocol = eth_type_trans(skb, dev);
1061                                         netif_rx(skb);
1062
1063                                         /*
1064                                            ** Update stats
1065                                          */
1066                                         dev->last_rx = jiffies;
1067                                         lp->stats.rx_packets++;
1068                                         lp->stats.rx_bytes += pkt_len;
1069                                         for (i = 1; i < DEPCA_PKT_STAT_SZ - 1; i++) {
1070                                                 if (pkt_len < (i * DEPCA_PKT_BIN_SZ)) {
1071                                                         lp->pktStats.bins[i]++;
1072                                                         i = DEPCA_PKT_STAT_SZ;
1073                                                 }
1074                                         }
1075                                         if (buf[0] & 0x01) {    /* Multicast/Broadcast */
1076                                                 if ((*(s16 *) & buf[0] == -1) && (*(s16 *) & buf[2] == -1) && (*(s16 *) & buf[4] == -1)) {
1077                                                         lp->pktStats.broadcast++;
1078                                                 } else {
1079                                                         lp->pktStats.multicast++;
1080                                                 }
1081                                         } 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])) {
1082                                                 lp->pktStats.unicast++;
1083                                         }
1084
1085                                         lp->pktStats.bins[0]++; /* Duplicates stats.rx_packets */
1086                                         if (lp->pktStats.bins[0] == 0) {        /* Reset counters */
1087                                                 memset((char *) &lp->pktStats, 0, sizeof(lp->pktStats));
1088                                         }
1089                                 } else {
1090                                         printk("%s: Memory squeeze, deferring packet.\n", dev->name);
1091                                         lp->stats.rx_dropped++; /* Really, deferred. */
1092                                         break;
1093                                 }
1094                         }
1095                         /* Change buffer ownership for this last frame, back to the adapter */
1096                         for (; lp->rx_old != entry; lp->rx_old = (++lp->rx_old) & lp->rxRingMask) {
1097                                 writel(readl(&lp->rx_ring[lp->rx_old].base) | R_OWN, &lp->rx_ring[lp->rx_old].base);
1098                         }
1099                         writel(readl(&lp->rx_ring[entry].base) | R_OWN, &lp->rx_ring[entry].base);
1100                 }
1101
1102                 /*
1103                    ** Update entry information
1104                  */
1105                 lp->rx_new = (++lp->rx_new) & lp->rxRingMask;
1106         }
1107
1108         return 0;
1109 }
1110
1111 /*
1112 ** Buffer sent - check for buffer errors.
1113 ** Called with lp->lock held
1114 */
1115 static int depca_tx(struct net_device *dev)
1116 {
1117         struct depca_private *lp = (struct depca_private *) dev->priv;
1118         int entry;
1119         s32 status;
1120         u_long ioaddr = dev->base_addr;
1121
1122         for (entry = lp->tx_old; entry != lp->tx_new; entry = lp->tx_old) {
1123                 status = readl(&lp->tx_ring[entry].base) >> 16;
1124
1125                 if (status < 0) {       /* Packet not yet sent! */
1126                         break;
1127                 } else if (status & T_ERR) {    /* An error occurred. */
1128                         status = readl(&lp->tx_ring[entry].misc);
1129                         lp->stats.tx_errors++;
1130                         if (status & TMD3_RTRY)
1131                                 lp->stats.tx_aborted_errors++;
1132                         if (status & TMD3_LCAR)
1133                                 lp->stats.tx_carrier_errors++;
1134                         if (status & TMD3_LCOL)
1135                                 lp->stats.tx_window_errors++;
1136                         if (status & TMD3_UFLO)
1137                                 lp->stats.tx_fifo_errors++;
1138                         if (status & (TMD3_BUFF | TMD3_UFLO)) {
1139                                 /* Trigger an immediate send demand. */
1140                                 outw(CSR0, DEPCA_ADDR);
1141                                 outw(INEA | TDMD, DEPCA_DATA);
1142                         }
1143                 } else if (status & (T_MORE | T_ONE)) {
1144                         lp->stats.collisions++;
1145                 } else {
1146                         lp->stats.tx_packets++;
1147                 }
1148
1149                 /* Update all the pointers */
1150                 lp->tx_old = (++lp->tx_old) & lp->txRingMask;
1151         }
1152
1153         return 0;
1154 }
1155
1156 static int depca_close(struct net_device *dev)
1157 {
1158         struct depca_private *lp = (struct depca_private *) dev->priv;
1159         s16 nicsr;
1160         u_long ioaddr = dev->base_addr;
1161
1162         netif_stop_queue(dev);
1163
1164         outw(CSR0, DEPCA_ADDR);
1165
1166         if (depca_debug > 1) {
1167                 printk("%s: Shutting down ethercard, status was %2.2x.\n", dev->name, inw(DEPCA_DATA));
1168         }
1169
1170         /*
1171            ** We stop the DEPCA here -- it occasionally polls
1172            ** memory if we don't.
1173          */
1174         outw(STOP, DEPCA_DATA);
1175
1176         /*
1177            ** Give back the ROM in case the user wants to go to DOS
1178          */
1179         if (lp->adapter != DEPCA) {
1180                 nicsr = inb(DEPCA_NICSR);
1181                 nicsr &= ~SHE;
1182                 outb(nicsr, DEPCA_NICSR);
1183         }
1184
1185         /*
1186            ** Free the associated irq
1187          */
1188         free_irq(dev->irq, dev);
1189         return 0;
1190 }
1191
1192 static void LoadCSRs(struct net_device *dev)
1193 {
1194         struct depca_private *lp = (struct depca_private *) dev->priv;
1195         u_long ioaddr = dev->base_addr;
1196
1197         outw(CSR1, DEPCA_ADDR); /* initialisation block address LSW */
1198         outw((u16) lp->device_ram_start, DEPCA_DATA);
1199         outw(CSR2, DEPCA_ADDR); /* initialisation block address MSW */
1200         outw((u16) (lp->device_ram_start >> 16), DEPCA_DATA);
1201         outw(CSR3, DEPCA_ADDR); /* ALE control */
1202         outw(ACON, DEPCA_DATA);
1203
1204         outw(CSR0, DEPCA_ADDR); /* Point back to CSR0 */
1205
1206         return;
1207 }
1208
1209 static int InitRestartDepca(struct net_device *dev)
1210 {
1211         struct depca_private *lp = (struct depca_private *) dev->priv;
1212         u_long ioaddr = dev->base_addr;
1213         int i, status = 0;
1214
1215         /* Copy the shadow init_block to shared memory */
1216         memcpy_toio(lp->sh_mem, &lp->init_block, sizeof(struct depca_init));
1217
1218         outw(CSR0, DEPCA_ADDR); /* point back to CSR0 */
1219         outw(INIT, DEPCA_DATA); /* initialize DEPCA */
1220
1221         /* wait for lance to complete initialisation */
1222         for (i = 0; (i < 100) && !(inw(DEPCA_DATA) & IDON); i++);
1223
1224         if (i != 100) {
1225                 /* clear IDON by writing a "1", enable interrupts and start lance */
1226                 outw(IDON | INEA | STRT, DEPCA_DATA);
1227                 if (depca_debug > 2) {
1228                         printk("%s: DEPCA open after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1229                 }
1230         } else {
1231                 printk("%s: DEPCA unopen after %d ticks, init block 0x%08lx csr0 %4.4x.\n", dev->name, i, lp->mem_start, inw(DEPCA_DATA));
1232                 status = -1;
1233         }
1234
1235         return status;
1236 }
1237
1238 static struct net_device_stats *depca_get_stats(struct net_device *dev)
1239 {
1240         struct depca_private *lp = (struct depca_private *) dev->priv;
1241
1242         /* Null body since there is no framing error counter */
1243
1244         return &lp->stats;
1245 }
1246
1247 /*
1248 ** Set or clear the multicast filter for this adaptor.
1249 */
1250 static void set_multicast_list(struct net_device *dev)
1251 {
1252         struct depca_private *lp = (struct depca_private *) dev->priv;
1253         u_long ioaddr = dev->base_addr;
1254
1255         if (dev) {
1256                 netif_stop_queue(dev);
1257                 while (lp->tx_old != lp->tx_new);       /* Wait for the ring to empty */
1258
1259                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1260                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1261
1262                 if (dev->flags & IFF_PROMISC) { /* Set promiscuous mode */
1263                         lp->init_block.mode |= PROM;
1264                 } else {
1265                         SetMulticastFilter(dev);
1266                         lp->init_block.mode &= ~PROM;   /* Unset promiscuous mode */
1267                 }
1268
1269                 LoadCSRs(dev);  /* Reload CSR3 */
1270                 InitRestartDepca(dev);  /* Resume normal operation. */
1271                 netif_start_queue(dev); /* Unlock the TX ring */
1272         }
1273 }
1274
1275 /*
1276 ** Calculate the hash code and update the logical address filter
1277 ** from a list of ethernet multicast addresses.
1278 ** Big endian crc one liner is mine, all mine, ha ha ha ha!
1279 ** LANCE calculates its hash codes big endian.
1280 */
1281 static void SetMulticastFilter(struct net_device *dev)
1282 {
1283         struct depca_private *lp = (struct depca_private *) dev->priv;
1284         struct dev_mc_list *dmi = dev->mc_list;
1285         char *addrs;
1286         int i, j, bit, byte;
1287         u16 hashcode;
1288         u32 crc;
1289
1290         if (dev->flags & IFF_ALLMULTI) {        /* Set all multicast bits */
1291                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {
1292                         lp->init_block.mcast_table[i] = (char) 0xff;
1293                 }
1294         } else {
1295                 for (i = 0; i < (HASH_TABLE_LEN >> 3); i++) {   /* Clear the multicast table */
1296                         lp->init_block.mcast_table[i] = 0;
1297                 }
1298                 /* Add multicast addresses */
1299                 for (i = 0; i < dev->mc_count; i++) {   /* for each address in the list */
1300                         addrs = dmi->dmi_addr;
1301                         dmi = dmi->next;
1302                         if ((*addrs & 0x01) == 1) {     /* multicast address? */
1303                                 crc = ether_crc(ETH_ALEN, addrs);
1304                                 hashcode = (crc & 1);   /* hashcode is 6 LSb of CRC ... */
1305                                 for (j = 0; j < 5; j++) {       /* ... in reverse order. */
1306                                         hashcode = (hashcode << 1) | ((crc >>= 1) & 1);
1307                                 }
1308
1309
1310                                 byte = hashcode >> 3;   /* bit[3-5] -> byte in filter */
1311                                 bit = 1 << (hashcode & 0x07);   /* bit[0-2] -> bit in byte */
1312                                 lp->init_block.mcast_table[byte] |= bit;
1313                         }
1314                 }
1315         }
1316
1317         return;
1318 }
1319
1320 static int __init depca_common_init (u_long ioaddr, struct net_device **devp)
1321 {
1322         int status = 0;
1323
1324         if (!request_region (ioaddr, DEPCA_TOTAL_SIZE, depca_string)) {
1325                 status = -EBUSY;
1326                 goto out;
1327         }
1328
1329         if (DevicePresent(ioaddr)) {
1330                 status = -ENODEV;
1331                 goto out_release;
1332         }
1333
1334         if (!(*devp = alloc_etherdev (sizeof (struct depca_private)))) {
1335                 status = -ENOMEM;
1336                 goto out_release;
1337         }
1338
1339         return 0;
1340
1341  out_release:
1342         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1343  out:
1344         return status;
1345 }
1346
1347 #ifdef CONFIG_MCA
1348 /*
1349 ** Microchannel bus I/O device probe
1350 */
1351 static int __init depca_mca_probe(struct device *device)
1352 {
1353         unsigned char pos[2];
1354         unsigned char where;
1355         unsigned long iobase, mem_start;
1356         int irq, err;
1357         struct mca_device *mdev = to_mca_device (device);
1358         struct net_device *dev;
1359         struct depca_private *lp;
1360
1361         /*
1362         ** Search for the adapter.  If an address has been given, search
1363         ** specifically for the card at that address.  Otherwise find the
1364         ** first card in the system.
1365         */
1366
1367         pos[0] = mca_device_read_stored_pos(mdev, 2);
1368         pos[1] = mca_device_read_stored_pos(mdev, 3);
1369
1370         /*
1371         ** IO of card is handled by bits 1 and 2 of pos0.
1372         **
1373         **    bit2 bit1    IO
1374         **       0    0    0x2c00
1375         **       0    1    0x2c10
1376         **       1    0    0x2c20
1377         **       1    1    0x2c30
1378         */
1379         where = (pos[0] & 6) >> 1;
1380         iobase = 0x2c00 + (0x10 * where);
1381
1382         /*
1383         ** Found the adapter we were looking for. Now start setting it up.
1384         **
1385         ** First work on decoding the IRQ.  It's stored in the lower 4 bits
1386         ** of pos1.  Bits are as follows (from the ADF file):
1387         **
1388         **      Bits
1389         **   3   2   1   0    IRQ
1390         **   --------------------
1391         **   0   0   1   0     5
1392         **   0   0   0   1     9
1393         **   0   1   0   0    10
1394         **   1   0   0   0    11
1395         */
1396         where = pos[1] & 0x0f;
1397         switch (where) {
1398         case 1:
1399                 irq = 9;
1400                 break;
1401         case 2:
1402                 irq = 5;
1403                 break;
1404         case 4:
1405                 irq = 10;
1406                 break;
1407         case 8:
1408                 irq = 11;
1409                 break;
1410         default:
1411                 printk("%s: mca_probe IRQ error.  You should never get here (%d).\n", mdev->name, where);
1412                 return -EINVAL;
1413         }
1414
1415         /*
1416         ** Shared memory address of adapter is stored in bits 3-5 of pos0.
1417         ** They are mapped as follows:
1418         **
1419         **    Bit
1420         **   5  4  3       Memory Addresses
1421         **   0  0  0       C0000-CFFFF (64K)
1422         **   1  0  0       C8000-CFFFF (32K)
1423         **   0  0  1       D0000-DFFFF (64K)
1424         **   1  0  1       D8000-DFFFF (32K)
1425         **   0  1  0       E0000-EFFFF (64K)
1426         **   1  1  0       E8000-EFFFF (32K)
1427         */
1428         where = (pos[0] & 0x18) >> 3;
1429         mem_start = 0xc0000 + (where * 0x10000);
1430         if (pos[0] & 0x20) {
1431                 mem_start += 0x8000;
1432         }
1433
1434         /* claim the slot */
1435         strncpy(mdev->name, depca_mca_adapter_name[mdev->index],
1436                 sizeof(mdev->name));
1437         mca_device_set_claim(mdev, 1);
1438
1439         /*
1440         ** Get everything allocated and initialized...  (almost just
1441         ** like the ISA and EISA probes)
1442         */
1443         irq = mca_device_transform_irq(mdev, irq);
1444         iobase = mca_device_transform_ioport(mdev, iobase);
1445
1446         if ((err = depca_common_init (iobase, &dev)))
1447                 goto out_unclaim;
1448
1449         dev->irq = irq;
1450         dev->base_addr = iobase;
1451         lp = dev->priv;
1452         lp->depca_bus = DEPCA_BUS_MCA;
1453         lp->adapter = depca_mca_adapter_type[mdev->index];
1454         lp->mem_start = mem_start;
1455
1456         if ((err = depca_hw_init(dev, device)))
1457                 goto out_free;
1458
1459         return 0;
1460
1461  out_free:
1462         free_netdev (dev);
1463         release_region (iobase, DEPCA_TOTAL_SIZE);
1464  out_unclaim:
1465         mca_device_set_claim(mdev, 0);
1466
1467         return err;
1468 }
1469 #endif
1470
1471 /*
1472 ** ISA bus I/O device probe
1473 */
1474
1475 static void __init depca_platform_probe (void)
1476 {
1477         int i;
1478         struct platform_device *pldev;
1479
1480         for (i = 0; depca_io_ports[i].iobase; i++) {
1481                 depca_io_ports[i].device = NULL;
1482
1483                 /* if an address has been specified on the command
1484                  * line, use it (if valid) */
1485                 if (io && io != depca_io_ports[i].iobase)
1486                         continue;
1487
1488                 pldev = platform_device_alloc(depca_string, i);
1489                 if (!pldev)
1490                         continue;
1491
1492                 pldev->dev.platform_data = (void *) depca_io_ports[i].iobase;
1493                 depca_io_ports[i].device = pldev;
1494
1495                 if (platform_device_add(pldev)) {
1496                         platform_device_put(pldev);
1497                         depca_io_ports[i].device = NULL;
1498                         continue;
1499                 }
1500
1501                 if (!pldev->dev.driver) {
1502                 /* The driver was not bound to this device, there was
1503                  * no hardware at this address. Unregister it, as the
1504                  * release fuction will take care of freeing the
1505                  * allocated structure */
1506
1507                         depca_io_ports[i].device = NULL;
1508                         pldev->dev.platform_data = NULL;
1509                         platform_device_unregister (pldev);
1510                 }
1511         }
1512 }
1513
1514 static enum depca_type __init depca_shmem_probe (ulong *mem_start)
1515 {
1516         u_long mem_base[] = DEPCA_RAM_BASE_ADDRESSES;
1517         enum depca_type adapter = unknown;
1518         int i;
1519
1520         for (i = 0; mem_base[i]; i++) {
1521                 *mem_start = mem ? mem : mem_base[i];
1522                 adapter = DepcaSignature (adapter_name, *mem_start);
1523                 if (adapter != unknown)
1524                         break;
1525         }
1526
1527         return adapter;
1528 }
1529
1530 static int __init depca_isa_probe (struct platform_device *device)
1531 {
1532         struct net_device *dev;
1533         struct depca_private *lp;
1534         u_long ioaddr, mem_start = 0;
1535         enum depca_type adapter = unknown;
1536         int status = 0;
1537
1538         ioaddr = (u_long) device->dev.platform_data;
1539
1540         if ((status = depca_common_init (ioaddr, &dev)))
1541                 goto out;
1542
1543         adapter = depca_shmem_probe (&mem_start);
1544
1545         if (adapter == unknown) {
1546                 status = -ENODEV;
1547                 goto out_free;
1548         }
1549
1550         dev->base_addr = ioaddr;
1551         dev->irq = irq;         /* Use whatever value the user gave
1552                                  * us, and 0 if he didn't. */
1553         lp = dev->priv;
1554         lp->depca_bus = DEPCA_BUS_ISA;
1555         lp->adapter = adapter;
1556         lp->mem_start = mem_start;
1557
1558         if ((status = depca_hw_init(dev, &device->dev)))
1559                 goto out_free;
1560
1561         return 0;
1562
1563  out_free:
1564         free_netdev (dev);
1565         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1566  out:
1567         return status;
1568 }
1569
1570 /*
1571 ** EISA callbacks from sysfs.
1572 */
1573
1574 #ifdef CONFIG_EISA
1575 static int __init depca_eisa_probe (struct device *device)
1576 {
1577         struct eisa_device *edev;
1578         struct net_device *dev;
1579         struct depca_private *lp;
1580         u_long ioaddr, mem_start;
1581         int status = 0;
1582
1583         edev = to_eisa_device (device);
1584         ioaddr = edev->base_addr + DEPCA_EISA_IO_PORTS;
1585
1586         if ((status = depca_common_init (ioaddr, &dev)))
1587                 goto out;
1588
1589         /* It would have been nice to get card configuration from the
1590          * card. Unfortunately, this register is write-only (shares
1591          * it's address with the ethernet prom)... As we don't parse
1592          * the EISA configuration structures (yet... :-), just rely on
1593          * the ISA probing to sort it out... */
1594
1595         depca_shmem_probe (&mem_start);
1596
1597         dev->base_addr = ioaddr;
1598         dev->irq = irq;
1599         lp = dev->priv;
1600         lp->depca_bus = DEPCA_BUS_EISA;
1601         lp->adapter = edev->id.driver_data;
1602         lp->mem_start = mem_start;
1603
1604         if ((status = depca_hw_init(dev, device)))
1605                 goto out_free;
1606
1607         return 0;
1608
1609  out_free:
1610         free_netdev (dev);
1611         release_region (ioaddr, DEPCA_TOTAL_SIZE);
1612  out:
1613         return status;
1614 }
1615 #endif
1616
1617 static int __devexit depca_device_remove (struct device *device)
1618 {
1619         struct net_device *dev;
1620         struct depca_private *lp;
1621         int bus;
1622
1623         dev  = device->driver_data;
1624         lp   = dev->priv;
1625
1626         unregister_netdev (dev);
1627         iounmap (lp->sh_mem);
1628         release_mem_region (lp->mem_start, lp->mem_len);
1629         release_region (dev->base_addr, DEPCA_TOTAL_SIZE);
1630         bus = lp->depca_bus;
1631         free_netdev (dev);
1632
1633         return 0;
1634 }
1635
1636 /*
1637 ** Look for a particular board name in the on-board Remote Diagnostics
1638 ** and Boot (readb) ROM. This will also give us a clue to the network RAM
1639 ** base address.
1640 */
1641 static int __init DepcaSignature(char *name, u_long base_addr)
1642 {
1643         u_int i, j, k;
1644         void __iomem *ptr;
1645         char tmpstr[16];
1646         u_long prom_addr = base_addr + 0xc000;
1647         u_long mem_addr = base_addr + 0x8000; /* 32KB */
1648
1649         /* Can't reserve the prom region, it is already marked as
1650          * used, at least on x86. Instead, reserve a memory region a
1651          * board would certainly use. If it works, go ahead. If not,
1652          * run like hell... */
1653
1654         if (!request_mem_region (mem_addr, 16, depca_string))
1655                 return unknown;
1656
1657         /* Copy the first 16 bytes of ROM */
1658
1659         ptr = ioremap(prom_addr, 16);
1660         if (ptr == NULL) {
1661                 printk(KERN_ERR "depca: I/O remap failed at %lx\n", prom_addr);
1662                 return unknown;
1663         }
1664         for (i = 0; i < 16; i++) {
1665                 tmpstr[i] = readb(ptr + i);
1666         }
1667         iounmap(ptr);
1668
1669         release_mem_region (mem_addr, 16);
1670
1671         /* Check if PROM contains a valid string */
1672         for (i = 0; *depca_signature[i] != '\0'; i++) {
1673                 for (j = 0, k = 0; j < 16 && k < strlen(depca_signature[i]); j++) {
1674                         if (depca_signature[i][k] == tmpstr[j]) {       /* track signature */
1675                                 k++;
1676                         } else {        /* lost signature; begin search again */
1677                                 k = 0;
1678                         }
1679                 }
1680                 if (k == strlen(depca_signature[i]))
1681                         break;
1682         }
1683
1684         /* Check if name string is valid, provided there's no PROM */
1685         if (name && *name && (i == unknown)) {
1686                 for (i = 0; *depca_signature[i] != '\0'; i++) {
1687                         if (strcmp(name, depca_signature[i]) == 0)
1688                                 break;
1689                 }
1690         }
1691
1692         return i;
1693 }
1694
1695 /*
1696 ** Look for a special sequence in the Ethernet station address PROM that
1697 ** is common across all DEPCA products. Note that the original DEPCA needs
1698 ** its ROM address counter to be initialized and enabled. Only enable
1699 ** if the first address octet is a 0x08 - this minimises the chances of
1700 ** messing around with some other hardware, but it assumes that this DEPCA
1701 ** card initialized itself correctly.
1702 **
1703 ** Search the Ethernet address ROM for the signature. Since the ROM address
1704 ** counter can start at an arbitrary point, the search must include the entire
1705 ** probe sequence length plus the (length_of_the_signature - 1).
1706 ** Stop the search IMMEDIATELY after the signature is found so that the
1707 ** PROM address counter is correctly positioned at the start of the
1708 ** ethernet address for later read out.
1709 */
1710 static int __init DevicePresent(u_long ioaddr)
1711 {
1712         union {
1713                 struct {
1714                         u32 a;
1715                         u32 b;
1716                 } llsig;
1717                 char Sig[sizeof(u32) << 1];
1718         }
1719         dev;
1720         short sigLength = 0;
1721         s8 data;
1722         s16 nicsr;
1723         int i, j, status = 0;
1724
1725         data = inb(DEPCA_PROM); /* clear counter on DEPCA */
1726         data = inb(DEPCA_PROM); /* read data */
1727
1728         if (data == 0x08) {     /* Enable counter on DEPCA */
1729                 nicsr = inb(DEPCA_NICSR);
1730                 nicsr |= AAC;
1731                 outb(nicsr, DEPCA_NICSR);
1732         }
1733
1734         dev.llsig.a = ETH_PROM_SIG;
1735         dev.llsig.b = ETH_PROM_SIG;
1736         sigLength = sizeof(u32) << 1;
1737
1738         for (i = 0, j = 0; j < sigLength && i < PROBE_LENGTH + sigLength - 1; i++) {
1739                 data = inb(DEPCA_PROM);
1740                 if (dev.Sig[j] == data) {       /* track signature */
1741                         j++;
1742                 } else {        /* lost signature; begin search again */
1743                         if (data == dev.Sig[0]) {       /* rare case.... */
1744                                 j = 1;
1745                         } else {
1746                                 j = 0;
1747                         }
1748                 }
1749         }
1750
1751         if (j != sigLength) {
1752                 status = -ENODEV;       /* search failed */
1753         }
1754
1755         return status;
1756 }
1757
1758 /*
1759 ** The DE100 and DE101 PROM accesses were made non-standard for some bizarre
1760 ** reason: access the upper half of the PROM with x=0; access the lower half
1761 ** with x=1.
1762 */
1763 static int __init get_hw_addr(struct net_device *dev)
1764 {
1765         u_long ioaddr = dev->base_addr;
1766         struct depca_private *lp = dev->priv;
1767         int i, k, tmp, status = 0;
1768         u_short j, x, chksum;
1769
1770         x = (((lp->adapter == de100) || (lp->adapter == de101)) ? 1 : 0);
1771
1772         for (i = 0, k = 0, j = 0; j < 3; j++) {
1773                 k <<= 1;
1774                 if (k > 0xffff)
1775                         k -= 0xffff;
1776
1777                 k += (u_char) (tmp = inb(DEPCA_PROM + x));
1778                 dev->dev_addr[i++] = (u_char) tmp;
1779                 k += (u_short) ((tmp = inb(DEPCA_PROM + x)) << 8);
1780                 dev->dev_addr[i++] = (u_char) tmp;
1781
1782                 if (k > 0xffff)
1783                         k -= 0xffff;
1784         }
1785         if (k == 0xffff)
1786                 k = 0;
1787
1788         chksum = (u_char) inb(DEPCA_PROM + x);
1789         chksum |= (u_short) (inb(DEPCA_PROM + x) << 8);
1790         if (k != chksum)
1791                 status = -1;
1792
1793         return status;
1794 }
1795
1796 /*
1797 ** Load a packet into the shared memory
1798 */
1799 static int load_packet(struct net_device *dev, struct sk_buff *skb)
1800 {
1801         struct depca_private *lp = (struct depca_private *) dev->priv;
1802         int i, entry, end, len, status = 0;
1803
1804         entry = lp->tx_new;     /* Ring around buffer number. */
1805         end = (entry + (skb->len - 1) / TX_BUFF_SZ) & lp->txRingMask;
1806         if (!(readl(&lp->tx_ring[end].base) & T_OWN)) { /* Enough room? */
1807                 /*
1808                    ** Caution: the write order is important here... don't set up the
1809                    ** ownership rights until all the other information is in place.
1810                  */
1811                 if (end < entry) {      /* wrapped buffer */
1812                         len = (lp->txRingMask - entry + 1) * TX_BUFF_SZ;
1813                         memcpy_toio(lp->tx_buff[entry], skb->data, len);
1814                         memcpy_toio(lp->tx_buff[0], skb->data + len, skb->len - len);
1815                 } else {        /* linear buffer */
1816                         memcpy_toio(lp->tx_buff[entry], skb->data, skb->len);
1817                 }
1818
1819                 /* set up the buffer descriptors */
1820                 len = (skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;
1821                 for (i = entry; i != end; i = (i+1) & lp->txRingMask) {
1822                         /* clean out flags */
1823                         writel(readl(&lp->tx_ring[i].base) & ~T_FLAGS, &lp->tx_ring[i].base);
1824                         writew(0x0000, &lp->tx_ring[i].misc);   /* clears other error flags */
1825                         writew(-TX_BUFF_SZ, &lp->tx_ring[i].length);    /* packet length in buffer */
1826                         len -= TX_BUFF_SZ;
1827                 }
1828                 /* clean out flags */
1829                 writel(readl(&lp->tx_ring[end].base) & ~T_FLAGS, &lp->tx_ring[end].base);
1830                 writew(0x0000, &lp->tx_ring[end].misc); /* clears other error flags */
1831                 writew(-len, &lp->tx_ring[end].length); /* packet length in last buff */
1832
1833                 /* start of packet */
1834                 writel(readl(&lp->tx_ring[entry].base) | T_STP, &lp->tx_ring[entry].base);
1835                 /* end of packet */
1836                 writel(readl(&lp->tx_ring[end].base) | T_ENP, &lp->tx_ring[end].base);
1837
1838                 for (i = end; i != entry; --i) {
1839                         /* ownership of packet */
1840                         writel(readl(&lp->tx_ring[i].base) | T_OWN, &lp->tx_ring[i].base);
1841                         if (i == 0)
1842                                 i = lp->txRingMask + 1;
1843                 }
1844                 writel(readl(&lp->tx_ring[entry].base) | T_OWN, &lp->tx_ring[entry].base);
1845
1846                 lp->tx_new = (++end) & lp->txRingMask;  /* update current pointers */
1847         } else {
1848                 status = -1;
1849         }
1850
1851         return status;
1852 }
1853
1854 static void depca_dbg_open(struct net_device *dev)
1855 {
1856         struct depca_private *lp = (struct depca_private *) dev->priv;
1857         u_long ioaddr = dev->base_addr;
1858         struct depca_init *p = &lp->init_block;
1859         int i;
1860
1861         if (depca_debug > 1) {
1862                 /* Do not copy the shadow init block into shared memory */
1863                 /* Debugging should not affect normal operation! */
1864                 /* The shadow init block will get copied across during InitRestartDepca */
1865                 printk("%s: depca open with irq %d\n", dev->name, dev->irq);
1866                 printk("Descriptor head addresses (CPU):\n");
1867                 printk("        0x%lx  0x%lx\n", (u_long) lp->rx_ring, (u_long) lp->tx_ring);
1868                 printk("Descriptor addresses (CPU):\nRX: ");
1869                 for (i = 0; i < lp->rxRingMask; i++) {
1870                         if (i < 3) {
1871                                 printk("%p ", &lp->rx_ring[i].base);
1872                         }
1873                 }
1874                 printk("...%p\n", &lp->rx_ring[i].base);
1875                 printk("TX: ");
1876                 for (i = 0; i < lp->txRingMask; i++) {
1877                         if (i < 3) {
1878                                 printk("%p ", &lp->tx_ring[i].base);
1879                         }
1880                 }
1881                 printk("...%p\n", &lp->tx_ring[i].base);
1882                 printk("\nDescriptor buffers (Device):\nRX: ");
1883                 for (i = 0; i < lp->rxRingMask; i++) {
1884                         if (i < 3) {
1885                                 printk("0x%8.8x  ", readl(&lp->rx_ring[i].base));
1886                         }
1887                 }
1888                 printk("...0x%8.8x\n", readl(&lp->rx_ring[i].base));
1889                 printk("TX: ");
1890                 for (i = 0; i < lp->txRingMask; i++) {
1891                         if (i < 3) {
1892                                 printk("0x%8.8x  ", readl(&lp->tx_ring[i].base));
1893                         }
1894                 }
1895                 printk("...0x%8.8x\n", readl(&lp->tx_ring[i].base));
1896                 printk("Initialisation block at 0x%8.8lx(Phys)\n", lp->mem_start);
1897                 printk("        mode: 0x%4.4x\n", p->mode);
1898                 printk("        physical address: ");
1899                 for (i = 0; i < ETH_ALEN - 1; i++) {
1900                         printk("%2.2x:", p->phys_addr[i]);
1901                 }
1902                 printk("%2.2x\n", p->phys_addr[i]);
1903                 printk("        multicast hash table: ");
1904                 for (i = 0; i < (HASH_TABLE_LEN >> 3) - 1; i++) {
1905                         printk("%2.2x:", p->mcast_table[i]);
1906                 }
1907                 printk("%2.2x\n", p->mcast_table[i]);
1908                 printk("        rx_ring at: 0x%8.8x\n", p->rx_ring);
1909                 printk("        tx_ring at: 0x%8.8x\n", p->tx_ring);
1910                 printk("buffers (Phys): 0x%8.8lx\n", lp->mem_start + lp->buffs_offset);
1911                 printk("Ring size:\nRX: %d  Log2(rxRingMask): 0x%8.8x\n", (int) lp->rxRingMask + 1, lp->rx_rlen);
1912                 printk("TX: %d  Log2(txRingMask): 0x%8.8x\n", (int) lp->txRingMask + 1, lp->tx_rlen);
1913                 outw(CSR2, DEPCA_ADDR);
1914                 printk("CSR2&1: 0x%4.4x", inw(DEPCA_DATA));
1915                 outw(CSR1, DEPCA_ADDR);
1916                 printk("%4.4x\n", inw(DEPCA_DATA));
1917                 outw(CSR3, DEPCA_ADDR);
1918                 printk("CSR3: 0x%4.4x\n", inw(DEPCA_DATA));
1919         }
1920
1921         return;
1922 }
1923
1924 /*
1925 ** Perform IOCTL call functions here. Some are privileged operations and the
1926 ** effective uid is checked in those cases.
1927 ** All multicast IOCTLs will not work here and are for testing purposes only.
1928 */
1929 static int depca_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1930 {
1931         struct depca_private *lp = (struct depca_private *) dev->priv;
1932         struct depca_ioctl *ioc = (struct depca_ioctl *) &rq->ifr_ifru;
1933         int i, status = 0;
1934         u_long ioaddr = dev->base_addr;
1935         union {
1936                 u8 addr[(HASH_TABLE_LEN * ETH_ALEN)];
1937                 u16 sval[(HASH_TABLE_LEN * ETH_ALEN) >> 1];
1938                 u32 lval[(HASH_TABLE_LEN * ETH_ALEN) >> 2];
1939         } tmp;
1940         unsigned long flags;
1941         void *buf;
1942
1943         switch (ioc->cmd) {
1944         case DEPCA_GET_HWADDR:  /* Get the hardware address */
1945                 for (i = 0; i < ETH_ALEN; i++) {
1946                         tmp.addr[i] = dev->dev_addr[i];
1947                 }
1948                 ioc->len = ETH_ALEN;
1949                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
1950                         return -EFAULT;
1951                 break;
1952
1953         case DEPCA_SET_HWADDR:  /* Set the hardware address */
1954                 if (!capable(CAP_NET_ADMIN))
1955                         return -EPERM;
1956                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN))
1957                         return -EFAULT;
1958                 for (i = 0; i < ETH_ALEN; i++) {
1959                         dev->dev_addr[i] = tmp.addr[i];
1960                 }
1961                 netif_stop_queue(dev);
1962                 while (lp->tx_old != lp->tx_new)
1963                         cpu_relax();    /* Wait for the ring to empty */
1964
1965                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1966                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1967                 LoadCSRs(dev);  /* Reload CSR3 */
1968                 InitRestartDepca(dev);  /* Resume normal operation. */
1969                 netif_start_queue(dev); /* Unlock the TX ring */
1970                 break;
1971
1972         case DEPCA_SET_PROM:    /* Set Promiscuous Mode */
1973                 if (!capable(CAP_NET_ADMIN))
1974                         return -EPERM;
1975                 netif_stop_queue(dev);
1976                 while (lp->tx_old != lp->tx_new)
1977                         cpu_relax();    /* Wait for the ring to empty */
1978
1979                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1980                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1981                 lp->init_block.mode |= PROM;    /* Set promiscuous mode */
1982
1983                 LoadCSRs(dev);  /* Reload CSR3 */
1984                 InitRestartDepca(dev);  /* Resume normal operation. */
1985                 netif_start_queue(dev); /* Unlock the TX ring */
1986                 break;
1987
1988         case DEPCA_CLR_PROM:    /* Clear Promiscuous Mode */
1989                 if (!capable(CAP_NET_ADMIN))
1990                         return -EPERM;
1991                 netif_stop_queue(dev);
1992                 while (lp->tx_old != lp->tx_new)
1993                         cpu_relax();    /* Wait for the ring to empty */
1994
1995                 STOP_DEPCA;     /* Temporarily stop the depca.  */
1996                 depca_init_ring(dev);   /* Initialize the descriptor rings */
1997                 lp->init_block.mode &= ~PROM;   /* Clear promiscuous mode */
1998
1999                 LoadCSRs(dev);  /* Reload CSR3 */
2000                 InitRestartDepca(dev);  /* Resume normal operation. */
2001                 netif_start_queue(dev); /* Unlock the TX ring */
2002                 break;
2003
2004         case DEPCA_SAY_BOO:     /* Say "Boo!" to the kernel log file */
2005                 if(!capable(CAP_NET_ADMIN))
2006                         return -EPERM;
2007                 printk("%s: Boo!\n", dev->name);
2008                 break;
2009
2010         case DEPCA_GET_MCA:     /* Get the multicast address table */
2011                 ioc->len = (HASH_TABLE_LEN >> 3);
2012                 if (copy_to_user(ioc->data, lp->init_block.mcast_table, ioc->len))
2013                         return -EFAULT;
2014                 break;
2015
2016         case DEPCA_SET_MCA:     /* Set a multicast address */
2017                 if (!capable(CAP_NET_ADMIN))
2018                         return -EPERM;
2019                 if (ioc->len >= HASH_TABLE_LEN)
2020                         return -EINVAL;
2021                 if (copy_from_user(tmp.addr, ioc->data, ETH_ALEN * ioc->len))
2022                         return -EFAULT;
2023                 set_multicast_list(dev);
2024                 break;
2025
2026         case DEPCA_CLR_MCA:     /* Clear all multicast addresses */
2027                 if (!capable(CAP_NET_ADMIN))
2028                         return -EPERM;
2029                 set_multicast_list(dev);
2030                 break;
2031
2032         case DEPCA_MCA_EN:      /* Enable pass all multicast addressing */
2033                 if (!capable(CAP_NET_ADMIN))
2034                         return -EPERM;
2035                 set_multicast_list(dev);
2036                 break;
2037
2038         case DEPCA_GET_STATS:   /* Get the driver statistics */
2039                 ioc->len = sizeof(lp->pktStats);
2040                 buf = kmalloc(ioc->len, GFP_KERNEL);
2041                 if(!buf)
2042                         return -ENOMEM;
2043                 spin_lock_irqsave(&lp->lock, flags);
2044                 memcpy(buf, &lp->pktStats, ioc->len);
2045                 spin_unlock_irqrestore(&lp->lock, flags);
2046                 if (copy_to_user(ioc->data, buf, ioc->len))
2047                         status = -EFAULT;
2048                 kfree(buf);
2049                 break;
2050
2051         case DEPCA_CLR_STATS:   /* Zero out the driver statistics */
2052                 if (!capable(CAP_NET_ADMIN))
2053                         return -EPERM;
2054                 spin_lock_irqsave(&lp->lock, flags);
2055                 memset(&lp->pktStats, 0, sizeof(lp->pktStats));
2056                 spin_unlock_irqrestore(&lp->lock, flags);
2057                 break;
2058
2059         case DEPCA_GET_REG:     /* Get the DEPCA Registers */
2060                 i = 0;
2061                 tmp.sval[i++] = inw(DEPCA_NICSR);
2062                 outw(CSR0, DEPCA_ADDR); /* status register */
2063                 tmp.sval[i++] = inw(DEPCA_DATA);
2064                 memcpy(&tmp.sval[i], &lp->init_block, sizeof(struct depca_init));
2065                 ioc->len = i + sizeof(struct depca_init);
2066                 if (copy_to_user(ioc->data, tmp.addr, ioc->len))
2067                         return -EFAULT;
2068                 break;
2069
2070         default:
2071                 return -EOPNOTSUPP;
2072         }
2073
2074         return status;
2075 }
2076
2077 static int __init depca_module_init (void)
2078 {
2079         int err = 0;
2080
2081 #ifdef CONFIG_MCA
2082         err = mca_register_driver (&depca_mca_driver);
2083 #endif
2084 #ifdef CONFIG_EISA
2085         err |= eisa_driver_register (&depca_eisa_driver);
2086 #endif
2087         err |= platform_driver_register (&depca_isa_driver);
2088         depca_platform_probe ();
2089
2090         return err;
2091 }
2092
2093 static void __exit depca_module_exit (void)
2094 {
2095         int i;
2096 #ifdef CONFIG_MCA
2097         mca_unregister_driver (&depca_mca_driver);
2098 #endif
2099 #ifdef CONFIG_EISA
2100         eisa_driver_unregister (&depca_eisa_driver);
2101 #endif
2102         platform_driver_unregister (&depca_isa_driver);
2103
2104         for (i = 0; depca_io_ports[i].iobase; i++) {
2105                 if (depca_io_ports[i].device) {
2106                         depca_io_ports[i].device->dev.platform_data = NULL;
2107                         platform_device_unregister (depca_io_ports[i].device);
2108                         depca_io_ports[i].device = NULL;
2109                 }
2110         }
2111 }
2112
2113 module_init (depca_module_init);
2114 module_exit (depca_module_exit);