OpenCores
URL https://opencores.org/ocsvn/test_project/test_project/trunk

Subversion Repositories test_project

[/] [test_project/] [trunk/] [linux_sd_driver/] [drivers/] [net/] [3c505.c] - Blame information for rev 62

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 62 marcus.erl
/*
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/slab.h>
106
#include <linux/ioport.h>
107
#include <linux/spinlock.h>
108
#include <linux/ethtool.h>
109
#include <linux/delay.h>
110
#include <linux/bitops.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
static const char filename[] = __FILE__;
130
 
131
static const char timeout_msg[] = "*** timeout at %s:%s (line %d) ***\n";
132
#define TIMEOUT_MSG(lineno) \
133
        printk(timeout_msg, filename,__FUNCTION__,(lineno))
134
 
135
static const char invalid_pcb_msg[] =
136
"*** invalid pcb length %d at %s:%s (line %d) ***\n";
137
#define INVALID_PCB_MSG(len) \
138
        printk(invalid_pcb_msg, (len),filename,__FUNCTION__,__LINE__)
139
 
140
static char search_msg[] __initdata = KERN_INFO "%s: Looking for 3c505 adapter at address %#x...";
141
 
142
static char stilllooking_msg[] __initdata = "still looking...";
143
 
144
static char found_msg[] __initdata = "found.\n";
145
 
146
static char notfound_msg[] __initdata = "not found (reason = %d)\n";
147
 
148
static char couldnot_msg[] __initdata = KERN_INFO "%s: 3c505 not found\n";
149
 
150
/*********************************************************
151
 *
152
 *  various other debug stuff
153
 *
154
 *********************************************************/
155
 
156
#ifdef ELP_DEBUG
157
static int elp_debug = ELP_DEBUG;
158
#else
159
static int elp_debug;
160
#endif
161
#define debug elp_debug
162
 
163
/*
164
 *  0 = no messages (well, some)
165
 *  1 = messages when high level commands performed
166
 *  2 = messages when low level commands performed
167
 *  3 = messages when interrupts received
168
 */
169
 
170
/*****************************************************************
171
 *
172
 * List of I/O-addresses we try to auto-sense
173
 * Last element MUST BE 0!
174
 *****************************************************************/
175
 
176
static int addr_list[] __initdata = {0x300, 0x280, 0x310, 0};
177
 
178
/* Dma Memory related stuff */
179
 
180
static unsigned long dma_mem_alloc(int size)
181
{
182
        int order = get_order(size);
183
        return __get_dma_pages(GFP_KERNEL, order);
184
}
185
 
186
 
187
/*****************************************************************
188
 *
189
 * Functions for I/O (note the inline !)
190
 *
191
 *****************************************************************/
192
 
193
static inline unsigned char inb_status(unsigned int base_addr)
194
{
195
        return inb(base_addr + PORT_STATUS);
196
}
197
 
198
static inline int inb_command(unsigned int base_addr)
199
{
200
        return inb(base_addr + PORT_COMMAND);
201
}
202
 
203
static inline void outb_control(unsigned char val, struct net_device *dev)
204
{
205
        outb(val, dev->base_addr + PORT_CONTROL);
206
        ((elp_device *)(dev->priv))->hcr_val = val;
207
}
208
 
209
#define HCR_VAL(x)   (((elp_device *)((x)->priv))->hcr_val)
210
 
211
static inline void outb_command(unsigned char val, unsigned int base_addr)
212
{
213
        outb(val, base_addr + PORT_COMMAND);
214
}
215
 
216
static inline unsigned int backlog_next(unsigned int n)
217
{
218
        return (n + 1) % BACKLOG_SIZE;
219
}
220
 
221
/*****************************************************************
222
 *
223
 *  useful functions for accessing the adapter
224
 *
225
 *****************************************************************/
226
 
227
/*
228
 * use this routine when accessing the ASF bits as they are
229
 * changed asynchronously by the adapter
230
 */
231
 
232
/* get adapter PCB status */
233
#define GET_ASF(addr) \
234
        (get_status(addr)&ASF_PCB_MASK)
235
 
236
static inline int get_status(unsigned int base_addr)
237
{
238
        unsigned long timeout = jiffies + 10*HZ/100;
239
        register int stat1;
240
        do {
241
                stat1 = inb_status(base_addr);
242
        } while (stat1 != inb_status(base_addr) && time_before(jiffies, timeout));
243
        if (time_after_eq(jiffies, timeout))
244
                TIMEOUT_MSG(__LINE__);
245
        return stat1;
246
}
247
 
248
static inline void set_hsf(struct net_device *dev, int hsf)
249
{
250
        elp_device *adapter = dev->priv;
251
        unsigned long flags;
252
 
253
        spin_lock_irqsave(&adapter->lock, flags);
254
        outb_control((HCR_VAL(dev) & ~HSF_PCB_MASK) | hsf, dev);
255
        spin_unlock_irqrestore(&adapter->lock, flags);
256
}
257
 
258
static bool start_receive(struct net_device *, pcb_struct *);
259
 
260
static inline void adapter_reset(struct net_device *dev)
261
{
262
        unsigned long timeout;
263
        elp_device *adapter = dev->priv;
264
        unsigned char orig_hcr = adapter->hcr_val;
265
 
266
        outb_control(0, dev);
267
 
268
        if (inb_status(dev->base_addr) & ACRF) {
269
                do {
270
                        inb_command(dev->base_addr);
271
                        timeout = jiffies + 2*HZ/100;
272
                        while (time_before_eq(jiffies, timeout) && !(inb_status(dev->base_addr) & ACRF));
273
                } while (inb_status(dev->base_addr) & ACRF);
274
                set_hsf(dev, HSF_PCB_NAK);
275
        }
276
        outb_control(adapter->hcr_val | ATTN | DIR, dev);
277
        mdelay(10);
278
        outb_control(adapter->hcr_val & ~ATTN, dev);
279
        mdelay(10);
280
        outb_control(adapter->hcr_val | FLSH, dev);
281
        mdelay(10);
282
        outb_control(adapter->hcr_val & ~FLSH, dev);
283
        mdelay(10);
284
 
285
        outb_control(orig_hcr, dev);
286
        if (!start_receive(dev, &adapter->tx_pcb))
287
                printk(KERN_ERR "%s: start receive command failed \n", dev->name);
288
}
289
 
290
/* Check to make sure that a DMA transfer hasn't timed out.  This should
291
 * never happen in theory, but seems to occur occasionally if the card gets
292
 * prodded at the wrong time.
293
 */
294
static inline void check_3c505_dma(struct net_device *dev)
295
{
296
        elp_device *adapter = dev->priv;
297
        if (adapter->dmaing && time_after(jiffies, adapter->current_dma.start_time + 10)) {
298
                unsigned long flags, f;
299
                printk(KERN_ERR "%s: DMA %s timed out, %d bytes left\n", dev->name, adapter->current_dma.direction ? "download" : "upload", get_dma_residue(dev->dma));
300
                spin_lock_irqsave(&adapter->lock, flags);
301
                adapter->dmaing = 0;
302
                adapter->busy = 0;
303
 
304
                f=claim_dma_lock();
305
                disable_dma(dev->dma);
306
                release_dma_lock(f);
307
 
308
                if (adapter->rx_active)
309
                        adapter->rx_active--;
310
                outb_control(adapter->hcr_val & ~(DMAE | TCEN | DIR), dev);
311
                spin_unlock_irqrestore(&adapter->lock, flags);
312
        }
313
}
314
 
