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

Subversion Repositories test_project

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

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 62 marcus.erl
/* znet.c: An Zenith Z-Note ethernet driver for linux. */
2
 
3
/*
4
        Written by Donald Becker.
5
 
6
        The author may be reached as becker@scyld.com.
7
        This driver is based on the Linux skeleton driver.  The copyright of the
8
        skeleton driver is held by the United States Government, as represented
9
        by DIRNSA, and it is released under the GPL.
10
 
11
        Thanks to Mike Hollick for alpha testing and suggestions.
12
 
13
  References:
14
           The Crynwr packet driver.
15
 
16
          "82593 CSMA/CD Core LAN Controller" Intel datasheet, 1992
17
          Intel Microcommunications Databook, Vol. 1, 1990.
18
    As usual with Intel, the documentation is incomplete and inaccurate.
19
        I had to read the Crynwr packet driver to figure out how to actually
20
        use the i82593, and guess at what register bits matched the loosely
21
        related i82586.
22
 
23
                                        Theory of Operation
24
 
25
        The i82593 used in the Zenith Z-Note series operates using two(!) slave
26
        DMA     channels, one interrupt, and one 8-bit I/O port.
27
 
28
        While there     several ways to configure '593 DMA system, I chose the one
29
        that seemed commensurate with the highest system performance in the face
30
        of moderate interrupt latency: Both DMA channels are configured as
31
        recirculating ring buffers, with one channel (#0) dedicated to Rx and
32
        the other channel (#1) to Tx and configuration.  (Note that this is
33
        different than the Crynwr driver, where the Tx DMA channel is initialized
34
        before each operation.  That approach simplifies operation and Tx error
35
        recovery, but requires additional I/O in normal operation and precludes
36
        transmit buffer chaining.)
37
 
38
        Both rings are set to 8192 bytes using {TX,RX}_RING_SIZE.  This provides
39
        a reasonable ring size for Rx, while simplifying DMA buffer allocation --
40
        DMA buffers must not cross a 128K boundary.  (In truth the size selection
41
        was influenced by my lack of '593 documentation.  I thus was constrained
42
        to use the Crynwr '593 initialization table, which sets the Rx ring size
43
        to 8K.)
44
 
45
        Despite my usual low opinion about Intel-designed parts, I must admit
46
        that the bulk data handling of the i82593 is a good design for
47
        an integrated system, like a laptop, where using two slave DMA channels
48
        doesn't pose a problem.  I still take issue with using only a single I/O
49
        port.  In the same controlled environment there are essentially no
50
        limitations on I/O space, and using multiple locations would eliminate
51
        the     need for multiple operations when looking at status registers,
52
        setting the Rx ring boundary, or switching to promiscuous mode.
53
 
54
        I also question Zenith's selection of the '593: one of the advertised
55
        advantages of earlier Intel parts was that if you figured out the magic
56
        initialization incantation you could use the same part on many different
57
        network types.  Zenith's use of the "FriendlyNet" (sic) connector rather
58
        than an on-board transceiver leads me to believe that they were planning
59
        to take advantage of this.  But, uhmmm, the '593 omits all but ethernet
60
        functionality from the serial subsystem.
61
 */
62
 
63
/* 10/2002
64
 
65
   o Resurected for Linux 2.5+ by Marc Zyngier <maz@wild-wind.fr.eu.org> :
66
 
67
   - Removed strange DMA snooping in znet_sent_packet, which lead to
68
     TX buffer corruption on my laptop.
69
   - Use init_etherdev stuff.
70
   - Use kmalloc-ed DMA buffers.
71
   - Use as few global variables as possible.
72
   - Use proper resources management.
73
   - Use wireless/i82593.h as much as possible (structure, constants)
74
   - Compiles as module or build-in.
75
   - Now survives unplugging/replugging cable.
76
 
77
   Some code was taken from wavelan_cs.
78
 
79
   Tested on a vintage Zenith Z-Note 433Lnp+. Probably broken on
80
   anything else. Testers (and detailed bug reports) are welcome :-).
81
 
82
   o TODO :
83
 
84
   - Properly handle multicast
85
   - Understand why some traffic patterns add a 1s latency...
86
 */
87
 
88
#include <linux/module.h>
89
#include <linux/kernel.h>
90
#include <linux/string.h>
91
#include <linux/errno.h>
92
#include <linux/interrupt.h>
93
#include <linux/ioport.h>
94
#include <linux/init.h>
95
#include <linux/delay.h>
96
#include <linux/netdevice.h>
97
#include <linux/etherdevice.h>
98
#include <linux/skbuff.h>
99
#include <linux/if_arp.h>
100
#include <linux/bitops.h>
101
 
102
#include <asm/system.h>
103
#include <asm/io.h>
104
#include <asm/dma.h>
105
 
106
/* This include could be elsewhere, since it is not wireless specific */
107
#include "wireless/i82593.h"
108
 
109
static char version[] __initdata = "znet.c:v1.02 9/23/94 becker@scyld.com\n";
110
 
111
#ifndef ZNET_DEBUG
112
#define ZNET_DEBUG 1
113
#endif
114
static unsigned int znet_debug = ZNET_DEBUG;
115
module_param (znet_debug, int, 0);
116
MODULE_PARM_DESC (znet_debug, "ZNet debug level");
117
MODULE_LICENSE("GPL");
118
 
