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