315
/* Primitive functions used by send_pcb() */
316
static inline bool send_pcb_slow(unsigned int base_addr, unsigned char byte)
317
{
318
        unsigned long timeout;
319
        outb_command(byte, base_addr);
320
        for (timeout = jiffies + 5*HZ/100; time_before(jiffies, timeout);) {
321
                if (inb_status(base_addr) & HCRE)
322
                        return false;
323
        }
324
        printk(KERN_WARNING "3c505: send_pcb_slow timed out\n");
325
        return true;
326
}
327
 
328
static inline bool send_pcb_fast(unsigned int base_addr, unsigned char byte)
329
{
330
        unsigned int timeout;
331
        outb_command(byte, base_addr);
332
        for (timeout = 0; timeout < 40000; timeout++) {
333
                if (inb_status(base_addr) & HCRE)
334
                        return false;
335
        }
336
        printk(KERN_WARNING "3c505: send_pcb_fast timed out\n");
337
        return true;
338
}
339
 
340
/* Check to see if the receiver needs restarting, and kick it if so */
341
static inline void prime_rx(struct net_device *dev)
342
{
343
        elp_device *adapter = dev->priv;
344
        while (adapter->rx_active < ELP_RX_PCBS && netif_running(dev)) {
345
                if (!start_receive(dev, &adapter->itx_pcb))
346
                        break;
347
        }
348
}
349
 
350
/*****************************************************************
351
 *
352
 * send_pcb
353
 *   Send a PCB to the adapter.
354
 *
355
 *      output byte to command reg  --<--+
356
 *      wait until HCRE is non zero      |
357
 *      loop until all bytes sent   -->--+
358
 *      set HSF1 and HSF2 to 1
359
 *      output pcb length
360
 *      wait until ASF give ACK or NAK
361
 *      set HSF1 and HSF2 to 0
362
 *
363
 *****************************************************************/
364
 
365
/* This can be quite slow -- the adapter is allowed to take up to 40ms
366
 * to respond to the initial interrupt.
367
 *
368
 * We run initially with interrupts turned on, but with a semaphore set
369
 * so that nobody tries to re-enter this code.  Once the first byte has
370
 * gone through, we turn interrupts off and then send the others (the
371
 * timeout is reduced to 500us).
372
 */
373
 
374
static bool send_pcb(struct net_device *dev, pcb_struct * pcb)
375
{
376
        int i;
377
        unsigned long timeout;
378
        elp_device *adapter = dev->priv;
379
        unsigned long flags;
380
 
381
        check_3c505_dma(dev);
382
 
383
        if (adapter->dmaing && adapter->current_dma.direction == 0)
384
                return false;
385
 
386
        /* Avoid contention */
387
        if (test_and_set_bit(1, &adapter->send_pcb_semaphore)) {
388
                if (elp_debug >= 3) {
389
                        printk(KERN_DEBUG "%s: send_pcb entered while threaded\n", dev->name);
390
                }
391
                return false;
392
        }
393
        /*
394
         * load each byte into the command register and
395
         * wait for the HCRE bit to indicate the adapter
396
         * had read the byte
397
         */
398
        set_hsf(dev, 0);
399
 
400
        if (send_pcb_slow(dev->base_addr, pcb->command))
401
                goto abort;
402
 
403
        spin_lock_irqsave(&adapter->lock, flags);
404
 
405
        if (send_pcb_fast(dev->base_addr, pcb->length))
406
                goto sti_abort;
407
 
408
        for (i = 0; i < pcb->length; i++) {
409
                if (send_pcb_fast(dev->base_addr, pcb->data.raw[i]))
410
                        goto sti_abort;
411
        }
412
 
413
        outb_control(adapter->hcr_val | 3, dev);        /* signal end of PCB */
414
        outb_command(2 + pcb->length, dev->base_addr);
415
 
416
        /* now wait for the acknowledgement */
417
        spin_unlock_irqrestore(&adapter->lock, flags);
418
 
419
        for (timeout = jiffies + 5*HZ/100; time_before(jiffies, timeout);) {
420
                switch (GET_ASF(dev->base_addr)) {
421
                case ASF_PCB_ACK:
422
                        adapter->send_pcb_semaphore = 0;
423
                        return true;
424
 
425
                case ASF_PCB_NAK:
426
#ifdef ELP_DEBUG
427
                        printk(KERN_DEBUG "%s: send_pcb got NAK\n", dev->name);
428
#endif
429
                        goto abort;
430
                }
431
        }
432
 
433
        if (elp_debug >= 1)
434
                printk(KERN_DEBUG "%s: timeout waiting for PCB acknowledge (status %02x)\n", dev->name, inb_status(dev->base_addr));
435
        goto abort;
436
 
437
      sti_abort:
438
        spin_unlock_irqrestore(&adapter->lock, flags);
439
      abort:
440
        adapter->send_pcb_semaphore = 0;
441
        return false;
442
}
443
 
444
 
445
/*****************************************************************
446
 *
447
 * receive_pcb
448
 *   Read a PCB from the adapter
449
 *
450
 *      wait for ACRF to be non-zero        ---<---+
451
 *      input a byte                               |
452
 *      if ASF1 and ASF2 were not both one         |
453
 *              before byte was read, loop      --->---+
454
 *      set HSF1 and HSF2 for ack
455
 *
456
 *****************************************************************/
457
 
458
static bool receive_pcb(struct net_device *dev, pcb_struct * pcb)
459
{
460
        int i, j;
461
        int total_length;
462
        int stat;
463
        unsigned long timeout;
464
        unsigned long flags;
465
 
466
        elp_device *adapter = dev->priv;
467
 
468
        set_hsf(dev, 0);
469
 
470
        /* get the command code */
471
        timeout = jiffies + 2*HZ/100;
472
        while (((stat = get_status(dev->base_addr)) & ACRF) == 0 && time_before(jiffies, timeout));
473
        if (time_after_eq(jiffies, timeout)) {
474
                TIMEOUT_MSG(__LINE__);
475
                return false;
476
        }
477
        pcb->command = inb_command(dev->base_addr);
478
 
479
        /* read the data length */
480
        timeout = jiffies + 3*HZ/100;
481
        while (((stat = get_status(dev->base_addr)) & ACRF) == 0 && time_before(jiffies, timeout));
482
        if (time_after_eq(jiffies, timeout)) {
483
                TIMEOUT_MSG(__LINE__);
484
                printk(KERN_INFO "%s: status %02x\n", dev->name, stat);
485
                return false;
486
        }
487
        pcb->length = inb_command(dev->base_addr);
488
 
489
        if (pcb->length > MAX_PCB_DATA) {
490
                INVALID_PCB_MSG(pcb->length);
491
                adapter_reset(dev);
492
                return false;
493
        }
494
        /* read the data */
495
        spin_lock_irqsave(&adapter->lock, flags);
496
        i = 0;
497
        do {
498
                j = 0;
499
                while (((stat = get_status(dev->base_addr)) & ACRF) == 0 && j++ < 20000);
500
                pcb->data.raw[i++] = inb_command(dev->base_addr);
501
                if (i > MAX_PCB_DATA)
502
                        INVALID_PCB_MSG(i);
503
        } while ((stat & ASF_PCB_MASK) != ASF_PCB_END && j < 20000);
504
        spin_unlock_irqrestore(&adapter->lock, flags);
505
        if (j >= 20000) {
506
                TIMEOUT_MSG(__LINE__);
507
                return false;
508
        }
509
        /* woops, the last "data" byte was really the length! */
510
        total_length = pcb->data.raw[--i];
511
 
512
        /* safety check total length vs data length */
513
        if (total_length != (pcb->length + 2)) {
514
                if (elp_debug >= 2)
515
                        printk(KERN_WARNING "%s: mangled PCB received\n", dev->name);
516
                set_hsf(dev, HSF_PCB_NAK);
517
                return false;
518
        }
519
 
520
        if (pcb->command == CMD_RECEIVE_PACKET_COMPLETE) {
521
                if (test_and_set_bit(0, (void *) &adapter->busy)) {
522
                        if (backlog_next(adapter->rx_backlog.in) == adapter->rx_backlog.out) {
523
                                set_hsf(dev, HSF_PCB_NAK);
524
                                printk(KERN_WARNING "%s: PCB rejected, transfer in progress and backlog full\n", dev->name);
525
                                pcb->command = 0;
526
                                return true;
527
                        } else {
528
                                pcb->command = 0xff;
529
                        }
530
                }
531
        }
532
        set_hsf(dev, HSF_PCB_ACK);
533
        return true;
534
}
535
 
