Subversion Repositories test_project

/*

 *  linux/drivers/acorn/net/ether3.c

 *

 *  Copyright (C) 1995-2000 Russell King

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License version 2 as

 * published by the Free Software Foundation.

 *

 * SEEQ nq8005 ethernet driver for Acorn/ANT Ether3 card

 *  for Acorn machines

 *

 * By Russell King, with some suggestions from borris@ant.co.uk

 *

 * Changelog:

 * 1.04 RMK     29/02/1996      Won't pass packets that are from our ethernet

 *                              address up to the higher levels - they're

 *                              silently ignored.  I/F can now be put into

 *                              multicast mode.  Receiver routine optimised.

 * 1.05 RMK     30/02/1996      Now claims interrupt at open when part of

 *                              the kernel rather than when a module.

 * 1.06 RMK     02/03/1996      Various code cleanups

 * 1.07 RMK     13/10/1996      Optimised interrupt routine and transmit

 *                              routines.

 * 1.08 RMK     14/10/1996      Fixed problem with too many packets,

 *                              prevented the kernel message about dropped

 *                              packets appearing too many times a second.

 *                              Now does not disable all IRQs, only the IRQ

 *                              used by this card.

 * 1.09 RMK     10/11/1996      Only enables TX irq when buffer space is low,

 *                              but we still service the TX queue if we get a

 *                              RX interrupt.

 * 1.10 RMK     15/07/1997      Fixed autoprobing of NQ8004.

 * 1.11 RMK     16/11/1997      Fixed autoprobing of NQ8005A.

 * 1.12 RMK     31/12/1997      Removed reference to dev_tint for Linux 2.1.

 *      RMK     27/06/1998      Changed asm/delay.h to linux/delay.h.

 * 1.13 RMK     29/06/1998      Fixed problem with transmission of packets.

 *                              Chip seems to have a bug in, whereby if the

 *                              packet starts two bytes from the end of the

 *                              buffer, it corrupts the receiver chain, and

 *                              never updates the transmit status correctly.

 * 1.14 RMK     07/01/1998      Added initial code for ETHERB addressing.

 * 1.15 RMK     30/04/1999      More fixes to the transmit routine for buggy

 *                              hardware.

 * 1.16 RMK     10/02/2000      Updated for 2.3.43

 * 1.17 RMK     13/05/2000      Updated for 2.3.99-pre8

 */

#include <linux/module.h>

#include <linux/kernel.h>

#include <linux/types.h>

#include <linux/fcntl.h>

#include <linux/interrupt.h>

#include <linux/ioport.h>

#include <linux/in.h>

#include <linux/slab.h>

#include <linux/string.h>

#include <linux/errno.h>

#include <linux/netdevice.h>

#include <linux/etherdevice.h>

#include <linux/skbuff.h>

#include <linux/device.h>

#include <linux/init.h>

#include <linux/delay.h>

#include <linux/bitops.h>

#include <asm/system.h>

#include <asm/ecard.h>

#include <asm/io.h>

static char version[] __devinitdata = "ether3 ethernet driver (c) 1995-2000 R.M.King v1.17\n";

#include "ether3.h"

static unsigned int net_debug = NET_DEBUG;

static void     ether3_setmulticastlist(struct net_device *dev);

static int      ether3_rx(struct net_device *dev, unsigned int maxcnt);

static void     ether3_tx(struct net_device *dev);

static int      ether3_open (struct net_device *dev);

static int      ether3_sendpacket (struct sk_buff *skb, struct net_device *dev);

static irqreturn_t ether3_interrupt (int irq, void *dev_id);

static int      ether3_close (struct net_device *dev);

static struct net_device_stats *ether3_getstats (struct net_device *dev);

static void     ether3_setmulticastlist (struct net_device *dev);

static void     ether3_timeout(struct net_device *dev);

#define BUS_16          2

#define BUS_8           1

#define BUS_UNKNOWN     0

/* --------------------------------------------------------------------------- */

typedef enum {

        buffer_write,

        buffer_read

} buffer_rw_t;