119
/* The DMA modes we need aren't in <dma.h>. */
120
#define DMA_RX_MODE             0x14    /* Auto init, I/O to mem, ++, demand. */
121
#define DMA_TX_MODE             0x18    /* Auto init, Mem to I/O, ++, demand. */
122
#define dma_page_eq(ptr1, ptr2) ((long)(ptr1)>>17 == (long)(ptr2)>>17)
123
#define RX_BUF_SIZE 8192
124
#define TX_BUF_SIZE 8192
125
#define DMA_BUF_SIZE (RX_BUF_SIZE + 16) /* 8k + 16 bytes for trailers */
126
 
127
#define TX_TIMEOUT      10
128
 
129
struct znet_private {
130
        int rx_dma, tx_dma;
131
        spinlock_t lock;
132
        short sia_base, sia_size, io_size;
133
        struct i82593_conf_block i593_init;
134
        /* The starting, current, and end pointers for the packet buffers. */
135
        ushort *rx_start, *rx_cur, *rx_end;
136
        ushort *tx_start, *tx_cur, *tx_end;
137
        ushort tx_buf_len;                      /* Tx buffer length, in words. */
138
};
139
 
140
/* Only one can be built-in;-> */
141
static struct net_device *znet_dev;
142
 
143
struct netidblk {
144
        char magic[8];          /* The magic number (string) "NETIDBLK" */
145
        unsigned char netid[8]; /* The physical station address */
146
        char nettype, globalopt;
147
        char vendor[8];         /* The machine vendor and product name. */
148
        char product[8];
149
        char irq1, irq2;                /* Interrupts, only one is currently used.      */
150
        char dma1, dma2;
151
        short dma_mem_misc[8];          /* DMA buffer locations (unused in Linux). */
152
        short iobase1, iosize1;
153
        short iobase2, iosize2;         /* Second iobase unused. */
154
        char driver_options;                    /* Misc. bits */
155
        char pad;
156
};
157
 
158
static int      znet_open(struct net_device *dev);
159
static int      znet_send_packet(struct sk_buff *skb, struct net_device *dev);
160
static irqreturn_t znet_interrupt(int irq, void *dev_id);
161
static void     znet_rx(struct net_device *dev);
162
static int      znet_close(struct net_device *dev);
163
static void hardware_init(struct net_device *dev);
164
static void update_stop_hit(short ioaddr, unsigned short rx_stop_offset);
165
static void znet_tx_timeout (struct net_device *dev);
166
 
167
/* Request needed resources */
168
static int znet_request_resources (struct net_device *dev)
169
{
170
        struct znet_private *znet = dev->priv;
171
        unsigned long flags;
172
 
173
        if (request_irq (dev->irq, &znet_interrupt, 0, "ZNet", dev))
174
                goto failed;
175
        if (request_dma (znet->rx_dma, "ZNet rx"))
176
                goto free_irq;
177
        if (request_dma (znet->tx_dma, "ZNet tx"))
178
                goto free_rx_dma;
179
        if (!request_region (znet->sia_base, znet->sia_size, "ZNet SIA"))
180
                goto free_tx_dma;
181
        if (!request_region (dev->base_addr, znet->io_size, "ZNet I/O"))
182
                goto free_sia;
183
 
184
        return 0;                                /* Happy ! */
185
 
186
 free_sia:
187
        release_region (znet->sia_base, znet->sia_size);
188
 free_tx_dma:
189
        flags = claim_dma_lock();
190
        free_dma (znet->tx_dma);
191
        release_dma_lock (flags);
192
 free_rx_dma:
193
        flags = claim_dma_lock();
194
        free_dma (znet->rx_dma);
195
        release_dma_lock (flags);
196
 free_irq:
197
        free_irq (dev->irq, dev);
198
 failed:
199
        return -1;
200
}
201
 
202
static void znet_release_resources (struct net_device *dev)
203
{
204
        struct znet_private *znet = dev->priv;
205
        unsigned long flags;
206
 
207
        release_region (znet->sia_base, znet->sia_size);
208
        release_region (dev->base_addr, znet->io_size);
209
        flags = claim_dma_lock();
210
        free_dma (znet->tx_dma);
211
        free_dma (znet->rx_dma);
212
        release_dma_lock (flags);
213
        free_irq (dev->irq, dev);
214
}
215
 
216
/* Keep the magical SIA stuff in a single function... */
217
static void znet_transceiver_power (struct net_device *dev, int on)
218
{
219
        struct znet_private *znet = dev->priv;
220
        unsigned char v;
221
 
222
        /* Turn on/off the 82501 SIA, using zenith-specific magic. */
223
        /* Select LAN control register */
224
        outb(0x10, znet->sia_base);
225
 
226
        if (on)
227
                v = inb(znet->sia_base + 1) | 0x84;
228
        else
229
                v = inb(znet->sia_base + 1) & ~0x84;
230
 
231
        outb(v, znet->sia_base+1); /* Turn on/off LAN power (bit 2). */
232
}
233
 
234
/* Init the i82593, with current promisc/mcast configuration.
235
   Also used from hardware_init. */