536
/******************************************************
537
 *
538
 *  queue a receive command on the adapter so we will get an
539
 *  interrupt when a packet is received.
540
 *
541
 ******************************************************/
542
 
543
static bool start_receive(struct net_device *dev, pcb_struct * tx_pcb)
544
{
545
        bool status;
546
        elp_device *adapter = dev->priv;
547
 
548
        if (elp_debug >= 3)
549
                printk(KERN_DEBUG "%s: restarting receiver\n", dev->name);
550
        tx_pcb->command = CMD_RECEIVE_PACKET;
551
        tx_pcb->length = sizeof(struct Rcv_pkt);
552
        tx_pcb->data.rcv_pkt.buf_seg
553
            = tx_pcb->data.rcv_pkt.buf_ofs = 0;          /* Unused */
554
        tx_pcb->data.rcv_pkt.buf_len = 1600;
555
        tx_pcb->data.rcv_pkt.timeout = 0;        /* set timeout to zero */
556
        status = send_pcb(dev, tx_pcb);
557
        if (status)
558
                adapter->rx_active++;
559
        return status;
560
}
561
 
562
/******************************************************
563
 *
564
 * extract a packet from the adapter
565
 * this routine is only called from within the interrupt
566
 * service routine, so no cli/sti calls are needed
567
 * note that the length is always assumed to be even
568
 *
569
 ******************************************************/
570
 
571
static void receive_packet(struct net_device *dev, int len)
572
{
573
        int rlen;
574
        elp_device *adapter = dev->priv;
575
        void *target;
576
        struct sk_buff *skb;
577
        unsigned long flags;
578
 
579
        rlen = (len + 1) & ~1;
580
        skb = dev_alloc_skb(rlen + 2);
581
 
582
        if (!skb) {
583
                printk(KERN_WARNING "%s: memory squeeze, dropping packet\n", dev->name);
584
                target = adapter->dma_buffer;
585
                adapter->current_dma.target = NULL;
586
                /* FIXME: stats */
587
                return;
588
        }
589
 
590
        skb_reserve(skb, 2);
591
        target = skb_put(skb, rlen);
592
        if ((unsigned long)(target + rlen) >= MAX_DMA_ADDRESS) {
593
                adapter->current_dma.target = target;
594
                target = adapter->dma_buffer;
595
        } else {
596
                adapter->current_dma.target = NULL;
597
        }
598
 
599
        /* if this happens, we die */
600
        if (test_and_set_bit(0, (void *) &adapter->dmaing))
601
                printk(KERN_ERR "%s: rx blocked, DMA in progress, dir %d\n", dev->name, adapter->current_dma.direction);
602
 
603
        adapter->current_dma.direction = 0;
604
        adapter->current_dma.length = rlen;
605
        adapter->current_dma.skb = skb;
606
        adapter->current_dma.start_time = jiffies;
607
 
608
        outb_control(adapter->hcr_val | DIR | TCEN | DMAE, dev);
609
 
610
        flags=claim_dma_lock();
611
        disable_dma(dev->dma);
612
        clear_dma_ff(dev->dma);
613
        set_dma_mode(dev->dma, 0x04);   /* dma read */
614
        set_dma_addr(dev->dma, isa_virt_to_bus(target));
615
        set_dma_count(dev->dma, rlen);
616
        enable_dma(dev->dma);
617
        release_dma_lock(flags);
618
 
619
        if (elp_debug >= 3) {
620
                printk(KERN_DEBUG "%s: rx DMA transfer started\n", dev->name);
621
        }
622
 
623
        if (adapter->rx_active)
624
                adapter->rx_active--;
625
 
626
        if (!adapter->busy)
627
                printk(KERN_WARNING "%s: receive_packet called, busy not set.\n", dev->name);
628
}
629
 
630
/******************************************************
631
 *
632
 * interrupt handler
633
 *
634
 ******************************************************/
635
 
