drivers/net/3c505.c

   1 /*
   2  * Linux Ethernet device driver for the 3Com Etherlink Plus (3C505)
   3  *      By Craig Southeren, Juha Laiho and Philip Blundell
   4  *
   5  * 3c505.c      This module implements an interface to the 3Com
   6  *              Etherlink Plus (3c505) Ethernet card. Linux device
   7  *              driver interface reverse engineered from the Linux 3C509
   8  *              device drivers. Some 3C505 information gleaned from
   9  *              the Crynwr packet driver. Still this driver would not
  10  *              be here without 3C505 technical reference provided by
  11  *              3Com.
  12  *
  13  * $Id: 3c505.c,v 1.10 1996/04/16 13:06:27 phil Exp $
  14  *
  15  * Authors:     Linux 3c505 device driver by
  16  *                      Craig Southeren, <craigs@ineluki.apana.org.au>
  17  *              Final debugging by
  18  *                      Andrew Tridgell, <tridge@nimbus.anu.edu.au>
  19  *              Auto irq/address, tuning, cleanup and v1.1.4+ kernel mods by
  20  *                      Juha Laiho, <jlaiho@ichaos.nullnet.fi>
  21  *              Linux 3C509 driver by
  22  *                      Donald Becker, <becker@super.org>
  23  *                      (Now at <becker@scyld.com>)
  24  *              Crynwr packet driver by
  25  *                      Krishnan Gopalan and Gregg Stefancik,
  26  *                      Clemson University Engineering Computer Operations.
  27  *                      Portions of the code have been adapted from the 3c505
  28  *                         driver for NCSA Telnet by Bruce Orchard and later
  29  *                         modified by Warren Van Houten and krus@diku.dk.
  30  *              3C505 technical information provided by
  31  *                      Terry Murphy, of 3Com Network Adapter Division
  32  *              Linux 1.3.0 changes by
  33  *                      Alan Cox <Alan.Cox@linux.org>
  34  *              More debugging, DMA support, currently maintained by
  35  *                      Philip Blundell <philb@gnu.org>
  36  *              Multicard/soft configurable dma channel/rev 2 hardware support
  37  *                      by Christopher Collins <ccollins@pcug.org.au>
  38  *              Ethtool support (jgarzik), 11/17/2001
  39  */
  40
  41 #define DRV_NAME        "3c505"
  42 #define DRV_VERSION     "1.10a"
  43
  44
  45 /* Theory of operation:
  46  *
  47  * The 3c505 is quite an intelligent board.  All communication with it is done
  48  * by means of Primary Command Blocks (PCBs); these are transferred using PIO
  49  * through the command register.  The card has 256k of on-board RAM, which is
  50  * used to buffer received packets.  It might seem at first that more buffers
  51  * are better, but in fact this isn't true.  From my tests, it seems that
  52  * more than about 10 buffers are unnecessary, and there is a noticeable
  53  * performance hit in having more active on the card.  So the majority of the
  54  * card's memory isn't, in fact, used.  Sadly, the card only has one transmit
  55  * buffer and, short of loading our own firmware into it (which is what some
  56  * drivers resort to) there's nothing we can do about this.
  57  *
  58  * We keep up to 4 "receive packet" commands active on the board at a time.
  59  * When a packet comes in, so long as there is a receive command active, the
  60  * board will send us a "packet received" PCB and then add the data for that
  61  * packet to the DMA queue.  If a DMA transfer is not already in progress, we
  62  * set one up to start uploading the data.  We have to maintain a list of
  63  * backlogged receive packets, because the card may decide to tell us about
  64  * a newly-arrived packet at any time, and we may not be able to start a DMA
  65  * transfer immediately (ie one may already be going on).  We can't NAK the
  66  * PCB, because then it would throw the packet away.
  67  *
  68  * Trying to send a PCB to the card at the wrong moment seems to have bad
  69  * effects.  If we send it a transmit PCB while a receive DMA is happening,
  70  * it will just NAK the PCB and so we will have wasted our time.  Worse, it
  71  * sometimes seems to interrupt the transfer.  The majority of the low-level
  72  * code is protected by one huge semaphore -- "busy" -- which is set whenever
  73  * it probably isn't safe to do anything to the card.  The receive routine
  74  * must gain a lock on "busy" before it can start a DMA transfer, and the
  75  * transmit routine must gain a lock before it sends the first PCB to the card.
  76  * The send_pcb() routine also has an internal semaphore to protect it against
  77  * being re-entered (which would be disastrous) -- this is needed because
  78  * several things can happen asynchronously (re-priming the receiver and
  79  * asking the card for statistics, for example).  send_pcb() will also refuse
  80  * to talk to the card at all if a DMA upload is happening.  The higher-level
  81  * networking code will reschedule a later retry if some part of the driver
  82  * is blocked.  In practice, this doesn't seem to happen very often.
  83  */
  84
  85 /* This driver may now work with revision 2.x hardware, since all the read
  86  * operations on the HCR have been removed (we now keep our own softcopy).
  87  * But I don't have an old card to test it on.
  88  *
  89  * This has had the bad effect that the autoprobe routine is now a bit
  90  * less friendly to other devices.  However, it was never very good.
  91  * before, so I doubt it will hurt anybody.
  92  */
  93
  94 /* The driver is a mess.  I took Craig's and Juha's code, and hacked it firstly
  95  * to make it more reliable, and secondly to add DMA mode.  Many things could
  96  * probably be done better; the concurrency protection is particularly awful.
  97  */
  98
  99 #include <linux/module.h>
 100 #include <linux/kernel.h>
 101 #include <linux/string.h>
 102 #include <linux/interrupt.h>
 103 #include <linux/errno.h>
 104 #include <linux/in.h>
 105 #include <linux/ioport.h>
 106 #include <linux/spinlock.h>
 107 #include <linux/ethtool.h>
 108 #include <linux/delay.h>
 109 #include <linux/bitops.h>
 110 #include <linux/gfp.h>
 111
 112 #include <asm/uaccess.h>
 113 #include <asm/io.h>
 114 #include <asm/dma.h>
 115
 116 #include <linux/netdevice.h>
 117 #include <linux/etherdevice.h>
 118 #include <linux/skbuff.h>
 119 #include <linux/init.h>
 120
 121 #include "3c505.h"
 122
 123 /*********************************************************
 124  *
 125  *  define debug messages here as common strings to reduce space
 126  *
 127  *********************************************************/
 128
 129 #define filename __FILE__
 130
 131 #define timeout_msg "*** timeout at %s:%s (line %d) ***\n"
 132 #define TIMEOUT_MSG(lineno) \
 133         pr_notice(timeout_msg, filename, __func__, (lineno))
 134
 135 #define invalid_pcb_msg "*** invalid pcb length %d at %s:%s (line %d) ***\n"
 136 #define INVALID_PCB_MSG(len) \
 137         pr_notice(invalid_pcb_msg, (len), filename, __func__, __LINE__)
 138
 139 #define search_msg "%s: Looking for 3c505 adapter at address %#x..."
 140
 141 #define stilllooking_msg "still looking..."
 142
 143 #define found_msg "found.\n"
 144
 145 #define notfound_msg "not found (reason = %d)\n"
 146
 147 #define couldnot_msg "%s: 3c505 not found\n"
 148
 149 /*********************************************************
 150  *
 151  *  various other debug stuff
 152  *
 153  *********************************************************/
 154
 155 #ifdef ELP_DEBUG
 156 static int elp_debug = ELP_DEBUG;
 157 #else
 158 static int elp_debug;
 159 #endif
 160 #define debug elp_debug
 161
 162 /*
 163  *  0 = no messages (well, some)
 164  *  1 = messages when high level commands performed
 165  *  2 = messages when low level commands performed
 166  *  3 = messages when interrupts received
 167  */
 168
 169 /*****************************************************************
 170  *
 171  * List of I/O-addresses we try to auto-sense
 172  * Last element MUST BE 0!
 173  *****************************************************************/
 174
 175 static int addr_list[] __initdata = {0x300, 0x280, 0x310, 0};
 176
 177 /* Dma Memory related stuff */
 178
 179 static unsigned long dma_mem_alloc(int size)
 180 {
 181         int order = get_order(size);
 182         return __get_dma_pages(GFP_KERNEL, order);
 183 }
 184
 185
 186 /*****************************************************************
 187  *
 188  * Functions for I/O (note the inline !)
 189  *
 190  *****************************************************************/
 191
 192 static inline unsigned char inb_status(unsigned int base_addr)
 193 {
 194         return inb(base_addr + PORT_STATUS);
 195 }
 196
 197 static inline int inb_command(unsigned int base_addr)
 198 {
 199         return inb(base_addr + PORT_COMMAND);
 200 }
 201
 202 static inline void outb_control(unsigned char val, struct net_device *dev)
 203 {
 204         outb(val, dev->base_addr + PORT_CONTROL);
 205         ((elp_device *)(netdev_priv(dev)))->hcr_val = val;
 206 }
 207
 208 #define HCR_VAL(x)   (((elp_device *)(netdev_priv(x)))->hcr_val)
 209
 210 static inline void outb_command(unsigned char val, unsigned int base_addr)
 211 {
 212         outb(val, base_addr + PORT_COMMAND);
 213 }
 214
 215 static inline unsigned int backlog_next(unsigned int n)
 216 {
 217         return (n + 1) % BACKLOG_SIZE;
 218 }
 219
 220 /*****************************************************************
 221  *
 222  *  useful functions for accessing the adapter
 223  *
 224  *****************************************************************/
 225
 226 /*
 227  * use this routine when accessing the ASF bits as they are
 228  * changed asynchronously by the adapter
 229  */
 230
 231 /* get adapter PCB status */
 232 #define GET_ASF(addr) \
 233         (get_status(addr)&ASF_PCB_MASK)
 234
 235 static inline int get_status(unsigned int base_addr)
 236 {
 237         unsigned long timeout = jiffies + 10*HZ/100;
 238         register int stat1;
 239         do {
 240                 stat1 = inb_status(base_addr);
 241         } while (stat1 != inb_status(base_addr) && time_before(jiffies, timeout));
 242         if (time_after_eq(jiffies, timeout))
 243                 TIMEOUT_MSG(__LINE__);
 244         return stat1;
 245 }
 246
 247 static inline void set_hsf(struct net_device *dev, int hsf)
 248 {
 249         elp_device *adapter = netdev_priv(dev);
 250         unsigned long flags;
 251
 252         spin_lock_irqsave(&adapter->lock, flags);
 253         outb_control((HCR_VAL(dev) & ~HSF_PCB_MASK) | hsf, dev);
 254         spin_unlock_irqrestore(&adapter->lock, flags);
 255 }
 256
 257 static bool start_receive(struct net_device *, pcb_struct *);
 258
 259 static inline void adapter_reset(struct net_device *dev)
 260 {
 261         unsigned long timeout;
 262         elp_device *adapter = netdev_priv(dev);
 263         unsigned char orig_hcr = adapter->hcr_val;
 264
 265         outb_control(0, dev);
 266
 267         if (inb_status(dev->base_addr) & ACRF) {
 268                 do {
 269                         inb_command(dev->base_addr);
 270                         timeout = jiffies + 2*HZ/100;
 271                         while (time_before_eq(jiffies, timeout) && !(inb_status(dev->base_addr) & ACRF));
 272                 } while (inb_status(dev->base_addr) & ACRF);
 273                 set_hsf(dev, HSF_PCB_NAK);
 274         }
 275         outb_control(adapter->hcr_val | ATTN | DIR, dev);
 276         mdelay(10);
 277         outb_control(adapter->hcr_val & ~ATTN, dev);
 278         mdelay(10);
 279         outb_control(adapter->hcr_val | FLSH, dev);
 280         mdelay(10);
 281         outb_control(adapter->hcr_val & ~FLSH, dev);
 282         mdelay(10);
 283
 284         outb_control(orig_hcr, dev);
 285         if (!start_receive(dev, &adapter->tx_pcb))
 286                 pr_err("%s: start receive command failed\n", dev->name);
 287 }
 288
 289 /* Check to make sure that a DMA transfer hasn't timed out.  This should
 290  * never happen in theory, but seems to occur occasionally if the card gets
 291  * prodded at the wrong time.
 292  */
 293 static inline void check_3c505_dma(struct net_device *dev)
 294 {
 295         elp_device *adapter = netdev_priv(dev);
 296         if (adapter->dmaing && time_after(jiffies, adapter->current_dma.start_time + 10)) {
 297                 unsigned long flags, f;
 298                 pr_err("%s: DMA %s timed out, %d bytes left\n", dev->name,
 299                         adapter->current_dma.direction ? "download" : "upload",
 300                         get_dma_residue(dev->dma));
 301                 spin_lock_irqsave(&adapter->lock, flags);
 302                 adapter->dmaing = 0;
 303                 adapter->busy = 0;
 304
 305                 f=claim_dma_lock();
 306                 disable_dma(dev->dma);
 307                 release_dma_lock(f);
 308
 309                 if (adapter->rx_active)
 310                         adapter->rx_active--;
 311                 outb_control(adapter->hcr_val & ~(DMAE | TCEN | DIR), dev);
 312                 spin_unlock_irqrestore(&adapter->lock, flags);
 313         }
 314 }
 315
 316 /* Primitive functions used by send_pcb() */
 317 static inline bool send_pcb_slow(unsigned int base_addr, unsigned char byte)
 318 {
 319         unsigned long timeout;
 320         outb_command(byte, base_addr);
 321         for (timeout = jiffies + 5*HZ/100; time_before(jiffies, timeout);) {
 322                 if (inb_status(base_addr) & HCRE)
 323                         return false;
 324         }
 325         pr_warning("3c505: send_pcb_slow timed out\n");
 326         return true;
 327 }
 328
 329 static inline bool send_pcb_fast(unsigned int base_addr, unsigned char byte)
 330 {
 331         unsigned int timeout;
 332         outb_command(byte, base_addr);
 333         for (timeout = 0; timeout < 40000; timeout++) {
 334                 if (inb_status(base_addr) & HCRE)
 335                         return false;
 336         }
 337         pr_warning("3c505: send_pcb_fast timed out\n");
 338         return true;
 339 }
 340
 341 /* Check to see if the receiver needs restarting, and kick it if so */
 342 static inline void prime_rx(struct net_device *dev)
 343 {
 344         elp_device *adapter = netdev_priv(dev);
 345         while (adapter->rx_active < ELP_RX_PCBS && netif_running(dev)) {
 346                 if (!start_receive(dev, &adapter->itx_pcb))
 347                         break;
 348         }
 349 }
 350
 351 /*****************************************************************
 352  *
 353  * send_pcb
 354  *   Send a PCB to the adapter.
 355  *
 356  *      output byte to command reg  --<--+
 357  *      wait until HCRE is non zero      |
 358  *      loop until all bytes sent   -->--+
 359  *      set HSF1 and HSF2 to 1
 360  *      output pcb length
 361  *      wait until ASF give ACK or NAK
 362  *      set HSF1 and HSF2 to 0
 363  *
 364  *****************************************************************/
 365
 366 /* This can be quite slow -- the adapter is allowed to take up to 40ms
 367  * to respond to the initial interrupt.
 368  *
 369  * We run initially with interrupts turned on, but with a semaphore set
 370  * so that nobody tries to re-enter this code.  Once the first byte has
 371  * gone through, we turn interrupts off and then send the others (the
 372  * timeout is reduced to 500us).
 373  */
 374
 375 static bool send_pcb(struct net_device *dev, pcb_struct * pcb)
 376 {
 377         int i;
 378         unsigned long timeout;
 379         elp_device *adapter = netdev_priv(dev);
 380         unsigned long flags;
 381
 382         check_3c505_dma(dev);
 383
 384         if (adapter->dmaing && adapter->current_dma.direction == 0)
 385                 return false;
 386
 387         /* Avoid contention */
 388         if (test_and_set_bit(1, &adapter->send_pcb_semaphore)) {
 389                 if (elp_debug >= 3) {
 390                         pr_debug("%s: send_pcb entered while threaded\n", dev->name);
 391                 }
 392                 return false;
 393         }
 394         /*
 395          * load each byte into the command register and
 396          * wait for the HCRE bit to indicate the adapter
 397          * had read the byte
 398          */
 399         set_hsf(dev, 0);
 400
 401         if (send_pcb_slow(dev->base_addr, pcb->command))
 402                 goto abort;
 403
 404         spin_lock_irqsave(&adapter->lock, flags);
 405
 406         if (send_pcb_fast(dev->base_addr, pcb->length))
 407                 goto sti_abort;
 408
 409         for (i = 0; i < pcb->length; i++) {
 410                 if (send_pcb_fast(dev->base_addr, pcb->data.raw[i]))
 411                         goto sti_abort;
 412         }
 413
 414         outb_control(adapter->hcr_val | 3, dev);        /* signal end of PCB */
 415         outb_command(2 + pcb->length, dev->base_addr);
 416
 417         /* now wait for the acknowledgement */
 418         spin_unlock_irqrestore(&adapter->lock, flags);
 419
 420         for (timeout = jiffies + 5*HZ/100; time_before(jiffies, timeout);) {
 421                 switch (GET_ASF(dev->base_addr)) {
 422                 case ASF_PCB_ACK:
 423                         adapter->send_pcb_semaphore = 0;
 424                         return true;
 425
 426                 case ASF_PCB_NAK:
 427 #ifdef ELP_DEBUG
 428                         pr_debug("%s: send_pcb got NAK\n", dev->name);
 429 #endif
 430                         goto abort;
 431                 }
 432         }
 433
 434         if (elp_debug >= 1)
 435                 pr_debug("%s: timeout waiting for PCB acknowledge (status %02x)\n",
 436                         dev->name, inb_status(dev->base_addr));
 437         goto abort;
 438
 439       sti_abort:
 440         spin_unlock_irqrestore(&adapter->lock, flags);
 441       abort:
 442         adapter->send_pcb_semaphore = 0;
 443         return false;
 444 }
 445
 446
 447 /*****************************************************************
 448  *
 449  * receive_pcb
 450  *   Read a PCB from the adapter
 451  *
 452  *      wait for ACRF to be non-zero        ---<---+
 453  *      input a byte                               |
 454  *      if ASF1 and ASF2 were not both one         |
 455  *              before byte was read, loop      --->---+
 456  *      set HSF1 and HSF2 for ack
 457  *
 458  *****************************************************************/
 459
 460 static bool receive_pcb(struct net_device *dev, pcb_struct * pcb)
 461 {
 462         int i, j;
 463         int total_length;
 464         int stat;
 465         unsigned long timeout;
 466         unsigned long flags;
 467
 468         elp_device *adapter = netdev_priv(dev);
 469
 470         set_hsf(dev, 0);
 471
 472         /* get the command code */
 473         timeout = jiffies + 2*HZ/100;
 474         while (((stat = get_status(dev->base_addr)) & ACRF) == 0 && time_before(jiffies, timeout));
 475         if (time_after_eq(jiffies, timeout)) {
 476                 TIMEOUT_MSG(__LINE__);
 477                 return false;
 478         }
 479         pcb->command = inb_command(dev->base_addr);
 480
 481         /* read the data length */
 482         timeout = jiffies + 3*HZ/100;
 483         while (((stat = get_status(dev->base_addr)) & ACRF) == 0 && time_before(jiffies, timeout));
 484         if (time_after_eq(jiffies, timeout)) {
 485                 TIMEOUT_MSG(__LINE__);
 486                 pr_info("%s: status %02x\n", dev->name, stat);
 487                 return false;
 488         }
 489         pcb->length = inb_command(dev->base_addr);
 490
 491         if (pcb->length > MAX_PCB_DATA) {
 492                 INVALID_PCB_MSG(pcb->length);
 493                 adapter_reset(dev);
 494                 return false;
 495         }
 496         /* read the data */
 497         spin_lock_irqsave(&adapter->lock, flags);
 498         for (i = 0; i < MAX_PCB_DATA; i++) {
 499                 for (j = 0; j < 20000; j++) {
 500                         stat = get_status(dev->base_addr);
 501                         if (stat & ACRF)
 502                                 break;
 503                 }
 504                 pcb->data.raw[i] = inb_command(dev->base_addr);
 505                 if ((stat & ASF_PCB_MASK) == ASF_PCB_END || j >= 20000)
 506                         break;
 507         }
 508         spin_unlock_irqrestore(&adapter->lock, flags);
 509         if (i >= MAX_PCB_DATA) {
 510                 INVALID_PCB_MSG(i);
 511                 return false;
 512         }
 513         if (j >= 20000) {
 514                 TIMEOUT_MSG(__LINE__);
 515                 return false;
 516         }
 517         /* the last "data" byte was really the length! */
 518         total_length = pcb->data.raw[i];
 519
 520         /* safety check total length vs data length */
 521         if (total_length != (pcb->length + 2)) {
 522                 if (elp_debug >= 2)
 523                         pr_warning("%s: mangled PCB received\n", dev->name);
 524                 set_hsf(dev, HSF_PCB_NAK);
 525                 return false;
 526         }
 527
 528         if (pcb->command == CMD_RECEIVE_PACKET_COMPLETE) {
 529                 if (test_and_set_bit(0, (void *) &adapter->busy)) {
 530                         if (backlog_next(adapter->rx_backlog.in) == adapter->rx_backlog.out) {
 531                                 set_hsf(dev, HSF_PCB_NAK);
 532                                 pr_warning("%s: PCB rejected, transfer in progress and backlog full\n", dev->name);
 533                                 pcb->command = 0;
 534                                 return true;
 535                         } else {
 536                                 pcb->command = 0xff;
 537                         }
 538                 }
 539         }
 540         set_hsf(dev, HSF_PCB_ACK);
 541         return true;
 542 }
 543
 544 /******************************************************
 545  *
 546  *  queue a receive command on the adapter so we will get an
 547  *  interrupt when a packet is received.
 548  *
 549  ******************************************************/
 550
 551 static bool start_receive(struct net_device *dev, pcb_struct * tx_pcb)
 552 {
 553         bool status;
 554         elp_device *adapter = netdev_priv(dev);
 555
 556         if (elp_debug >= 3)
 557                 pr_debug("%s: restarting receiver\n", dev->name);
 558         tx_pcb->command = CMD_RECEIVE_PACKET;
 559         tx_pcb->length = sizeof(struct Rcv_pkt);
 560         tx_pcb->data.rcv_pkt.buf_seg
 561             = tx_pcb->data.rcv_pkt.buf_ofs = 0;         /* Unused */
 562         tx_pcb->data.rcv_pkt.buf_len = 1600;
 563         tx_pcb->data.rcv_pkt.timeout = 0;       /* set timeout to zero */
 564         status = send_pcb(dev, tx_pcb);
 565         if (status)
 566                 adapter->rx_active++;
 567         return status;
 568 }
 569
 570 /******************************************************
 571  *
 572  * extract a packet from the adapter
 573  * this routine is only called from within the interrupt
 574  * service routine, so no cli/sti calls are needed
 575  * note that the length is always assumed to be even
 576  *
 577  ******************************************************/
 578
 579 static void receive_packet(struct net_device *dev, int len)
 580 {
 581         int rlen;
 582         elp_device *adapter = netdev_priv(dev);
 583         void *target;
 584         struct sk_buff *skb;
 585         unsigned long flags;
 586
 587         rlen = (len + 1) & ~1;
 588         skb = dev_alloc_skb(rlen + 2);
 589
 590         if (!skb) {
 591                 pr_warning("%s: memory squeeze, dropping packet\n", dev->name);
 592                 target = adapter->dma_buffer;
 593                 adapter->current_dma.target = NULL;
 594                 /* FIXME: stats */
 595                 return;
 596         }
 597
 598         skb_reserve(skb, 2);
 599         target = skb_put(skb, rlen);
 600         if ((unsigned long)(target + rlen) >= MAX_DMA_ADDRESS) {
 601                 adapter->current_dma.target = target;
 602                 target = adapter->dma_buffer;
 603         } else {
 604                 adapter->current_dma.target = NULL;
 605         }
 606
 607         /* if this happens, we die */
 608         if (test_and_set_bit(0, (void *) &adapter->dmaing))
 609                 pr_err("%s: rx blocked, DMA in progress, dir %d\n",
 610                         dev->name, adapter->current_dma.direction);
 611
 612         adapter->current_dma.direction = 0;
 613         adapter->current_dma.length = rlen;
 614         adapter->current_dma.skb = skb;
 615         adapter->current_dma.start_time = jiffies;
 616
 617         outb_control(adapter->hcr_val | DIR | TCEN | DMAE, dev);
 618
 619         flags=claim_dma_lock();
 620         disable_dma(dev->dma);
 621         clear_dma_ff(dev->dma);
 622         set_dma_mode(dev->dma, 0x04);   /* dma read */
 623         set_dma_addr(dev->dma, isa_virt_to_bus(target));
 624         set_dma_count(dev->dma, rlen);
 625         enable_dma(dev->dma);
 626         release_dma_lock(flags);
 627
 628         if (elp_debug >= 3) {
 629                 pr_debug("%s: rx DMA transfer started\n", dev->name);
 630         }
 631
 632         if (adapter->rx_active)
 633                 adapter->rx_active--;
 634
 635         if (!adapter->busy)
 636                 pr_warning("%s: receive_packet called, busy not set.\n", dev->name);
 637 }
 638
 639 /******************************************************
 640  *
 641  * interrupt handler
 642  *
 643  ******************************************************/
 644
 645 static irqreturn_t elp_interrupt(int irq, void *dev_id)
 646 {
 647         int len;
 648         int dlen;
 649         int icount = 0;
 650         struct net_device *dev = dev_id;
 651         elp_device *adapter = netdev_priv(dev);
 652         unsigned long timeout;
 653
 654         spin_lock(&adapter->lock);
 655
 656         do {
 657                 /*
 658                  * has a DMA transfer finished?
 659                  */
 660                 if (inb_status(dev->base_addr) & DONE) {
 661                         if (!adapter->dmaing)
 662                                 pr_warning("%s: phantom DMA completed\n", dev->name);
 663
 664                         if (elp_debug >= 3)
 665                                 pr_debug("%s: %s DMA complete, status %02x\n", dev->name,
 666                                         adapter->current_dma.direction ? "tx" : "rx",
 667                                         inb_status(dev->base_addr));
 668
 669                         outb_control(adapter->hcr_val & ~(DMAE | TCEN | DIR), dev);
 670                         if (adapter->current_dma.direction) {
 671                                 dev_kfree_skb_irq(adapter->current_dma.skb);
 672                         } else {
 673                                 struct sk_buff *skb = adapter->current_dma.skb;
 674                                 if (skb) {
 675                                         if (adapter->current_dma.target) {
 676                                         /* have already done the skb_put() */
 677                                         memcpy(adapter->current_dma.target, adapter->dma_buffer, adapter->current_dma.length);
 678                                         }
 679                                         skb->protocol = eth_type_trans(skb,dev);
 680                                         dev->stats.rx_bytes += skb->len;
 681                                         netif_rx(skb);
 682                                 }
 683                         }
 684                         adapter->dmaing = 0;
 685                         if (adapter->rx_backlog.in != adapter->rx_backlog.out) {
 686                                 int t = adapter->rx_backlog.length[adapter->rx_backlog.out];
 687                                 adapter->rx_backlog.out = backlog_next(adapter->rx_backlog.out);
 688                                 if (elp_debug >= 2)
 689                                         pr_debug("%s: receiving backlogged packet (%d)\n", dev->name, t);
 690                                 receive_packet(dev, t);
 691                         } else {
 692                                 adapter->busy = 0;
 693                         }
 694                 } else {
 695                         /* has one timed out? */
 696                         check_3c505_dma(dev);
 697                 }
 698
 699                 /*
 700                  * receive a PCB from the adapter
 701                  */
 702                 timeout = jiffies + 3*HZ/100;
 703                 while ((inb_status(dev->base_addr) & ACRF) != 0 && time_before(jiffies, timeout)) {
 704                         if (receive_pcb(dev, &adapter->irx_pcb)) {
 705                                 switch (adapter->irx_pcb.command)
 706                                 {
 707                                 case 0:
 708                                         break;
 709                                         /*
 710                                          * received a packet - this must be handled fast
 711                                          */
 712                                 case 0xff:
 713                                 case CMD_RECEIVE_PACKET_COMPLETE:
 714                                         /* if the device isn't open, don't pass packets up the stack */
 715                                         if (!netif_running(dev))
 716                                                 break;
 717                                         len = adapter->irx_pcb.data.rcv_resp.pkt_len;
 718                                         dlen = adapter->irx_pcb.data.rcv_resp.buf_len;
 719                                         if (adapter->irx_pcb.data.rcv_resp.timeout != 0) {
 720                                                 pr_err("%s: interrupt - packet not received correctly\n", dev->name);
 721                                         } else {
 722                                                 if (elp_debug >= 3) {
 723                                                         pr_debug("%s: interrupt - packet received of length %i (%i)\n",
 724                                                                 dev->name, len, dlen);
 725                                                 }
 726                                                 if (adapter->irx_pcb.command == 0xff) {
 727                                                         if (elp_debug >= 2)
 728                                                                 pr_debug("%s: adding packet to backlog (len = %d)\n",
 729                                                                         dev->name, dlen);
 730                                                         adapter->rx_backlog.length[adapter->rx_backlog.in] = dlen;
 731                                                         adapter->rx_backlog.in = backlog_next(adapter->rx_backlog.in);
 732                                                 } else {
 733                                                         receive_packet(dev, dlen);
 734                                                 }
 735                                                 if (elp_debug >= 3)
 736                                                         pr_debug("%s: packet received\n", dev->name);
 737                                         }
 738                                         break;
 739
 740                                         /*
 741                                          * 82586 configured correctly
 742                                          */
 743                                 case CMD_CONFIGURE_82586_RESPONSE:
 744                                         adapter->got[CMD_CONFIGURE_82586] = 1;
 745                                         if (elp_debug >= 3)
 746                                                 pr_debug("%s: interrupt - configure response received\n", dev->name);
 747                                         break;
 748
 749                                         /*
 750                                          * Adapter memory configuration
 751                                          */
 752                                 case CMD_CONFIGURE_ADAPTER_RESPONSE:
 753                                         adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] = 1;
 754                                         if (elp_debug >= 3)
 755                                                 pr_debug("%s: Adapter memory configuration %s.\n", dev->name,
 756                                                        adapter->irx_pcb.data.failed ? "failed" : "succeeded");
 757                                         break;
 758
 759                                         /*
 760                                          * Multicast list loading
 761                                          */
 762                                 case CMD_LOAD_MULTICAST_RESPONSE:
 763                                         adapter->got[CMD_LOAD_MULTICAST_LIST] = 1;
 764                                         if (elp_debug >= 3)
 765                                                 pr_debug("%s: Multicast address list loading %s.\n", dev->name,
 766                                                        adapter->irx_pcb.data.failed ? "failed" : "succeeded");
 767                                         break;
 768
 769                                         /*
 770                                          * Station address setting
 771                                          */
 772                                 case CMD_SET_ADDRESS_RESPONSE:
 773                                         adapter->got[CMD_SET_STATION_ADDRESS] = 1;
 774                                         if (elp_debug >= 3)
 775                                                 pr_debug("%s: Ethernet address setting %s.\n", dev->name,
 776                                                        adapter->irx_pcb.data.failed ? "failed" : "succeeded");
 777                                         break;
 778
 779
 780                                         /*
 781                                          * received board statistics
 782                                          */
 783                                 case CMD_NETWORK_STATISTICS_RESPONSE:
 784                                         dev->stats.rx_packets += adapter->irx_pcb.data.netstat.tot_recv;
 785                                         dev->stats.tx_packets += adapter->irx_pcb.data.netstat.tot_xmit;
 786                                         dev->stats.rx_crc_errors += adapter->irx_pcb.data.netstat.err_CRC;
 787                                         dev->stats.rx_frame_errors += adapter->irx_pcb.data.netstat.err_align;
 788                                         dev->stats.rx_fifo_errors += adapter->irx_pcb.data.netstat.err_ovrrun;
 789                                         dev->stats.rx_over_errors += adapter->irx_pcb.data.netstat.err_res;
 790                                         adapter->got[CMD_NETWORK_STATISTICS] = 1;
 791                                         if (elp_debug >= 3)
 792                                                 pr_debug("%s: interrupt - statistics response received\n", dev->name);
 793                                         break;
 794
 795                                         /*
 796                                          * sent a packet
 797                                          */
 798                                 case CMD_TRANSMIT_PACKET_COMPLETE:
 799                                         if (elp_debug >= 3)
 800                                                 pr_debug("%s: interrupt - packet sent\n", dev->name);
 801                                         if (!netif_running(dev))
 802                                                 break;
 803                                         switch (adapter->irx_pcb.data.xmit_resp.c_stat) {
 804                                         case 0xffff:
 805                                                 dev->stats.tx_aborted_errors++;
 806                                                 pr_info("%s: transmit timed out, network cable problem?\n", dev->name);
 807                                                 break;
 808                                         case 0xfffe:
 809                                                 dev->stats.tx_fifo_errors++;
 810                                                 pr_info("%s: transmit timed out, FIFO underrun\n", dev->name);
 811                                                 break;
 812                                         }
 813                                         netif_wake_queue(dev);
 814                                         break;
 815
 816                                         /*
 817                                          * some unknown PCB
 818                                          */
 819                                 default:
 820                                         pr_debug("%s: unknown PCB received - %2.2x\n",
 821                                                 dev->name, adapter->irx_pcb.command);
 822                                         break;
 823                                 }
 824                         } else {
 825                                 pr_warning("%s: failed to read PCB on interrupt\n", dev->name);
 826                                 adapter_reset(dev);
 827                         }
 828                 }
 829
 830         } while (icount++ < 5 && (inb_status(dev->base_addr) & (ACRF | DONE)));
 831
 832         prime_rx(dev);
 833
 834         /*
 835          * indicate no longer in interrupt routine
 836          */
 837         spin_unlock(&adapter->lock);
 838         return IRQ_HANDLED;
 839 }
 840
 841
 842 /******************************************************
 843  *
 844  * open the board
 845  *
 846  ******************************************************/
 847
 848 static int elp_open(struct net_device *dev)
 849 {
 850         elp_device *adapter = netdev_priv(dev);
 851         int retval;
 852
 853         if (elp_debug >= 3)
 854                 pr_debug("%s: request to open device\n", dev->name);
 855
 856         /*
 857          * make sure we actually found the device
 858          */
 859         if (adapter == NULL) {
 860                 pr_err("%s: Opening a non-existent physical device\n", dev->name);
 861                 return -EAGAIN;
 862         }
 863         /*
 864          * disable interrupts on the board
 865          */
 866         outb_control(0, dev);
 867
 868         /*
 869          * clear any pending interrupts
 870          */
 871         inb_command(dev->base_addr);
 872         adapter_reset(dev);
 873
 874         /*
 875          * no receive PCBs active
 876          */
 877         adapter->rx_active = 0;
 878
 879         adapter->busy = 0;
 880         adapter->send_pcb_semaphore = 0;
 881         adapter->rx_backlog.in = 0;
 882         adapter->rx_backlog.out = 0;
 883
 884         spin_lock_init(&adapter->lock);
 885
 886         /*
 887          * install our interrupt service routine
 888          */
 889         if ((retval = request_irq(dev->irq, elp_interrupt, 0, dev->name, dev))) {
 890                 pr_err("%s: could not allocate IRQ%d\n", dev->name, dev->irq);
 891                 return retval;
 892         }
 893         if ((retval = request_dma(dev->dma, dev->name))) {
 894                 free_irq(dev->irq, dev);
 895                 pr_err("%s: could not allocate DMA%d channel\n", dev->name, dev->dma);
 896                 return retval;
 897         }
 898         adapter->dma_buffer = (void *) dma_mem_alloc(DMA_BUFFER_SIZE);
 899         if (!adapter->dma_buffer) {
 900                 pr_err("%s: could not allocate DMA buffer\n", dev->name);
 901                 free_dma(dev->dma);
 902                 free_irq(dev->irq, dev);
 903                 return -ENOMEM;
 904         }
 905         adapter->dmaing = 0;
 906
 907         /*
 908          * enable interrupts on the board
 909          */
 910         outb_control(CMDE, dev);
 911
 912         /*
 913          * configure adapter memory: we need 10 multicast addresses, default==0
 914          */
 915         if (elp_debug >= 3)
 916                 pr_debug("%s: sending 3c505 memory configuration command\n", dev->name);
 917         adapter->tx_pcb.command = CMD_CONFIGURE_ADAPTER_MEMORY;
 918         adapter->tx_pcb.data.memconf.cmd_q = 10;
 919         adapter->tx_pcb.data.memconf.rcv_q = 20;
 920         adapter->tx_pcb.data.memconf.mcast = 10;
 921         adapter->tx_pcb.data.memconf.frame = 20;
 922         adapter->tx_pcb.data.memconf.rcv_b = 20;
 923         adapter->tx_pcb.data.memconf.progs = 0;
 924         adapter->tx_pcb.length = sizeof(struct Memconf);
 925         adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] = 0;
 926         if (!send_pcb(dev, &adapter->tx_pcb))
 927                 pr_err("%s: couldn't send memory configuration command\n", dev->name);
 928         else {
 929                 unsigned long timeout = jiffies + TIMEOUT;
 930                 while (adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] == 0 && time_before(jiffies, timeout));
 931                 if (time_after_eq(jiffies, timeout))
 932                         TIMEOUT_MSG(__LINE__);
 933         }
 934
 935
 936         /*
 937          * configure adapter to receive broadcast messages and wait for response
 938          */
 939         if (elp_debug >= 3)
 940                 pr_debug("%s: sending 82586 configure command\n", dev->name);
 941         adapter->tx_pcb.command = CMD_CONFIGURE_82586;
 942         adapter->tx_pcb.data.configure = NO_LOOPBACK | RECV_BROAD;
 943         adapter->tx_pcb.length = 2;
 944         adapter->got[CMD_CONFIGURE_82586] = 0;
 945         if (!send_pcb(dev, &adapter->tx_pcb))
 946                 pr_err("%s: couldn't send 82586 configure command\n", dev->name);
 947         else {
 948                 unsigned long timeout = jiffies + TIMEOUT;
 949                 while (adapter->got[CMD_CONFIGURE_82586] == 0 && time_before(jiffies, timeout));
 950                 if (time_after_eq(jiffies, timeout))
 951                         TIMEOUT_MSG(__LINE__);
 952         }
 953
 954         /* enable burst-mode DMA */
 955         /* outb(0x1, dev->base_addr + PORT_AUXDMA); */
 956
 957         /*
 958          * queue receive commands to provide buffering
 959          */
 960         prime_rx(dev);
 961         if (elp_debug >= 3)
 962                 pr_debug("%s: %d receive PCBs active\n", dev->name, adapter->rx_active);
 963
 964         /*
 965          * device is now officially open!
 966          */
 967
 968         netif_start_queue(dev);
 969         return 0;
 970 }
 971
 972
 973 /******************************************************
 974  *
 975  * send a packet to the adapter
 976  *
 977  ******************************************************/
 978
 979 static netdev_tx_t send_packet(struct net_device *dev, struct sk_buff *skb)
 980 {
 981         elp_device *adapter = netdev_priv(dev);
 982         unsigned long target;
 983         unsigned long flags;
 984
 985         /*
 986          * make sure the length is even and no shorter than 60 bytes
 987          */
 988         unsigned int nlen = (((skb->len < 60) ? 60 : skb->len) + 1) & (~1);
 989
 990         if (test_and_set_bit(0, (void *) &adapter->busy)) {
 991                 if (elp_debug >= 2)
 992                         pr_debug("%s: transmit blocked\n", dev->name);
 993                 return false;
 994         }
 995
 996         dev->stats.tx_bytes += nlen;
 997
 998         /*
 999          * send the adapter a transmit packet command. Ignore segment and offset
1000          * and make sure the length is even
1001          */
1002         adapter->tx_pcb.command = CMD_TRANSMIT_PACKET;
1003         adapter->tx_pcb.length = sizeof(struct Xmit_pkt);
1004         adapter->tx_pcb.data.xmit_pkt.buf_ofs
1005             = adapter->tx_pcb.data.xmit_pkt.buf_seg = 0;        /* Unused */
1006         adapter->tx_pcb.data.xmit_pkt.pkt_len = nlen;
1007
1008         if (!send_pcb(dev, &adapter->tx_pcb)) {
1009                 adapter->busy = 0;
1010                 return false;
1011         }
1012         /* if this happens, we die */
1013         if (test_and_set_bit(0, (void *) &adapter->dmaing))
1014                 pr_debug("%s: tx: DMA %d in progress\n", dev->name, adapter->current_dma.direction);
1015
1016         adapter->current_dma.direction = 1;
1017         adapter->current_dma.start_time = jiffies;
1018
1019         if ((unsigned long)(skb->data + nlen) >= MAX_DMA_ADDRESS || nlen != skb->len) {
1020                 skb_copy_from_linear_data(skb, adapter->dma_buffer, nlen);
1021                 memset(adapter->dma_buffer+skb->len, 0, nlen-skb->len);
1022                 target = isa_virt_to_bus(adapter->dma_buffer);
1023         }
1024         else {
1025                 target = isa_virt_to_bus(skb->data);
1026         }
1027         adapter->current_dma.skb = skb;
1028
1029         flags=claim_dma_lock();
1030         disable_dma(dev->dma);
1031         clear_dma_ff(dev->dma);
1032         set_dma_mode(dev->dma, 0x48);   /* dma memory -> io */
1033         set_dma_addr(dev->dma, target);
1034         set_dma_count(dev->dma, nlen);
1035         outb_control(adapter->hcr_val | DMAE | TCEN, dev);
1036         enable_dma(dev->dma);
1037         release_dma_lock(flags);
1038
1039         if (elp_debug >= 3)
1040                 pr_debug("%s: DMA transfer started\n", dev->name);
1041
1042         return true;
1043 }
1044
1045 /*
1046  *      The upper layer thinks we timed out
1047  */
1048
1049 static void elp_timeout(struct net_device *dev)
1050 {
1051         int stat;
1052
1053         stat = inb_status(dev->base_addr);
1054         pr_warning("%s: transmit timed out, lost %s?\n", dev->name,
1055                    (stat & ACRF) ? "interrupt" : "command");
1056         if (elp_debug >= 1)
1057                 pr_debug("%s: status %#02x\n", dev->name, stat);
1058         dev->trans_start = jiffies; /* prevent tx timeout */
1059         dev->stats.tx_dropped++;
1060         netif_wake_queue(dev);
1061 }
1062
1063 /******************************************************
1064  *
1065  * start the transmitter
1066  *    return 0 if sent OK, else return 1
1067  *
1068  ******************************************************/
1069
1070 static netdev_tx_t elp_start_xmit(struct sk_buff *skb, struct net_device *dev)
1071 {
1072         unsigned long flags;
1073         elp_device *adapter = netdev_priv(dev);
1074
1075         spin_lock_irqsave(&adapter->lock, flags);
1076         check_3c505_dma(dev);
1077
1078         if (elp_debug >= 3)
1079                 pr_debug("%s: request to send packet of length %d\n", dev->name, (int) skb->len);
1080
1081         netif_stop_queue(dev);
1082
1083         /*
1084          * send the packet at skb->data for skb->len
1085          */
1086         if (!send_packet(dev, skb)) {
1087                 if (elp_debug >= 2) {
1088                         pr_debug("%s: failed to transmit packet\n", dev->name);
1089                 }
1090                 spin_unlock_irqrestore(&adapter->lock, flags);
1091                 return NETDEV_TX_BUSY;
1092         }
1093         if (elp_debug >= 3)
1094                 pr_debug("%s: packet of length %d sent\n", dev->name, (int) skb->len);
1095
1096         prime_rx(dev);
1097         spin_unlock_irqrestore(&adapter->lock, flags);
1098         netif_start_queue(dev);
1099         return NETDEV_TX_OK;
1100 }
1101
1102 /******************************************************
1103  *
1104  * return statistics on the board
1105  *
1106  ******************************************************/
1107
1108 static struct net_device_stats *elp_get_stats(struct net_device *dev)
1109 {
1110         elp_device *adapter = netdev_priv(dev);
1111
1112         if (elp_debug >= 3)
1113                 pr_debug("%s: request for stats\n", dev->name);
1114
1115         /* If the device is closed, just return the latest stats we have,
1116            - we cannot ask from the adapter without interrupts */
1117         if (!netif_running(dev))
1118                 return &dev->stats;
1119
1120         /* send a get statistics command to the board */
1121         adapter->tx_pcb.command = CMD_NETWORK_STATISTICS;
1122         adapter->tx_pcb.length = 0;
1123         adapter->got[CMD_NETWORK_STATISTICS] = 0;
1124         if (!send_pcb(dev, &adapter->tx_pcb))
1125                 pr_err("%s: couldn't send get statistics command\n", dev->name);
1126         else {
1127                 unsigned long timeout = jiffies + TIMEOUT;
1128                 while (adapter->got[CMD_NETWORK_STATISTICS] == 0 && time_before(jiffies, timeout));
1129                 if (time_after_eq(jiffies, timeout)) {
1130                         TIMEOUT_MSG(__LINE__);
1131                         return &dev->stats;
1132                 }
1133         }
1134
1135         /* statistics are now up to date */
1136         return &dev->stats;
1137 }
1138
1139
1140 static void netdev_get_drvinfo(struct net_device *dev,
1141                                struct ethtool_drvinfo *info)
1142 {
1143         strcpy(info->driver, DRV_NAME);
1144         strcpy(info->version, DRV_VERSION);
1145         sprintf(info->bus_info, "ISA 0x%lx", dev->base_addr);
1146 }
1147
1148 static u32 netdev_get_msglevel(struct net_device *dev)
1149 {
1150         return debug;
1151 }
1152
1153 static void netdev_set_msglevel(struct net_device *dev, u32 level)
1154 {
1155         debug = level;
1156 }
1157
1158 static const struct ethtool_ops netdev_ethtool_ops = {
1159         .get_drvinfo            = netdev_get_drvinfo,
1160         .get_msglevel           = netdev_get_msglevel,
1161         .set_msglevel           = netdev_set_msglevel,
1162 };
1163
1164 /******************************************************
1165  *
1166  * close the board
1167  *
1168  ******************************************************/
1169
1170 static int elp_close(struct net_device *dev)
1171 {
1172         elp_device *adapter = netdev_priv(dev);
1173
1174         if (elp_debug >= 3)
1175                 pr_debug("%s: request to close device\n", dev->name);
1176
1177         netif_stop_queue(dev);
1178
1179         /* Someone may request the device statistic information even when
1180          * the interface is closed. The following will update the statistics
1181          * structure in the driver, so we'll be able to give current statistics.
1182          */
1183         (void) elp_get_stats(dev);
1184
1185         /*
1186          * disable interrupts on the board
1187          */
1188         outb_control(0, dev);
1189
1190         /*
1191          * release the IRQ
1192          */
1193         free_irq(dev->irq, dev);
1194
1195         free_dma(dev->dma);
1196         free_pages((unsigned long) adapter->dma_buffer, get_order(DMA_BUFFER_SIZE));
1197
1198         return 0;
1199 }
1200
1201
1202 /************************************************************
1203  *
1204  * Set multicast list
1205  * num_addrs==0: clear mc_list
1206  * num_addrs==-1: set promiscuous mode
1207  * num_addrs>0: set mc_list
1208  *
1209  ************************************************************/
1210
1211 static void elp_set_mc_list(struct net_device *dev)
1212 {
1213         elp_device *adapter = netdev_priv(dev);
1214         struct netdev_hw_addr *ha;
1215         int i;
1216         unsigned long flags;
1217
1218         if (elp_debug >= 3)
1219                 pr_debug("%s: request to set multicast list\n", dev->name);
1220
1221         spin_lock_irqsave(&adapter->lock, flags);
1222
1223         if (!(dev->flags & (IFF_PROMISC | IFF_ALLMULTI))) {
1224                 /* send a "load multicast list" command to the board, max 10 addrs/cmd */
1225                 /* if num_addrs==0 the list will be cleared */
1226                 adapter->tx_pcb.command = CMD_LOAD_MULTICAST_LIST;
1227                 adapter->tx_pcb.length = 6 * netdev_mc_count(dev);
1228                 i = 0;
1229                 netdev_for_each_mc_addr(ha, dev)
1230                         memcpy(adapter->tx_pcb.data.multicast[i++],
1231                                ha->addr, 6);
1232                 adapter->got[CMD_LOAD_MULTICAST_LIST] = 0;
1233                 if (!send_pcb(dev, &adapter->tx_pcb))
1234                         pr_err("%s: couldn't send set_multicast command\n", dev->name);
1235                 else {
1236                         unsigned long timeout = jiffies + TIMEOUT;
1237                         while (adapter->got[CMD_LOAD_MULTICAST_LIST] == 0 && time_before(jiffies, timeout));
1238                         if (time_after_eq(jiffies, timeout)) {
1239                                 TIMEOUT_MSG(__LINE__);
1240                         }
1241                 }
1242                 if (!netdev_mc_empty(dev))
1243                         adapter->tx_pcb.data.configure = NO_LOOPBACK | RECV_BROAD | RECV_MULTI;
1244                 else            /* num_addrs == 0 */
1245                         adapter->tx_pcb.data.configure = NO_LOOPBACK | RECV_BROAD;
1246         } else
1247                 adapter->tx_pcb.data.configure = NO_LOOPBACK | RECV_PROMISC;
1248         /*
1249          * configure adapter to receive messages (as specified above)
1250          * and wait for response
1251          */
1252         if (elp_debug >= 3)
1253                 pr_debug("%s: sending 82586 configure command\n", dev->name);
1254         adapter->tx_pcb.command = CMD_CONFIGURE_82586;
1255         adapter->tx_pcb.length = 2;
1256         adapter->got[CMD_CONFIGURE_82586] = 0;
1257         if (!send_pcb(dev, &adapter->tx_pcb))
1258         {
1259                 spin_unlock_irqrestore(&adapter->lock, flags);
1260                 pr_err("%s: couldn't send 82586 configure command\n", dev->name);
1261         }
1262         else {
1263                 unsigned long timeout = jiffies + TIMEOUT;
1264                 spin_unlock_irqrestore(&adapter->lock, flags);
1265                 while (adapter->got[CMD_CONFIGURE_82586] == 0 && time_before(jiffies, timeout));
1266                 if (time_after_eq(jiffies, timeout))
1267                         TIMEOUT_MSG(__LINE__);
1268         }
1269 }
1270
1271 /************************************************************
1272  *
1273  * A couple of tests to see if there's 3C505 or not
1274  * Called only by elp_autodetect
1275  ************************************************************/
1276
1277 static int __init elp_sense(struct net_device *dev)
1278 {
1279         int addr = dev->base_addr;
1280         const char *name = dev->name;
1281         byte orig_HSR;
1282
1283         if (!request_region(addr, ELP_IO_EXTENT, "3c505"))
1284                 return -ENODEV;
1285
1286         orig_HSR = inb_status(addr);
1287
1288         if (elp_debug > 0)
1289                 pr_debug(search_msg, name, addr);
1290
1291         if (orig_HSR == 0xff) {
1292                 if (elp_debug > 0)
1293                         pr_cont(notfound_msg, 1);
1294                 goto out;
1295         }
1296
1297         /* Wait for a while; the adapter may still be booting up */
1298         if (elp_debug > 0)
1299                 pr_cont(stilllooking_msg);
1300
1301         if (orig_HSR & DIR) {
1302                 /* If HCR.DIR is up, we pull it down. HSR.DIR should follow. */
1303                 outb(0, dev->base_addr + PORT_CONTROL);
1304                 msleep(300);
1305                 if (inb_status(addr) & DIR) {
1306                         if (elp_debug > 0)
1307                                 pr_cont(notfound_msg, 2);
1308                         goto out;
1309                 }
1310         } else {
1311                 /* If HCR.DIR is down, we pull it up. HSR.DIR should follow. */
1312                 outb(DIR, dev->base_addr + PORT_CONTROL);
1313                 msleep(300);
1314                 if (!(inb_status(addr) & DIR)) {
1315                         if (elp_debug > 0)
1316                                 pr_cont(notfound_msg, 3);
1317                         goto out;
1318                 }
1319         }
1320         /*
1321          * It certainly looks like a 3c505.
1322          */
1323         if (elp_debug > 0)
1324                 pr_cont(found_msg);
1325
1326         return 0;
1327 out:
1328         release_region(addr, ELP_IO_EXTENT);
1329         return -ENODEV;
1330 }
1331
1332 /*************************************************************
1333  *
1334  * Search through addr_list[] and try to find a 3C505
1335  * Called only by eplus_probe
1336  *************************************************************/
1337
1338 static int __init elp_autodetect(struct net_device *dev)
1339 {
1340         int idx = 0;
1341
1342         /* if base address set, then only check that address
1343            otherwise, run through the table */
1344         if (dev->base_addr != 0) {      /* dev->base_addr == 0 ==> plain autodetect */
1345                 if (elp_sense(dev) == 0)
1346                         return dev->base_addr;
1347         } else
1348                 while ((dev->base_addr = addr_list[idx++])) {
1349                         if (elp_sense(dev) == 0)
1350                                 return dev->base_addr;
1351                 }
1352
1353         /* could not find an adapter */
1354         if (elp_debug > 0)
1355                 pr_debug(couldnot_msg, dev->name);
1356
1357         return 0;               /* Because of this, the layer above will return -ENODEV */
1358 }
1359
1360 static const struct net_device_ops elp_netdev_ops = {
1361         .ndo_open               = elp_open,
1362         .ndo_stop               = elp_close,
1363         .ndo_get_stats          = elp_get_stats,
1364         .ndo_start_xmit         = elp_start_xmit,
1365         .ndo_tx_timeout         = elp_timeout,
1366         .ndo_set_multicast_list = elp_set_mc_list,
1367         .ndo_change_mtu         = eth_change_mtu,
1368         .ndo_set_mac_address    = eth_mac_addr,
1369         .ndo_validate_addr      = eth_validate_addr,
1370 };
1371
1372 /******************************************************
1373  *
1374  * probe for an Etherlink Plus board at the specified address
1375  *
1376  ******************************************************/
1377
1378 /* There are three situations we need to be able to detect here:
1379
1380  *  a) the card is idle
1381  *  b) the card is still booting up
1382  *  c) the card is stuck in a strange state (some DOS drivers do this)
1383  *
1384  * In case (a), all is well.  In case (b), we wait 10 seconds to see if the
1385  * card finishes booting, and carry on if so.  In case (c), we do a hard reset,
1386  * loop round, and hope for the best.
1387  *
1388  * This is all very unpleasant, but hopefully avoids the problems with the old
1389  * probe code (which had a 15-second delay if the card was idle, and didn't
1390  * work at all if it was in a weird state).
1391  */
1392
1393 static int __init elplus_setup(struct net_device *dev)
1394 {
1395         elp_device *adapter = netdev_priv(dev);
1396         int i, tries, tries1, okay;
1397         unsigned long timeout;
1398         unsigned long cookie = 0;
1399         int err = -ENODEV;
1400
1401         /*
1402          *  setup adapter structure
1403          */
1404
1405         dev->base_addr = elp_autodetect(dev);
1406         if (!dev->base_addr)
1407                 return -ENODEV;
1408
1409         adapter->send_pcb_semaphore = 0;
1410
1411         for (tries1 = 0; tries1 < 3; tries1++) {
1412                 outb_control((adapter->hcr_val | CMDE) & ~DIR, dev);
1413                 /* First try to write just one byte, to see if the card is
1414                  * responding at all normally.
1415                  */
1416                 timeout = jiffies + 5*HZ/100;
1417                 okay = 0;
1418                 while (time_before(jiffies, timeout) && !(inb_status(dev->base_addr) & HCRE));
1419                 if ((inb_status(dev->base_addr) & HCRE)) {
1420                         outb_command(0, dev->base_addr);        /* send a spurious byte */
1421                         timeout = jiffies + 5*HZ/100;
1422                         while (time_before(jiffies, timeout) && !(inb_status(dev->base_addr) & HCRE));
1423                         if (inb_status(dev->base_addr) & HCRE)
1424                                 okay = 1;
1425                 }
1426                 if (!okay) {
1427                         /* Nope, it's ignoring the command register.  This means that
1428                          * either it's still booting up, or it's died.
1429                          */
1430                         pr_err("%s: command register wouldn't drain, ", dev->name);
1431                         if ((inb_status(dev->base_addr) & 7) == 3) {
1432                                 /* If the adapter status is 3, it *could* still be booting.
1433                                  * Give it the benefit of the doubt for 10 seconds.
1434                                  */
1435                                 pr_cont("assuming 3c505 still starting\n");
1436                                 timeout = jiffies + 10*HZ;
1437                                 while (time_before(jiffies, timeout) && (inb_status(dev->base_addr) & 7));
1438                                 if (inb_status(dev->base_addr) & 7) {
1439                                         pr_err("%s: 3c505 failed to start\n", dev->name);
1440                                 } else {
1441                                         okay = 1;  /* It started */
1442                                 }
1443                         } else {
1444                                 /* Otherwise, it must just be in a strange
1445                                  * state.  We probably need to kick it.
1446                                  */
1447                                 pr_cont("3c505 is sulking\n");
1448                         }
1449                 }
1450                 for (tries = 0; tries < 5 && okay; tries++) {
1451
1452                         /*
1453                          * Try to set the Ethernet address, to make sure that the board
1454                          * is working.
1455                          */
1456                         adapter->tx_pcb.command = CMD_STATION_ADDRESS;
1457                         adapter->tx_pcb.length = 0;
1458                         cookie = probe_irq_on();
1459                         if (!send_pcb(dev, &adapter->tx_pcb)) {
1460                                 pr_err("%s: could not send first PCB\n", dev->name);
1461                                 probe_irq_off(cookie);
1462                                 continue;
1463                         }
1464                         if (!receive_pcb(dev, &adapter->rx_pcb)) {
1465                                 pr_err("%s: could not read first PCB\n", dev->name);
1466                                 probe_irq_off(cookie);
1467                                 continue;
1468                         }
1469                         if ((adapter->rx_pcb.command != CMD_ADDRESS_RESPONSE) ||
1470                             (adapter->rx_pcb.length != 6)) {
1471                                 pr_err("%s: first PCB wrong (%d, %d)\n", dev->name,
1472                                         adapter->rx_pcb.command, adapter->rx_pcb.length);
1473                                 probe_irq_off(cookie);
1474                                 continue;
1475                         }
1476                         goto okay;
1477                 }
1478                 /* It's broken.  Do a hard reset to re-initialise the board,
1479                  * and try again.
1480                  */
1481                 pr_info("%s: resetting adapter\n", dev->name);
1482                 outb_control(adapter->hcr_val | FLSH | ATTN, dev);
1483                 outb_control(adapter->hcr_val & ~(FLSH | ATTN), dev);
1484         }
1485         pr_err("%s: failed to initialise 3c505\n", dev->name);
1486         goto out;
1487
1488       okay:
1489         if (dev->irq) {         /* Is there a preset IRQ? */
1490                 int rpt = probe_irq_off(cookie);
1491                 if (dev->irq != rpt) {
1492                         pr_warning("%s: warning, irq %d configured but %d detected\n", dev->name, dev->irq, rpt);
1493                 }
1494                 /* if dev->irq == probe_irq_off(cookie), all is well */
1495         } else                 /* No preset IRQ; just use what we can detect */
1496                 dev->irq = probe_irq_off(cookie);
1497         switch (dev->irq) {    /* Legal, sane? */
1498         case 0:
1499                 pr_err("%s: IRQ probe failed: check 3c505 jumpers.\n",
1500                        dev->name);
1501                 goto out;
1502         case 1:
1503         case 6:
1504         case 8:
1505         case 13:
1506                 pr_err("%s: Impossible IRQ %d reported by probe_irq_off().\n",
1507                        dev->name, dev->irq);
1508                        goto out;
1509         }
1510         /*
1511          *  Now we have the IRQ number so we can disable the interrupts from
1512          *  the board until the board is opened.
1513          */
1514         outb_control(adapter->hcr_val & ~CMDE, dev);
1515
1516         /*
1517          * copy Ethernet address into structure
1518          */
1519         for (i = 0; i < 6; i++)
1520                 dev->dev_addr[i] = adapter->rx_pcb.data.eth_addr[i];
1521
1522         /* find a DMA channel */
1523         if (!dev->dma) {
1524                 if (dev->mem_start) {
1525                         dev->dma = dev->mem_start & 7;
1526                 }
1527                 else {
1528                         pr_warning("%s: warning, DMA channel not specified, using default\n", dev->name);
1529                         dev->dma = ELP_DMA;
1530                 }
1531         }
1532
1533         /*
1534          * print remainder of startup message
1535          */
1536         pr_info("%s: 3c505 at %#lx, irq %d, dma %d, addr %pM, ",
1537                 dev->name, dev->base_addr, dev->irq, dev->dma, dev->dev_addr);
1538         /*
1539          * read more information from the adapter
1540          */
1541
1542         adapter->tx_pcb.command = CMD_ADAPTER_INFO;
1543         adapter->tx_pcb.length = 0;
1544         if (!send_pcb(dev, &adapter->tx_pcb) ||
1545             !receive_pcb(dev, &adapter->rx_pcb) ||
1546             (adapter->rx_pcb.command != CMD_ADAPTER_INFO_RESPONSE) ||
1547             (adapter->rx_pcb.length != 10)) {
1548                 pr_cont("not responding to second PCB\n");
1549         }
1550         pr_cont("rev %d.%d, %dk\n", adapter->rx_pcb.data.info.major_vers,
1551                 adapter->rx_pcb.data.info.minor_vers, adapter->rx_pcb.data.info.RAM_sz);
1552
1553         /*
1554          * reconfigure the adapter memory to better suit our purposes
1555          */
1556         adapter->tx_pcb.command = CMD_CONFIGURE_ADAPTER_MEMORY;
1557         adapter->tx_pcb.length = 12;
1558         adapter->tx_pcb.data.memconf.cmd_q = 8;
1559         adapter->tx_pcb.data.memconf.rcv_q = 8;
1560         adapter->tx_pcb.data.memconf.mcast = 10;
1561         adapter->tx_pcb.data.memconf.frame = 10;
1562         adapter->tx_pcb.data.memconf.rcv_b = 10;
1563         adapter->tx_pcb.data.memconf.progs = 0;
1564         if (!send_pcb(dev, &adapter->tx_pcb) ||
1565             !receive_pcb(dev, &adapter->rx_pcb) ||
1566             (adapter->rx_pcb.command != CMD_CONFIGURE_ADAPTER_RESPONSE) ||
1567             (adapter->rx_pcb.length != 2)) {
1568                 pr_err("%s: could not configure adapter memory\n", dev->name);
1569         }
1570         if (adapter->rx_pcb.data.configure) {
1571                 pr_err("%s: adapter configuration failed\n", dev->name);
1572         }
1573
1574         dev->netdev_ops = &elp_netdev_ops;
1575         dev->watchdog_timeo = 10*HZ;
1576         dev->ethtool_ops = &netdev_ethtool_ops;         /* local */
1577
1578         dev->mem_start = dev->mem_end = 0;
1579
1580         err = register_netdev(dev);
1581         if (err)
1582                 goto out;
1583
1584         return 0;
1585 out:
1586         release_region(dev->base_addr, ELP_IO_EXTENT);
1587         return err;
1588 }
1589
1590 #ifndef MODULE
1591 struct net_device * __init elplus_probe(int unit)
1592 {
1593         struct net_device *dev = alloc_etherdev(sizeof(elp_device));
1594         int err;
1595         if (!dev)
1596                 return ERR_PTR(-ENOMEM);
1597
1598         sprintf(dev->name, "eth%d", unit);
1599         netdev_boot_setup_check(dev);
1600
1601         err = elplus_setup(dev);
1602         if (err) {
1603                 free_netdev(dev);
1604                 return ERR_PTR(err);
1605         }
1606         return dev;
1607 }
1608
1609 #else
1610 static struct net_device *dev_3c505[ELP_MAX_CARDS];
1611 static int io[ELP_MAX_CARDS];
1612 static int irq[ELP_MAX_CARDS];
1613 static int dma[ELP_MAX_CARDS];
1614 module_param_array(io, int, NULL, 0);
1615 module_param_array(irq, int, NULL, 0);
1616 module_param_array(dma, int, NULL, 0);
1617 MODULE_PARM_DESC(io, "EtherLink Plus I/O base address(es)");
1618 MODULE_PARM_DESC(irq, "EtherLink Plus IRQ number(s) (assigned)");
1619 MODULE_PARM_DESC(dma, "EtherLink Plus DMA channel(s)");
1620
1621 int __init init_module(void)
1622 {
1623         int this_dev, found = 0;
1624
1625         for (this_dev = 0; this_dev < ELP_MAX_CARDS; this_dev++) {
1626                 struct net_device *dev = alloc_etherdev(sizeof(elp_device));
1627                 if (!dev)
1628                         break;
1629
1630                 dev->irq = irq[this_dev];
1631                 dev->base_addr = io[this_dev];
1632                 if (dma[this_dev]) {
1633                         dev->dma = dma[this_dev];
1634                 } else {
1635                         dev->dma = ELP_DMA;
1636                         pr_warning("3c505.c: warning, using default DMA channel,\n");
1637                 }
1638                 if (io[this_dev] == 0) {
1639                         if (this_dev) {
1640                                 free_netdev(dev);
1641                                 break;
1642                         }
1643                         pr_notice("3c505.c: module autoprobe not recommended, give io=xx.\n");
1644                 }
1645                 if (elplus_setup(dev) != 0) {
1646                         pr_warning("3c505.c: Failed to register card at 0x%x.\n", io[this_dev]);
1647                         free_netdev(dev);
1648                         break;
1649                 }
1650                 dev_3c505[this_dev] = dev;
1651                 found++;
1652         }
1653         if (!found)
1654                 return -ENODEV;
1655         return 0;
1656 }
1657
1658 void __exit cleanup_module(void)
1659 {
1660         int this_dev;
1661
1662         for (this_dev = 0; this_dev < ELP_MAX_CARDS; this_dev++) {
1663                 struct net_device *dev = dev_3c505[this_dev];
1664                 if (dev) {
1665                         unregister_netdev(dev);
1666                         release_region(dev->base_addr, ELP_IO_EXTENT);
1667                         free_netdev(dev);
1668                 }
1669         }
1670 }
1671
1672 #endif                          /* MODULE */
1673 MODULE_LICENSE("GPL");