/*

 * ether3 read/write.  Slow things down a bit...

 * The SEEQ8005 doesn't like us writing to its registers

 * too quickly.

 */

static inline void ether3_outb(int v, const void __iomem *r)

{

        writeb(v, r);

        udelay(1);

}

static inline void ether3_outw(int v, const void __iomem *r)

{

        writew(v, r);

        udelay(1);

}

#define ether3_inb(r)           ({ unsigned int __v = readb((r)); udelay(1); __v; })

#define ether3_inw(r)           ({ unsigned int __v = readw((r)); udelay(1); __v; })

static int

ether3_setbuffer(struct net_device *dev, buffer_rw_t read, int start)

{

        int timeout = 1000;

        ether3_outw(priv(dev)->regs.config1 | CFG1_LOCBUFMEM, REG_CONFIG1);

        ether3_outw(priv(dev)->regs.command | CMD_FIFOWRITE, REG_COMMAND);

        while ((ether3_inw(REG_STATUS) & STAT_FIFOEMPTY) == 0) {

                if (!timeout--) {

                        printk("%s: setbuffer broken\n", dev->name);

                        priv(dev)->broken = 1;

                        return 1;

                }

                udelay(1);

        }

        if (read == buffer_read) {

                ether3_outw(start, REG_DMAADDR);

                ether3_outw(priv(dev)->regs.command | CMD_FIFOREAD, REG_COMMAND);

        } else {

                ether3_outw(priv(dev)->regs.command | CMD_FIFOWRITE, REG_COMMAND);

                ether3_outw(start, REG_DMAADDR);

        }

        return 0;

}

/*

 * write data to the buffer memory

 */

#define ether3_writebuffer(dev,data,length)                     \

        writesw(REG_BUFWIN, (data), (length) >> 1)

#define ether3_writeword(dev,data)                              \

        writew((data), REG_BUFWIN)

#define ether3_writelong(dev,data)      {                       \

        void __iomem *reg_bufwin = REG_BUFWIN;                  \

        writew((data), reg_bufwin);                             \

        writew((data) >> 16, reg_bufwin);                       \

}

/*

 * read data from the buffer memory

 */

#define ether3_readbuffer(dev,data,length)                      \

        readsw(REG_BUFWIN, (data), (length) >> 1)

#define ether3_readword(dev)                                    \

        readw(REG_BUFWIN)

#define ether3_readlong(dev)                                    \

        readw(REG_BUFWIN) | (readw(REG_BUFWIN) << 16)

/*

 * Switch LED off...

 */

static void ether3_ledoff(unsigned long data)

{

        struct net_device *dev = (struct net_device *)data;

        ether3_outw(priv(dev)->regs.config2 |= CFG2_CTRLO, REG_CONFIG2);

}

/*

 * switch LED on...

 */

static inline void ether3_ledon(struct net_device *dev)

{

        del_timer(&priv(dev)->timer);

        priv(dev)->timer.expires = jiffies + HZ / 50; /* leave on for 1/50th second */

        priv(dev)->timer.data = (unsigned long)dev;

        priv(dev)->timer.function = ether3_ledoff;

        add_timer(&priv(dev)->timer);

        if (priv(dev)->regs.config2 & CFG2_CTRLO)

                ether3_outw(priv(dev)->regs.config2 &= ~CFG2_CTRLO, REG_CONFIG2);

}

/*

 * Read the ethernet address string from the on board rom.

 * This is an ascii string!!!

 */

static int __devinit

ether3_addr(char *addr, struct expansion_card *ec)

{

        struct in_chunk_dir cd;

        char *s;

        if (ecard_readchunk(&cd, ec, 0xf5, 0) && (s = strchr(cd.d.string, '('))) {

                int i;

                for (i = 0; i<6; i++) {

                        addr[i] = simple_strtoul(s + 1, &s, 0x10);

                        if (*s != (i==5?')' : ':' ))

                                break;

                }

                if (i == 6)

                        return 0;

        }

        /* I wonder if we should even let the user continue in this case

         *   - no, it would be better to disable the device

         */

        printk(KERN_ERR "ether3: Couldn't read a valid MAC address from card.\n");

        return -ENODEV;

}