636
static irqreturn_t elp_interrupt(int irq, void *dev_id)
637
{
638
        int len;
639
        int dlen;
640
        int icount = 0;
641
        struct net_device *dev;
642
        elp_device *adapter;
643
        unsigned long timeout;
644
 
645
        dev = dev_id;
646
        adapter = (elp_device *) dev->priv;
647
 
648
        spin_lock(&adapter->lock);
649
 
650
        do {
651
                /*
652
                 * has a DMA transfer finished?
653
                 */
654
                if (inb_status(dev->base_addr) & DONE) {
655
                        if (!adapter->dmaing) {
656
                                printk(KERN_WARNING "%s: phantom DMA completed\n", dev->name);
657
                        }
658
                        if (elp_debug >= 3) {
659
                                printk(KERN_DEBUG "%s: %s DMA complete, status %02x\n", dev->name, adapter->current_dma.direction ? "tx" : "rx", inb_status(dev->base_addr));
660
                        }
661
 
662
                        outb_control(adapter->hcr_val & ~(DMAE | TCEN | DIR), dev);
663
                        if (adapter->current_dma.direction) {
664
                                dev_kfree_skb_irq(adapter->current_dma.skb);
665
                        } else {
666
                                struct sk_buff *skb = adapter->current_dma.skb;
667
                                if (skb) {
668
                                        if (adapter->current_dma.target) {
669
                                        /* have already done the skb_put() */
670
                                        memcpy(adapter->current_dma.target, adapter->dma_buffer, adapter->current_dma.length);
671
                                        }
672
                                        skb->protocol = eth_type_trans(skb,dev);
673
                                        adapter->stats.rx_bytes += skb->len;
674
                                        netif_rx(skb);
675
                                        dev->last_rx = jiffies;
676
                                }
677
                        }
678
                        adapter->dmaing = 0;
679
                        if (adapter->rx_backlog.in != adapter->rx_backlog.out) {
680
                                int t = adapter->rx_backlog.length[adapter->rx_backlog.out];
681
                                adapter->rx_backlog.out = backlog_next(adapter->rx_backlog.out);
682
                                if (elp_debug >= 2)
683
                                        printk(KERN_DEBUG "%s: receiving backlogged packet (%d)\n", dev->name, t);
684
                                receive_packet(dev, t);
685
                        } else {
686
                                adapter->busy = 0;
687
                        }
688
                } else {
689
                        /* has one timed out? */
690
                        check_3c505_dma(dev);
691
                }
692
 
693
                /*
694
                 * receive a PCB from the adapter
695
                 */
696
                timeout = jiffies + 3*HZ/100;
697
                while ((inb_status(dev->base_addr) & ACRF) != 0 && time_before(jiffies, timeout)) {
698
                        if (receive_pcb(dev, &adapter->irx_pcb)) {
699
                                switch (adapter->irx_pcb.command)
700
                                {
701
                                case 0:
702
                                        break;
703
                                        /*
704
                                         * received a packet - this must be handled fast
705
                                         */
706
                                case 0xff:
707
                                case CMD_RECEIVE_PACKET_COMPLETE:
708
                                        /* if the device isn't open, don't pass packets up the stack */
709
                                        if (!netif_running(dev))
710
                                                break;
711
                                        len = adapter->irx_pcb.data.rcv_resp.pkt_len;
712
                                        dlen = adapter->irx_pcb.data.rcv_resp.buf_len;
713
                                        if (adapter->irx_pcb.data.rcv_resp.timeout != 0) {
714
                                                printk(KERN_ERR "%s: interrupt - packet not received correctly\n", dev->name);
715
                                        } else {
716
                                                if (elp_debug >= 3) {
717
                                                        printk(KERN_DEBUG "%s: interrupt - packet received of length %i (%i)\n", dev->name, len, dlen);
718
                                                }
719
                                                if (adapter->irx_pcb.command == 0xff) {
720
                                                        if (elp_debug >= 2)
721
                                                                printk(KERN_DEBUG "%s: adding packet to backlog (len = %d)\n", dev->name, dlen);
722
                                                        adapter->rx_backlog.length[adapter->rx_backlog.in] = dlen;
723
                                                        adapter->rx_backlog.in = backlog_next(adapter->rx_backlog.in);
724
                                                } else {
725
                                                        receive_packet(dev, dlen);
726
                                                }
727
                                                if (elp_debug >= 3)
728
                                                        printk(KERN_DEBUG "%s: packet received\n", dev->name);
729
                                        }
730
                                        break;
731
 
732
                                        /*
733
                                         * 82586 configured correctly
734
                                         */
735
                                case CMD_CONFIGURE_82586_RESPONSE:
736
                                        adapter->got[CMD_CONFIGURE_82586] = 1;
737
                                        if (elp_debug >= 3)
738
                                                printk(KERN_DEBUG "%s: interrupt - configure response received\n", dev->name);
739
                                        break;
740
 
741
                                        /*
742
                                         * Adapter memory configuration
743
                                         */
744
                                case CMD_CONFIGURE_ADAPTER_RESPONSE:
745
                                        adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] = 1;
746
                                        if (elp_debug >= 3)
747
                                                printk(KERN_DEBUG "%s: Adapter memory configuration %s.\n", dev->name,
748
                                                       adapter->irx_pcb.data.failed ? "failed" : "succeeded");
749
                                        break;
750
 
751
                                        /*
752
                                         * Multicast list loading
753
                                         */
754
                                case CMD_LOAD_MULTICAST_RESPONSE:
755
                                        adapter->got[CMD_LOAD_MULTICAST_LIST] = 1;
756
                                        if (elp_debug >= 3)
757
                                                printk(KERN_DEBUG "%s: Multicast address list loading %s.\n", dev->name,
758
                                                       adapter->irx_pcb.data.failed ? "failed" : "succeeded");
759
                                        break;
760
 
761
                                        /*
762
                                         * Station address setting
763
                                         */
764
                                case CMD_SET_ADDRESS_RESPONSE:
765
                                        adapter->got[CMD_SET_STATION_ADDRESS] = 1;
766
                                        if (elp_debug >= 3)
767
                                                printk(KERN_DEBUG "%s: Ethernet address setting %s.\n", dev->name,
768
                                                       adapter->irx_pcb.data.failed ? "failed" : "succeeded");
769
                                        break;
770
 
771
 
772
                                        /*
773
                                         * received board statistics
774
                                         */
775
                                case CMD_NETWORK_STATISTICS_RESPONSE:
776
                                        adapter->stats.rx_packets += adapter->irx_pcb.data.netstat.tot_recv;
777
                                        adapter->stats.tx_packets += adapter->irx_pcb.data.netstat.tot_xmit;
778
                                        adapter->stats.rx_crc_errors += adapter->irx_pcb.data.netstat.err_CRC;
779
                                        adapter->stats.rx_frame_errors += adapter->irx_pcb.data.netstat.err_align;
780
                                        adapter->stats.rx_fifo_errors += adapter->irx_pcb.data.netstat.err_ovrrun;
781
                                        adapter->stats.rx_over_errors += adapter->irx_pcb.data.netstat.err_res;
782
                                        adapter->got[CMD_NETWORK_STATISTICS] = 1;
783
                                        if (elp_debug >= 3)
784
                                                printk(KERN_DEBUG "%s: interrupt - statistics response received\n", dev->name);
785
                                        break;
786
 
787
                                        /*
788
                                         * sent a packet
789
                                         */
790
                                case CMD_TRANSMIT_PACKET_COMPLETE:
791
                                        if (elp_debug >= 3)
792
                                                printk(KERN_DEBUG "%s: interrupt - packet sent\n", dev->name);
793
                                        if (!netif_running(dev))
794
                                                break;
795
                                        switch (adapter->irx_pcb.data.xmit_resp.c_stat) {
796
                                        case 0xffff:
797
                                                adapter->stats.tx_aborted_errors++;
798
                                                printk(KERN_INFO "%s: transmit timed out, network cable problem?\n", dev->name);
799
                                                break;
800
                                        case 0xfffe:
801
                                                adapter->stats.tx_fifo_errors++;
802
                                                printk(KERN_INFO "%s: transmit timed out, FIFO underrun\n", dev->name);
803
                                                break;
804
                                        }
805
                                        netif_wake_queue(dev);
806
                                        break;
807
 
808
                                        /*
809
                                         * some unknown PCB
810
                                         */
811
                                default:
812
                                        printk(KERN_DEBUG "%s: unknown PCB received - %2.2x\n", dev->name, adapter->irx_pcb.command);
813
                                        break;
814
                                }
815
                        } else {
816
                                printk(KERN_WARNING "%s: failed to read PCB on interrupt\n", dev->name);
817
                                adapter_reset(dev);
818
                        }
819
                }
820
 
821
        } while (icount++ < 5 && (inb_status(dev->base_addr) & (ACRF | DONE)));
822
 
823
        prime_rx(dev);
824
 
825
        /*
826
         * indicate no longer in interrupt routine
827
         */
828
        spin_unlock(&adapter->lock);
829
        return IRQ_HANDLED;
830
}
831
 
832
 
833
/******************************************************
834
 *
835
 * open the board
836
 *
837
 ******************************************************/