236
static void znet_set_multicast_list (struct net_device *dev)
237
{
238
        struct znet_private *znet = dev->priv;
239
        short ioaddr = dev->base_addr;
240
        struct i82593_conf_block *cfblk = &znet->i593_init;
241
 
242
        memset(cfblk, 0x00, sizeof(struct i82593_conf_block));
243
 
244
        /* The configuration block.  What an undocumented nightmare.
245
           The first set of values are those suggested (without explanation)
246
           for ethernet in the Intel 82586 databook.  The rest appear to be
247
           completely undocumented, except for cryptic notes in the Crynwr
248
           packet driver.  This driver uses the Crynwr values verbatim. */
249
 
250
        /* maz : Rewritten to take advantage of the wanvelan includes.
251
           At least we have names, not just blind values */
252
 
253
        /* Byte 0 */
254
        cfblk->fifo_limit = 10; /* = 16 B rx and 80 B tx fifo thresholds */
255
        cfblk->forgnesi = 0;     /* 0=82C501, 1=AMD7992B compatibility */
256
        cfblk->fifo_32 = 1;
257
        cfblk->d6mod = 0;        /* Run in i82593 advanced mode */
258
        cfblk->throttle_enb = 1;
259
 
260
        /* Byte 1 */
261
        cfblk->throttle = 8;    /* Continuous w/interrupts, 128-clock DMA. */
262
        cfblk->cntrxint = 0;     /* enable continuous mode receive interrupts */
263
        cfblk->contin = 1;      /* enable continuous mode */
264
 
265
        /* Byte 2 */
266
        cfblk->addr_len = ETH_ALEN;
267
        cfblk->acloc = 1;       /* Disable source addr insertion by i82593 */
268
        cfblk->preamb_len = 2;  /* 8 bytes preamble */
269
        cfblk->loopback = 0;     /* Loopback off */
270
 
271
        /* Byte 3 */
272
        cfblk->lin_prio = 0;     /* Default priorities & backoff methods. */
273
        cfblk->tbofstop = 0;
274
        cfblk->exp_prio = 0;
275
        cfblk->bof_met = 0;
276
 
277
        /* Byte 4 */
278
        cfblk->ifrm_spc = 6;    /* 96 bit times interframe spacing */
279
 
280
        /* Byte 5 */
281
        cfblk->slottim_low = 0; /* 512 bit times slot time (low) */
282
 
283
        /* Byte 6 */
284
        cfblk->slottim_hi = 2;  /* 512 bit times slot time (high) */
285
        cfblk->max_retr = 15;   /* 15 collisions retries */
286
 
287
        /* Byte 7 */
288
        cfblk->prmisc = ((dev->flags & IFF_PROMISC) ? 1 : 0); /* Promiscuous mode */
289
        cfblk->bc_dis = 0;       /* Enable broadcast reception */
290
        cfblk->crs_1 = 0;        /* Don't transmit without carrier sense */
291
        cfblk->nocrc_ins = 0;    /* i82593 generates CRC */
292
        cfblk->crc_1632 = 0;     /* 32-bit Autodin-II CRC */
293
        cfblk->crs_cdt = 0;      /* CD not to be interpreted as CS */
294
 
295
        /* Byte 8 */
296
        cfblk->cs_filter = 0;    /* CS is recognized immediately */
297
        cfblk->crs_src = 0;      /* External carrier sense */
298
        cfblk->cd_filter = 0;    /* CD is recognized immediately */
299
 
300
        /* Byte 9 */
301
        cfblk->min_fr_len = ETH_ZLEN >> 2; /* Minimum frame length */
302
 
303
        /* Byte A */
304
        cfblk->lng_typ = 1;     /* Type/length checks OFF */
305
        cfblk->lng_fld = 1;     /* Disable 802.3 length field check */
306
        cfblk->rxcrc_xf = 1;    /* Don't transfer CRC to memory */
307
        cfblk->artx = 1;        /* Disable automatic retransmission */
308
        cfblk->sarec = 1;       /* Disable source addr trig of CD */
309
        cfblk->tx_jabber = 0;    /* Disable jabber jam sequence */
310
        cfblk->hash_1 = 1;      /* Use bits 0-5 in mc address hash */
311
        cfblk->lbpkpol = 0;      /* Loopback pin active high */
312
 
313
        /* Byte B */
314
        cfblk->fdx = 0;          /* Disable full duplex operation */
315
 
316
        /* Byte C */
317
        cfblk->dummy_6 = 0x3f;  /* all ones, Default multicast addresses & backoff. */
318
        cfblk->mult_ia = 0;      /* No multiple individual addresses */
319
        cfblk->dis_bof = 0;      /* Disable the backoff algorithm ?! */
320
 
321
        /* Byte D */
322
        cfblk->dummy_1 = 1;     /* set to 1 */
323
        cfblk->tx_ifs_retrig = 3; /* Hmm... Disabled */
324
        cfblk->mc_all = (dev->mc_list || (dev->flags&IFF_ALLMULTI));/* multicast all mode */
325
        cfblk->rcv_mon = 0;      /* Monitor mode disabled */
326
        cfblk->frag_acpt = 0;    /* Do not accept fragments */
327
        cfblk->tstrttrs = 0;     /* No start transmission threshold */
328
 
329
        /* Byte E */
330
        cfblk->fretx = 1;       /* FIFO automatic retransmission */
331
        cfblk->runt_eop = 0;     /* drop "runt" packets */
332
        cfblk->hw_sw_pin = 0;    /* ?? */
333
        cfblk->big_endn = 0;     /* Big Endian ? no... */
334
        cfblk->syncrqs = 1;     /* Synchronous DRQ deassertion... */
335
        cfblk->sttlen = 1;      /* 6 byte status registers */
336
        cfblk->rx_eop = 0;       /* Signal EOP on packet reception */
337
        cfblk->tx_eop = 0;       /* Signal EOP on packet transmission */
338
 
339
        /* Byte F */
340
        cfblk->rbuf_size = RX_BUF_SIZE >> 12; /* Set receive buffer size */
341
        cfblk->rcvstop = 1;     /* Enable Receive Stop Register */
342
 
343
        if (znet_debug > 2) {
344
                int i;
345
                unsigned char *c;
346
 
347
                for (i = 0, c = (char *) cfblk; i < sizeof (*cfblk); i++)
348
                        printk ("%02X ", c[i]);
349
                printk ("\n");
350
        }
351
 
352
        *znet->tx_cur++ = sizeof(struct i82593_conf_block);
353
        memcpy(znet->tx_cur, cfblk, sizeof(struct i82593_conf_block));
354
        znet->tx_cur += sizeof(struct i82593_conf_block)/2;
355
        outb(OP0_CONFIGURE | CR0_CHNL, ioaddr);
356
 
357
        /* XXX FIXME maz : Add multicast addresses here, so having a
358
         * multicast address configured isn't equal to IFF_ALLMULTI */
359
}
360
 