/* --------------------------------------------------------------------------- */

static int __devinit

ether3_ramtest(struct net_device *dev, unsigned char byte)

{

        unsigned char *buffer = kmalloc(RX_END, GFP_KERNEL);

        int i,ret = 0;

        int max_errors = 4;

        int bad = -1;

        if (!buffer)

                return 1;

        memset(buffer, byte, RX_END);

        ether3_setbuffer(dev, buffer_write, 0);

        ether3_writebuffer(dev, buffer, TX_END);

        ether3_setbuffer(dev, buffer_write, RX_START);

        ether3_writebuffer(dev, buffer + RX_START, RX_LEN);

        memset(buffer, byte ^ 0xff, RX_END);

        ether3_setbuffer(dev, buffer_read, 0);

        ether3_readbuffer(dev, buffer, TX_END);

        ether3_setbuffer(dev, buffer_read, RX_START);

        ether3_readbuffer(dev, buffer + RX_START, RX_LEN);

        for (i = 0; i < RX_END; i++) {

                if (buffer[i] != byte) {

                        if (max_errors > 0 && bad != buffer[i]) {

                                printk("%s: RAM failed with (%02X instead of %02X) at 0x%04X",

                                       dev->name, buffer[i], byte, i);

                                ret = 2;

                                max_errors--;

                                bad = i;

                        }

                } else {

                        if (bad != -1) {

                                if (bad != i - 1)

                                        printk(" - 0x%04X\n", i - 1);

                                printk("\n");

                                bad = -1;

                        }

                }

        }

        if (bad != -1)

                printk(" - 0xffff\n");

        kfree(buffer);

        return ret;

}

/* ------------------------------------------------------------------------------- */

static int __devinit ether3_init_2(struct net_device *dev)

{

        int i;

        priv(dev)->regs.config1 = CFG1_RECVCOMPSTAT0|CFG1_DMABURST8;

        priv(dev)->regs.config2 = CFG2_CTRLO|CFG2_RECVCRC|CFG2_ERRENCRC;

        priv(dev)->regs.command = 0;

        /*

         * Set up our hardware address

         */

        ether3_outw(priv(dev)->regs.config1 | CFG1_BUFSELSTAT0, REG_CONFIG1);

        for (i = 0; i < 6; i++)

                ether3_outb(dev->dev_addr[i], REG_BUFWIN);

        if (dev->flags & IFF_PROMISC)

                priv(dev)->regs.config1 |= CFG1_RECVPROMISC;

        else if (dev->flags & IFF_MULTICAST)

                priv(dev)->regs.config1 |= CFG1_RECVSPECBRMULTI;

        else

                priv(dev)->regs.config1 |= CFG1_RECVSPECBROAD;

        /*

         * There is a problem with the NQ8005 in that it occasionally loses the

         * last two bytes.  To get round this problem, we receive the CRC as

         * well.  That way, if we do lose the last two, then it doesn't matter.

         */

        ether3_outw(priv(dev)->regs.config1 | CFG1_TRANSEND, REG_CONFIG1);

        ether3_outw((TX_END>>8) - 1, REG_BUFWIN);

        ether3_outw(priv(dev)->rx_head, REG_RECVPTR);

        ether3_outw(0, REG_TRANSMITPTR);

        ether3_outw(priv(dev)->rx_head >> 8, REG_RECVEND);

        ether3_outw(priv(dev)->regs.config2, REG_CONFIG2);

        ether3_outw(priv(dev)->regs.config1 | CFG1_LOCBUFMEM, REG_CONFIG1);

        ether3_outw(priv(dev)->regs.command, REG_COMMAND);

        i = ether3_ramtest(dev, 0x5A);

        if(i)

                return i;

        i = ether3_ramtest(dev, 0x1E);

        if(i)

                return i;

        ether3_setbuffer(dev, buffer_write, 0);

        ether3_writelong(dev, 0);

        return 0;

}