838
 
839
static int elp_open(struct net_device *dev)
840
{
841
        elp_device *adapter;
842
        int retval;
843
 
844
        adapter = dev->priv;
845
 
846
        if (elp_debug >= 3)
847
                printk(KERN_DEBUG "%s: request to open device\n", dev->name);
848
 
849
        /*
850
         * make sure we actually found the device
851
         */
852
        if (adapter == NULL) {
853
                printk(KERN_ERR "%s: Opening a non-existent physical device\n", dev->name);
854
                return -EAGAIN;
855
        }
856
        /*
857
         * disable interrupts on the board
858
         */
859
        outb_control(0, dev);
860
 
861
        /*
862
         * clear any pending interrupts
863
         */
864
        inb_command(dev->base_addr);
865
        adapter_reset(dev);
866
 
867
        /*
868
         * no receive PCBs active
869
         */
870
        adapter->rx_active = 0;
871
 
872
        adapter->busy = 0;
873
        adapter->send_pcb_semaphore = 0;
874
        adapter->rx_backlog.in = 0;
875
        adapter->rx_backlog.out = 0;
876
 
877
        spin_lock_init(&adapter->lock);
878
 
879
        /*
880
         * install our interrupt service routine
881
         */
882
        if ((retval = request_irq(dev->irq, &elp_interrupt, 0, dev->name, dev))) {
883
                printk(KERN_ERR "%s: could not allocate IRQ%d\n", dev->name, dev->irq);
884
                return retval;
885
        }
886
        if ((retval = request_dma(dev->dma, dev->name))) {
887
                free_irq(dev->irq, dev);
888
                printk(KERN_ERR "%s: could not allocate DMA%d channel\n", dev->name, dev->dma);
889
                return retval;
890
        }
891
        adapter->dma_buffer = (void *) dma_mem_alloc(DMA_BUFFER_SIZE);
892
        if (!adapter->dma_buffer) {
893
                printk(KERN_ERR "%s: could not allocate DMA buffer\n", dev->name);
894
                free_dma(dev->dma);
895
                free_irq(dev->irq, dev);
896
                return -ENOMEM;
897
        }
898
        adapter->dmaing = 0;
899
 
900
        /*
901
         * enable interrupts on the board
902
         */
903
        outb_control(CMDE, dev);
904
 
905
        /*
906
         * configure adapter memory: we need 10 multicast addresses, default==0
907
         */
908
        if (elp_debug >= 3)
909
                printk(KERN_DEBUG "%s: sending 3c505 memory configuration command\n", dev->name);
910
        adapter->tx_pcb.command = CMD_CONFIGURE_ADAPTER_MEMORY;
911
        adapter->tx_pcb.data.memconf.cmd_q = 10;
912
        adapter->tx_pcb.data.memconf.rcv_q = 20;
913
        adapter->tx_pcb.data.memconf.mcast = 10;
914
        adapter->tx_pcb.data.memconf.frame = 20;
915
        adapter->tx_pcb.data.memconf.rcv_b = 20;
916
        adapter->tx_pcb.data.memconf.progs = 0;
917
        adapter->tx_pcb.length = sizeof(struct Memconf);
918
        adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] = 0;
919
        if (!send_pcb(dev, &adapter->tx_pcb))
920
                printk(KERN_ERR "%s: couldn't send memory configuration command\n", dev->name);
921
        else {
922
                unsigned long timeout = jiffies + TIMEOUT;
923
                while (adapter->got[CMD_CONFIGURE_ADAPTER_MEMORY] == 0 && time_before(jiffies, timeout));
924
                if (time_after_eq(jiffies, timeout))
925
                        TIMEOUT_MSG(__LINE__);
926
        }
927
 
928
 
929
        /*
930
         * configure adapter to receive broadcast messages and wait for response
931
         */
932
        if (elp_debug >= 3)
933
                printk(KERN_DEBUG "%s: sending 82586 configure command\n", dev->name);
934
        adapter->tx_pcb.command = CMD_CONFIGURE_82586;
935
        adapter->tx_pcb.data.configure = NO_LOOPBACK | RECV_BROAD;
936
        adapter->tx_pcb.length = 2;
937
        adapter->got[CMD_CONFIGURE_82586] = 0;
938
        if (!send_pcb(dev, &adapter->tx_pcb))
939
                printk(KERN_ERR "%s: couldn't send 82586 configure command\n", dev->name);
940
        else {
941
                unsigned long timeout = jiffies + TIMEOUT;
942
                while (adapter->got[CMD_CONFIGURE_82586] == 0 && time_before(jiffies, timeout));
943
                if (time_after_eq(jiffies, timeout))
944
                        TIMEOUT_MSG(__LINE__);
945
        }
946
 
947
        /* enable burst-mode DMA */
948
        /* outb(0x1, dev->base_addr + PORT_AUXDMA); */
949
 
950
        /*
951
         * queue receive commands to provide buffering
952
         */
953
        prime_rx(dev);
954
        if (elp_debug >= 3)
955
                printk(KERN_DEBUG "%s: %d receive PCBs active\n", dev->name, adapter->rx_active);
956
 
957
        /*
958
         * device is now officially open!
959
         */
960
 
961
        netif_start_queue(dev);
962
        return 0;
963
}
964
 
965
 
966
/******************************************************
967
 *
968
 * send a packet to the adapter
969
 *
970
 ******************************************************/
971
 
972
static bool send_packet(struct net_device *dev, struct sk_buff *skb)
973
{
974
        elp_device *adapter = dev->priv;
975
        unsigned long target;
976
        unsigned long flags;
977
 
978
        /*
979
         * make sure the length is even and no shorter than 60 bytes
980
         */
981
        unsigned int nlen = (((skb->len < 60) ? 60 : skb->len) + 1) & (~1);
982
 
983
        if (test_and_set_bit(0, (void *) &adapter->busy)) {
984
                if (elp_debug >= 2)
985
                        printk(KERN_DEBUG "%s: transmit blocked\n", dev->name);
986
                return false;
987
        }
988
 
989
        adapter->stats.tx_bytes += nlen;
990
 
991
        /*
992
         * send the adapter a transmit packet command. Ignore segment and offset
993
         * and make sure the length is even
994
         */
995
        adapter->tx_pcb.command = CMD_TRANSMIT_PACKET;
996
        adapter->tx_pcb.length = sizeof(struct Xmit_pkt);
997
        adapter->tx_pcb.data.xmit_pkt.buf_ofs
998
            = adapter->tx_pcb.data.xmit_pkt.buf_seg = 0; /* Unused */
999
        adapter->tx_pcb.data.xmit_pkt.pkt_len = nlen;
1000
 
1001
        if (!send_pcb(dev, &adapter->tx_pcb)) {
1002
                adapter->busy = 0;
1003
                return false;
1004
        }
1005
        /* if this happens, we die */
1006
        if (test_and_set_bit(0, (void *) &adapter->dmaing))
1007
                printk(KERN_DEBUG "%s: tx: DMA %d in progress\n", dev->name, adapter->current_dma.direction);
1008
 
1009
        adapter->current_dma.direction = 1;
1010
        adapter->current_dma.start_time = jiffies;
1011
 
1012
        if ((unsigned long)(skb->data + nlen) >= MAX_DMA_ADDRESS || nlen != skb->len) {
1013
                skb_copy_from_linear_data(skb, adapter->dma_buffer, nlen);
1014
                memset(adapter->dma_buffer+skb->len, 0, nlen-skb->len);
1015
                target = isa_virt_to_bus(adapter->dma_buffer);
1016
        }
1017
        else {
1018
                target = isa_virt_to_bus(skb->data);
1019
        }
1020
        adapter->current_dma.skb = skb;
1021
 
1022
        flags=claim_dma_lock();
1023
        disable_dma(dev->dma);
1024
        clear_dma_ff(dev->dma);
1025
        set_dma_mode(dev->dma, 0x48);   /* dma memory -> io */
1026
        set_dma_addr(dev->dma, target);
1027
        set_dma_count(dev->dma, nlen);
1028
        outb_control(adapter->hcr_val | DMAE | TCEN, dev);
1029
        enable_dma(dev->dma);
1030
        release_dma_lock(flags);
1031
 
1032
        if (elp_debug >= 3)
1033
                printk(KERN_DEBUG "%s: DMA transfer started\n", dev->name);
1034
 
1035
        return true;
1036
}
1037
 