361
/* The Z-Note probe is pretty easy.  The NETIDBLK exists in the safe-to-probe
362
   BIOS area.  We just scan for the signature, and pull the vital parameters
363
   out of the structure. */
364
 
365
static int __init znet_probe (void)
366
{
367
        int i;
368
        struct netidblk *netinfo;
369
        struct znet_private *znet;
370
        struct net_device *dev;
371
        char *p;
372
        int err = -ENOMEM;
373
        DECLARE_MAC_BUF(mac);
374
 
375
        /* This code scans the region 0xf0000 to 0xfffff for a "NETIDBLK". */
376
        for(p = (char *)phys_to_virt(0xf0000); p < (char *)phys_to_virt(0x100000); p++)
377
                if (*p == 'N'  &&  strncmp(p, "NETIDBLK", 8) == 0)
378
                        break;
379
 
380
        if (p >= (char *)phys_to_virt(0x100000)) {
381
                if (znet_debug > 1)
382
                        printk(KERN_INFO "No Z-Note ethernet adaptor found.\n");
383
                return -ENODEV;
384
        }
385
 
386
        dev = alloc_etherdev(sizeof(struct znet_private));
387
        if (!dev)
388
                return -ENOMEM;
389
 
390
        znet = dev->priv;
391
 
392
        netinfo = (struct netidblk *)p;
393
        dev->base_addr = netinfo->iobase1;
394
        dev->irq = netinfo->irq1;
395
 
396
        /* The station address is in the "netidblk" at 0x0f0000. */
397
        for (i = 0; i < 6; i++)
398
                dev->dev_addr[i] = netinfo->netid[i];
399
 
400
        printk(KERN_INFO "%s: ZNET at %#3lx, %s"
401
               ", using IRQ %d DMA %d and %d.\n",
402
               dev->name, dev->base_addr, print_mac(mac, dev->dev_addr),
403
               dev->irq, netinfo->dma1, netinfo->dma2);
404
 
405
        if (znet_debug > 1) {
406
                printk(KERN_INFO "%s: vendor '%16.16s' IRQ1 %d IRQ2 %d DMA1 %d DMA2 %d.\n",
407
                       dev->name, netinfo->vendor,
408
                       netinfo->irq1, netinfo->irq2,
409
                       netinfo->dma1, netinfo->dma2);
410
                printk(KERN_INFO "%s: iobase1 %#x size %d iobase2 %#x size %d net type %2.2x.\n",
411
                       dev->name, netinfo->iobase1, netinfo->iosize1,
412
                       netinfo->iobase2, netinfo->iosize2, netinfo->nettype);
413
        }
414
 
415
        if (znet_debug > 0)
416
                printk(KERN_INFO "%s", version);
417
 
418
        znet->rx_dma = netinfo->dma1;
419
        znet->tx_dma = netinfo->dma2;
420
        spin_lock_init(&znet->lock);
421
        znet->sia_base = 0xe6;  /* Magic address for the 82501 SIA */
422
        znet->sia_size = 2;
423
        /* maz: Despite the '593 being advertised above as using a
424
         * single 8bits I/O port, this driver does many 16bits
425
         * access. So set io_size accordingly */
426
        znet->io_size  = 2;
427
 
428
        if (!(znet->rx_start = kmalloc (DMA_BUF_SIZE, GFP_KERNEL | GFP_DMA)))
429
                goto free_dev;
430
        if (!(znet->tx_start = kmalloc (DMA_BUF_SIZE, GFP_KERNEL | GFP_DMA)))
431
                goto free_rx;
432
 
433
        if (!dma_page_eq (znet->rx_start, znet->rx_start + (RX_BUF_SIZE/2-1)) ||
434
            !dma_page_eq (znet->tx_start, znet->tx_start + (TX_BUF_SIZE/2-1))) {
435
                printk (KERN_WARNING "tx/rx crossing DMA frontiers, giving up\n");
436
                goto free_tx;
437
        }
438
 
439
        znet->rx_end = znet->rx_start + RX_BUF_SIZE/2;
440
        znet->tx_buf_len = TX_BUF_SIZE/2;
441
        znet->tx_end = znet->tx_start + znet->tx_buf_len;
442
 
443
        /* The ZNET-specific entries in the device structure. */
444
        dev->open = &znet_open;
445
        dev->hard_start_xmit = &znet_send_packet;
446
        dev->stop = &znet_close;
447
        dev->set_multicast_list = &znet_set_multicast_list;
448
        dev->tx_timeout = znet_tx_timeout;
449
        dev->watchdog_timeo = TX_TIMEOUT;
450
        err = register_netdev(dev);
451
        if (err)
452
                goto free_tx;
453
        znet_dev = dev;
454
        return 0;
455
 
456
 free_tx:
457
        kfree(znet->tx_start);
458
 free_rx:
459
        kfree(znet->rx_start);
460
 free_dev:
461
        free_netdev(dev);
462
        return err;
463
}
464
 