static void

ether3_init_for_open(struct net_device *dev)

{

        int i;

        memset(&priv(dev)->stats, 0, sizeof(struct net_device_stats));

        /* Reset the chip */

        ether3_outw(CFG2_RESET, REG_CONFIG2);

        udelay(4);

        priv(dev)->regs.command = 0;

        ether3_outw(CMD_RXOFF|CMD_TXOFF, REG_COMMAND);

        while (ether3_inw(REG_STATUS) & (STAT_RXON|STAT_TXON))

                barrier();

        ether3_outw(priv(dev)->regs.config1 | CFG1_BUFSELSTAT0, REG_CONFIG1);

        for (i = 0; i < 6; i++)

                ether3_outb(dev->dev_addr[i], REG_BUFWIN);

        priv(dev)->tx_head      = 0;

        priv(dev)->tx_tail      = 0;

        priv(dev)->regs.config2 |= CFG2_CTRLO;

        priv(dev)->rx_head      = RX_START;

        ether3_outw(priv(dev)->regs.config1 | CFG1_TRANSEND, REG_CONFIG1);

        ether3_outw((TX_END>>8) - 1, REG_BUFWIN);

        ether3_outw(priv(dev)->rx_head, REG_RECVPTR);

        ether3_outw(priv(dev)->rx_head >> 8, REG_RECVEND);

        ether3_outw(0, REG_TRANSMITPTR);

        ether3_outw(priv(dev)->regs.config2, REG_CONFIG2);

        ether3_outw(priv(dev)->regs.config1 | CFG1_LOCBUFMEM, REG_CONFIG1);

        ether3_setbuffer(dev, buffer_write, 0);

        ether3_writelong(dev, 0);

        priv(dev)->regs.command = CMD_ENINTRX | CMD_ENINTTX;

        ether3_outw(priv(dev)->regs.command | CMD_RXON, REG_COMMAND);

}

static inline int

ether3_probe_bus_8(struct net_device *dev, int val)

{

        int write_low, write_high, read_low, read_high;

        write_low = val & 255;

        write_high = val >> 8;

        printk(KERN_DEBUG "ether3_probe: write8 [%02X:%02X]", write_high, write_low);

        ether3_outb(write_low, REG_RECVPTR);

        ether3_outb(write_high, REG_RECVPTR + 4);

        read_low = ether3_inb(REG_RECVPTR);

        read_high = ether3_inb(REG_RECVPTR + 4);

        printk(", read8 [%02X:%02X]\n", read_high, read_low);

        return read_low == write_low && read_high == write_high;

}

static inline int

ether3_probe_bus_16(struct net_device *dev, int val)

{

        int read_val;

        ether3_outw(val, REG_RECVPTR);

        read_val = ether3_inw(REG_RECVPTR);

        printk(KERN_DEBUG "ether3_probe: write16 [%04X], read16 [%04X]\n", val, read_val);

        return read_val == val;

}

/*

 * Open/initialize the board.  This is called (in the current kernel)

 * sometime after booting when the 'ifconfig' program is run.

 *

 * This routine should set everything up anew at each open, even

 * registers that "should" only need to be set once at boot, so that

 * there is non-reboot way to recover if something goes wrong.

 */

static int

ether3_open(struct net_device *dev)

{

        if (!is_valid_ether_addr(dev->dev_addr)) {

                printk(KERN_WARNING "%s: invalid ethernet MAC address\n",

                        dev->name);

                return -EINVAL;

        }

        if (request_irq(dev->irq, ether3_interrupt, 0, "ether3", dev))

                return -EAGAIN;

        ether3_init_for_open(dev);

        netif_start_queue(dev);

        return 0;

}

/*

 * The inverse routine to ether3_open().

 */

static int

ether3_close(struct net_device *dev)

