[linux.git] / drivers / net / lne390.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 <[email protected]> - 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 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;

	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

	for(i = 0; i < ETHER_ADDR_LEN; i++)
		dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i);
	printk("lne390.c: LNE390%X in EISA slot %d, address %pM.\n",
	       0xa+revision, ioaddr/0x1000, dev->dev_addr);

	printk("lne390.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->netdev_ops = &ei_netdev_ops;
	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);
}


#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 __exit 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 */
Commit	Line	Data
1da177e4 LT	1	/*
	2	lne390.c
	3
	4	Linux driver for Mylex LNE390 EISA Network Adapter
	5
	6	Copyright (C) 1996-1998, Paul Gortmaker.
	7
	8	This software may be used and distributed according to the terms
	9	of the GNU General Public License, incorporated herein by reference.
	10
	11	Information and Code Sources:
	12
	13	1) Based upon framework of es3210 driver.
	14	2) The existing myriad of other Linux 8390 drivers by Donald Becker.
	15	3) Russ Nelson's asm packet driver provided additional info.
	16	4) Info for getting IRQ and sh-mem gleaned from the EISA cfg files.
	17
	18	The LNE390 is an EISA shared memory NS8390 implementation. Note
	19	that all memory copies to/from the board must be 32bit transfers.
	20	There are two versions of the card: the lne390a and the lne390b.
	21	Going by the EISA cfg files, the "a" has jumpers to select between
	22	BNC/AUI, but the "b" also has RJ-45 and selection is via the SCU.
	23	The shared memory address selection is also slightly different.
	24	Note that shared memory address > 1MB are supported with this driver.
	25
	26	You can try <http://www.mylex.com> if you want more info, as I've
	27	never even seen one of these cards. :)
	28
	29	Arnaldo Carvalho de Melo <[email protected]> - 2000/09/01
	30	- get rid of check_region
	31	- no need to check if dev == NULL in lne390_probe1
	32	*/
	33
	34	static const char *version =
	35	"lne390.c: Driver revision v0.99.1, 01/09/2000\n";
	36
	37	#include <linux/module.h>
	38	#include <linux/eisa.h>
	39	#include <linux/kernel.h>
	40	#include <linux/errno.h>
	41	#include <linux/string.h>
	42	#include <linux/delay.h>
	43	#include <linux/init.h>
	44	#include <linux/netdevice.h>
	45	#include <linux/etherdevice.h>
	46
	47	#include <asm/io.h>
	48	#include <asm/system.h>
	49
	50	#include "8390.h"
	51
	52	#define DRV_NAME "lne390"
	53
	54	static int lne390_probe1(struct net_device *dev, int ioaddr);
	55