1038
/*
1039
 *      The upper layer thinks we timed out
1040
 */
1041
 
1042
static void elp_timeout(struct net_device *dev)
1043
{
1044
        elp_device *adapter = dev->priv;
1045
        int stat;
1046
 
1047
        stat = inb_status(dev->base_addr);
1048
        printk(KERN_WARNING "%s: transmit timed out, lost %s?\n", dev->name, (stat & ACRF) ? "interrupt" : "command");
1049
        if (elp_debug >= 1)
1050
                printk(KERN_DEBUG "%s: status %#02x\n", dev->name, stat);
1051
        dev->trans_start = jiffies;
1052
        adapter->stats.tx_dropped++;
1053
        netif_wake_queue(dev);
1054
}
1055
 
1056
/******************************************************
1057
 *
1058
 * start the transmitter
1059
 *    return 0 if sent OK, else return 1
1060
 *
1061
 ******************************************************/
1062
 
1063
static int elp_start_xmit(struct sk_buff *skb, struct net_device *dev)
1064
{
1065
        unsigned long flags;
1066
        elp_device *adapter = dev->priv;
1067
 
1068
        spin_lock_irqsave(&adapter->lock, flags);
1069
        check_3c505_dma(dev);
1070
 
1071
        if (elp_debug >= 3)
1072
                printk(KERN_DEBUG "%s: request to send packet of length %d\n", dev->name, (int) skb->len);
1073
 
1074
        netif_stop_queue(dev);
1075
 
1076
        /*
1077
         * send the packet at skb->data for skb->len
1078
         */
1079
        if (!send_packet(dev, skb)) {
1080
                if (elp_debug >= 2) {
1081
                        printk(KERN_DEBUG "%s: failed to transmit packet\n", dev->name);
1082
                }
1083
                spin_unlock_irqrestore(&adapter->lock, flags);
1084
                return 1;
1085
        }
1086
        if (elp_debug >= 3)
1087
                printk(KERN_DEBUG "%s: packet of length %d sent\n", dev->name, (int) skb->len);
1088
 
1089
        /*
1090
         * start the transmit timeout
1091
         */
1092
        dev->trans_start = jiffies;
1093
 
1094
        prime_rx(dev);
1095
        spin_unlock_irqrestore(&adapter->lock, flags);
1096
        netif_start_queue(dev);
1097
        return 0;
1098
}
1099
 
1100
/******************************************************
1101
 *
1102
 * return statistics on the board
1103
 *
1104
 ******************************************************/
1105
 
1106
static struct net_device_stats *elp_get_stats(struct net_device *dev)
1107
{
1108
        elp_device *adapter = (elp_device *) dev->priv;
1109
 
1110
        if (elp_debug >= 3)
1111
                printk(KERN_DEBUG "%s: request for stats\n", dev->name);
1112
 
1113
        /* If the device is closed, just return the latest stats we have,
1114
           - we cannot ask from the adapter without interrupts */
1115
        if (!netif_running(dev))
1116
                return &adapter->stats;
1117
 
1118
        /* send a get statistics command to the board */
1119
        adapter->tx_pcb.command = CMD_NETWORK_STATISTICS;
1120
        adapter->tx_pcb.length = 0;
1121
        adapter->got[CMD_NETWORK_STATISTICS] = 0;
1122
        if (!send_pcb(dev, &adapter->tx_pcb))
1123
                printk(KERN_ERR "%s: couldn't send get statistics command\n", dev->name);
1124
        else {
1125
                unsigned long timeout = jiffies + TIMEOUT;
1126
                while (adapter->got[CMD_NETWORK_STATISTICS] == 0 && time_before(jiffies, timeout));
1127
                if (time_after_eq(jiffies, timeout)) {
1128
                        TIMEOUT_MSG(__LINE__);
1129
                        return &adapter->stats;
1130
                }
1131
        }
1132
 
1133
        /* statistics are now up to date */
1134
        return &adapter->stats;
1135
}
1136
 
1137
 
1138
static void netdev_get_drvinfo(struct net_device *dev,
1139
                               struct ethtool_drvinfo *info)
1140
{
1141
        strcpy(info->driver, DRV_NAME);
1142
        strcpy(info->version, DRV_VERSION);
1143
        sprintf(info->bus_info, "ISA 0x%lx", dev->base_addr);
1144
}
1145
 
1146
static u32 netdev_get_msglevel(struct net_device *dev)
1147
{
1148
        return debug;
1149
}
1150
 
1151
static void netdev_set_msglevel(struct net_device *dev, u32 level)
1152
{
1153
        debug = level;
1154
}
1155
 
1156
static const struct ethtool_ops netdev_ethtool_ops = {
1157
        .get_drvinfo            = netdev_get_drvinfo,
1158
        .get_msglevel           = netdev_get_msglevel,
1159
        .set_msglevel           = netdev_set_msglevel,
1160
};
1161
 
1162
/******************************************************
1163
 *
1164
 * close the board
1165
 *
1166
 ******************************************************/
1167
 