{

        netif_stop_queue(dev);

        disable_irq(dev->irq);

        ether3_outw(CMD_RXOFF|CMD_TXOFF, REG_COMMAND);

        priv(dev)->regs.command = 0;

        while (ether3_inw(REG_STATUS) & (STAT_RXON|STAT_TXON))

                barrier();

        ether3_outb(0x80, REG_CONFIG2 + 4);

        ether3_outw(0, REG_COMMAND);

        free_irq(dev->irq, dev);

        return 0;

}

/*

 * Get the current statistics.  This may be called with the card open or

 * closed.

 */

static struct net_device_stats *ether3_getstats(struct net_device *dev)

{

        return &priv(dev)->stats;

}

/*

 * Set or clear promiscuous/multicast mode filter for this adaptor.

 *

 * We don't attempt any packet filtering.  The card may have a SEEQ 8004

 * in which does not have the other ethernet address registers present...

 */

static void ether3_setmulticastlist(struct net_device *dev)

{

        priv(dev)->regs.config1 &= ~CFG1_RECVPROMISC;

        if (dev->flags & IFF_PROMISC) {

                /* promiscuous mode */

                priv(dev)->regs.config1 |= CFG1_RECVPROMISC;

        } else if (dev->flags & IFF_ALLMULTI || dev->mc_count) {

                priv(dev)->regs.config1 |= CFG1_RECVSPECBRMULTI;

        } else

                priv(dev)->regs.config1 |= CFG1_RECVSPECBROAD;

        ether3_outw(priv(dev)->regs.config1 | CFG1_LOCBUFMEM, REG_CONFIG1);

}

static void ether3_timeout(struct net_device *dev)

{

        unsigned long flags;

        del_timer(&priv(dev)->timer);

        local_irq_save(flags);

        printk(KERN_ERR "%s: transmit timed out, network cable problem?\n", dev->name);

        printk(KERN_ERR "%s: state: { status=%04X cfg1=%04X cfg2=%04X }\n", dev->name,

                ether3_inw(REG_STATUS), ether3_inw(REG_CONFIG1), ether3_inw(REG_CONFIG2));

        printk(KERN_ERR "%s: { rpr=%04X rea=%04X tpr=%04X }\n", dev->name,

                ether3_inw(REG_RECVPTR), ether3_inw(REG_RECVEND), ether3_inw(REG_TRANSMITPTR));

        printk(KERN_ERR "%s: tx head=%X tx tail=%X\n", dev->name,

                priv(dev)->tx_head, priv(dev)->tx_tail);

        ether3_setbuffer(dev, buffer_read, priv(dev)->tx_tail);

        printk(KERN_ERR "%s: packet status = %08X\n", dev->name, ether3_readlong(dev));

        local_irq_restore(flags);

        priv(dev)->regs.config2 |= CFG2_CTRLO;

        priv(dev)->stats.tx_errors += 1;

        ether3_outw(priv(dev)->regs.config2, REG_CONFIG2);

        priv(dev)->tx_head = priv(dev)->tx_tail = 0;

        netif_wake_queue(dev);

}

/*

 * Transmit a packet

 */

static int

ether3_sendpacket(struct sk_buff *skb, struct net_device *dev)