1da177e4 LT	56	static void lne390_reset_8390(struct net_device *dev);
	57
	58	static void lne390_get_8390_hdr(struct net_device dev, struct e8390_pkt_hdr hdr, int ring_page);
	59	static void lne390_block_input(struct net_device dev, int count, struct sk_buff skb, int ring_offset);
	60	static void lne390_block_output(struct net_device dev, int count, const unsigned char buf, const int start_page);
	61
	62	#define LNE390_START_PG 0x00 /* First page of TX buffer */
	63	#define LNE390_STOP_PG 0x80 /* Last page +1 of RX ring */
	64
	65	#define LNE390_ID_PORT 0xc80 /* Same for all EISA cards */
	66	#define LNE390_IO_EXTENT 0x20
	67	#define LNE390_SA_PROM 0x16 /* Start of e'net addr. */
	68	#define LNE390_RESET_PORT 0xc84 /* From the pkt driver source */
	69	#define LNE390_NIC_OFFSET 0x00 /* Hello, the 8390 is here */
	70
	71	#define LNE390_ADDR0 0x00 /* 3 byte vendor prefix */
	72	#define LNE390_ADDR1 0x80
	73	#define LNE390_ADDR2 0xe5
	74
	75	#define LNE390_ID0 0x10009835 /* 0x3598 = 01101 01100 11000 = mlx */
	76	#define LNE390_ID1 0x11009835 /* above is the 390A, this is 390B */
	77
	78	#define LNE390_CFG1 0xc84 /* NB: 0xc84 is also "reset" port. */
	79	#define LNE390_CFG2 0xc90
	80
	81	/*
	82	* You can OR any of the following bits together and assign it
	83	* to LNE390_DEBUG to get verbose driver info during operation.
	84	* Currently only the probe one is implemented.
	85	*/
	86
	87	#define LNE390_D_PROBE 0x01
	88	#define LNE390_D_RX_PKT 0x02
	89	#define LNE390_D_TX_PKT 0x04
	90	#define LNE390_D_IRQ 0x08
	91
	92	#define LNE390_DEBUG 0
	93
	94	static unsigned char irq_map[] __initdata = {15, 12, 11, 10, 9, 7, 5, 3};
	95	static unsigned int shmem_mapA[] __initdata = {0xff, 0xfe, 0xfd, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
	96	static unsigned int shmem_mapB[] __initdata = {0xff, 0xfe, 0x0e, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
	97
	98	/*
	99	* Probe for the card. The best way is to read the EISA ID if it
	100	* is known. Then we can check the prefix of the station address
	101	* PROM for a match against the value assigned to Mylex.
	102	*/
	103
	104	static int __init do_lne390_probe(struct net_device *dev)
	105	{
	106	unsigned short ioaddr = dev->base_addr;
	107	int irq = dev->irq;
	108	int mem_start = dev->mem_start;
	109	int ret;
	110
1da177e4 LT	111	if (ioaddr > 0x1ff) { /* Check a single specified location. */
	112	if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
	113	return -EBUSY;
	114	ret = lne390_probe1(dev, ioaddr);
	115	if (ret)
	116	release_region(ioaddr, LNE390_IO_EXTENT);
	117	return ret;
	118	}
	119	else if (ioaddr > 0) /* Don't probe at all. */
	120	return -ENXIO;
	121
	122	if (!EISA_bus) {
	123	#if LNE390_DEBUG & LNE390_D_PROBE
	124	printk("lne390-debug: Not an EISA bus. Not probing high ports.\n");
	125	#endif
	126	return -ENXIO;
	127	}
	128
	129	/* EISA spec allows for up to 16 slots, but 8 is typical. */
	130	for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
	131	if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
	132	continue;
	133	if (lne390_probe1(dev, ioaddr) == 0)
	134	return 0;
	135	release_region(ioaddr, LNE390_IO_EXTENT);
	136	dev->irq = irq;
	137	dev->mem_start = mem_start;
	138	}
	139
	140	return -ENODEV;
	141	}
	142
1da177e4 LT	143	#ifndef MODULE
	144	struct net_device * __init lne390_probe(int unit)
	145	{
	146	struct net_device *dev = alloc_ei_netdev();
	147	int err;
	148
	149	if (!dev)
	150	return ERR_PTR(-ENOMEM);
	151
	152	sprintf(dev->name, "eth%d", unit);
	153	netdev_boot_setup_check(dev);
	154
	155	err = do_lne390_probe(dev);
	156	if (err)
	157	goto out;
1da177e4	158	return dev;
1da177e4 LT	159	out:
	160	free_netdev(dev);
	161	return ERR_PTR(err);
	162	}
	163	#endif
	164
	165	static int __init lne390_probe1(struct net_device *dev, int ioaddr)
	166	{
	167	int i, revision, ret;
	168	unsigned long eisa_id;
	169
	170	if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV;
	171
	172	#if LNE390_DEBUG & LNE390_D_PROBE
	173	printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT));
	174	printk("lne390-debug: config regs: %#x %#x\n",
	175	inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2));
	176	#endif
	177
	178
	179	/* Check the EISA ID of the card. */
	180	eisa_id = inl(ioaddr + LNE390_ID_PORT);
	181	if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) {
	182	return -ENODEV;
	183	}
	184
	185	revision = (eisa_id >> 24) & 0x01; /* 0 = rev A, 1 rev B */
6aa20a22	186
1da177e4 LT	187	#if 0
	188	/* Check the Mylex vendor ID as well. Not really required. */
	189	if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0
	190	\|\| inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1
	191	\|\| inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) {
	192	printk("lne390.c: card not found");
	193	for(i = 0; i < ETHER_ADDR_LEN; i++)
	194	printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i));
	195	printk(" (invalid prefix).\n");
	196	return -ENODEV;
	197	}
	198	#endif
	199