465
 
466
static int znet_open(struct net_device *dev)
467
{
468
        int ioaddr = dev->base_addr;
469
 
470
        if (znet_debug > 2)
471
                printk(KERN_DEBUG "%s: znet_open() called.\n", dev->name);
472
 
473
        /* These should never fail.  You can't add devices to a sealed box! */
474
        if (znet_request_resources (dev)) {
475
                printk(KERN_WARNING "%s: Not opened -- resource busy?!?\n", dev->name);
476
                return -EBUSY;
477
        }
478
 
479
        znet_transceiver_power (dev, 1);
480
 
481
        /* According to the Crynwr driver we should wait 50 msec. for the
482
           LAN clock to stabilize.  My experiments indicates that the '593 can
483
           be initialized immediately.  The delay is probably needed for the
484
           DC-to-DC converter to come up to full voltage, and for the oscillator
485
           to be spot-on at 20Mhz before transmitting.
486
           Until this proves to be a problem we rely on the higher layers for the
487
           delay and save allocating a timer entry. */
488
 
489
        /* maz : Well, I'm getting every time the following message
490
         * without the delay on a 486@33. This machine is much too
491
         * fast... :-) So maybe the Crynwr driver wasn't wrong after
492
         * all, even if the message is completly harmless on my
493
         * setup. */
494
        mdelay (50);
495
 
496
        /* This follows the packet driver's lead, and checks for success. */
497
        if (inb(ioaddr) != 0x10 && inb(ioaddr) != 0x00)
498
                printk(KERN_WARNING "%s: Problem turning on the transceiver power.\n",
499
                       dev->name);
500
 
501
        hardware_init(dev);
502
        netif_start_queue (dev);
503
 
504
        return 0;
505
}
506
 
507
 
508
static void znet_tx_timeout (struct net_device *dev)
509
{
510
        int ioaddr = dev->base_addr;
511
        ushort event, tx_status, rx_offset, state;
512
 
513
        outb (CR0_STATUS_0, ioaddr);
514
        event = inb (ioaddr);
515
        outb (CR0_STATUS_1, ioaddr);
516
        tx_status = inw (ioaddr);
517
        outb (CR0_STATUS_2, ioaddr);
518
        rx_offset = inw (ioaddr);
519
        outb (CR0_STATUS_3, ioaddr);
520
        state = inb (ioaddr);
521
        printk (KERN_WARNING "%s: transmit timed out, status %02x %04x %04x %02x,"
522
         " resetting.\n", dev->name, event, tx_status, rx_offset, state);
523
        if (tx_status == TX_LOST_CRS)
524
                printk (KERN_WARNING "%s: Tx carrier error, check transceiver cable.\n",
525
                        dev->name);
526
        outb (OP0_RESET, ioaddr);
527
        hardware_init (dev);
528
        netif_wake_queue (dev);
529
}
530
 
531
static int znet_send_packet(struct sk_buff *skb, struct net_device *dev)
532
{
533
        int ioaddr = dev->base_addr;
534
        struct znet_private *znet = dev->priv;
535
        unsigned long flags;
536
        short length = skb->len;
537
 
538
        if (znet_debug > 4)
539
                printk(KERN_DEBUG "%s: ZNet_send_packet.\n", dev->name);
540
 
541
        if (length < ETH_ZLEN) {
542
                if (skb_padto(skb, ETH_ZLEN))
543
                        return 0;
544
                length = ETH_ZLEN;
545
        }
546
 
547
        netif_stop_queue (dev);
548
 
549
        /* Check that the part hasn't reset itself, probably from suspend. */
550
        outb(CR0_STATUS_0, ioaddr);
551
        if (inw(ioaddr) == 0x0010 &&
552
            inw(ioaddr) == 0x0000 &&
553
            inw(ioaddr) == 0x0010) {
554
                if (znet_debug > 1)
555
                        printk (KERN_WARNING "%s : waking up\n", dev->name);
556
                hardware_init(dev);
557
                znet_transceiver_power (dev, 1);
558
        }
559
 
560
        if (1) {
561
                unsigned char *buf = (void *)skb->data;
562
                ushort *tx_link = znet->tx_cur - 1;
563
                ushort rnd_len = (length + 1)>>1;
564
 
565
                dev->stats.tx_bytes+=length;
566
 
567
                if (znet->tx_cur >= znet->tx_end)
568
                  znet->tx_cur = znet->tx_start;
569
                *znet->tx_cur++ = length;
570
                if (znet->tx_cur + rnd_len + 1 > znet->tx_end) {
571
                        int semi_cnt = (znet->tx_end - znet->tx_cur)<<1; /* Cvrt to byte cnt. */
572
                        memcpy(znet->tx_cur, buf, semi_cnt);
573
                        rnd_len -= semi_cnt>>1;
574
                        memcpy(znet->tx_start, buf + semi_cnt, length - semi_cnt);
575
                        znet->tx_cur = znet->tx_start + rnd_len;
576
                } else {
577
                        memcpy(znet->tx_cur, buf, skb->len);
578
                        znet->tx_cur += rnd_len;
579
                }
580
                *znet->tx_cur++ = 0;
581
 
582
                spin_lock_irqsave(&znet->lock, flags);
583
                {
584
                        *tx_link = OP0_TRANSMIT | CR0_CHNL;
585
                        /* Is this always safe to do? */
586
                        outb(OP0_TRANSMIT | CR0_CHNL, ioaddr);
587
                }
588
                spin_unlock_irqrestore (&znet->lock, flags);
589
 
590
                dev->trans_start = jiffies;
591
                netif_start_queue (dev);
592
 
593
                if (znet_debug > 4)
594
                  printk(KERN_DEBUG "%s: Transmitter queued, length %d.\n", dev->name, length);
595
        }
596
        dev_kfree_skb(skb);
597
        return 0;
598
}
599
 
