458 lines
13 KiB
C
458 lines
13 KiB
C
/*
|
|
lne390.c
|
|
|
|
Linux driver for Mylex LNE390 EISA Network Adapter
|
|
|
|
Copyright (C) 1996-1998, Paul Gortmaker.
|
|
|
|
This software may be used and distributed according to the terms
|
|
of the GNU General Public License, incorporated herein by reference.
|
|
|
|
Information and Code Sources:
|
|
|
|
1) Based upon framework of es3210 driver.
|
|
2) The existing myriad of other Linux 8390 drivers by Donald Becker.
|
|
3) Russ Nelson's asm packet driver provided additional info.
|
|
4) Info for getting IRQ and sh-mem gleaned from the EISA cfg files.
|
|
|
|
The LNE390 is an EISA shared memory NS8390 implementation. Note
|
|
that all memory copies to/from the board must be 32bit transfers.
|
|
There are two versions of the card: the lne390a and the lne390b.
|
|
Going by the EISA cfg files, the "a" has jumpers to select between
|
|
BNC/AUI, but the "b" also has RJ-45 and selection is via the SCU.
|
|
The shared memory address selection is also slightly different.
|
|
Note that shared memory address > 1MB are supported with this driver.
|
|
|
|
You can try <http://www.mylex.com> if you want more info, as I've
|
|
never even seen one of these cards. :)
|
|
|
|
Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 2000/09/01
|
|
- get rid of check_region
|
|
- no need to check if dev == NULL in lne390_probe1
|
|
*/
|
|
|
|
static const char *version =
|
|
"lne390.c: Driver revision v0.99.1, 01/09/2000\n";
|
|
|
|
#include <linux/module.h>
|
|
#include <linux/eisa.h>
|
|
#include <linux/kernel.h>
|
|
#include <linux/errno.h>
|
|
#include <linux/string.h>
|
|
#include <linux/delay.h>
|
|
#include <linux/init.h>
|
|
#include <linux/netdevice.h>
|
|
#include <linux/etherdevice.h>
|
|
|
|
#include <asm/io.h>
|
|
#include <asm/system.h>
|
|
|
|
#include "8390.h"
|
|
|
|
#define DRV_NAME "lne390"
|
|
|
|
static int lne390_probe1(struct net_device *dev, int ioaddr);
|
|
|
|
static int lne390_open(struct net_device *dev);
|
|
static int lne390_close(struct net_device *dev);
|
|
|
|
static void lne390_reset_8390(struct net_device *dev);
|
|
|
|
static void lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page);
|
|
static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset);
|
|
static void lne390_block_output(struct net_device *dev, int count, const unsigned char *buf, const int start_page);
|
|
|
|
#define LNE390_START_PG 0x00 /* First page of TX buffer */
|
|
#define LNE390_STOP_PG 0x80 /* Last page +1 of RX ring */
|
|
|
|
#define LNE390_ID_PORT 0xc80 /* Same for all EISA cards */
|
|
#define LNE390_IO_EXTENT 0x20
|
|
#define LNE390_SA_PROM 0x16 /* Start of e'net addr. */
|
|
#define LNE390_RESET_PORT 0xc84 /* From the pkt driver source */
|
|
#define LNE390_NIC_OFFSET 0x00 /* Hello, the 8390 is *here* */
|
|
|
|
#define LNE390_ADDR0 0x00 /* 3 byte vendor prefix */
|
|
#define LNE390_ADDR1 0x80
|
|
#define LNE390_ADDR2 0xe5
|
|
|
|
#define LNE390_ID0 0x10009835 /* 0x3598 = 01101 01100 11000 = mlx */
|
|
#define LNE390_ID1 0x11009835 /* above is the 390A, this is 390B */
|
|
|
|
#define LNE390_CFG1 0xc84 /* NB: 0xc84 is also "reset" port. */
|
|
#define LNE390_CFG2 0xc90
|
|
|
|
/*
|
|
* You can OR any of the following bits together and assign it
|
|
* to LNE390_DEBUG to get verbose driver info during operation.
|
|
* Currently only the probe one is implemented.
|
|
*/
|
|
|
|
#define LNE390_D_PROBE 0x01
|
|
#define LNE390_D_RX_PKT 0x02
|
|
#define LNE390_D_TX_PKT 0x04
|
|
#define LNE390_D_IRQ 0x08
|
|
|
|
#define LNE390_DEBUG 0
|
|
|
|
static unsigned char irq_map[] __initdata = {15, 12, 11, 10, 9, 7, 5, 3};
|
|
static unsigned int shmem_mapA[] __initdata = {0xff, 0xfe, 0xfd, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
|
|
static unsigned int shmem_mapB[] __initdata = {0xff, 0xfe, 0x0e, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
|
|
|
|
/*
|
|
* Probe for the card. The best way is to read the EISA ID if it
|
|
* is known. Then we can check the prefix of the station address
|
|
* PROM for a match against the value assigned to Mylex.
|
|
*/
|
|
|
|
static int __init do_lne390_probe(struct net_device *dev)
|
|
{
|
|
unsigned short ioaddr = dev->base_addr;
|
|
int irq = dev->irq;
|
|
int mem_start = dev->mem_start;
|
|
int ret;
|
|
|
|
SET_MODULE_OWNER(dev);
|
|
|
|
if (ioaddr > 0x1ff) { /* Check a single specified location. */
|
|
if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
|
|
return -EBUSY;
|
|
ret = lne390_probe1(dev, ioaddr);
|
|
if (ret)
|
|
release_region(ioaddr, LNE390_IO_EXTENT);
|
|
return ret;
|
|
}
|
|
else if (ioaddr > 0) /* Don't probe at all. */
|
|
return -ENXIO;
|
|
|
|
if (!EISA_bus) {
|
|
#if LNE390_DEBUG & LNE390_D_PROBE
|
|
printk("lne390-debug: Not an EISA bus. Not probing high ports.\n");
|
|
#endif
|
|
return -ENXIO;
|
|
}
|
|
|
|
/* EISA spec allows for up to 16 slots, but 8 is typical. */
|
|
for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
|
|
if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
|
|
continue;
|
|
if (lne390_probe1(dev, ioaddr) == 0)
|
|
return 0;
|
|
release_region(ioaddr, LNE390_IO_EXTENT);
|
|
dev->irq = irq;
|
|
dev->mem_start = mem_start;
|
|
}
|
|
|
|
return -ENODEV;
|
|
}
|
|
|
|
#ifndef MODULE
|
|
struct net_device * __init lne390_probe(int unit)
|
|
{
|
|
struct net_device *dev = alloc_ei_netdev();
|
|
int err;
|
|
|
|
if (!dev)
|
|
return ERR_PTR(-ENOMEM);
|
|
|
|
sprintf(dev->name, "eth%d", unit);
|
|
netdev_boot_setup_check(dev);
|
|
|
|
err = do_lne390_probe(dev);
|
|
if (err)
|
|
goto out;
|
|
return dev;
|
|
out:
|
|
free_netdev(dev);
|
|
return ERR_PTR(err);
|
|
}
|
|
#endif
|
|
|
|
static int __init lne390_probe1(struct net_device *dev, int ioaddr)
|
|
{
|
|
int i, revision, ret;
|
|
unsigned long eisa_id;
|
|
|
|
if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV;
|
|
|
|
#if LNE390_DEBUG & LNE390_D_PROBE
|
|
printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT));
|
|
printk("lne390-debug: config regs: %#x %#x\n",
|
|
inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2));
|
|
#endif
|
|
|
|
|
|
/* Check the EISA ID of the card. */
|
|
eisa_id = inl(ioaddr + LNE390_ID_PORT);
|
|
if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) {
|
|
return -ENODEV;
|
|
}
|
|
|
|
revision = (eisa_id >> 24) & 0x01; /* 0 = rev A, 1 rev B */
|
|
|
|
#if 0
|
|
/* Check the Mylex vendor ID as well. Not really required. */
|
|
if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0
|
|
|| inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1
|
|
|| inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) {
|
|
printk("lne390.c: card not found");
|
|
for(i = 0; i < ETHER_ADDR_LEN; i++)
|
|
printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i));
|
|
printk(" (invalid prefix).\n");
|
|
return -ENODEV;
|
|
}
|
|
#endif
|
|
|
|
printk("lne390.c: LNE390%X in EISA slot %d, address", 0xa+revision, ioaddr/0x1000);
|
|
for(i = 0; i < ETHER_ADDR_LEN; i++)
|
|
printk(" %02x", (dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i)));
|
|
printk(".\nlne390.c: ");
|
|
|
|
/* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */
|
|
if (dev->irq == 0) {
|
|
unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3;
|
|
dev->irq = irq_map[irq_reg & 0x07];
|
|
printk("using");
|
|
} else {
|
|
/* This is useless unless we reprogram the card here too */
|
|
if (dev->irq == 2) dev->irq = 9; /* Doh! */
|
|
printk("assigning");
|
|
}
|
|
printk(" IRQ %d,", dev->irq);
|
|
|
|
if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) {
|
|
printk (" unable to get IRQ %d.\n", dev->irq);
|
|
return ret;
|
|
}
|
|
|
|
if (dev->mem_start == 0) {
|
|
unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07;
|
|
|
|
if (revision) /* LNE390B */
|
|
dev->mem_start = shmem_mapB[mem_reg] * 0x10000;
|
|
else /* LNE390A */
|
|
dev->mem_start = shmem_mapA[mem_reg] * 0x10000;
|
|
printk(" using ");
|
|
} else {
|
|
/* Should check for value in shmem_map and reprogram the card to use it */
|
|
dev->mem_start &= 0xfff0000;
|
|
printk(" assigning ");
|
|
}
|
|
|
|
printk("%dkB memory at physical address %#lx\n",
|
|
LNE390_STOP_PG/4, dev->mem_start);
|
|
|
|
/*
|
|
BEWARE!! Some dain-bramaged EISA SCUs will allow you to put
|
|
the card mem within the region covered by `normal' RAM !!!
|
|
|
|
ioremap() will fail in that case.
|
|
*/
|
|
ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100);
|
|
if (!ei_status.mem) {
|
|
printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n");
|
|
printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n");
|
|
printk(KERN_ERR "lne390.c: Driver NOT installed.\n");
|
|
ret = -EAGAIN;
|
|
goto cleanup;
|
|
}
|
|
printk("lne390.c: remapped %dkB card memory to virtual address %p\n",
|
|
LNE390_STOP_PG/4, ei_status.mem);
|
|
|
|
dev->mem_start = (unsigned long)ei_status.mem;
|
|
dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256;
|
|
|
|
/* The 8390 offset is zero for the LNE390 */
|
|
dev->base_addr = ioaddr;
|
|
|
|
ei_status.name = "LNE390";
|
|
ei_status.tx_start_page = LNE390_START_PG;
|
|
ei_status.rx_start_page = LNE390_START_PG + TX_PAGES;
|
|
ei_status.stop_page = LNE390_STOP_PG;
|
|
ei_status.word16 = 1;
|
|
|
|
if (ei_debug > 0)
|
|
printk(version);
|
|
|
|
ei_status.reset_8390 = &lne390_reset_8390;
|
|
ei_status.block_input = &lne390_block_input;
|
|
ei_status.block_output = &lne390_block_output;
|
|
ei_status.get_8390_hdr = &lne390_get_8390_hdr;
|
|
|
|
dev->open = &lne390_open;
|
|
dev->stop = &lne390_close;
|
|
#ifdef CONFIG_NET_POLL_CONTROLLER
|
|
dev->poll_controller = ei_poll;
|
|
#endif
|
|
NS8390_init(dev, 0);
|
|
|
|
ret = register_netdev(dev);
|
|
if (ret)
|
|
goto unmap;
|
|
return 0;
|
|
unmap:
|
|
if (ei_status.reg0)
|
|
iounmap(ei_status.mem);
|
|
cleanup:
|
|
free_irq(dev->irq, dev);
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* Reset as per the packet driver method. Judging by the EISA cfg
|
|
* file, this just toggles the "Board Enable" bits (bit 2 and 0).
|
|
*/
|
|
|
|
static void lne390_reset_8390(struct net_device *dev)
|
|
{
|
|
unsigned short ioaddr = dev->base_addr;
|
|
|
|
outb(0x04, ioaddr + LNE390_RESET_PORT);
|
|
if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name);
|
|
|
|
mdelay(2);
|
|
|
|
ei_status.txing = 0;
|
|
outb(0x01, ioaddr + LNE390_RESET_PORT);
|
|
if (ei_debug > 1) printk("reset done\n");
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Note: In the following three functions is the implicit assumption
|
|
* that the associated memcpy will only use "rep; movsl" as long as
|
|
* we keep the counts as some multiple of doublewords. This is a
|
|
* requirement of the hardware, and also prevents us from using
|
|
* eth_io_copy_and_sum() since we can't guarantee it will limit
|
|
* itself to doubleword access.
|
|
*/
|
|
|
|
/*
|
|
* Grab the 8390 specific header. Similar to the block_input routine, but
|
|
* we don't need to be concerned with ring wrap as the header will be at
|
|
* the start of a page, so we optimize accordingly. (A single doubleword.)
|
|
*/
|
|
|
|
static void
|
|
lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
|
|
{
|
|
void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8);
|
|
memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
|
|
hdr->count = (hdr->count + 3) & ~3; /* Round up allocation. */
|
|
}
|
|
|
|
/*
|
|
* Block input and output are easy on shared memory ethercards, the only
|
|
* complication is when the ring buffer wraps. The count will already
|
|
* be rounded up to a doubleword value via lne390_get_8390_hdr() above.
|
|
*/
|
|
|
|
static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb,
|
|
int ring_offset)
|
|
{
|
|
void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8);
|
|
|
|
if (ring_offset + count > (LNE390_STOP_PG<<8)) {
|
|
/* Packet wraps over end of ring buffer. */
|
|
int semi_count = (LNE390_STOP_PG<<8) - ring_offset;
|
|
memcpy_fromio(skb->data, xfer_start, semi_count);
|
|
count -= semi_count;
|
|
memcpy_fromio(skb->data + semi_count,
|
|
ei_status.mem + (TX_PAGES<<8), count);
|
|
} else {
|
|
/* Packet is in one chunk. */
|
|
memcpy_fromio(skb->data, xfer_start, count);
|
|
}
|
|
}
|
|
|
|
static void lne390_block_output(struct net_device *dev, int count,
|
|
const unsigned char *buf, int start_page)
|
|
{
|
|
void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8);
|
|
|
|
count = (count + 3) & ~3; /* Round up to doubleword */
|
|
memcpy_toio(shmem, buf, count);
|
|
}
|
|
|
|
static int lne390_open(struct net_device *dev)
|
|
{
|
|
ei_open(dev);
|
|
return 0;
|
|
}
|
|
|
|
static int lne390_close(struct net_device *dev)
|
|
{
|
|
|
|
if (ei_debug > 1)
|
|
printk("%s: Shutting down ethercard.\n", dev->name);
|
|
|
|
ei_close(dev);
|
|
return 0;
|
|
}
|
|
|
|
#ifdef MODULE
|
|
#define MAX_LNE_CARDS 4 /* Max number of LNE390 cards per module */
|
|
static struct net_device *dev_lne[MAX_LNE_CARDS];
|
|
static int io[MAX_LNE_CARDS];
|
|
static int irq[MAX_LNE_CARDS];
|
|
static int mem[MAX_LNE_CARDS];
|
|
|
|
module_param_array(io, int, NULL, 0);
|
|
module_param_array(irq, int, NULL, 0);
|
|
module_param_array(mem, int, NULL, 0);
|
|
MODULE_PARM_DESC(io, "I/O base address(es)");
|
|
MODULE_PARM_DESC(irq, "IRQ number(s)");
|
|
MODULE_PARM_DESC(mem, "memory base address(es)");
|
|
MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver");
|
|
MODULE_LICENSE("GPL");
|
|
|
|
int __init init_module(void)
|
|
{
|
|
struct net_device *dev;
|
|
int this_dev, found = 0;
|
|
|
|
for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
|
|
if (io[this_dev] == 0 && this_dev != 0)
|
|
break;
|
|
dev = alloc_ei_netdev();
|
|
if (!dev)
|
|
break;
|
|
dev->irq = irq[this_dev];
|
|
dev->base_addr = io[this_dev];
|
|
dev->mem_start = mem[this_dev];
|
|
if (do_lne390_probe(dev) == 0) {
|
|
dev_lne[found++] = dev;
|
|
continue;
|
|
}
|
|
free_netdev(dev);
|
|
printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]);
|
|
break;
|
|
}
|
|
if (found)
|
|
return 0;
|
|
return -ENXIO;
|
|
}
|
|
|
|
static void cleanup_card(struct net_device *dev)
|
|
{
|
|
free_irq(dev->irq, dev);
|
|
release_region(dev->base_addr, LNE390_IO_EXTENT);
|
|
iounmap(ei_status.mem);
|
|
}
|
|
|
|
void cleanup_module(void)
|
|
{
|
|
int this_dev;
|
|
|
|
for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
|
|
struct net_device *dev = dev_lne[this_dev];
|
|
if (dev) {
|
|
unregister_netdev(dev);
|
|
cleanup_card(dev);
|
|
free_netdev(dev);
|
|
}
|
|
}
|
|
}
|
|
#endif /* MODULE */
|
|
|