1da177e4	200	for(i = 0; i < ETHER_ADDR_LEN; i++)
0795af57	201	dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i);
e174961c JB	202	printk("lne390.c: LNE390%X in EISA slot %d, address %pM.\n",
e174961c JB	203	0xa+revision, ioaddr/0x1000, dev->dev_addr);
0795af57 JP	204
0795af57 JP	205	printk("lne390.c: ");
1da177e4 LT	206
	207	/* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */
	208	if (dev->irq == 0) {
	209	unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3;
	210	dev->irq = irq_map[irq_reg & 0x07];
	211	printk("using");
	212	} else {
	213	/* This is useless unless we reprogram the card here too */
	214	if (dev->irq == 2) dev->irq = 9; /* Doh! */
	215	printk("assigning");
	216	}
	217	printk(" IRQ %d,", dev->irq);
	218
	219	if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) {
	220	printk (" unable to get IRQ %d.\n", dev->irq);
	221	return ret;
	222	}
	223
	224	if (dev->mem_start == 0) {
	225	unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07;
	226
	227	if (revision) /* LNE390B */
	228	dev->mem_start = shmem_mapB[mem_reg] * 0x10000;
	229	else /* LNE390A */
	230	dev->mem_start = shmem_mapA[mem_reg] * 0x10000;
	231	printk(" using ");
	232	} else {
	233	/* Should check for value in shmem_map and reprogram the card to use it */
	234	dev->mem_start &= 0xfff0000;
	235	printk(" assigning ");
	236	}
	237
	238	printk("%dkB memory at physical address %#lx\n",
	239	LNE390_STOP_PG/4, dev->mem_start);
	240
	241	/*
	242	BEWARE!! Some dain-bramaged EISA SCUs will allow you to put
	243	the card mem within the region covered by `normal' RAM !!!
	244
	245	ioremap() will fail in that case.
	246	*/
	247	ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100);
	248	if (!ei_status.mem) {
	249	printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n");
	250	printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n");
	251	printk(KERN_ERR "lne390.c: Driver NOT installed.\n");
	252	ret = -EAGAIN;
	253	goto cleanup;
	254	}
	255	printk("lne390.c: remapped %dkB card memory to virtual address %p\n",
	256	LNE390_STOP_PG/4, ei_status.mem);
	257
	258	dev->mem_start = (unsigned long)ei_status.mem;
	259	dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256;
	260
	261	/* The 8390 offset is zero for the LNE390 */
	262	dev->base_addr = ioaddr;
	263
	264	ei_status.name = "LNE390";
	265	ei_status.tx_start_page = LNE390_START_PG;
	266	ei_status.rx_start_page = LNE390_START_PG + TX_PAGES;
	267	ei_status.stop_page = LNE390_STOP_PG;
	268	ei_status.word16 = 1;
	269
270	if (ei_debug > 0)
271	printk(version);
272
273	ei_status.reset_8390 = &lne390_reset_8390;
274	ei_status.block_input = &lne390_block_input;
275	ei_status.block_output = &lne390_block_output;
276	ei_status.get_8390_hdr = &lne390_get_8390_hdr;
277
0ec4d4fe	278	dev->netdev_ops = &ei_netdev_ops;
1da177e4	279	NS8390_init(dev, 0);
b1fc5505 HX	280
	281	ret = register_netdev(dev);
	282	if (ret)
	283	goto unmap;
1da177e4	284	return 0;
b1fc5505 HX	285	unmap:
b1fc5505 HX	286	if (ei_status.reg0)
387d890d	287	iounmap(ei_status.mem);
1da177e4 LT	288	cleanup:
	289	free_irq(dev->irq, dev);
	290	return ret;
	291	}
	292
	293	/*
	294	* Reset as per the packet driver method. Judging by the EISA cfg
	295	* file, this just toggles the "Board Enable" bits (bit 2 and 0).
	296	*/
	297
	298	static void lne390_reset_8390(struct net_device *dev)
	299	{
	300	unsigned short ioaddr = dev->base_addr;
	301
	302	outb(0x04, ioaddr + LNE390_RESET_PORT);
	303	if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name);
	304
	305	mdelay(2);
	306
	307	ei_status.txing = 0;
	308	outb(0x01, ioaddr + LNE390_RESET_PORT);
	309	if (ei_debug > 1) printk("reset done\n");
	310
	311	return;
	312	}
	313
	314	/*
	315	* Note: In the following three functions is the implicit assumption
	316	* that the associated memcpy will only use "rep; movsl" as long as
	317	* we keep the counts as some multiple of doublewords. This is a
	318	* requirement of the hardware, and also prevents us from using
	319	* eth_io_copy_and_sum() since we can't guarantee it will limit
	320	* itself to doubleword access.
	321	*/
	322
	323	/*
	324	* Grab the 8390 specific header. Similar to the block_input routine, but
	325	* we don't need to be concerned with ring wrap as the header will be at
	326	* the start of a page, so we optimize accordingly. (A single doubleword.)
	327	*/
	328
	329	static void
	330	lne390_get_8390_hdr(struct net_device dev, struct e8390_pkt_hdr hdr, int ring_page)
	331	{
	332	void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8);
	333	memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
	334	hdr->count = (hdr->count + 3) & ~3; /* Round up allocation. */
	335	}
	336