600
/* The ZNET interrupt handler. */
601
static irqreturn_t znet_interrupt(int irq, void *dev_id)
602
{
603
        struct net_device *dev = dev_id;
604
        struct znet_private *znet = dev->priv;
605
        int ioaddr;
606
        int boguscnt = 20;
607
        int handled = 0;
608
 
609
        spin_lock (&znet->lock);
610
 
611
        ioaddr = dev->base_addr;
612
 
613
        outb(CR0_STATUS_0, ioaddr);
614
        do {
615
                ushort status = inb(ioaddr);
616
                if (znet_debug > 5) {
617
                        ushort result, rx_ptr, running;
618
                        outb(CR0_STATUS_1, ioaddr);
619
                        result = inw(ioaddr);
620
                        outb(CR0_STATUS_2, ioaddr);
621
                        rx_ptr = inw(ioaddr);
622
                        outb(CR0_STATUS_3, ioaddr);
623
                        running = inb(ioaddr);
624
                        printk(KERN_DEBUG "%s: interrupt, status %02x, %04x %04x %02x serial %d.\n",
625
                                 dev->name, status, result, rx_ptr, running, boguscnt);
626
                }
627
                if ((status & SR0_INTERRUPT) == 0)
628
                        break;
629
 
630
                handled = 1;
631
 
632
                if ((status & SR0_EVENT_MASK) == SR0_TRANSMIT_DONE ||
633
                    (status & SR0_EVENT_MASK) == SR0_RETRANSMIT_DONE ||
634
                    (status & SR0_EVENT_MASK) == SR0_TRANSMIT_NO_CRC_DONE) {
635
                        int tx_status;
636
                        outb(CR0_STATUS_1, ioaddr);
637
                        tx_status = inw(ioaddr);
638
                        /* It's undocumented, but tx_status seems to match the i82586. */
639
                        if (tx_status & TX_OK) {
640
                                dev->stats.tx_packets++;
641
                                dev->stats.collisions += tx_status & TX_NCOL_MASK;
642
                        } else {
643
                                if (tx_status & (TX_LOST_CTS | TX_LOST_CRS))
644
                                        dev->stats.tx_carrier_errors++;
645
                                if (tx_status & TX_UND_RUN)
646
                                        dev->stats.tx_fifo_errors++;
647
                                if (!(tx_status & TX_HRT_BEAT))
648
                                        dev->stats.tx_heartbeat_errors++;
649
                                if (tx_status & TX_MAX_COL)
650
                                        dev->stats.tx_aborted_errors++;
651
                                /* ...and the catch-all. */
652
                                if ((tx_status | (TX_LOST_CRS | TX_LOST_CTS | TX_UND_RUN | TX_HRT_BEAT | TX_MAX_COL)) != (TX_LOST_CRS | TX_LOST_CTS | TX_UND_RUN | TX_HRT_BEAT | TX_MAX_COL))
653
                                        dev->stats.tx_errors++;
654
 
655
                                /* Transceiver may be stuck if cable
656
                                 * was removed while emiting a
657
                                 * packet. Flip it off, then on to
658
                                 * reset it. This is very empirical,
659
                                 * but it seems to work. */
660
 
661
                                znet_transceiver_power (dev, 0);
662
                                znet_transceiver_power (dev, 1);
663
                        }
664
                        netif_wake_queue (dev);
665
                }
666
 
667
                if ((status & SR0_RECEPTION) ||
668
                    (status & SR0_EVENT_MASK) == SR0_STOP_REG_HIT) {
669
                        znet_rx(dev);
670
                }
671
                /* Clear the interrupts we've handled. */
672
                outb(CR0_INT_ACK, ioaddr);
673
        } while (boguscnt--);
674
 
675
        spin_unlock (&znet->lock);
676
 
677
        return IRQ_RETVAL(handled);
678
}
679
 
