/* bionet.c     BioNet-100 device driver for linux68k. * * Version:	@(#)bionet.c	1.0	02/06/96 * * Author:	Hartmut Laue <laue@ifk-mp.uni-kiel.de> * and		Torsten Narjes <narjes@ifk-mp.uni-kiel.de> * * Little adaptions for integration into pl7 by Roman Hodek * * Some changes in bionet_poll_rx by Karl-Heinz Lohner *	What is it ?	------------	This driver controls the BIONET-100 LAN-Adapter which connects	an ATARI ST/TT via the ACSI-port to an Ethernet-based network.	This version can be compiled as a loadable module (See the	compile command at the bottom of this file).	At load time, you can optionally set the debugging level and the	fastest response time on the command line of 'insmod'.	'bionet_debug'		controls the amount of diagnostic messages:	  0  : no messages	  >0 : see code for meaning of printed messages	'bionet_min_poll_time' (always >=1)		gives the time (in jiffies) between polls. Low values		increase the system load (beware!)	When loaded, a net device with the name 'bio0' becomes available,	which can be controlled with the usual 'ifconfig' command.	It is possible to compile this driver into the kernel like other	(net) drivers. For this purpose, some source files (e.g. config-files	makefiles, Space.c) must be changed accordingly. (You may refer to	other drivers how to do it.) In this case, the device will be detected	at boot time and (probably) appear as 'eth0'.	This code is based on several sources:	- The driver code for a parallel port ethernet adapter by	  Donald Becker (see file 'atp.c' from the PC linux distribution)	- The ACSI code by Roman Hodek for the ATARI-ACSI harddisk support	  and DMA handling.	- Very limited information about moving packets in and out of the	  BIONET-adapter from the TCP package for TOS by BioData GmbH.	Theory of Operation	-------------------	Because the ATARI DMA port is usually shared between several	devices (eg. harddisk, floppy) we cannot block the ACSI bus	while waiting for interrupts. Therefore we use a polling mechanism	to fetch packets from the adapter. For the same reason, we send	packets without checking that the previous packet has been sent to	the LAN. We rely on the higher levels of the networking code to detect	missing packets and resend them.	Before we access the ATARI DMA controller, we check if another	process is using the DMA. If not, we lock the DMA, perform one or	more packet transfers and unlock the DMA before returning.	We do not use 'stdma_lock' unconditionally because it is unclear	if the networking code can be set to sleep, which will happen if	another (possibly slow) device is using the DMA controller.	The polling is done via timer interrupts which periodically	'simulate' an interrupt from the Ethernet adapter. The time (in jiffies)	between polls varies depending on an estimate of the net activity.	The allowed range is given by the variable 'bionet_min_poll_time'	for the lower (fastest) limit and the constant 'MAX_POLL_TIME'	for the higher (slowest) limit.	Whenever a packet arrives, we switch to fastest response by setting	the polling time to its lowest limit. If the following poll fails,	because no packets have arrived, we increase the time for the next	poll. When the net activity is low, the polling time effectively	stays at its maximum value, resulting in the lowest load for the	machine. */#define MAX_POLL_TIME	10static char version[] =	"bionet.c:v1.0 06-feb-96 (c) Hartmut Laue.\n";#include <linux/module.h>#include <linux/errno.h>#include <linux/kernel.h>#include <linux/sched.h>#include <linux/types.h>#include <linux/fcntl.h>#include <linux/interrupt.h>#include <linux/ptrace.h>#include <linux/ioport.h>#include <linux/in.h>#include <linux/slab.h>#include <linux/string.h>#include <linux/delay.h>#include <linux/timer.h>#include <linux/init.h>#include <linux/netdevice.h>#include <linux/etherdevice.h>#include <linux/skbuff.h>#include <asm/setup.h>#include <asm/pgtable.h>#include <asm/system.h>#include <asm/bitops.h>#include <asm/io.h>#include <asm/dma.h>#include <asm/atarihw.h>#include <asm/atariints.h>#include <asm/atari_acsi.h>#include <asm/atari_stdma.h>extern struct net_device *init_etherdev(struct net_device *dev, int sizeof_private);/* use 0 for production, 1 for verification, >2 for debug */#ifndef NET_DEBUG#define NET_DEBUG 0#endif/* * Global variable 'bionet_debug'. Can be set at load time by 'insmod' */unsigned int bionet_debug = NET_DEBUG;MODULE_PARM(bionet_debug, "i");MODULE_PARM_DESC(bionet_debug, "bionet debug level (0-2)");MODULE_LICENSE("GPL");static unsigned int bionet_min_poll_time = 2;/* Information that need to be kept for each board. */struct net_local {	struct net_device_stats stats;	long open_time;			/* for debugging */	int  poll_time;			/* polling time varies with net load */};static struct nic_pkt_s {		/* packet format */	unsigned char	status;	unsigned char	dummy;	unsigned char	l_lo, l_hi;	unsigned char	buffer[3000];} *nic_packet;unsigned char *phys_nic_packet;/* Index to functions, as function prototypes. */extern int bionet_probe(struct net_device *dev);static int bionet_open(struct net_device *dev);static int bionet_send_packet(struct sk_buff *skb, struct net_device *dev);static void bionet_poll_rx(struct net_device *);static int bionet_close(struct net_device *dev);static struct net_device_stats *net_get_stats(struct net_device *dev);static void bionet_tick(unsigned long);static struct timer_list bionet_timer = { function: bionet_tick };#define STRAM_ADDR(a)	(((a) & 0xff000000) == 0)/* The following routines access the ethernet board connected to the * ACSI port via the st_dma chip. */#define NODE_ADR 0x60#define C_READ 8#define C_WRITE 0x0a#define C_GETEA 0x0f#define C_SETCR 0x0estatic intsendcmd(unsigned int a0, unsigned int mod, unsigned int cmd) {	unsigned int c;	dma_wd.dma_mode_status = (mod | ((a0) ? 2 : 0) | 0x88);	dma_wd.fdc_acces_seccount = cmd;	dma_wd.dma_mode_status = (mod | 0x8a);	if( !acsi_wait_for_IRQ(HZ/2) )	/* wait for cmd ack */		return -1;		/* timeout */	c = dma_wd.fdc_acces_seccount;	return (c & 0xff);}static voidset_status(int cr) {	sendcmd(0,0x100,NODE_ADR | C_SETCR);    /* CMD: SET CR */	sendcmd(1,0x100,cr);	dma_wd.dma_mode_status = 0x80;}static intget_status(unsigned char *adr) {	int i,c;	DISABLE_IRQ();	c = sendcmd(0,0x00,NODE_ADR | C_GETEA);  /* CMD: GET ETH ADR*/	if( c < 0 ) goto gsend;	/* now read status bytes */	for (i=0; i<6; i++) {		dma_wd.fdc_acces_seccount = 0;	/* request next byte */    		if( !acsi_wait_for_IRQ(HZ/2) ) {	/* wait for cmd ack */			c = -1;			goto gsend;		/* timeout */		}		c = dma_wd.fdc_acces_seccount;		*adr++ = (unsigned char)c;	}	c = 1;gsend:  	dma_wd.dma_mode_status = 0x80;	return c;}static voidbionet_intr(int irq, void *data, struct pt_regs *fp) {	return;}static intget_frame(unsigned long paddr, int odd) {	int c;	unsigned long flags;	DISABLE_IRQ();	save_flags(flags);	cli();	dma_wd.dma_mode_status		= 0x9a;	dma_wd.dma_mode_status		= 0x19a;	dma_wd.dma_mode_status		= 0x9a;	dma_wd.fdc_acces_seccount	= 0x04;		/* sector count (was 5) */	dma_wd.dma_lo			= (unsigned char)paddr;	paddr >>= 8;	dma_wd.dma_md			= (unsigned char)paddr;	paddr >>= 8;	dma_wd.dma_hi			= (unsigned char)paddr;	restore_flags(flags);	c = sendcmd(0,0x00,NODE_ADR | C_READ);	/* CMD: READ */	if( c < 128 ) goto rend;	/* now read block */	c = sendcmd(1,0x00,odd);	/* odd flag for address shift */	dma_wd.dma_mode_status	= 0x0a;	if( !acsi_wait_for_IRQ(100) ) {	/* wait for DMA to complete */		c = -1;		goto rend;	}	dma_wd.dma_mode_status	= 0x8a;	dma_wd.dma_mode_status	= 0x18a;	dma_wd.dma_mode_status	= 0x8a;	c = dma_wd.fdc_acces_seccount;	dma_wd.dma_mode_status	= 0x88;	c = dma_wd.fdc_acces_seccount;	c = 1;rend:	dma_wd.dma_mode_status	= 0x80;	udelay(40);	acsi_wait_for_noIRQ(20);	return c;}static inthardware_send_packet(unsigned long paddr, int cnt) {	unsigned int c;	unsigned long flags;	DISABLE_IRQ();	save_flags(flags);	cli();	dma_wd.dma_mode_status	= 0x19a;	dma_wd.dma_mode_status	= 0x9a;	dma_wd.dma_mode_status	= 0x19a;	dma_wd.dma_lo		= (unsigned char)paddr;	paddr >>= 8;	dma_wd.dma_md		= (unsigned char)paddr;	paddr >>= 8;	dma_wd.dma_hi		= (unsigned char)paddr;	dma_wd.fdc_acces_seccount	= 0x4;		/* sector count */	restore_flags(flags);	c = sendcmd(0,0x100,NODE_ADR | C_WRITE);	/* CMD: WRITE */	c = sendcmd(1,0x100,cnt&0xff);	c = sendcmd(1,0x100,cnt>>8);	/* now write block */	dma_wd.dma_mode_status	= 0x10a;	/* DMA enable */	if( !acsi_wait_for_IRQ(100) )		/* wait for DMA to complete */		goto end;	dma_wd.dma_mode_status	= 0x19a;	/* DMA disable ! */	c = dma_wd.fdc_acces_seccount;end:	c = sendcmd(1,0x100,0);	c = sendcmd(1,0x100,0);	dma_wd.dma_mode_status	= 0x180;	udelay(40);	acsi_wait_for_noIRQ(20);	return( c & 0x02);}/* Check for a network adaptor of this type, and return '0' if one exists. */int __init bionet_probe(struct net_device *dev){	unsigned char station_addr[6];	static unsigned version_printed;	static int no_more_found;	/* avoid "Probing for..." printed 4 times */	int i;	if (!MACH_IS_ATARI || no_more_found)		return -ENODEV;	printk("Probing for BioNet 100 Adapter...\n");	stdma_lock(bionet_intr, NULL);