6aa20a22	337	/*
1da177e4 LT	338	* Block input and output are easy on shared memory ethercards, the only
	339	* complication is when the ring buffer wraps. The count will already
	340	* be rounded up to a doubleword value via lne390_get_8390_hdr() above.
	341	*/
	342
	343	static void lne390_block_input(struct net_device dev, int count, struct sk_buff skb,
	344	int ring_offset)
	345	{
	346	void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8);
	347
	348	if (ring_offset + count > (LNE390_STOP_PG<<8)) {
	349	/* Packet wraps over end of ring buffer. */
	350	int semi_count = (LNE390_STOP_PG<<8) - ring_offset;
	351	memcpy_fromio(skb->data, xfer_start, semi_count);
	352	count -= semi_count;
	353	memcpy_fromio(skb->data + semi_count,
	354	ei_status.mem + (TX_PAGES<<8), count);
	355	} else {
	356	/* Packet is in one chunk. */
	357	memcpy_fromio(skb->data, xfer_start, count);
	358	}
	359	}
	360
	361	static void lne390_block_output(struct net_device *dev, int count,
	362	const unsigned char *buf, int start_page)
	363	{
	364	void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8);
	365
	366	count = (count + 3) & ~3; /* Round up to doubleword */
	367	memcpy_toio(shmem, buf, count);
	368	}
	369
1da177e4 LT	370
	371	#ifdef MODULE
	372	#define MAX_LNE_CARDS 4 /* Max number of LNE390 cards per module */
	373	static struct net_device *dev_lne[MAX_LNE_CARDS];
	374	static int io[MAX_LNE_CARDS];
	375	static int irq[MAX_LNE_CARDS];
	376	static int mem[MAX_LNE_CARDS];
	377
	378	module_param_array(io, int, NULL, 0);
	379	module_param_array(irq, int, NULL, 0);
	380	module_param_array(mem, int, NULL, 0);
	381	MODULE_PARM_DESC(io, "I/O base address(es)");
	382	MODULE_PARM_DESC(irq, "IRQ number(s)");
	383	MODULE_PARM_DESC(mem, "memory base address(es)");
	384	MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver");
	385	MODULE_LICENSE("GPL");
	386
dab3d02e	387	int __init init_module(void)
1da177e4 LT	388	{
	389	struct net_device *dev;
	390	int this_dev, found = 0;
	391
	392	for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
	393	if (io[this_dev] == 0 && this_dev != 0)
	394	break;
	395	dev = alloc_ei_netdev();
	396	if (!dev)
	397	break;
	398	dev->irq = irq[this_dev];
	399	dev->base_addr = io[this_dev];
	400	dev->mem_start = mem[this_dev];
	401	if (do_lne390_probe(dev) == 0) {
b1fc5505 HX	402	dev_lne[found++] = dev;
b1fc5505 HX	403	continue;
1da177e4 LT	404	}
	405	free_netdev(dev);
	406	printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]);
	407	break;
	408	}
	409	if (found)
	410	return 0;
	411	return -ENXIO;
	412	}
	413
64916f1e DV	414	static void cleanup_card(struct net_device *dev)
	415	{
	416	free_irq(dev->irq, dev);
	417	release_region(dev->base_addr, LNE390_IO_EXTENT);
	418	iounmap(ei_status.mem);
	419	}
	420
afc8eb46	421	void __exit cleanup_module(void)
1da177e4 LT	422	{
	423	int this_dev;
	424
	425	for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
	426	struct net_device *dev = dev_lne[this_dev];
	427	if (dev) {
	428	unregister_netdev(dev);
	429	cleanup_card(dev);
	430	free_netdev(dev);
	431	}
	432	}
	433	}
	434	#endif /* MODULE */
	435