680
static void znet_rx(struct net_device *dev)
681
{
682
        struct znet_private *znet = dev->priv;
683
        int ioaddr = dev->base_addr;
684
        int boguscount = 1;
685
        short next_frame_end_offset = 0;                 /* Offset of next frame start. */
686
        short *cur_frame_end;
687
        short cur_frame_end_offset;
688
 
689
        outb(CR0_STATUS_2, ioaddr);
690
        cur_frame_end_offset = inw(ioaddr);
691
 
692
        if (cur_frame_end_offset == znet->rx_cur - znet->rx_start) {
693
                printk(KERN_WARNING "%s: Interrupted, but nothing to receive, offset %03x.\n",
694
                           dev->name, cur_frame_end_offset);
695
                return;
696
        }
697
 
698
        /* Use same method as the Crynwr driver: construct a forward list in
699
           the same area of the backwards links we now have.  This allows us to
700
           pass packets to the upper layers in the order they were received --
701
           important for fast-path sequential operations. */
702
         while (znet->rx_start + cur_frame_end_offset != znet->rx_cur
703
                        && ++boguscount < 5) {
704
                unsigned short hi_cnt, lo_cnt, hi_status, lo_status;
705
                int count, status;
706
 
707
                if (cur_frame_end_offset < 4) {
708
                        /* Oh no, we have a special case: the frame trailer wraps around
709
                           the end of the ring buffer.  We've saved space at the end of
710
                           the ring buffer for just this problem. */
711
                        memcpy(znet->rx_end, znet->rx_start, 8);
712
                        cur_frame_end_offset += (RX_BUF_SIZE/2);
713
                }
714
                cur_frame_end = znet->rx_start + cur_frame_end_offset - 4;
715
 
716
                lo_status = *cur_frame_end++;
717
                hi_status = *cur_frame_end++;
718
                status = ((hi_status & 0xff) << 8) + (lo_status & 0xff);
719
                lo_cnt = *cur_frame_end++;
720
                hi_cnt = *cur_frame_end++;
721
                count = ((hi_cnt & 0xff) << 8) + (lo_cnt & 0xff);
722
 
723
                if (znet_debug > 5)
724
                  printk(KERN_DEBUG "Constructing trailer at location %03x, %04x %04x %04x %04x"
725
                                 " count %#x status %04x.\n",
726
                                 cur_frame_end_offset<<1, lo_status, hi_status, lo_cnt, hi_cnt,
727
                                 count, status);
728
                cur_frame_end[-4] = status;
729
                cur_frame_end[-3] = next_frame_end_offset;
730
                cur_frame_end[-2] = count;
731
                next_frame_end_offset = cur_frame_end_offset;
732
                cur_frame_end_offset -= ((count + 1)>>1) + 3;
733
                if (cur_frame_end_offset < 0)
734
                  cur_frame_end_offset += RX_BUF_SIZE/2;
735
        };
736
 
737
        /* Now step  forward through the list. */
738
        do {
739
                ushort *this_rfp_ptr = znet->rx_start + next_frame_end_offset;
740
                int status = this_rfp_ptr[-4];
741
                int pkt_len = this_rfp_ptr[-2];
742
 
743
                if (znet_debug > 5)
744
                  printk(KERN_DEBUG "Looking at trailer ending at %04x status %04x length %03x"
745
                                 " next %04x.\n", next_frame_end_offset<<1, status, pkt_len,
746
                                 this_rfp_ptr[-3]<<1);
747
                /* Once again we must assume that the i82586 docs apply. */
748
                if ( ! (status & RX_RCV_OK)) { /* There was an error. */
749
                        dev->stats.rx_errors++;
750
                        if (status & RX_CRC_ERR) dev->stats.rx_crc_errors++;
751
                        if (status & RX_ALG_ERR) dev->stats.rx_frame_errors++;
752
#if 0
753
                        if (status & 0x0200) dev->stats.rx_over_errors++; /* Wrong. */
754
                        if (status & 0x0100) dev->stats.rx_fifo_errors++;
755
#else
756
                        /* maz : Wild guess... */
757
                        if (status & RX_OVRRUN) dev->stats.rx_over_errors++;
758
#endif
759
                        if (status & RX_SRT_FRM) dev->stats.rx_length_errors++;
760
                } else if (pkt_len > 1536) {
761
                        dev->stats.rx_length_errors++;
762
                } else {
763
                        /* Malloc up new buffer. */
764
                        struct sk_buff *skb;
765
 
766
                        skb = dev_alloc_skb(pkt_len);
767
                        if (skb == NULL) {
768
                                if (znet_debug)
769
                                  printk(KERN_WARNING "%s: Memory squeeze, dropping packet.\n", dev->name);
770
                                dev->stats.rx_dropped++;
771
                                break;
772
                        }
773
 
774
                        if (&znet->rx_cur[(pkt_len+1)>>1] > znet->rx_end) {
775
                                int semi_cnt = (znet->rx_end - znet->rx_cur)<<1;
776
                                memcpy(skb_put(skb,semi_cnt), znet->rx_cur, semi_cnt);
777
                                memcpy(skb_put(skb,pkt_len-semi_cnt), znet->rx_start,
778
                                           pkt_len - semi_cnt);
779
                        } else {
780
                                memcpy(skb_put(skb,pkt_len), znet->rx_cur, pkt_len);
781
                                if (znet_debug > 6) {
782
                                        unsigned int *packet = (unsigned int *) skb->data;
783
                                        printk(KERN_DEBUG "Packet data is %08x %08x %08x %08x.\n", packet[0],
784
                                                   packet[1], packet[2], packet[3]);
785
                                }
786
                  }
787
                  skb->protocol=eth_type_trans(skb,dev);
788
                  netif_rx(skb);
789
                  dev->last_rx = jiffies;
790
                  dev->stats.rx_packets++;
791
                  dev->stats.rx_bytes += pkt_len;
792
                }
793
                znet->rx_cur = this_rfp_ptr;
794
                if (znet->rx_cur >= znet->rx_end)
795
                        znet->rx_cur -= RX_BUF_SIZE/2;
796
                update_stop_hit(ioaddr, (znet->rx_cur - znet->rx_start)<<1);
797
                next_frame_end_offset = this_rfp_ptr[-3];
798
                if (next_frame_end_offset == 0)          /* Read all the frames? */
799
                        break;                  /* Done for now */
800
                this_rfp_ptr = znet->rx_start + next_frame_end_offset;
801
        } while (--boguscount);
802
 
803
        /* If any worth-while packets have been received, dev_rint()
804
           has done a mark_bh(INET_BH) for us and will work on them
805
           when we get to the bottom-half routine. */
806
        return;
807
}
808
 