{

        unsigned long flags;

        unsigned int length = ETH_ZLEN < skb->len ? skb->len : ETH_ZLEN;

        unsigned int ptr, next_ptr;

        if (priv(dev)->broken) {

                dev_kfree_skb(skb);

                priv(dev)->stats.tx_dropped ++;

                netif_start_queue(dev);

                return 0;

        }

        length = (length + 1) & ~1;

        if (length != skb->len) {

                if (skb_padto(skb, length))

                        goto out;

        }

        next_ptr = (priv(dev)->tx_head + 1) & 15;

        local_irq_save(flags);

        if (priv(dev)->tx_tail == next_ptr) {

                local_irq_restore(flags);

                return 1;       /* unable to queue */

        }

        dev->trans_start = jiffies;

        ptr              = 0x600 * priv(dev)->tx_head;

        priv(dev)->tx_head = next_ptr;

        next_ptr        *= 0x600;

#define TXHDR_FLAGS (TXHDR_TRANSMIT|TXHDR_CHAINCONTINUE|TXHDR_DATAFOLLOWS|TXHDR_ENSUCCESS)

        ether3_setbuffer(dev, buffer_write, next_ptr);

        ether3_writelong(dev, 0);

        ether3_setbuffer(dev, buffer_write, ptr);

        ether3_writelong(dev, 0);

        ether3_writebuffer(dev, skb->data, length);

        ether3_writeword(dev, htons(next_ptr));

        ether3_writeword(dev, TXHDR_CHAINCONTINUE >> 16);

        ether3_setbuffer(dev, buffer_write, ptr);

        ether3_writeword(dev, htons((ptr + length + 4)));

        ether3_writeword(dev, TXHDR_FLAGS >> 16);

        ether3_ledon(dev);

        if (!(ether3_inw(REG_STATUS) & STAT_TXON)) {

                ether3_outw(ptr, REG_TRANSMITPTR);

                ether3_outw(priv(dev)->regs.command | CMD_TXON, REG_COMMAND);

        }

        next_ptr = (priv(dev)->tx_head + 1) & 15;

        local_irq_restore(flags);

        dev_kfree_skb(skb);

        if (priv(dev)->tx_tail == next_ptr)

                netif_stop_queue(dev);

 out:

        return 0;

}

static irqreturn_t

ether3_interrupt(int irq, void *dev_id)

{

        struct net_device *dev = (struct net_device *)dev_id;

        unsigned int status, handled = IRQ_NONE;

#if NET_DEBUG > 1

        if(net_debug & DEBUG_INT)

                printk("eth3irq: %d ", irq);

#endif

        status = ether3_inw(REG_STATUS);

        if (status & STAT_INTRX) {

                ether3_outw(CMD_ACKINTRX | priv(dev)->regs.command, REG_COMMAND);

                ether3_rx(dev, 12);

                handled = IRQ_HANDLED;

        }

        if (status & STAT_INTTX) {

                ether3_outw(CMD_ACKINTTX | priv(dev)->regs.command, REG_COMMAND);

                ether3_tx(dev);

                handled = IRQ_HANDLED;

        }

#if NET_DEBUG > 1

        if(net_debug & DEBUG_INT)

                printk("done\n");

#endif

        return handled;

}

/*

 * If we have a good packet(s), get it/them out of the buffers.

 */

static int ether3_rx(struct net_device *dev, unsigned int maxcnt)

{

        unsigned int next_ptr = priv(dev)->rx_head, received = 0;

        ether3_ledon(dev);

        do {

                unsigned int this_ptr, status;

                unsigned char addrs[16];

                /*

                 * read the first 16 bytes from the buffer.

                 * This contains the status bytes etc and ethernet addresses,

                 * and we also check the source ethernet address to see if

                 * it originated from us.

                 */

                {

                        unsigned int temp_ptr;

                        ether3_setbuffer(dev, buffer_read, next_ptr);

                        temp_ptr = ether3_readword(dev);

                        status = ether3_readword(dev);

                        if ((status & (RXSTAT_DONE | RXHDR_CHAINCONTINUE | RXHDR_RECEIVE)) !=

                                (RXSTAT_DONE | RXHDR_CHAINCONTINUE) || !temp_ptr)

                                break;

                        this_ptr = next_ptr + 4;

                        next_ptr = ntohs(temp_ptr);

                }

                ether3_setbuffer(dev, buffer_read, this_ptr);

                ether3_readbuffer(dev, addrs+2, 12);

if (next_ptr < RX_START || next_ptr >= RX_END) {

 int i;

 printk("%s: bad next pointer @%04X: ", dev->name, priv(dev)->rx_head);

 printk("%02X %02X %02X %02X ", next_ptr >> 8, next_ptr & 255, status & 255, status >> 8);

 for (i = 2; i < 14; i++)

   printk("%02X ", addrs[i]);

 printk("\n");

 next_ptr = priv(dev)->rx_head;

 break;

}

                /*

                 * ignore our own packets...

                 */

                if (!(*(unsigned long *)&dev->dev_addr[0] ^ *(unsigned long *)&addrs[2+6]) &&