[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 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;

	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;
	DECLARE_MAC_BUF(mac);

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