Linux-2.6.12-rc2

Initial git repository build. I'm not bothering with the full history,
even though we have it. We can create a separate "historical" git
archive of that later if we want to, and in the meantime it's about
3.2GB when imported into git - space that would just make the early
git days unnecessarily complicated, when we don't have a lot of good
infrastructure for it.

Let it rip!

1 files changed, 1829 insertions, 0 deletions

diff --git a/drivers/block/acsi.c b/drivers/block/acsi.c
new file mode 100644
index 000000000000..ce933de48084
--- /dev/null
+++ b/drivers/block/acsi.c
@@ -0,0 +1,1829 @@
+/*
+ * acsi.c -- Device driver for Atari ACSI hard disks
+ *
+ * Copyright 1994 Roman Hodek <Roman.Hodek@informatik.uni-erlangen.de>
+ *
+ * Some parts are based on hd.c by Linus Torvalds
+ *
+ * This file is subject to the terms and conditions of the GNU General Public
+ * License.  See the file COPYING in the main directory of this archive for
+ * more details.
+ *
+ */
+
+/*
+ * Still to in this file:
+ *  - If a command ends with an error status (!= 0), the following
+ *    REQUEST SENSE commands (4 to fill the ST-DMA FIFO) are done by
+ *    polling the _IRQ signal (not interrupt-driven). This should be
+ *    avoided in future because it takes up a non-neglectible time in
+ *    the interrupt service routine while interrupts are disabled.
+ *    Maybe a timer interrupt will get lost :-(
+ */
+
+/*
+ * General notes:
+ *
+ *  - All ACSI devices (disks, CD-ROMs, ...) use major number 28.
+ *    Minors are organized like it is with SCSI: The upper 4 bits
+ *    identify the device, the lower 4 bits the partition.
+ *    The device numbers (the upper 4 bits) are given in the same
+ *    order as the devices are found on the bus.
+ *  - Up to 8 LUNs are supported for each target (if CONFIG_ACSI_MULTI_LUN
+ *    is defined), but only a total of 16 devices (due to minor
+ *    numbers...). Note that Atari allows only a maximum of 4 targets
+ *    (i.e. controllers, not devices) on the ACSI bus!
+ *  - A optimizing scheme similar to SCSI scatter-gather is implemented.
+ *  - Removable media are supported. After a medium change to device
+ *    is reinitialized (partition check etc.). Also, if the device
+ *    knows the PREVENT/ALLOW MEDIUM REMOVAL command, the door should
+ *    be locked and unlocked when mounting the first or unmounting the
+ *    last filesystem on the device. The code is untested, because I
+ *    don't have a removable hard disk.
+ *
+ */
+
+#include <linux/config.h>
+#include <linux/module.h>
+#include <linux/errno.h>
+#include <linux/signal.h>
+#include <linux/sched.h>
+#include <linux/timer.h>
+#include <linux/fs.h>
+#include <linux/kernel.h>
+#include <linux/genhd.h>
+#include <linux/delay.h>
+#include <linux/mm.h>
+#include <linux/major.h>
+#include <linux/slab.h>
+#include <linux/interrupt.h>
+#include <scsi/scsi.h> /* for SCSI_IOCTL_GET_IDLUN */
+typedef void Scsi_Device; /* hack to avoid including scsi.h */
+#include <scsi/scsi_ioctl.h>
+#include <linux/hdreg.h> /* for HDIO_GETGEO */
+#include <linux/blkpg.h>
+#include <linux/buffer_head.h>
+#include <linux/blkdev.h>
+
+#include <asm/setup.h>
+#include <asm/pgtable.h>
+#include <asm/system.h>
+#include <asm/uaccess.h>
+#include <asm/atarihw.h>
+#include <asm/atariints.h>
+#include <asm/atari_acsi.h>
+#include <asm/atari_stdma.h>
+#include <asm/atari_stram.h>
+
+static void (*do_acsi)(void) = NULL;
+static struct request_queue *acsi_queue;
+#define QUEUE (acsi_queue)
+#define CURRENT elv_next_request(acsi_queue)
+
+#define DEBUG
+#undef DEBUG_DETECT
+#undef NO_WRITE
+
+#define MAX_ERRORS     		8	/* Max read/write errors/sector */
+#define MAX_LUN				8	/* Max LUNs per target */
+#define MAX_DEV		   		16
+
+#define ACSI_BUFFER_SIZE			(16*1024) /* "normal" ACSI buffer size */
+#define ACSI_BUFFER_MINSIZE			(2048) 	  /* min. buf size if ext. DMA */
+#define ACSI_BUFFER_SIZE_ORDER	 	2		  /* order size for above */
+#define ACSI_BUFFER_MINSIZE_ORDER	0 	  	  /* order size for above */
+#define ACSI_BUFFER_SECTORS	(ACSI_BUFFER_SIZE/512)
+
+#define ACSI_BUFFER_ORDER \
+	(ATARIHW_PRESENT(EXTD_DMA) ? \
+	 ACSI_BUFFER_MINSIZE_ORDER : \
+	 ACSI_BUFFER_SIZE_ORDER)
+
+#define ACSI_TIMEOUT		(4*HZ)
+
+/* minimum delay between two commands */
+
+#define COMMAND_DELAY 500
+
+typedef enum {
+	NONE, HARDDISK, CDROM
+} ACSI_TYPE;
+
+struct acsi_info_struct {
+	ACSI_TYPE		type;			/* type of device */
+	unsigned		target;			/* target number */
+	unsigned		lun;			/* LUN in target controller */
+	unsigned		removable : 1;	/* Flag for removable media */
+	unsigned		read_only : 1;	/* Flag for read only devices */
+	unsigned		old_atari_disk : 1; /* Is an old Atari disk       */
+	unsigned		changed : 1;	/* Medium has been changed */
+	unsigned long 	size;			/* #blocks */
+	int access_count;
+} acsi_info[MAX_DEV];
+
+/*
+ *	SENSE KEYS
+ */
+
+#define NO_SENSE		0x00
+#define RECOVERED_ERROR 	0x01
+#define NOT_READY		0x02
+#define MEDIUM_ERROR		0x03
+#define HARDWARE_ERROR		0x04
+#define ILLEGAL_REQUEST 	0x05
+#define UNIT_ATTENTION		0x06
+#define DATA_PROTECT		0x07
+#define BLANK_CHECK		0x08
+#define COPY_ABORTED		0x0a
+#define ABORTED_COMMAND 	0x0b
+#define VOLUME_OVERFLOW 	0x0d
+#define MISCOMPARE		0x0e
+
+
+/*
+ *	DEVICE TYPES
+ */
+
+#define TYPE_DISK	0x00
+#define TYPE_TAPE	0x01
+#define TYPE_WORM	0x04
+#define TYPE_ROM	0x05
+#define TYPE_MOD	0x07
+#define TYPE_NO_LUN	0x7f
+
+/* The data returned by MODE SENSE differ between the old Atari
+ * hard disks and SCSI disks connected to ACSI. In the following, both
+ * formats are defined and some macros to operate on them potably.
+ */
+
+typedef struct {
+	unsigned long	dummy[2];
+	unsigned long	sector_size;
+	unsigned char	format_code;
+#define ATARI_SENSE_FORMAT_FIX	1	
+#define ATARI_SENSE_FORMAT_CHNG	2
+	unsigned char	cylinders_h;
+	unsigned char	cylinders_l;
+	unsigned char	heads;
+	unsigned char	reduced_h;
+	unsigned char	reduced_l;
+	unsigned char	precomp_h;
+	unsigned char	precomp_l;
+	unsigned char	landing_zone;
+	unsigned char	steprate;
+	unsigned char	type;
+#define ATARI_SENSE_TYPE_FIXCHNG_MASK		4
+#define ATARI_SENSE_TYPE_SOFTHARD_MASK		8
+#define ATARI_SENSE_TYPE_FIX				4
+#define ATARI_SENSE_TYPE_CHNG				0
+#define ATARI_SENSE_TYPE_SOFT				0
+#define ATARI_SENSE_TYPE_HARD				8
+	unsigned char	sectors;
+} ATARI_SENSE_DATA;
+
+#define ATARI_CAPACITY(sd) \
+	(((int)((sd).cylinders_h<<8)|(sd).cylinders_l) * \
+	 (sd).heads * (sd).sectors)
+
+
+typedef struct {
+	unsigned char   dummy1;
+	unsigned char   medium_type;
+	unsigned char   dummy2;
+	unsigned char   descriptor_size;
+	unsigned long   block_count;
+	unsigned long   sector_size;
+	/* Page 0 data */
+	unsigned char	page_code;
+	unsigned char	page_size;
+	unsigned char	page_flags;
+	unsigned char	qualifier;
+} SCSI_SENSE_DATA;
+
+#define SCSI_CAPACITY(sd) 	((sd).block_count & 0xffffff)
+
+
+typedef union {
+	ATARI_SENSE_DATA	atari;
+	SCSI_SENSE_DATA		scsi;
+} SENSE_DATA;
+
+#define SENSE_TYPE_UNKNOWN	0
+#define SENSE_TYPE_ATARI	1
+#define SENSE_TYPE_SCSI		2
+
+#define SENSE_TYPE(sd)										\
+	(((sd).atari.dummy[0] == 8 &&							\
+	  ((sd).atari.format_code == 1 ||						\
+	   (sd).atari.format_code == 2)) ? SENSE_TYPE_ATARI :	\
+	 ((sd).scsi.dummy1 >= 11) ? SENSE_TYPE_SCSI :			\
+	 SENSE_TYPE_UNKNOWN)
+	 
+#define CAPACITY(sd)							\
+	(SENSE_TYPE(sd) == SENSE_TYPE_ATARI ?		\
+	 ATARI_CAPACITY((sd).atari) :				\
+	 SCSI_CAPACITY((sd).scsi))
+
+#define SECTOR_SIZE(sd)							\
+	(SENSE_TYPE(sd) == SENSE_TYPE_ATARI ?		\
+	 (sd).atari.sector_size :					\
+	 (sd).scsi.sector_size & 0xffffff)
+
+/* Default size if capacity cannot be determined (1 GByte) */
+#define	DEFAULT_SIZE	0x1fffff
+
+#define CARTRCH_STAT(aip,buf)						\
+	(aip->old_atari_disk ?						\
+	 (((buf)[0] & 0x7f) == 0x28) :					\
+	 ((((buf)[0] & 0x70) == 0x70) ?					\
+	  (((buf)[2] & 0x0f) == 0x06) :					\
+	  (((buf)[0] & 0x0f) == 0x06)))					\
+
+/* These two are also exported to other drivers that work on the ACSI bus and
+ * need an ST-RAM buffer. */
+char 			*acsi_buffer;
+unsigned long 	phys_acsi_buffer;
+
+static int NDevices;
+
+static int				CurrentNReq;
+static int				CurrentNSect;
+static char				*CurrentBuffer;
+
+static DEFINE_SPINLOCK(acsi_lock);
+
+
+#define SET_TIMER()	mod_timer(&acsi_timer, jiffies + ACSI_TIMEOUT)
+#define CLEAR_TIMER()	del_timer(&acsi_timer)
+
+static unsigned long	STramMask;
+#define STRAM_ADDR(a)	(((a) & STramMask) == 0)
+
+
+
+/* ACSI commands */
+
+static char tur_cmd[6]        = { 0x00, 0, 0, 0, 0, 0 };
+static char modesense_cmd[6]  = { 0x1a, 0, 0, 0, 24, 0 };
+static char modeselect_cmd[6] = { 0x15, 0, 0, 0, 12, 0 };
+static char inquiry_cmd[6]    = { 0x12, 0, 0, 0,255, 0 };
+static char reqsense_cmd[6]   = { 0x03, 0, 0, 0, 4, 0 };
+static char read_cmd[6]       = { 0x08, 0, 0, 0, 0, 0 };
+static char write_cmd[6]      = { 0x0a, 0, 0, 0, 0, 0 };
+static char pa_med_rem_cmd[6] = { 0x1e, 0, 0, 0, 0, 0 };
+
+#define CMDSET_TARG_LUN(cmd,targ,lun)			\
+    do {						\
+		cmd[0] = (cmd[0] & ~0xe0) | (targ)<<5;	\
+		cmd[1] = (cmd[1] & ~0xe0) | (lun)<<5;	\
+	} while(0)
+
+#define CMDSET_BLOCK(cmd,blk)						\
+    do {											\
+		unsigned long __blk = (blk);				\
+		cmd[3] = __blk; __blk >>= 8;				\
+		cmd[2] = __blk; __blk >>= 8;				\
+		cmd[1] = (cmd[1] & 0xe0) | (__blk & 0x1f);	\
+	} while(0)
+
+#define CMDSET_LEN(cmd,len)						\
+	do {										\
+		cmd[4] = (len);							\
+	} while(0)
+
+/* ACSI errors (from REQUEST SENSE); There are two tables, one for the
+ * old Atari disks and one for SCSI on ACSI disks.
+ */
+
+struct acsi_error {
+	unsigned char	code;
+	const char		*text;
+} atari_acsi_errors[] = {
+	{ 0x00, "No error (??)" },
+	{ 0x01, "No index pulses" },
+	{ 0x02, "Seek not complete" },
+	{ 0x03, "Write fault" },
+	{ 0x04, "Drive not ready" },
+	{ 0x06, "No Track 00 signal" },
+	{ 0x10, "ECC error in ID field" },
+	{ 0x11, "Uncorrectable data error" },
+	{ 0x12, "ID field address mark not found" },
+	{ 0x13, "Data field address mark not found" },
+	{ 0x14, "Record not found" },
+	{ 0x15, "Seek error" },
+	{ 0x18, "Data check in no retry mode" },
+	{ 0x19, "ECC error during verify" },
+	{ 0x1a, "Access to bad block" },
+	{ 0x1c, "Unformatted or bad format" },
+	{ 0x20, "Invalid command" },
+	{ 0x21, "Invalid block address" },
+	{ 0x23, "Volume overflow" },
+	{ 0x24, "Invalid argument" },
+	{ 0x25, "Invalid drive number" },
+	{ 0x26, "Byte zero parity check" },
+	{ 0x28, "Cartride changed" },
+	{ 0x2c, "Error count overflow" },
+	{ 0x30, "Controller selftest failed" }
+},
+
+	scsi_acsi_errors[] = {
+	{ 0x00, "No error (??)" },
+	{ 0x01, "Recovered error" },
+	{ 0x02, "Drive not ready" },
+	{ 0x03, "Uncorrectable medium error" },
+	{ 0x04, "Hardware error" },
+	{ 0x05, "Illegal request" },
+	{ 0x06, "Unit attention (Reset or cartridge changed)" },
+	{ 0x07, "Data protection" },
+	{ 0x08, "Blank check" },
+	{ 0x0b, "Aborted Command" },
+	{ 0x0d, "Volume overflow" }
+};
+
+
+
+/***************************** Prototypes *****************************/
+
+static int acsicmd_dma( const char *cmd, char *buffer, int blocks, int
+                        rwflag, int enable);
+static int acsi_reqsense( char *buffer, int targ, int lun);
+static void acsi_print_error(const unsigned char *errblk, struct acsi_info_struct *aip);
+static irqreturn_t acsi_interrupt (int irq, void *data, struct pt_regs *fp);
+static void unexpected_acsi_interrupt( void );
+static void bad_rw_intr( void );
+static void read_intr( void );
+static void write_intr( void);
+static void acsi_times_out( unsigned long dummy );
+static void copy_to_acsibuffer( void );
+static void copy_from_acsibuffer( void );
+static void do_end_requests( void );
+static void do_acsi_request( request_queue_t * );
+static void redo_acsi_request( void );
+static int acsi_ioctl( struct inode *inode, struct file *file, unsigned int
+                       cmd, unsigned long arg );
+static int acsi_open( struct inode * inode, struct file * filp );
+static int acsi_release( struct inode * inode, struct file * file );
+static void acsi_prevent_removal(struct acsi_info_struct *aip, int flag );
+static int acsi_change_blk_size( int target, int lun);
+static int acsi_mode_sense( int target, int lun, SENSE_DATA *sd );
+static int acsi_revalidate (struct gendisk *disk);
+
+/************************* End of Prototypes **************************/
+
+
+struct timer_list acsi_timer = TIMER_INITIALIZER(acsi_times_out, 0, 0);
+
+
+#ifdef CONFIG_ATARI_SLM
+
+extern int attach_slm( int target, int lun );
+extern int slm_init( void );
+
+#endif
+
+
+
+/***********************************************************************
+ *
+ *   ACSI primitives
+ *
+ **********************************************************************/
+
+
+/*
+ * The following two functions wait for _IRQ to become Low or High,
+ * resp., with a timeout. The 'timeout' parameter is in jiffies
+ * (10ms).
+ * If the functions are called with timer interrupts on (int level <
+ * 6), the timeout is based on the 'jiffies' variable to provide exact
+ * timeouts for device probing etc.
+ * If interrupts are disabled, the number of tries is based on the
+ * 'loops_per_jiffy' variable. A rough estimation is sufficient here...
+ */
+
+#define INT_LEVEL													\
+	({	unsigned __sr;												\
+		__asm__ __volatile__ ( "movew	%/sr,%0" : "=dm" (__sr) );	\
+		(__sr >> 8) & 7;											\
+	})
+
+int acsi_wait_for_IRQ( unsigned timeout )
+
+{
+	if (INT_LEVEL < 6) {
+		unsigned long maxjif = jiffies + timeout;
+		while (time_before(jiffies, maxjif))
+			if (!(mfp.par_dt_reg & 0x20)) return( 1 );
+	}
+	else {
+		long tries = loops_per_jiffy / 8 * timeout;
+		while( --tries >= 0 )
+			if (!(mfp.par_dt_reg & 0x20)) return( 1 );
+	}		
+	return( 0 ); /* timeout! */
+}
+
+
+int acsi_wait_for_noIRQ( unsigned timeout )
+
+{
+	if (INT_LEVEL < 6) {
+		unsigned long maxjif = jiffies + timeout;
+		while (time_before(jiffies, maxjif))
+			if (mfp.par_dt_reg & 0x20) return( 1 );
+	}
+	else {
+		long tries = loops_per_jiffy * timeout / 8;
+		while( tries-- >= 0 )
+			if (mfp.par_dt_reg & 0x20) return( 1 );
+	}		
+	return( 0 ); /* timeout! */
+}
+
+static struct timeval start_time;
+
+void
+acsi_delay_start(void)
+{
+	do_gettimeofday(&start_time);
+}
+
+/* wait from acsi_delay_start to now usec (<1E6) usec */
+
+void
+acsi_delay_end(long usec)
+{
+	struct timeval end_time;
+	long deltau,deltas;
+	do_gettimeofday(&end_time);
+	deltau=end_time.tv_usec - start_time.tv_usec;
+	deltas=end_time.tv_sec - start_time.tv_sec;
+	if (deltas > 1 || deltas < 0)
+		return;
+	if (deltas > 0)
+		deltau += 1000*1000;
+	if (deltau >= usec)
+		return;
+	udelay(usec-deltau);
+}
+
+/* acsicmd_dma() sends an ACSI command and sets up the DMA to transfer
+ * 'blocks' blocks of 512 bytes from/to 'buffer'.
+ * Because the _IRQ signal is used for handshaking the command bytes,
+ * the ACSI interrupt has to be disabled in this function. If the end
+ * of the operation should be signalled by a real interrupt, it has to be
+ * reenabled afterwards.
+ */
+
+static int acsicmd_dma( const char *cmd, char *buffer, int blocks, int rwflag, int enable)
+
+{	unsigned long	flags, paddr;
+	int				i;
+
+#ifdef NO_WRITE
+	if (rwflag || *cmd == 0x0a) {
+		printk( "ACSI: Write commands disabled!\n" );
+		return( 0 );
+	}
+#endif
+	
+	rwflag = rwflag ? 0x100 : 0;
+	paddr = virt_to_phys( buffer );
+
+	acsi_delay_end(COMMAND_DELAY);
+	DISABLE_IRQ();
+
+	local_irq_save(flags);
+	/* Low on A1 */
+	dma_wd.dma_mode_status = 0x88 | rwflag;
+	MFPDELAY();
+
+	/* set DMA address */
+	dma_wd.dma_lo = (unsigned char)paddr;
+	paddr >>= 8;
+	MFPDELAY();
+	dma_wd.dma_md = (unsigned char)paddr;
+	paddr >>= 8;
+	MFPDELAY();
+	if (ATARIHW_PRESENT(EXTD_DMA))
+		st_dma_ext_dmahi = (unsigned short)paddr;
+	else
+		dma_wd.dma_hi = (unsigned char)paddr;
+	MFPDELAY();
+	local_irq_restore(flags);
+
+	/* send the command bytes except the last */
+	for( i = 0; i < 5; ++i ) {
+		DMA_LONG_WRITE( *cmd++, 0x8a | rwflag );
+		udelay(20);
+		if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
+	}
+
+	/* Clear FIFO and switch DMA to correct direction */  
+	dma_wd.dma_mode_status = 0x92 | (rwflag ^ 0x100);  
+	MFPDELAY();
+	dma_wd.dma_mode_status = 0x92 | rwflag;
+	MFPDELAY();
+
+	/* How many sectors for DMA */
+	dma_wd.fdc_acces_seccount = blocks;
+	MFPDELAY();
+	
+	/* send last command byte */
+	dma_wd.dma_mode_status = 0x8a | rwflag;
+	MFPDELAY();
+	DMA_LONG_WRITE( *cmd++, 0x0a | rwflag );
+	if (enable)
+		ENABLE_IRQ();
+	udelay(80);
+
+	return( 1 );
+}
+
+
+/*
+ * acsicmd_nodma() sends an ACSI command that requires no DMA.
+ */
+
+int acsicmd_nodma( const char *cmd, int enable)
+
+{	int	i;
+
+	acsi_delay_end(COMMAND_DELAY);
+	DISABLE_IRQ();
+
+	/* send first command byte */
+	dma_wd.dma_mode_status = 0x88;
+	MFPDELAY();
+	DMA_LONG_WRITE( *cmd++, 0x8a );
+	udelay(20);
+	if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
+
+	/* send the intermediate command bytes */
+	for( i = 0; i < 4; ++i ) {
+		DMA_LONG_WRITE( *cmd++, 0x8a );
+		udelay(20);
+		if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
+	}
+
+	/* send last command byte */
+	DMA_LONG_WRITE( *cmd++, 0x0a );
+	if (enable)
+		ENABLE_IRQ();
+	udelay(80);
+	
+	return( 1 );
+	/* Note that the ACSI interrupt is still disabled after this
+	 * function. If you want to get the IRQ delivered, enable it manually!
+	 */
+}
+
+
+static int acsi_reqsense( char *buffer, int targ, int lun)
+
+{
+	CMDSET_TARG_LUN( reqsense_cmd, targ, lun);
+	if (!acsicmd_dma( reqsense_cmd, buffer, 1, 0, 0 )) return( 0 );
+	if (!acsi_wait_for_IRQ( 10 )) return( 0 );
+	acsi_getstatus();
+	if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
+	if (!acsi_wait_for_IRQ( 10 )) return( 0 );
+	acsi_getstatus();
+	if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
+	if (!acsi_wait_for_IRQ( 10 )) return( 0 );
+	acsi_getstatus();
+	if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
+	if (!acsi_wait_for_IRQ( 10 )) return( 0 );
+	acsi_getstatus();
+	dma_cache_maintenance( virt_to_phys(buffer), 16, 0 );
+	
+	return( 1 );
+}	
+
+
+/*
+ * ACSI status phase: get the status byte from the bus
+ *
+ * I've seen several times that a 0xff status is read, propably due to
+ * a timing error. In this case, the procedure is repeated after the
+ * next _IRQ edge.
+ */
+
+int acsi_getstatus( void )
+
+{	int	status;
+
+	DISABLE_IRQ();
+	for(;;) {
+		if (!acsi_wait_for_IRQ( 100 )) {
+			acsi_delay_start();
+			return( -1 );
+		}
+		dma_wd.dma_mode_status = 0x8a;
+		MFPDELAY();
+		status = dma_wd.fdc_acces_seccount;
+		if (status != 0xff) break;
+#ifdef DEBUG
+		printk("ACSI: skipping 0xff status byte\n" );
+#endif
+		udelay(40);
+		acsi_wait_for_noIRQ( 20 );
+	}
+	dma_wd.dma_mode_status = 0x80;
+	udelay(40);
+	acsi_wait_for_noIRQ( 20 );
+
+	acsi_delay_start();
+	return( status & 0x1f ); /* mask of the device# */
+}
+
+
+#if (defined(CONFIG_ATARI_SLM) || defined(CONFIG_ATARI_SLM_MODULE))
+
+/* Receive data in an extended status phase. Needed by SLM printer. */
+
+int acsi_extstatus( char *buffer, int cnt )
+
+{	int	status;
+
+	DISABLE_IRQ();
+	udelay(80);
+	while( cnt-- > 0 ) {
+		if (!acsi_wait_for_IRQ( 40 )) return( 0 );
+		dma_wd.dma_mode_status = 0x8a;
+		MFPDELAY();
+		status = dma_wd.fdc_acces_seccount;
+		MFPDELAY();
+		*buffer++ = status & 0xff;
+		udelay(40);
+	}
+	return( 1 );
+}
+
+
+/* Finish an extended status phase */
+
+void acsi_end_extstatus( void )
+
+{
+	dma_wd.dma_mode_status = 0x80;
+	udelay(40);
+	acsi_wait_for_noIRQ( 20 );
+	acsi_delay_start();
+}
+
+
+/* Send data in an extended command phase */
+
+int acsi_extcmd( unsigned char *buffer, int cnt )
+
+{
+	while( cnt-- > 0 ) {
+		DMA_LONG_WRITE( *buffer++, 0x8a );
+		udelay(20);
+		if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
+	}
+	return( 1 );
+}
+
+#endif
+
+
+static void acsi_print_error(const unsigned char *errblk, struct acsi_info_struct *aip)
+
+{	int atari_err, i, errcode;
+	struct acsi_error *arr;
+
+	atari_err = aip->old_atari_disk;
+	if (atari_err)
+		errcode = errblk[0] & 0x7f;
+	else
+		if ((errblk[0] & 0x70) == 0x70)
+			errcode = errblk[2] & 0x0f;
+		else
+			errcode = errblk[0] & 0x0f;
+	
+	printk( KERN_ERR "ACSI error 0x%02x", errcode );
+
+	if (errblk[0] & 0x80)
+		printk( " for sector %d",
+				((errblk[1] & 0x1f) << 16) |
+				(errblk[2] << 8) | errblk[0] );
+
+	arr = atari_err ? atari_acsi_errors : scsi_acsi_errors;
+	i = atari_err ? sizeof(atari_acsi_errors)/sizeof(*atari_acsi_errors) :
+		            sizeof(scsi_acsi_errors)/sizeof(*scsi_acsi_errors);
+	
+	for( --i; i >= 0; --i )
+		if (arr[i].code == errcode) break;
+	if (i >= 0)
+		printk( ": %s\n", arr[i].text );
+}
+
+/*******************************************************************
+ *
+ * ACSI interrupt routine
+ *   Test, if this is a ACSI interrupt and call the irq handler
+ *   Otherwise ignore this interrupt.
+ *
+ *******************************************************************/
+
+static irqreturn_t acsi_interrupt(int irq, void *data, struct pt_regs *fp )
+
+{	void (*acsi_irq_handler)(void) = do_acsi;
+
+	do_acsi = NULL;
+	CLEAR_TIMER();
+
+	if (!acsi_irq_handler)
+		acsi_irq_handler = unexpected_acsi_interrupt;
+	acsi_irq_handler();
+	return IRQ_HANDLED;
+}
+
+
+/******************************************************************
+ *
+ * The Interrupt handlers
+ *
+ *******************************************************************/
+
+
+static void unexpected_acsi_interrupt( void )
+
+{
+	printk( KERN_WARNING "Unexpected ACSI interrupt\n" );
+}
+
+
+/* This function is called in case of errors. Because we cannot reset
+ * the ACSI bus or a single device, there is no other choice than
+ * retrying several times :-(
+ */
+
+static void bad_rw_intr( void )
+
+{
+	if (!CURRENT)
+		return;
+
+	if (++CURRENT->errors >= MAX_ERRORS)
+		end_request(CURRENT, 0);
+	/* Otherwise just retry */
+}
+
+
+static void read_intr( void )
+
+{	int		status;
+	
+	status = acsi_getstatus();
+	if (status != 0) {
+		struct gendisk *disk = CURRENT->rq_disk;
+		struct acsi_info_struct *aip = disk->private_data;
+		printk(KERN_ERR "%s: ", disk->disk_name);
+		if (!acsi_reqsense(acsi_buffer, aip->target, aip->lun))
+			printk( "ACSI error and REQUEST SENSE failed (status=0x%02x)\n", status );
+		else {
+			acsi_print_error(acsi_buffer, aip);
+			if (CARTRCH_STAT(aip, acsi_buffer))
+				aip->changed = 1;
+		}
+		ENABLE_IRQ();
+		bad_rw_intr();
+		redo_acsi_request();
+		return;
+	}
+
+	dma_cache_maintenance( virt_to_phys(CurrentBuffer), CurrentNSect*512, 0 );
+	if (CurrentBuffer == acsi_buffer)
+		copy_from_acsibuffer();
+
+	do_end_requests();
+	redo_acsi_request();
+}
+
+
+static void write_intr(void)
+
+{	int	status;
+
+	status = acsi_getstatus();
+	if (status != 0) {
+		struct gendisk *disk = CURRENT->rq_disk;
+		struct acsi_info_struct *aip = disk->private_data;
+		printk( KERN_ERR "%s: ", disk->disk_name);
+		if (!acsi_reqsense( acsi_buffer, aip->target, aip->lun))
+			printk( "ACSI error and REQUEST SENSE failed (status=0x%02x)\n", status );
+		else {
+			acsi_print_error(acsi_buffer, aip);
+			if (CARTRCH_STAT(aip, acsi_buffer))
+				aip->changed = 1;
+		}
+		bad_rw_intr();
+		redo_acsi_request();
+		return;
+	}
+
+	do_end_requests();
+	redo_acsi_request();
+}
+
+
+static void acsi_times_out( unsigned long dummy )
+
+{
+	DISABLE_IRQ();
+	if (!do_acsi) return;
+
+	do_acsi = NULL;
+	printk( KERN_ERR "ACSI timeout\n" );
+	if (!CURRENT)
+	    return;
+	if (++CURRENT->errors >= MAX_ERRORS) {
+#ifdef DEBUG
+		printk( KERN_ERR "ACSI: too many errors.\n" );
+#endif
+		end_request(CURRENT, 0);
+	}
+
+	redo_acsi_request();
+}
+
+
+
+/***********************************************************************
+ *
+ *  Scatter-gather utility functions
+ *
+ ***********************************************************************/
+
+
+static void copy_to_acsibuffer( void )
+
+{	int					i;
+	char				*src, *dst;
+	struct buffer_head	*bh;
+	
+	src = CURRENT->buffer;
+	dst = acsi_buffer;
+	bh = CURRENT->bh;
+
+	if (!bh)
+		memcpy( dst, src, CurrentNSect*512 );
+	else
+		for( i = 0; i < CurrentNReq; ++i ) {
+			memcpy( dst, src, bh->b_size );
+			dst += bh->b_size;
+			if ((bh = bh->b_reqnext))
+				src = bh->b_data;
+		}
+}
+
+
+static void copy_from_acsibuffer( void )
+
+{	int					i;
+	char				*src, *dst;
+	struct buffer_head	*bh;
+	
+	dst = CURRENT->buffer;
+	src = acsi_buffer;
+	bh = CURRENT->bh;
+
+	if (!bh)
+		memcpy( dst, src, CurrentNSect*512 );
+	else
+		for( i = 0; i < CurrentNReq; ++i ) {
+			memcpy( dst, src, bh->b_size );
+			src += bh->b_size;
+			if ((bh = bh->b_reqnext))
+				dst = bh->b_data;
+		}
+}
+
+
+static void do_end_requests( void )
+
+{	int		i, n;
+
+	if (!CURRENT->bh) {
+		CURRENT->nr_sectors -= CurrentNSect;
+		CURRENT->current_nr_sectors -= CurrentNSect;
+		CURRENT->sector += CurrentNSect;
+		if (CURRENT->nr_sectors == 0)
+			end_request(CURRENT, 1);
+	}
+	else {
+		for( i = 0; i < CurrentNReq; ++i ) {
+			n = CURRENT->bh->b_size >> 9;
+			CURRENT->nr_sectors -= n;
+			CURRENT->current_nr_sectors -= n;
+			CURRENT->sector += n;
+			end_request(CURRENT, 1);
+		}
+	}
+}
+
+
+
+
+/***********************************************************************
+ *
+ *  do_acsi_request and friends
+ *
+ ***********************************************************************/
+
+static void do_acsi_request( request_queue_t * q )
+
+{
+	stdma_lock( acsi_interrupt, NULL );
+	redo_acsi_request();
+}
+
+
+static void redo_acsi_request( void )
+{
+	unsigned			block, target, lun, nsect;
+	char 				*buffer;
+	unsigned long		pbuffer;
+	struct buffer_head	*bh;
+	struct gendisk *disk;
+	struct acsi_info_struct *aip;
+
+  repeat:
+	CLEAR_TIMER();
+
+	if (do_acsi)
+		return;
+
+	if (!CURRENT) {
+		do_acsi = NULL;
+		ENABLE_IRQ();
+		stdma_release();
+		return;
+	}
+
+	disk = CURRENT->rq_disk;
+	aip = disk->private_data;
+	if (CURRENT->bh) {
+		if (!CURRENT->bh && !buffer_locked(CURRENT->bh))
+			panic("ACSI: block not locked");
+	}
+
+	block = CURRENT->sector;
+	if (block+CURRENT->nr_sectors >= get_capacity(disk)) {
+#ifdef DEBUG
+		printk( "%s: attempted access for blocks %d...%ld past end of device at block %ld.\n",
+		       disk->disk_name,
+		       block, block + CURRENT->nr_sectors - 1,
+		       get_capacity(disk));
+#endif
+		end_request(CURRENT, 0);
+		goto repeat;
+	}
+	if (aip->changed) {
+		printk( KERN_NOTICE "%s: request denied because cartridge has "
+				"been changed.\n", disk->disk_name);
+		end_request(CURRENT, 0);
+		goto repeat;
+	}
+	
+	target = aip->target;
+	lun    = aip->lun;
+
+	/* Find out how many sectors should be transferred from/to
+	 * consecutive buffers and thus can be done with a single command.
+	 */
+	buffer      = CURRENT->buffer;
+	pbuffer     = virt_to_phys(buffer);
+	nsect       = CURRENT->current_nr_sectors;
+	CurrentNReq = 1;
+
+	if ((bh = CURRENT->bh) && bh != CURRENT->bhtail) {
+		if (!STRAM_ADDR(pbuffer)) {
+			/* If transfer is done via the ACSI buffer anyway, we can
+			 * assemble as much bh's as fit in the buffer.
+			 */
+			while( (bh = bh->b_reqnext) ) {
+				if (nsect + (bh->b_size>>9) > ACSI_BUFFER_SECTORS) break;
+				nsect += bh->b_size >> 9;
+				++CurrentNReq;
+				if (bh == CURRENT->bhtail) break;
+			}
+			buffer = acsi_buffer;
+			pbuffer = phys_acsi_buffer;
+		}
+		else {
+			unsigned long pendadr, pnewadr;
+			pendadr = pbuffer + nsect*512;
+			while( (bh = bh->b_reqnext) ) {
+				pnewadr = virt_to_phys(bh->b_data);
+				if (!STRAM_ADDR(pnewadr) || pendadr != pnewadr) break;
+				nsect += bh->b_size >> 9;
+				pendadr = pnewadr + bh->b_size;
+				++CurrentNReq;
+				if (bh == CURRENT->bhtail) break;
+			}
+		}
+	}
+	else {
+		if (!STRAM_ADDR(pbuffer)) {
+			buffer = acsi_buffer;
+			pbuffer = phys_acsi_buffer;
+			if (nsect > ACSI_BUFFER_SECTORS)
+				nsect = ACSI_BUFFER_SECTORS;
+		}
+	}
+	CurrentBuffer = buffer;
+	CurrentNSect  = nsect;
+
+	if (rq_data_dir(CURRENT) == WRITE) {
+		CMDSET_TARG_LUN( write_cmd, target, lun );
+		CMDSET_BLOCK( write_cmd, block );
+		CMDSET_LEN( write_cmd, nsect );
+		if (buffer == acsi_buffer)
+			copy_to_acsibuffer();
+		dma_cache_maintenance( pbuffer, nsect*512, 1 );
+		do_acsi = write_intr;
+		if (!acsicmd_dma( write_cmd, buffer, nsect, 1, 1)) {
+			do_acsi = NULL;
+			printk( KERN_ERR "ACSI (write): Timeout in command block\n" );
+			bad_rw_intr();
+			goto repeat;
+		}
+		SET_TIMER();
+		return;
+	}
+	if (rq_data_dir(CURRENT) == READ) {
+		CMDSET_TARG_LUN( read_cmd, target, lun );
+		CMDSET_BLOCK( read_cmd, block );
+		CMDSET_LEN( read_cmd, nsect );
+		do_acsi = read_intr;
+		if (!acsicmd_dma( read_cmd, buffer, nsect, 0, 1)) {
+			do_acsi = NULL;
+			printk( KERN_ERR "ACSI (read): Timeout in command block\n" );
+			bad_rw_intr();
+			goto repeat;
+		}
+		SET_TIMER();
+		return;
+	}
+	panic("unknown ACSI command");
+}
+
+
+
+/***********************************************************************
+ *
+ *  Misc functions: ioctl, open, release, check_change, ...
+ *
+ ***********************************************************************/
+
+
+static int acsi_ioctl( struct inode *inode, struct file *file,
+					   unsigned int cmd, unsigned long arg )
+{
+	struct gendisk *disk = inode->i_bdev->bd_disk;
+	struct acsi_info_struct *aip = disk->private_data;
+	switch (cmd) {
+	  case HDIO_GETGEO:
+		/* HDIO_GETGEO is supported more for getting the partition's
+		 * start sector... */
+	  { struct hd_geometry *geo = (struct hd_geometry *)arg;
+	    /* just fake some geometry here, it's nonsense anyway; to make it
+		 * easy, use Adaptec's usual 64/32 mapping */
+	    put_user( 64, &geo->heads );
+	    put_user( 32, &geo->sectors );
+	    put_user( aip->size >> 11, &geo->cylinders );
+		put_user(get_start_sect(inode->i_bdev), &geo->start);
+		return 0;
+	  }
+	  case SCSI_IOCTL_GET_IDLUN:
+		/* SCSI compatible GET_IDLUN call to get target's ID and LUN number */
+		put_user( aip->target | (aip->lun << 8),
+				  &((Scsi_Idlun *) arg)->dev_id );
+		put_user( 0, &((Scsi_Idlun *) arg)->host_unique_id );
+		return 0;
+	  default:
+		return -EINVAL;
+	}
+}
+
+
+/*
+ * Open a device, check for read-only and lock the medium if it is
+ * removable.
+ *
+ * Changes by Martin Rogge, 9th Aug 1995:
+ * Check whether check_disk_change (and therefore revalidate_acsidisk)
+ * was successful. They fail when there is no medium in the drive.
+ *
+ * The problem of media being changed during an operation can be 
+ * ignored because of the prevent_removal code.
+ *
+ * Added check for the validity of the device number.
+ *
+ */
+
+static int acsi_open( struct inode * inode, struct file * filp )
+{
+	struct gendisk *disk = inode->i_bdev->bd_disk;
+	struct acsi_info_struct *aip = disk->private_data;
+
+	if (aip->access_count == 0 && aip->removable) {
+#if 0
+		aip->changed = 1;	/* safety first */
+#endif
+		check_disk_change( inode->i_bdev );
+		if (aip->changed)	/* revalidate was not successful (no medium) */
+			return -ENXIO;
+		acsi_prevent_removal(aip, 1);
+	}
+	aip->access_count++;
+
+	if (filp && filp->f_mode) {
+		check_disk_change( inode->i_bdev );
+		if (filp->f_mode & 2) {
+			if (aip->read_only) {
+				acsi_release( inode, filp );
+				return -EROFS;
+			}
+		}
+	}
+
+	return 0;
+}
+
+/*
+ * Releasing a block device means we sync() it, so that it can safely
+ * be forgotten about...
+ */
+
+static int acsi_release( struct inode * inode, struct file * file )
+{
+	struct gendisk *disk = inode->i_bdev->bd_disk;
+	struct acsi_info_struct *aip = disk->private_data;
+	if (--aip->access_count == 0 && aip->removable)
+		acsi_prevent_removal(aip, 0);
+	return( 0 );
+}
+
+/*
+ * Prevent or allow a media change for removable devices.
+ */
+
+static void acsi_prevent_removal(struct acsi_info_struct *aip, int flag)
+{
+	stdma_lock( NULL, NULL );
+	
+	CMDSET_TARG_LUN(pa_med_rem_cmd, aip->target, aip->lun);
+	CMDSET_LEN( pa_med_rem_cmd, flag );
+	
+	if (acsicmd_nodma(pa_med_rem_cmd, 0) && acsi_wait_for_IRQ(3*HZ))
+		acsi_getstatus();
+	/* Do not report errors -- some devices may not know this command. */
+
+	ENABLE_IRQ();
+	stdma_release();
+}
+
+static int acsi_media_change(struct gendisk *disk)
+{
+	struct acsi_info_struct *aip = disk->private_data;
+
+	if (!aip->removable) 
+		return 0;
+
+	if (aip->changed)
+		/* We can be sure that the medium has been changed -- REQUEST
+		 * SENSE has reported this earlier.
+		 */
+		return 1;
+
+	/* If the flag isn't set, make a test by reading block 0.
+	 * If errors happen, it seems to be better to say "changed"...
+	 */
+	stdma_lock( NULL, NULL );
+	CMDSET_TARG_LUN(read_cmd, aip->target, aip->lun);
+	CMDSET_BLOCK( read_cmd, 0 );
+	CMDSET_LEN( read_cmd, 1 );
+	if (acsicmd_dma(read_cmd, acsi_buffer, 1, 0, 0) &&
+	    acsi_wait_for_IRQ(3*HZ)) {
+		if (acsi_getstatus()) {
+			if (acsi_reqsense(acsi_buffer, aip->target, aip->lun)) {
+				if (CARTRCH_STAT(aip, acsi_buffer))
+					aip->changed = 1;
+			}
+			else {
+				printk( KERN_ERR "%s: REQUEST SENSE failed in test for "
+				       "medium change; assuming a change\n", disk->disk_name );
+				aip->changed = 1;
+			}
+		}
+	}
+	else {
+		printk( KERN_ERR "%s: Test for medium changed timed out; "
+				"assuming a change\n", disk->disk_name);
+		aip->changed = 1;
+	}
+	ENABLE_IRQ();
+	stdma_release();
+
+	/* Now, after reading a block, the changed status is surely valid. */
+	return aip->changed;
+}
+
+
+static int acsi_change_blk_size( int target, int lun)
+
+{	int i;
+
+	for (i=0; i<12; i++)
+		acsi_buffer[i] = 0;
+
+	acsi_buffer[3] = 8;
+	acsi_buffer[10] = 2;
+	CMDSET_TARG_LUN( modeselect_cmd, target, lun);
+
+	if (!acsicmd_dma( modeselect_cmd, acsi_buffer, 1,1,0) ||
+		!acsi_wait_for_IRQ( 3*HZ ) ||
+		acsi_getstatus() != 0 ) {
+		return(0);
+	}
+	return(1);
+}
+
+
+static int acsi_mode_sense( int target, int lun, SENSE_DATA *sd )
+
+{
+	int page;
+
+	CMDSET_TARG_LUN( modesense_cmd, target, lun );
+	for (page=0; page<4; page++) {
+		modesense_cmd[2] = page;
+		if (!acsicmd_dma( modesense_cmd, acsi_buffer, 1, 0, 0 ) ||
+		    !acsi_wait_for_IRQ( 3*HZ ) ||
+		    acsi_getstatus())
+			continue;
+
+		/* read twice to jump over the second 16-byte border! */
+		udelay(300);
+		if (acsi_wait_for_noIRQ( 20 ) &&
+		    acsicmd_nodma( modesense_cmd, 0 ) &&
+		    acsi_wait_for_IRQ( 3*HZ ) &&
+		    acsi_getstatus() == 0)
+			break;
+	}
+	if (page == 4) {
+		return(0);
+	}
+
+	dma_cache_maintenance( phys_acsi_buffer, sizeof(SENSE_DATA), 0 );
+	*sd = *(SENSE_DATA *)acsi_buffer;
+
+	/* Validity check, depending on type of data */
+	
+	switch( SENSE_TYPE(*sd) ) {
+
+	  case SENSE_TYPE_ATARI:
+		if (CAPACITY(*sd) == 0)
+			goto invalid_sense;
+		break;
+
+	  case SENSE_TYPE_SCSI:
+		if (sd->scsi.descriptor_size != 8)
+			goto invalid_sense;
+		break;
+
+	  case SENSE_TYPE_UNKNOWN:
+
+		printk( KERN_ERR "ACSI target %d, lun %d: Cannot interpret "
+				"sense data\n", target, lun ); 
+		
+	  invalid_sense:
+
+#ifdef DEBUG
+		{	int i;
+		printk( "Mode sense data for ACSI target %d, lun %d seem not valid:",
+				target, lun );
+		for( i = 0; i < sizeof(SENSE_DATA); ++i )
+			printk( "%02x ", (unsigned char)acsi_buffer[i] );
+		printk( "\n" );
+		}
+#endif
+		return( 0 );
+	}
+		
+	return( 1 );
+}
+
+
+
+/*******************************************************************
+ *
+ *  Initialization
+ *
+ ********************************************************************/
+
+
+extern struct block_device_operations acsi_fops;
+
+static struct gendisk *acsi_gendisk[MAX_DEV];
+
+#define MAX_SCSI_DEVICE_CODE 10
+
+static const char *const scsi_device_types[MAX_SCSI_DEVICE_CODE] =
+{
+ "Direct-Access    ",
+ "Sequential-Access",
+ "Printer          ",
+ "Processor        ",
+ "WORM             ",
+ "CD-ROM           ",
+ "Scanner          ",
+ "Optical Device   ",
+ "Medium Changer   ",
+ "Communications   "
+};
+
+static void print_inquiry(unsigned char *data)
+{
+	int i;
+
+	printk(KERN_INFO "  Vendor: ");
+	for (i = 8; i < 16; i++)
+		{
+	        if (data[i] >= 0x20 && i < data[4] + 5)
+			printk("%c", data[i]);
+		else
+			printk(" ");
+		}
+
+	printk("  Model: ");
+	for (i = 16; i < 32; i++)
+		{
+	        if (data[i] >= 0x20 && i < data[4] + 5)
+			printk("%c", data[i]);
+		else
+			printk(" ");
+		}
+
+	printk("  Rev: ");
+	for (i = 32; i < 36; i++)
+		{
+	        if (data[i] >= 0x20 && i < data[4] + 5)
+			printk("%c", data[i]);
+		else
+			printk(" ");
+		}
+
+	printk("\n");
+
+	i = data[0] & 0x1f;
+
+	printk(KERN_INFO "  Type:   %s ", (i < MAX_SCSI_DEVICE_CODE
+									   ? scsi_device_types[i]
+									   : "Unknown          "));
+	printk("                 ANSI SCSI revision: %02x", data[2] & 0x07);
+	if ((data[2] & 0x07) == 1 && (data[3] & 0x0f) == 1)
+	  printk(" CCS\n");
+	else
+	  printk("\n");
+}
+
+
+/* 
+ * Changes by Martin Rogge, 9th Aug 1995: 
+ * acsi_devinit has been taken out of acsi_geninit, because it needs 
+ * to be called from revalidate_acsidisk. The result of request sense 
+ * is now checked for DRIVE NOT READY.
+ *
+ * The structure *aip is only valid when acsi_devinit returns 
+ * DEV_SUPPORTED. 
+ *
+ */
+	
+#define DEV_NONE	0
+#define DEV_UNKNOWN	1
+#define DEV_SUPPORTED	2
+#define DEV_SLM		3
+
+static int acsi_devinit(struct acsi_info_struct *aip)
+{
+	int status, got_inquiry;
+	SENSE_DATA sense;
+	unsigned char reqsense, extsense;
+
+	/*****************************************************************/
+	/* Do a TEST UNIT READY command to test the presence of a device */
+	/*****************************************************************/
+
+	CMDSET_TARG_LUN(tur_cmd, aip->target, aip->lun);
+	if (!acsicmd_nodma(tur_cmd, 0)) {
+		/* timed out -> no device here */
+#ifdef DEBUG_DETECT
+		printk("target %d lun %d: timeout\n", aip->target, aip->lun);
+#endif
+		return DEV_NONE;
+	}
+		
+	/*************************/
+	/* Read the ACSI status. */
+	/*************************/
+
+	status = acsi_getstatus();
+	if (status) {
+		if (status == 0x12) {
+			/* The SLM printer should be the only device that
+			 * responds with the error code in the status byte. In
+			 * correct status bytes, bit 4 is never set.
+			 */
+			printk( KERN_INFO "Detected SLM printer at id %d lun %d\n",
+			       aip->target, aip->lun);
+			return DEV_SLM;
+		}
+		/* ignore CHECK CONDITION, since some devices send a
+		   UNIT ATTENTION */
+		if ((status & 0x1e) != 0x2) {
+#ifdef DEBUG_DETECT
+			printk("target %d lun %d: status %d\n",
+			       aip->target, aip->lun, status);
+#endif
+			return DEV_UNKNOWN;
+		}
+	}
+
+	/*******************************/
+	/* Do a REQUEST SENSE command. */
+	/*******************************/
+
+	if (!acsi_reqsense(acsi_buffer, aip->target, aip->lun)) {
+		printk( KERN_WARNING "acsi_reqsense failed\n");
+		acsi_buffer[0] = 0;
+		acsi_buffer[2] = UNIT_ATTENTION;
+	}
+	reqsense = acsi_buffer[0];
+	extsense = acsi_buffer[2] & 0xf;
+	if (status) {
+		if ((reqsense & 0x70) == 0x70) {	/* extended sense */
+			if (extsense != UNIT_ATTENTION &&
+			    extsense != NOT_READY) {
+#ifdef DEBUG_DETECT
+				printk("target %d lun %d: extended sense %d\n",
+				       aip->target, aip->lun, extsense);
+#endif
+				return DEV_UNKNOWN;
+			}
+		}
+		else {
+			if (reqsense & 0x7f) {
+#ifdef DEBUG_DETECT
+				printk("target %d lun %d: sense %d\n",
+				       aip->target, aip->lun, reqsense);
+#endif
+				return DEV_UNKNOWN;
+			}
+		}
+	}
+	else 
+		if (reqsense == 0x4) {	/* SH204 Bug workaround */
+#ifdef DEBUG_DETECT
+			printk("target %d lun %d status=0 sense=4\n",
+			       aip->target, aip->lun);
+#endif
+			return DEV_UNKNOWN;
+		}
+
+	/***********************************************************/
+	/* Do an INQUIRY command to get more infos on this device. */
+	/***********************************************************/
+
+	/* Assume default values */
+	aip->removable = 1;
+	aip->read_only = 0;
+	aip->old_atari_disk = 0;
+	aip->changed = (extsense == NOT_READY);	/* medium inserted? */
+	aip->size = DEFAULT_SIZE;
+	got_inquiry = 0;
+	/* Fake inquiry result for old atari disks */
+	memcpy(acsi_buffer, "\000\000\001\000    Adaptec 40xx"
+	       "                    ", 40);
+	CMDSET_TARG_LUN(inquiry_cmd, aip->target, aip->lun);
+	if (acsicmd_dma(inquiry_cmd, acsi_buffer, 1, 0, 0) &&
+	    acsi_getstatus() == 0) {
+		acsicmd_nodma(inquiry_cmd, 0);
+		acsi_getstatus();
+		dma_cache_maintenance( phys_acsi_buffer, 256, 0 );
+		got_inquiry = 1;
+		aip->removable = !!(acsi_buffer[1] & 0x80);
+	}
+	if (aip->type == NONE)	/* only at boot time */
+		print_inquiry(acsi_buffer);
+	switch(acsi_buffer[0]) {
+	  case TYPE_DISK:
+		aip->type = HARDDISK;
+		break;
+	  case TYPE_ROM:
+		aip->type = CDROM;
+		aip->read_only = 1;
+		break;
+	  default:
+		return DEV_UNKNOWN;
+	}
+	/****************************/
+	/* Do a MODE SENSE command. */
+	/****************************/
+
+	if (!acsi_mode_sense(aip->target, aip->lun, &sense)) {
+		printk( KERN_WARNING "No mode sense data.\n" );
+		return DEV_UNKNOWN;
+	}
+	if ((SECTOR_SIZE(sense) != 512) &&
+	    ((aip->type != CDROM) ||
+	     !acsi_change_blk_size(aip->target, aip->lun) ||
+	     !acsi_mode_sense(aip->target, aip->lun, &sense) ||
+	     (SECTOR_SIZE(sense) != 512))) {
+		printk( KERN_WARNING "Sector size != 512 not supported.\n" );
+		return DEV_UNKNOWN;
+	}
+	/* There are disks out there that claim to have 0 sectors... */
+	if (CAPACITY(sense))
+		aip->size = CAPACITY(sense);	/* else keep DEFAULT_SIZE */
+	if (!got_inquiry && SENSE_TYPE(sense) == SENSE_TYPE_ATARI) {
+		/* If INQUIRY failed and the sense data suggest an old
+		 * Atari disk (SH20x, Megafile), the disk is not removable
+		 */
+		aip->removable = 0;
+		aip->old_atari_disk = 1;
+	}
+	
+	/******************/
+	/* We've done it. */
+	/******************/
+	
+	return DEV_SUPPORTED;
+}
+
+EXPORT_SYMBOL(acsi_delay_start);
+EXPORT_SYMBOL(acsi_delay_end);
+EXPORT_SYMBOL(acsi_wait_for_IRQ);
+EXPORT_SYMBOL(acsi_wait_for_noIRQ);
+EXPORT_SYMBOL(acsicmd_nodma);
+EXPORT_SYMBOL(acsi_getstatus);
+EXPORT_SYMBOL(acsi_buffer);
+EXPORT_SYMBOL(phys_acsi_buffer);
+
+#ifdef CONFIG_ATARI_SLM_MODULE
+void acsi_attach_SLMs( int (*attach_func)( int, int ) );
+
+EXPORT_SYMBOL(acsi_extstatus);
+EXPORT_SYMBOL(acsi_end_extstatus);
+EXPORT_SYMBOL(acsi_extcmd);
+EXPORT_SYMBOL(acsi_attach_SLMs);
+
+/* to remember IDs of SLM devices, SLM module is loaded later
+ * (index is target#, contents is lun#, -1 means "no SLM") */
+int SLM_devices[8];
+#endif
+
+static struct block_device_operations acsi_fops = {
+	.owner		= THIS_MODULE,
+	.open		= acsi_open,
+	.release	= acsi_release,
+	.ioctl		= acsi_ioctl,
+	.media_changed	= acsi_media_change,
+	.revalidate_disk= acsi_revalidate,
+};
+
+#ifdef CONFIG_ATARI_SLM_MODULE
+/* call attach_slm() for each device that is a printer; needed for init of SLM
+ * driver as a module, since it's not yet present if acsi.c is inited and thus
+ * the bus gets scanned. */
+void acsi_attach_SLMs( int (*attach_func)( int, int ) )
+{
+	int i, n = 0;
+
+	for( i = 0; i < 8; ++i )
+		if (SLM_devices[i] >= 0)
+			n += (*attach_func)( i, SLM_devices[i] );
+	printk( KERN_INFO "Found %d SLM printer(s) total.\n", n );
+}
+#endif /* CONFIG_ATARI_SLM_MODULE */
+
+
+int acsi_init( void )
+{
+	int err = 0;
+	int i, target, lun;
+	struct acsi_info_struct *aip;
+#ifdef CONFIG_ATARI_SLM
+	int n_slm = 0;
+#endif
+	if (!MACH_IS_ATARI || !ATARIHW_PRESENT(ACSI))
+		return 0;
+	if (register_blkdev(ACSI_MAJOR, "ad")) {
+		err = -EBUSY;
+		goto out1;
+	}
+	if (!(acsi_buffer =
+		  (char *)atari_stram_alloc(ACSI_BUFFER_SIZE, "acsi"))) {
+		err = -ENOMEM;
+		printk( KERN_ERR "Unable to get ACSI ST-Ram buffer.\n" );
+		goto out2;
+	}
+	phys_acsi_buffer = virt_to_phys( acsi_buffer );
+	STramMask = ATARIHW_PRESENT(EXTD_DMA) ? 0x00000000 : 0xff000000;
+	
+	acsi_queue = blk_init_queue(do_acsi_request, &acsi_lock);
+	if (!acsi_queue) {
+		err = -ENOMEM;
+		goto out2a;
+	}
+#ifdef CONFIG_ATARI_SLM
+	err = slm_init();
+#endif
+	if (err)
+		goto out3;
+
+	printk( KERN_INFO "Probing ACSI devices:\n" );
+	NDevices = 0;
+#ifdef CONFIG_ATARI_SLM_MODULE
+	for( i = 0; i < 8; ++i )
+		SLM_devices[i] = -1;
+#endif
+	stdma_lock(NULL, NULL);
+
+	for (target = 0; target < 8 && NDevices < MAX_DEV; ++target) {
+		lun = 0;
+		do {
+			aip = &acsi_info[NDevices];
+			aip->type = NONE;
+			aip->target = target;
+			aip->lun = lun;
+			i = acsi_devinit(aip);
+			switch (i) {
+			  case DEV_SUPPORTED:
+				printk( KERN_INFO "Detected ");
+				switch (aip->type) {
+				  case HARDDISK:
+					printk("disk");
+					break;
+				  case CDROM:
+					printk("cdrom");
+					break;
+				  default:
+				}
+				printk(" ad%c at id %d lun %d ",
+				       'a' + NDevices, target, lun);
+				if (aip->removable) 
+					printk("(removable) ");
+				if (aip->read_only) 
+					printk("(read-only) ");
+				if (aip->size == DEFAULT_SIZE)
+					printk(" unkown size, using default ");
+				printk("%ld MByte\n",
+				       (aip->size*512+1024*1024/2)/(1024*1024));
+				NDevices++;
+				break;
+			  case DEV_SLM:
+#ifdef CONFIG_ATARI_SLM
+				n_slm += attach_slm( target, lun );
+				break;
+#endif
+#ifdef CONFIG_ATARI_SLM_MODULE
+				SLM_devices[target] = lun;
+				break;
+#endif
+				/* neither of the above: fall through to unknown device */
+			  case DEV_UNKNOWN:
+				printk( KERN_INFO "Detected unsupported device at "
+						"id %d lun %d\n", target, lun);
+				break;
+			}
+		}
+#ifdef CONFIG_ACSI_MULTI_LUN
+		while (i != DEV_NONE && ++lun < MAX_LUN);
+#else
+		while (0);
+#endif
+	}
+
+	/* reenable interrupt */
+	ENABLE_IRQ();
+	stdma_release();
+
+#ifndef CONFIG_ATARI_SLM
+	printk( KERN_INFO "Found %d ACSI device(s) total.\n", NDevices );
+#else
+	printk( KERN_INFO "Found %d ACSI device(s) and %d SLM printer(s) total.\n",
+			NDevices, n_slm );
+#endif
+	err = -ENOMEM;
+	for( i = 0; i < NDevices; ++i ) {
+		acsi_gendisk[i] = alloc_disk(16);
+		if (!acsi_gendisk[i])
+			goto out4;
+	}
+
+	for( i = 0; i < NDevices; ++i ) {
+		struct gendisk *disk = acsi_gendisk[i];
+		sprintf(disk->disk_name, "ad%c", 'a'+i);
+		aip = &acsi_info[NDevices];
+		sprintf(disk->devfs_name, "ad/target%d/lun%d", aip->target, aip->lun);
+		disk->major = ACSI_MAJOR;
+		disk->first_minor = i << 4;
+		if (acsi_info[i].type != HARDDISK) {
+			disk->minors = 1;
+			strcat(disk->devfs_name, "/disc");
+		}
+		disk->fops = &acsi_fops;
+		disk->private_data = &acsi_info[i];
+		set_capacity(disk, acsi_info[i].size);
+		disk->queue = acsi_queue;
+		add_disk(disk);
+	}
+	return 0;
+out4:
+	while (i--)
+		put_disk(acsi_gendisk[i]);
+out3:
+	blk_cleanup_queue(acsi_queue);
+out2a:
+	atari_stram_free( acsi_buffer );
+out2:
+	unregister_blkdev( ACSI_MAJOR, "ad" );
+out1:
+	return err;
+}
+
+
+#ifdef MODULE
+
+MODULE_LICENSE("GPL");
+
+int init_module(void)
+{
+	int err;
+
+	if ((err = acsi_init()))
+		return( err );
+	printk( KERN_INFO "ACSI driver loaded as module.\n");
+	return( 0 );
+}
+
+void cleanup_module(void)
+{
+	int i;
+	del_timer( &acsi_timer );
+	blk_cleanup_queue(acsi_queue);
+	atari_stram_free( acsi_buffer );
+
+	if (unregister_blkdev( ACSI_MAJOR, "ad" ) != 0)
+		printk( KERN_ERR "acsi: cleanup_module failed\n");
+
+	for (i = 0; i < NDevices; i++) {
+		del_gendisk(acsi_gendisk[i]);
+		put_disk(acsi_gendisk[i]);
+	}
+}
+#endif
+
+/*
+ * This routine is called to flush all partitions and partition tables
+ * for a changed scsi disk, and then re-read the new partition table.
+ * If we are revalidating a disk because of a media change, then we
+ * enter with usage == 0.  If we are using an ioctl, we automatically have
+ * usage == 1 (we need an open channel to use an ioctl :-), so this
+ * is our limit.
+ *
+ * Changes by Martin Rogge, 9th Aug 1995: 
+ * got cd-roms to work by calling acsi_devinit. There are only two problems:
+ * First, if there is no medium inserted, the status will remain "changed".
+ * That is no problem at all, but our design of three-valued logic (medium
+ * changed, medium not changed, no medium inserted).
+ * Secondly the check could fail completely and the drive could deliver
+ * nonsensical data, which could mess up the acsi_info[] structure. In
+ * that case we try to make the entry safe.
+ *
+ */
+
+static int acsi_revalidate(struct gendisk *disk)
+{
+	struct acsi_info_struct *aip = disk->private_data;
+	stdma_lock( NULL, NULL );
+	if (acsi_devinit(aip) != DEV_SUPPORTED) {
+		printk( KERN_ERR "ACSI: revalidate failed for target %d lun %d\n",
+		       aip->target, aip->lun);
+		aip->size = 0;
+		aip->read_only = 1;
+		aip->removable = 1;
+		aip->changed = 1; /* next acsi_open will try again... */
+	}
+
+	ENABLE_IRQ();
+	stdma_release();
+	set_capacity(disk, aip->size);
+	return 0;
+}