809
/* The inverse routine to znet_open(). */
810
static int znet_close(struct net_device *dev)
811
{
812
        int ioaddr = dev->base_addr;
813
 
814
        netif_stop_queue (dev);
815
 
816
        outb(OP0_RESET, ioaddr);                        /* CMD0_RESET */
817
 
818
        if (znet_debug > 1)
819
                printk(KERN_DEBUG "%s: Shutting down ethercard.\n", dev->name);
820
        /* Turn off transceiver power. */
821
        znet_transceiver_power (dev, 0);
822
 
823
        znet_release_resources (dev);
824
 
825
        return 0;
826
}
827
 
828
static void show_dma(struct net_device *dev)
829
{
830
        short ioaddr = dev->base_addr;
831
        unsigned char stat = inb (ioaddr);
832
        struct znet_private *znet = dev->priv;
833
        unsigned long flags;
834
        short dma_port = ((znet->tx_dma&3)<<2) + IO_DMA2_BASE;
835
        unsigned addr = inb(dma_port);
836
        short residue;
837
 
838
        addr |= inb(dma_port) << 8;
839
        residue = get_dma_residue(znet->tx_dma);
840
 
841
        if (znet_debug > 1) {
842
                flags=claim_dma_lock();
843
                printk(KERN_DEBUG "Stat:%02x Addr: %04x cnt:%3x\n",
844
                       stat, addr<<1, residue);
845
                release_dma_lock(flags);
846
        }
847
}
848
 
849
/* Initialize the hardware.  We have to do this when the board is open()ed
850
   or when we come out of suspend mode. */
851
static void hardware_init(struct net_device *dev)
852
{
853
        unsigned long flags;
854
        short ioaddr = dev->base_addr;
855
        struct znet_private *znet = dev->priv;
856
 
857
        znet->rx_cur = znet->rx_start;
858
        znet->tx_cur = znet->tx_start;
859
 
860
        /* Reset the chip, and start it up. */
861
        outb(OP0_RESET, ioaddr);
862
 
863
        flags=claim_dma_lock();
864
        disable_dma(znet->rx_dma);              /* reset by an interrupting task. */
865
        clear_dma_ff(znet->rx_dma);
866
        set_dma_mode(znet->rx_dma, DMA_RX_MODE);
867
        set_dma_addr(znet->rx_dma, (unsigned int) znet->rx_start);
868
        set_dma_count(znet->rx_dma, RX_BUF_SIZE);
869
        enable_dma(znet->rx_dma);
870
        /* Now set up the Tx channel. */
871
        disable_dma(znet->tx_dma);
872
        clear_dma_ff(znet->tx_dma);
873
        set_dma_mode(znet->tx_dma, DMA_TX_MODE);
874
        set_dma_addr(znet->tx_dma, (unsigned int) znet->tx_start);
875
        set_dma_count(znet->tx_dma, znet->tx_buf_len<<1);
876
        enable_dma(znet->tx_dma);
877
        release_dma_lock(flags);
878
 
879
        if (znet_debug > 1)
880
          printk(KERN_DEBUG "%s: Initializing the i82593, rx buf %p tx buf %p\n",
881
                         dev->name, znet->rx_start,znet->tx_start);
882
        /* Do an empty configure command, just like the Crynwr driver.  This
883
           resets to chip to its default values. */
884
        *znet->tx_cur++ = 0;
885
        *znet->tx_cur++ = 0;
886
        show_dma(dev);
887
        outb(OP0_CONFIGURE | CR0_CHNL, ioaddr);
888
 
889
        znet_set_multicast_list (dev);
890
 
891
        *znet->tx_cur++ = 6;
892
        memcpy(znet->tx_cur, dev->dev_addr, 6);
893
        znet->tx_cur += 3;
894
        show_dma(dev);
895
        outb(OP0_IA_SETUP | CR0_CHNL, ioaddr);
896
        show_dma(dev);
897
 
898
        update_stop_hit(ioaddr, 8192);
899
        if (znet_debug > 1)  printk(KERN_DEBUG "enabling Rx.\n");
900
        outb(OP0_RCV_ENABLE, ioaddr);
901
        netif_start_queue (dev);
902
}
903
 
904
static void update_stop_hit(short ioaddr, unsigned short rx_stop_offset)
905
{
906
        outb(OP0_SWIT_TO_PORT_1 | CR0_CHNL, ioaddr);
907
        if (znet_debug > 5)
908
          printk(KERN_DEBUG "Updating stop hit with value %02x.\n",
909
                         (rx_stop_offset >> 6) | CR1_STOP_REG_UPDATE);
910
        outb((rx_stop_offset >> 6) | CR1_STOP_REG_UPDATE, ioaddr);
911
        outb(OP1_SWIT_TO_PORT_0, ioaddr);
912
}
913
 
914
static __exit void znet_cleanup (void)
915
{
916
        if (znet_dev) {
917
                struct znet_private *znet = znet_dev->priv;
918
 
919
                unregister_netdev (znet_dev);
920
                kfree (znet->rx_start);
921
                kfree (znet->tx_start);
922
                free_netdev (znet_dev);
923
        }
924
}
925
 
926
module_init (znet_probe);
927
module_exit (znet_cleanup);

powered by: WebSVN 2.1.0

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