1168
static int elp_close(struct net_device *dev)
1169
{
1170
        elp_device *adapter;
1171
 
1172
        adapter = dev->priv;
1173
 
1174
        if (elp_debug >= 3)
1175
                printk(KERN_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 = (elp_device *) dev->priv;
1214
        struct dev_mc_list *dmi = dev->mc_list;
1215
        int i;
1216
        unsigned long flags;
1217
 
1218
        if (elp_debug >= 3)
1219
                printk(KERN_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 * dev->mc_count;
1228
                for (i = 0; i < dev->mc_count; i++) {
1229
                        memcpy(adapter->tx_pcb.data.multicast[i], dmi->dmi_addr, 6);
1230
                        dmi = dmi->next;
1231
                }
1232
                adapter->got[CMD_LOAD_MULTICAST_LIST] = 0;
1233
                if (!send_pcb(dev, &adapter->tx_pcb))
1234
                        printk(KERN_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 (dev->mc_count)
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
                printk(KERN_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
                printk(KERN_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
                printk(search_msg, name, addr);
1290
 
1291
        if (orig_HSR == 0xff) {
1292
                if (elp_debug > 0)
1293
                        printk(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
                printk(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
                                printk(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
                                printk(notfound_msg, 3);
1317
                        goto out;
1318
                }
1319
        }
1320
        /*
1321
         * It certainly looks like a 3c505.
1322
         */
1323
        if (elp_debug > 0)
1324
                printk(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
                printk(couldnot_msg, dev->name);
1356
 
1357
        return 0;                /* Because of this, the layer above will return -ENODEV */
1358
}
1359
 
1360
 
1361
/******************************************************
1362
 *
1363
 * probe for an Etherlink Plus board at the specified address
1364
 *
1365
 ******************************************************/
1366
 
1367
/* There are three situations we need to be able to detect here:
1368
 
1369
 *  a) the card is idle
1370
 *  b) the card is still booting up
1371
 *  c) the card is stuck in a strange state (some DOS drivers do this)
1372
 *
1373
 * In case (a), all is well.  In case (b), we wait 10 seconds to see if the
1374
 * card finishes booting, and carry on if so.  In case (c), we do a hard reset,
1375
 * loop round, and hope for the best.
1376
 *
1377
 * This is all very unpleasant, but hopefully avoids the problems with the old
1378
 * probe code (which had a 15-second delay if the card was idle, and didn't
1379
 * work at all if it was in a weird state).
1380
 */
1381
 
1382
static int __init elplus_setup(struct net_device *dev)
1383
{
1384
        elp_device *adapter = dev->priv;
1385
        int i, tries, tries1, okay;
1386
        unsigned long timeout;
1387
        unsigned long cookie = 0;
1388
        int err = -ENODEV;
1389
        DECLARE_MAC_BUF(mac);
1390
 
1391
        /*
1392
         *  setup adapter structure
1393
         */
1394
 
1395
        dev->base_addr = elp_autodetect(dev);
1396
        if (!dev->base_addr)
1397
                return -ENODEV;
1398
 
1399
        adapter->send_pcb_semaphore = 0;
1400
 
1401
        for (tries1 = 0; tries1 < 3; tries1++) {
1402
                outb_control((adapter->hcr_val | CMDE) & ~DIR, dev);
1403
                /* First try to write just one byte, to see if the card is
1404
                 * responding at all normally.
1405
                 */
1406
                timeout = jiffies + 5*HZ/100;
1407
                okay = 0;
1408
                while (time_before(jiffies, timeout) && !(inb_status(dev->base_addr) & HCRE));
1409
                if ((inb_status(dev->base_addr) & HCRE)) {
1410
                        outb_command(0, dev->base_addr); /* send a spurious byte */
1411
                        timeout = jiffies + 5*HZ/100;
1412
                        while (time_before(jiffies, timeout) && !(inb_status(dev->base_addr) & HCRE));
1413
                        if (inb_status(dev->base_addr) & HCRE)
1414
                                okay = 1;
1415
                }
1416
                if (!okay) {
1417
                        /* Nope, it's ignoring the command register.  This means that
1418
                         * either it's still booting up, or it's died.
1419
                         */
1420
                        printk(KERN_ERR "%s: command register wouldn't drain, ", dev->name);
1421
                        if ((inb_status(dev->base_addr) & 7) == 3) {
1422
                                /* If the adapter status is 3, it *could* still be booting.
1423
                                 * Give it the benefit of the doubt for 10 seconds.
1424
                                 */
1425
                                printk("assuming 3c505 still starting\n");
1426
                                timeout = jiffies + 10*HZ;
1427
                                while (time_before(jiffies, timeout) && (inb_status(dev->base_addr) & 7));
1428
                                if (inb_status(dev->base_addr) & 7) {
1429
                                        printk(KERN_ERR "%s: 3c505 failed to start\n", dev->name);
1430
                                } else {
1431
                                        okay = 1;  /* It started */
1432
                                }
1433
                        } else {
1434
                                /* Otherwise, it must just be in a strange
1435
                                 * state.  We probably need to kick it.
1436
                                 */
1437
                                printk("3c505 is sulking\n");
1438
                        }
1439
                }
1440
                for (tries = 0; tries < 5 && okay; tries++) {
1441
 
1442
                        /*
1443
                         * Try to set the Ethernet address, to make sure that the board
1444
                         * is working.
1445
                         */
1446
                        adapter->tx_pcb.command = CMD_STATION_ADDRESS;
1447
                        adapter->tx_pcb.length = 0;
1448
                        cookie = probe_irq_on();
1449
                        if (!send_pcb(dev, &adapter->tx_pcb)) {
1450
                                printk(KERN_ERR "%s: could not send first PCB\n", dev->name);
1451
                                probe_irq_off(cookie);
1452
                                continue;
1453
                        }
1454
                        if (!receive_pcb(dev, &adapter->rx_pcb)) {
1455
                                printk(KERN_ERR "%s: could not read first PCB\n", dev->name);
1456
                                probe_irq_off(cookie);
1457
                                continue;
1458
                        }
1459
                        if ((adapter->rx_pcb.command != CMD_ADDRESS_RESPONSE) ||
1460
                            (adapter->rx_pcb.length != 6)) {
1461
                                printk(KERN_ERR "%s: first PCB wrong (%d, %d)\n", dev->name, adapter->rx_pcb.command, adapter->rx_pcb.length);
1462
                                probe_irq_off(cookie);
1463
                                continue;
1464
                        }
1465
                        goto okay;
1466
                }
1467
                /* It's broken.  Do a hard reset to re-initialise the board,
1468
                 * and try again.
1469
                 */
1470
                printk(KERN_INFO "%s: resetting adapter\n", dev->name);
1471
                outb_control(adapter->hcr_val | FLSH | ATTN, dev);
1472
                outb_control(adapter->hcr_val & ~(FLSH | ATTN), dev);
1473
        }
1474
        printk(KERN_ERR "%s: failed to initialise 3c505\n", dev->name);
1475
        goto out;
1476
 
1477
      okay:
1478
        if (dev->irq) {         /* Is there a preset IRQ? */
1479
                int rpt = probe_irq_off(cookie);
1480
                if (dev->irq != rpt) {
1481
                        printk(KERN_WARNING "%s: warning, irq %d configured but %d detected\n", dev->name, dev->irq, rpt);
1482
                }
1483
                /* if dev->irq == probe_irq_off(cookie), all is well */
1484
        } else                 /* No preset IRQ; just use what we can detect */
1485
                dev->irq = probe_irq_off(cookie);
1486
        switch (dev->irq) {    /* Legal, sane? */
1487
        case 0:
1488
                printk(KERN_ERR "%s: IRQ probe failed: check 3c505 jumpers.\n",
1489
                       dev->name);
1490
                goto out;
1491
        case 1:
1492
        case 6:
1493
        case 8:
1494
        case 13:
1495
                printk(KERN_ERR "%s: Impossible IRQ %d reported by probe_irq_off().\n",
1496
                       dev->name, dev->irq);
1497
                       goto out;
1498
        }
1499
        /*
1500
         *  Now we have the IRQ number so we can disable the interrupts from
1501
         *  the board until the board is opened.
1502
         */
1503
        outb_control(adapter->hcr_val & ~CMDE, dev);
1504
 
1505
        /*
1506
         * copy Ethernet address into structure
1507
         */
1508
        for (i = 0; i < 6; i++)
1509
                dev->dev_addr[i] = adapter->rx_pcb.data.eth_addr[i];
1510
 
1511
        /* find a DMA channel */
1512
        if (!dev->dma) {
1513
                if (dev->mem_start) {
1514
                        dev->dma = dev->mem_start & 7;
1515
                }
1516
                else {
1517
                        printk(KERN_WARNING "%s: warning, DMA channel not specified, using default\n", dev->name);
1518
                        dev->dma = ELP_DMA;
1519
                }
1520
        }
1521
 
1522
        /*
1523
         * print remainder of startup message
1524
         */
1525
        printk(KERN_INFO "%s: 3c505 at %#lx, irq %d, dma %d, "
1526
               "addr %s, ",
1527
               dev->name, dev->base_addr, dev->irq, dev->dma,
1528
               print_mac(mac, dev->dev_addr));
1529
 
1530
        /*
1531
         * read more information from the adapter
1532
         */
1533
 
1534
        adapter->tx_pcb.command = CMD_ADAPTER_INFO;
1535
        adapter->tx_pcb.length = 0;
1536
        if (!send_pcb(dev, &adapter->tx_pcb) ||
1537
            !receive_pcb(dev, &adapter->rx_pcb) ||
1538
            (adapter->rx_pcb.command != CMD_ADAPTER_INFO_RESPONSE) ||
1539
            (adapter->rx_pcb.length != 10)) {
1540
                printk("not responding to second PCB\n");
1541
        }
1542
        printk("rev %d.%d, %dk\n", adapter->rx_pcb.data.info.major_vers, adapter->rx_pcb.data.info.minor_vers, adapter->rx_pcb.data.info.RAM_sz);
1543
 
1544
        /*
1545
         * reconfigure the adapter memory to better suit our purposes
1546
         */
1547
        adapter->tx_pcb.command = CMD_CONFIGURE_ADAPTER_MEMORY;
1548
        adapter->tx_pcb.length = 12;
1549
        adapter->tx_pcb.data.memconf.cmd_q = 8;
1550
        adapter->tx_pcb.data.memconf.rcv_q = 8;
1551
        adapter->tx_pcb.data.memconf.mcast = 10;
1552
        adapter->tx_pcb.data.memconf.frame = 10;
1553
        adapter->tx_pcb.data.memconf.rcv_b = 10;
1554
        adapter->tx_pcb.data.memconf.progs = 0;
1555
        if (!send_pcb(dev, &adapter->tx_pcb) ||
1556
            !receive_pcb(dev, &adapter->rx_pcb) ||
1557
            (adapter->rx_pcb.command != CMD_CONFIGURE_ADAPTER_RESPONSE) ||
1558
            (adapter->rx_pcb.length != 2)) {
1559
                printk(KERN_ERR "%s: could not configure adapter memory\n", dev->name);
1560
        }
1561
        if (adapter->rx_pcb.data.configure) {
1562
                printk(KERN_ERR "%s: adapter configuration failed\n", dev->name);
1563
        }
1564
 
1565
        dev->open = elp_open;                           /* local */
1566
        dev->stop = elp_close;                          /* local */
1567
        dev->get_stats = elp_get_stats;                 /* local */
1568
        dev->hard_start_xmit = elp_start_xmit;          /* local */
1569
        dev->tx_timeout = elp_timeout;                  /* local */
1570
        dev->watchdog_timeo = 10*HZ;
1571
        dev->set_multicast_list = elp_set_mc_list;      /* local */
1572
        dev->ethtool_ops = &netdev_ethtool_ops;         /* local */
1573
 
1574
        memset(&(adapter->stats), 0, sizeof(struct net_device_stats));
1575
        dev->mem_start = dev->mem_end = 0;
1576
 
1577
        err = register_netdev(dev);
1578
        if (err)
1579
                goto out;
1580
 
1581
        return 0;
1582
out:
1583
        release_region(dev->base_addr, ELP_IO_EXTENT);
1584
        return err;
1585
}
1586
 
1587
#ifndef MODULE
1588
struct net_device * __init elplus_probe(int unit)
1589
{
1590
        struct net_device *dev = alloc_etherdev(sizeof(elp_device));
1591
        int err;
1592
        if (!dev)
1593
                return ERR_PTR(-ENOMEM);
1594
 
1595
        sprintf(dev->name, "eth%d", unit);
1596
        netdev_boot_setup_check(dev);
1597
 
1598
        err = elplus_setup(dev);
1599
        if (err) {
1600
                free_netdev(dev);
1601
                return ERR_PTR(err);
1602
        }
1603
        return dev;
1604
}
1605
 
1606
#else
1607
static struct net_device *dev_3c505[ELP_MAX_CARDS];
1608
static int io[ELP_MAX_CARDS];
1609
static int irq[ELP_MAX_CARDS];
1610
static int dma[ELP_MAX_CARDS];
1611
module_param_array(io, int, NULL, 0);
1612
module_param_array(irq, int, NULL, 0);
1613
module_param_array(dma, int, NULL, 0);
1614
MODULE_PARM_DESC(io, "EtherLink Plus I/O base address(es)");
1615
MODULE_PARM_DESC(irq, "EtherLink Plus IRQ number(s) (assigned)");
1616
MODULE_PARM_DESC(dma, "EtherLink Plus DMA channel(s)");
1617
 
1618
int __init init_module(void)
1619
{
1620
        int this_dev, found = 0;
1621
 
1622
        for (this_dev = 0; this_dev < ELP_MAX_CARDS; this_dev++) {
1623
                struct net_device *dev = alloc_etherdev(sizeof(elp_device));
1624
                if (!dev)
1625
                        break;
1626
 
1627
                dev->irq = irq[this_dev];
1628
                dev->base_addr = io[this_dev];
1629
                if (dma[this_dev]) {
1630
                        dev->dma = dma[this_dev];
1631
                } else {
1632
                        dev->dma = ELP_DMA;
1633
                        printk(KERN_WARNING "3c505.c: warning, using default DMA channel,\n");
1634
                }
1635
                if (io[this_dev] == 0) {
1636
                        if (this_dev) {
1637
                                free_netdev(dev);
1638
                                break;
1639
                        }
1640
                        printk(KERN_NOTICE "3c505.c: module autoprobe not recommended, give io=xx.\n");
1641
                }
1642
                if (elplus_setup(dev) != 0) {
1643
                        printk(KERN_WARNING "3c505.c: Failed to register card at 0x%x.\n", io[this_dev]);
1644
                        free_netdev(dev);
1645
                        break;
1646
                }
1647
                dev_3c505[this_dev] = dev;
1648
                found++;
1649
        }
1650
        if (!found)
1651
                return -ENODEV;
1652
        return 0;
1653
}
1654
 
1655
void __exit cleanup_module(void)
1656
{
1657
        int this_dev;
1658
 
1659
        for (this_dev = 0; this_dev < ELP_MAX_CARDS; this_dev++) {
1660
                struct net_device *dev = dev_3c505[this_dev];
1661
                if (dev) {
1662
                        unregister_netdev(dev);
1663
                        release_region(dev->base_addr, ELP_IO_EXTENT);
1664
                        free_netdev(dev);
1665
                }
1666
        }
1667
}
1668
 
1669
#endif                          /* MODULE */
1670
MODULE_LICENSE("GPL");

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.