?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
[PATCH] aic7xxx_osm build fix
[cris-mirror.git] / drivers / block / acsi.c
blobce933de4808494445996ee5c161f8dbca576222e
1 /*
2 * acsi.c -- Device driver for Atari ACSI hard disks
3 *
4 * Copyright 1994 Roman Hodek <Roman.Hodek@informatik.uni-erlangen.de>
5 *
6 * Some parts are based on hd.c by Linus Torvalds
7 *
8 * This file is subject to the terms and conditions of the GNU General Public
9 * License. See the file COPYING in the main directory of this archive for
10 * more details.
11 *
12 */
13
14 /*
15 * Still to in this file:
16 * - If a command ends with an error status (!= 0), the following
17 * REQUEST SENSE commands (4 to fill the ST-DMA FIFO) are done by
18 * polling the _IRQ signal (not interrupt-driven). This should be
19 * avoided in future because it takes up a non-neglectible time in
20 * the interrupt service routine while interrupts are disabled.
21 * Maybe a timer interrupt will get lost :-(
22 */
23
24 /*
25 * General notes:
26 *
27 * - All ACSI devices (disks, CD-ROMs, ...) use major number 28.
28 * Minors are organized like it is with SCSI: The upper 4 bits
29 * identify the device, the lower 4 bits the partition.
30 * The device numbers (the upper 4 bits) are given in the same
31 * order as the devices are found on the bus.
32 * - Up to 8 LUNs are supported for each target (if CONFIG_ACSI_MULTI_LUN
33 * is defined), but only a total of 16 devices (due to minor
34 * numbers...). Note that Atari allows only a maximum of 4 targets
35 * (i.e. controllers, not devices) on the ACSI bus!
36 * - A optimizing scheme similar to SCSI scatter-gather is implemented.
37 * - Removable media are supported. After a medium change to device
38 * is reinitialized (partition check etc.). Also, if the device
39 * knows the PREVENT/ALLOW MEDIUM REMOVAL command, the door should
40 * be locked and unlocked when mounting the first or unmounting the
41 * last filesystem on the device. The code is untested, because I
42 * don't have a removable hard disk.
43 *
44 */
45
46 #include <linux/config.h>
47 #include <linux/module.h>
48 #include <linux/errno.h>
49 #include <linux/signal.h>
50 #include <linux/sched.h>
51 #include <linux/timer.h>
52 #include <linux/fs.h>
53 #include <linux/kernel.h>
54 #include <linux/genhd.h>
55 #include <linux/delay.h>
56 #include <linux/mm.h>
57 #include <linux/major.h>
58 #include <linux/slab.h>
59 #include <linux/interrupt.h>
60 #include <scsi/scsi.h> /* for SCSI_IOCTL_GET_IDLUN */
61 typedef void Scsi_Device; /* hack to avoid including scsi.h */
62 #include <scsi/scsi_ioctl.h>
63 #include <linux/hdreg.h> /* for HDIO_GETGEO */
64 #include <linux/blkpg.h>
65 #include <linux/buffer_head.h>
66 #include <linux/blkdev.h>
67
68 #include <asm/setup.h>
69 #include <asm/pgtable.h>
70 #include <asm/system.h>
71 #include <asm/uaccess.h>
72 #include <asm/atarihw.h>
73 #include <asm/atariints.h>
74 #include <asm/atari_acsi.h>
75 #include <asm/atari_stdma.h>
76 #include <asm/atari_stram.h>
77
78 static void (*do_acsi)(void) = NULL;
79 static struct request_queue *acsi_queue;
80 #define QUEUE (acsi_queue)
81 #define CURRENT elv_next_request(acsi_queue)
82
83 #define DEBUG
84 #undef DEBUG_DETECT
85 #undef NO_WRITE
86
87 #define MAX_ERRORS 8 /* Max read/write errors/sector */
88 #define MAX_LUN 8 /* Max LUNs per target */
89 #define MAX_DEV 16
90
91 #define ACSI_BUFFER_SIZE (16*1024) /* "normal" ACSI buffer size */
92 #define ACSI_BUFFER_MINSIZE (2048) /* min. buf size if ext. DMA */
93 #define ACSI_BUFFER_SIZE_ORDER 2 /* order size for above */
94 #define ACSI_BUFFER_MINSIZE_ORDER 0 /* order size for above */
95 #define ACSI_BUFFER_SECTORS (ACSI_BUFFER_SIZE/512)
96
97 #define ACSI_BUFFER_ORDER \
98 (ATARIHW_PRESENT(EXTD_DMA) ? \
99 ACSI_BUFFER_MINSIZE_ORDER : \
100 ACSI_BUFFER_SIZE_ORDER)
101
102 #define ACSI_TIMEOUT (4*HZ)
103
104 /* minimum delay between two commands */
105
106 #define COMMAND_DELAY 500
107
108 typedef enum {
109 NONE, HARDDISK, CDROM
110 } ACSI_TYPE;
111
112 struct acsi_info_struct {
113 ACSI_TYPE type; /* type of device */
114 unsigned target; /* target number */
115 unsigned lun; /* LUN in target controller */
116 unsigned removable : 1; /* Flag for removable media */
117 unsigned read_only : 1; /* Flag for read only devices */
118 unsigned old_atari_disk : 1; /* Is an old Atari disk */
119 unsigned changed : 1; /* Medium has been changed */
120 unsigned long size; /* #blocks */
121 int access_count;
122 } acsi_info[MAX_DEV];
123
124 /*
125 * SENSE KEYS
126 */
127
128 #define NO_SENSE 0x00
129 #define RECOVERED_ERROR 0x01
130 #define NOT_READY 0x02
131 #define MEDIUM_ERROR 0x03
132 #define HARDWARE_ERROR 0x04
133 #define ILLEGAL_REQUEST 0x05
134 #define UNIT_ATTENTION 0x06
135 #define DATA_PROTECT 0x07
136 #define BLANK_CHECK 0x08
137 #define COPY_ABORTED 0x0a
138 #define ABORTED_COMMAND 0x0b
139 #define VOLUME_OVERFLOW 0x0d
140 #define MISCOMPARE 0x0e
141
142
143 /*
144 * DEVICE TYPES
145 */
146
147 #define TYPE_DISK 0x00
148 #define TYPE_TAPE 0x01
149 #define TYPE_WORM 0x04
150 #define TYPE_ROM 0x05
151 #define TYPE_MOD 0x07
152 #define TYPE_NO_LUN 0x7f
153
154 /* The data returned by MODE SENSE differ between the old Atari
155 * hard disks and SCSI disks connected to ACSI. In the following, both
156 * formats are defined and some macros to operate on them potably.
157 */
158
159 typedef struct {
160 unsigned long dummy[2];
161 unsigned long sector_size;
162 unsigned char format_code;
163 #define ATARI_SENSE_FORMAT_FIX 1
164 #define ATARI_SENSE_FORMAT_CHNG 2
165 unsigned char cylinders_h;
166 unsigned char cylinders_l;
167 unsigned char heads;
168 unsigned char reduced_h;
169 unsigned char reduced_l;
170 unsigned char precomp_h;
171 unsigned char precomp_l;
172 unsigned char landing_zone;
173 unsigned char steprate;
174 unsigned char type;
175 #define ATARI_SENSE_TYPE_FIXCHNG_MASK 4
176 #define ATARI_SENSE_TYPE_SOFTHARD_MASK 8
177 #define ATARI_SENSE_TYPE_FIX 4
178 #define ATARI_SENSE_TYPE_CHNG 0
179 #define ATARI_SENSE_TYPE_SOFT 0
180 #define ATARI_SENSE_TYPE_HARD 8
181 unsigned char sectors;
182 } ATARI_SENSE_DATA;
183
184 #define ATARI_CAPACITY(sd) \
185 (((int)((sd).cylinders_h<<8)|(sd).cylinders_l) * \
186 (sd).heads * (sd).sectors)
187
188
189 typedef struct {
190 unsigned char dummy1;
191 unsigned char medium_type;
192 unsigned char dummy2;
193 unsigned char descriptor_size;
194 unsigned long block_count;
195 unsigned long sector_size;
196 /* Page 0 data */
197 unsigned char page_code;
198 unsigned char page_size;
199 unsigned char page_flags;
200 unsigned char qualifier;
201 } SCSI_SENSE_DATA;
202
203 #define SCSI_CAPACITY(sd) ((sd).block_count & 0xffffff)
204
205
206 typedef union {
207 ATARI_SENSE_DATA atari;
208 SCSI_SENSE_DATA scsi;
209 } SENSE_DATA;
210
211 #define SENSE_TYPE_UNKNOWN 0
212 #define SENSE_TYPE_ATARI 1
213 #define SENSE_TYPE_SCSI 2
214
215 #define SENSE_TYPE(sd) \
216 (((sd).atari.dummy[0] == 8 && \
217 ((sd).atari.format_code == 1 || \
218 (sd).atari.format_code == 2)) ? SENSE_TYPE_ATARI : \
219 ((sd).scsi.dummy1 >= 11) ? SENSE_TYPE_SCSI : \
220 SENSE_TYPE_UNKNOWN)
221
222 #define CAPACITY(sd) \
223 (SENSE_TYPE(sd) == SENSE_TYPE_ATARI ? \
224 ATARI_CAPACITY((sd).atari) : \
225 SCSI_CAPACITY((sd).scsi))
226
227 #define SECTOR_SIZE(sd) \
228 (SENSE_TYPE(sd) == SENSE_TYPE_ATARI ? \
229 (sd).atari.sector_size : \
230 (sd).scsi.sector_size & 0xffffff)
231
232 /* Default size if capacity cannot be determined (1 GByte) */
233 #define DEFAULT_SIZE 0x1fffff
234
235 #define CARTRCH_STAT(aip,buf) \
236 (aip->old_atari_disk ? \
237 (((buf)[0] & 0x7f) == 0x28) : \
238 ((((buf)[0] & 0x70) == 0x70) ? \
239 (((buf)[2] & 0x0f) == 0x06) : \
240 (((buf)[0] & 0x0f) == 0x06))) \
241
242 /* These two are also exported to other drivers that work on the ACSI bus and
243 * need an ST-RAM buffer. */
244 char *acsi_buffer;
245 unsigned long phys_acsi_buffer;
246
247 static int NDevices;
248
249 static int CurrentNReq;
250 static int CurrentNSect;
251 static char *CurrentBuffer;
252
253 static DEFINE_SPINLOCK(acsi_lock);
254
255
256 #define SET_TIMER() mod_timer(&acsi_timer, jiffies + ACSI_TIMEOUT)
257 #define CLEAR_TIMER() del_timer(&acsi_timer)
258
259 static unsigned long STramMask;
260 #define STRAM_ADDR(a) (((a) & STramMask) == 0)
261
262
263
264 /* ACSI commands */
265
266 static char tur_cmd[6] = { 0x00, 0, 0, 0, 0, 0 };
267 static char modesense_cmd[6] = { 0x1a, 0, 0, 0, 24, 0 };
268 static char modeselect_cmd[6] = { 0x15, 0, 0, 0, 12, 0 };
269 static char inquiry_cmd[6] = { 0x12, 0, 0, 0,255, 0 };
270 static char reqsense_cmd[6] = { 0x03, 0, 0, 0, 4, 0 };
271 static char read_cmd[6] = { 0x08, 0, 0, 0, 0, 0 };
272 static char write_cmd[6] = { 0x0a, 0, 0, 0, 0, 0 };
273 static char pa_med_rem_cmd[6] = { 0x1e, 0, 0, 0, 0, 0 };
274
275 #define CMDSET_TARG_LUN(cmd,targ,lun) \
276 do { \
277 cmd[0] = (cmd[0] & ~0xe0) | (targ)<<5; \
278 cmd[1] = (cmd[1] & ~0xe0) | (lun)<<5; \
279 } while(0)
280
281 #define CMDSET_BLOCK(cmd,blk) \
282 do { \
283 unsigned long __blk = (blk); \
284 cmd[3] = __blk; __blk >>= 8; \
285 cmd[2] = __blk; __blk >>= 8; \
286 cmd[1] = (cmd[1] & 0xe0) | (__blk & 0x1f); \
287 } while(0)
288
289 #define CMDSET_LEN(cmd,len) \
290 do { \
291 cmd[4] = (len); \
292 } while(0)
293
294 /* ACSI errors (from REQUEST SENSE); There are two tables, one for the
295 * old Atari disks and one for SCSI on ACSI disks.
296 */
297
298 struct acsi_error {
299 unsigned char code;
300 const char *text;
301 } atari_acsi_errors[] = {
302 { 0x00, "No error (??)" },
303 { 0x01, "No index pulses" },
304 { 0x02, "Seek not complete" },
305 { 0x03, "Write fault" },
306 { 0x04, "Drive not ready" },
307 { 0x06, "No Track 00 signal" },
308 { 0x10, "ECC error in ID field" },
309 { 0x11, "Uncorrectable data error" },
310 { 0x12, "ID field address mark not found" },
311 { 0x13, "Data field address mark not found" },
312 { 0x14, "Record not found" },
313 { 0x15, "Seek error" },
314 { 0x18, "Data check in no retry mode" },
315 { 0x19, "ECC error during verify" },
316 { 0x1a, "Access to bad block" },
317 { 0x1c, "Unformatted or bad format" },
318 { 0x20, "Invalid command" },
319 { 0x21, "Invalid block address" },
320 { 0x23, "Volume overflow" },
321 { 0x24, "Invalid argument" },
322 { 0x25, "Invalid drive number" },
323 { 0x26, "Byte zero parity check" },
324 { 0x28, "Cartride changed" },
325 { 0x2c, "Error count overflow" },
326 { 0x30, "Controller selftest failed" }
327 },
328
329 scsi_acsi_errors[] = {
330 { 0x00, "No error (??)" },
331 { 0x01, "Recovered error" },
332 { 0x02, "Drive not ready" },
333 { 0x03, "Uncorrectable medium error" },
334 { 0x04, "Hardware error" },
335 { 0x05, "Illegal request" },
336 { 0x06, "Unit attention (Reset or cartridge changed)" },
337 { 0x07, "Data protection" },
338 { 0x08, "Blank check" },
339 { 0x0b, "Aborted Command" },
340 { 0x0d, "Volume overflow" }
341 };
342
343
344
345 /***************************** Prototypes *****************************/
346
347 static int acsicmd_dma( const char *cmd, char *buffer, int blocks, int
348 rwflag, int enable);
349 static int acsi_reqsense( char *buffer, int targ, int lun);
350 static void acsi_print_error(const unsigned char *errblk, struct acsi_info_struct *aip);
351 static irqreturn_t acsi_interrupt (int irq, void *data, struct pt_regs *fp);
352 static void unexpected_acsi_interrupt( void );
353 static void bad_rw_intr( void );
354 static void read_intr( void );
355 static void write_intr( void);
356 static void acsi_times_out( unsigned long dummy );
357 static void copy_to_acsibuffer( void );
358 static void copy_from_acsibuffer( void );
359 static void do_end_requests( void );
360 static void do_acsi_request( request_queue_t * );
361 static void redo_acsi_request( void );
362 static int acsi_ioctl( struct inode *inode, struct file *file, unsigned int
363 cmd, unsigned long arg );
364 static int acsi_open( struct inode * inode, struct file * filp );
365 static int acsi_release( struct inode * inode, struct file * file );
366 static void acsi_prevent_removal(struct acsi_info_struct *aip, int flag );
367 static int acsi_change_blk_size( int target, int lun);
368 static int acsi_mode_sense( int target, int lun, SENSE_DATA *sd );
369 static int acsi_revalidate (struct gendisk *disk);
370
371 /************************* End of Prototypes **************************/
372
373
374 struct timer_list acsi_timer = TIMER_INITIALIZER(acsi_times_out, 0, 0);
375
376
377 #ifdef CONFIG_ATARI_SLM
378
379 extern int attach_slm( int target, int lun );
380 extern int slm_init( void );
381
382 #endif
383
384
385 \f
386 /***********************************************************************
387 *
388 * ACSI primitives
389 *
390 **********************************************************************/
391
392
393 /*
394 * The following two functions wait for _IRQ to become Low or High,
395 * resp., with a timeout. The 'timeout' parameter is in jiffies
396 * (10ms).
397 * If the functions are called with timer interrupts on (int level <
398 * 6), the timeout is based on the 'jiffies' variable to provide exact
399 * timeouts for device probing etc.
400 * If interrupts are disabled, the number of tries is based on the
401 * 'loops_per_jiffy' variable. A rough estimation is sufficient here...
402 */
403
404 #define INT_LEVEL \
405 ({ unsigned __sr; \
406 __asm__ __volatile__ ( "movew %/sr,%0" : "=dm" (__sr) ); \
407 (__sr >> 8) & 7; \
408 })
409
410 int acsi_wait_for_IRQ( unsigned timeout )
411
412 {
413 if (INT_LEVEL < 6) {
414 unsigned long maxjif = jiffies + timeout;
415 while (time_before(jiffies, maxjif))
416 if (!(mfp.par_dt_reg & 0x20)) return( 1 );
417 }
418 else {
419 long tries = loops_per_jiffy / 8 * timeout;
420 while( --tries >= 0 )
421 if (!(mfp.par_dt_reg & 0x20)) return( 1 );
422 }
423 return( 0 ); /* timeout! */
424 }
425
426
427 int acsi_wait_for_noIRQ( unsigned timeout )
428
429 {
430 if (INT_LEVEL < 6) {
431 unsigned long maxjif = jiffies + timeout;
432 while (time_before(jiffies, maxjif))
433 if (mfp.par_dt_reg & 0x20) return( 1 );
434 }
435 else {
436 long tries = loops_per_jiffy * timeout / 8;
437 while( tries-- >= 0 )
438 if (mfp.par_dt_reg & 0x20) return( 1 );
439 }
440 return( 0 ); /* timeout! */
441 }
442
443 static struct timeval start_time;
444
445 void
446 acsi_delay_start(void)
447 {
448 do_gettimeofday(&start_time);
449 }
450
451 /* wait from acsi_delay_start to now usec (<1E6) usec */
452
453 void
454 acsi_delay_end(long usec)
455 {
456 struct timeval end_time;
457 long deltau,deltas;
458 do_gettimeofday(&end_time);
459 deltau=end_time.tv_usec - start_time.tv_usec;
460 deltas=end_time.tv_sec - start_time.tv_sec;
461 if (deltas > 1 || deltas < 0)
462 return;
463 if (deltas > 0)
464 deltau += 1000*1000;
465 if (deltau >= usec)
466 return;
467 udelay(usec-deltau);
468 }
469
470 /* acsicmd_dma() sends an ACSI command and sets up the DMA to transfer
471 * 'blocks' blocks of 512 bytes from/to 'buffer'.
472 * Because the _IRQ signal is used for handshaking the command bytes,
473 * the ACSI interrupt has to be disabled in this function. If the end
474 * of the operation should be signalled by a real interrupt, it has to be
475 * reenabled afterwards.
476 */
477
478 static int acsicmd_dma( const char *cmd, char *buffer, int blocks, int rwflag, int enable)
479
480 { unsigned long flags, paddr;
481 int i;
482
483 #ifdef NO_WRITE
484 if (rwflag || *cmd == 0x0a) {
485 printk( "ACSI: Write commands disabled!\n" );
486 return( 0 );
487 }
488 #endif
489
490 rwflag = rwflag ? 0x100 : 0;
491 paddr = virt_to_phys( buffer );
492
493 acsi_delay_end(COMMAND_DELAY);
494 DISABLE_IRQ();
495
496 local_irq_save(flags);
497 /* Low on A1 */
498 dma_wd.dma_mode_status = 0x88 | rwflag;
499 MFPDELAY();
500
501 /* set DMA address */
502 dma_wd.dma_lo = (unsigned char)paddr;
503 paddr >>= 8;
504 MFPDELAY();
505 dma_wd.dma_md = (unsigned char)paddr;
506 paddr >>= 8;
507 MFPDELAY();
508 if (ATARIHW_PRESENT(EXTD_DMA))
509 st_dma_ext_dmahi = (unsigned short)paddr;
510 else
511 dma_wd.dma_hi = (unsigned char)paddr;
512 MFPDELAY();
513 local_irq_restore(flags);
514
515 /* send the command bytes except the last */
516 for( i = 0; i < 5; ++i ) {
517 DMA_LONG_WRITE( *cmd++, 0x8a | rwflag );
518 udelay(20);
519 if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
520 }
521
522 /* Clear FIFO and switch DMA to correct direction */
523 dma_wd.dma_mode_status = 0x92 | (rwflag ^ 0x100);
524 MFPDELAY();
525 dma_wd.dma_mode_status = 0x92 | rwflag;
526 MFPDELAY();
527
528 /* How many sectors for DMA */
529 dma_wd.fdc_acces_seccount = blocks;
530 MFPDELAY();
531
532 /* send last command byte */
533 dma_wd.dma_mode_status = 0x8a | rwflag;
534 MFPDELAY();
535 DMA_LONG_WRITE( *cmd++, 0x0a | rwflag );
536 if (enable)
537 ENABLE_IRQ();
538 udelay(80);
539
540 return( 1 );
541 }
542
543
544 /*
545 * acsicmd_nodma() sends an ACSI command that requires no DMA.
546 */
547
548 int acsicmd_nodma( const char *cmd, int enable)
549
550 { int i;
551
552 acsi_delay_end(COMMAND_DELAY);
553 DISABLE_IRQ();
554
555 /* send first command byte */
556 dma_wd.dma_mode_status = 0x88;
557 MFPDELAY();
558 DMA_LONG_WRITE( *cmd++, 0x8a );
559 udelay(20);
560 if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
561
562 /* send the intermediate command bytes */
563 for( i = 0; i < 4; ++i ) {
564 DMA_LONG_WRITE( *cmd++, 0x8a );
565 udelay(20);
566 if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
567 }
568
569 /* send last command byte */
570 DMA_LONG_WRITE( *cmd++, 0x0a );
571 if (enable)
572 ENABLE_IRQ();
573 udelay(80);
574
575 return( 1 );
576 /* Note that the ACSI interrupt is still disabled after this
577 * function. If you want to get the IRQ delivered, enable it manually!
578 */
579 }
580
581
582 static int acsi_reqsense( char *buffer, int targ, int lun)
583
584 {
585 CMDSET_TARG_LUN( reqsense_cmd, targ, lun);
586 if (!acsicmd_dma( reqsense_cmd, buffer, 1, 0, 0 )) return( 0 );
587 if (!acsi_wait_for_IRQ( 10 )) return( 0 );
588 acsi_getstatus();
589 if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
590 if (!acsi_wait_for_IRQ( 10 )) return( 0 );
591 acsi_getstatus();
592 if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
593 if (!acsi_wait_for_IRQ( 10 )) return( 0 );
594 acsi_getstatus();
595 if (!acsicmd_nodma( reqsense_cmd, 0 )) return( 0 );
596 if (!acsi_wait_for_IRQ( 10 )) return( 0 );
597 acsi_getstatus();
598 dma_cache_maintenance( virt_to_phys(buffer), 16, 0 );
599
600 return( 1 );
601 }
602
603
604 /*
605 * ACSI status phase: get the status byte from the bus
606 *
607 * I've seen several times that a 0xff status is read, propably due to
608 * a timing error. In this case, the procedure is repeated after the
609 * next _IRQ edge.
610 */
611
612 int acsi_getstatus( void )
613
614 { int status;
615
616 DISABLE_IRQ();
617 for(;;) {
618 if (!acsi_wait_for_IRQ( 100 )) {
619 acsi_delay_start();
620 return( -1 );
621 }
622 dma_wd.dma_mode_status = 0x8a;
623 MFPDELAY();
624 status = dma_wd.fdc_acces_seccount;
625 if (status != 0xff) break;
626 #ifdef DEBUG
627 printk("ACSI: skipping 0xff status byte\n" );
628 #endif
629 udelay(40);
630 acsi_wait_for_noIRQ( 20 );
631 }
632 dma_wd.dma_mode_status = 0x80;
633 udelay(40);
634 acsi_wait_for_noIRQ( 20 );
635
636 acsi_delay_start();
637 return( status & 0x1f ); /* mask of the device# */
638 }
639
640
641 #if (defined(CONFIG_ATARI_SLM) || defined(CONFIG_ATARI_SLM_MODULE))
642
643 /* Receive data in an extended status phase. Needed by SLM printer. */
644
645 int acsi_extstatus( char *buffer, int cnt )
646
647 { int status;
648
649 DISABLE_IRQ();
650 udelay(80);
651 while( cnt-- > 0 ) {
652 if (!acsi_wait_for_IRQ( 40 )) return( 0 );
653 dma_wd.dma_mode_status = 0x8a;
654 MFPDELAY();
655 status = dma_wd.fdc_acces_seccount;
656 MFPDELAY();
657 *buffer++ = status & 0xff;
658 udelay(40);
659 }
660 return( 1 );
661 }
662
663
664 /* Finish an extended status phase */
665
666 void acsi_end_extstatus( void )
667
668 {
669 dma_wd.dma_mode_status = 0x80;
670 udelay(40);
671 acsi_wait_for_noIRQ( 20 );
672 acsi_delay_start();
673 }
674
675
676 /* Send data in an extended command phase */
677
678 int acsi_extcmd( unsigned char *buffer, int cnt )
679
680 {
681 while( cnt-- > 0 ) {
682 DMA_LONG_WRITE( *buffer++, 0x8a );
683 udelay(20);
684 if (!acsi_wait_for_IRQ( HZ/2 )) return( 0 ); /* timeout */
685 }
686 return( 1 );
687 }
688
689 #endif
690
691
692 static void acsi_print_error(const unsigned char *errblk, struct acsi_info_struct *aip)
693
694 { int atari_err, i, errcode;
695 struct acsi_error *arr;
696
697 atari_err = aip->old_atari_disk;
698 if (atari_err)
699 errcode = errblk[0] & 0x7f;
700 else
701 if ((errblk[0] & 0x70) == 0x70)
702 errcode = errblk[2] & 0x0f;
703 else
704 errcode = errblk[0] & 0x0f;
705
706 printk( KERN_ERR "ACSI error 0x%02x", errcode );
707
708 if (errblk[0] & 0x80)
709 printk( " for sector %d",
710 ((errblk[1] & 0x1f) << 16) |
711 (errblk[2] << 8) | errblk[0] );
712
713 arr = atari_err ? atari_acsi_errors : scsi_acsi_errors;
714 i = atari_err ? sizeof(atari_acsi_errors)/sizeof(*atari_acsi_errors) :
715 sizeof(scsi_acsi_errors)/sizeof(*scsi_acsi_errors);
716
717 for( --i; i >= 0; --i )
718 if (arr[i].code == errcode) break;
719 if (i >= 0)
720 printk( ": %s\n", arr[i].text );
721 }
722
723 /*******************************************************************
724 *
725 * ACSI interrupt routine
726 * Test, if this is a ACSI interrupt and call the irq handler
727 * Otherwise ignore this interrupt.
728 *
729 *******************************************************************/
730
731 static irqreturn_t acsi_interrupt(int irq, void *data, struct pt_regs *fp )
732
733 { void (*acsi_irq_handler)(void) = do_acsi;
734
735 do_acsi = NULL;
736 CLEAR_TIMER();
737
738 if (!acsi_irq_handler)
739 acsi_irq_handler = unexpected_acsi_interrupt;
740 acsi_irq_handler();
741 return IRQ_HANDLED;
742 }
743
744
745 /******************************************************************
746 *
747 * The Interrupt handlers
748 *
749 *******************************************************************/
750
751
752 static void unexpected_acsi_interrupt( void )
753
754 {
755 printk( KERN_WARNING "Unexpected ACSI interrupt\n" );
756 }
757
758
759 /* This function is called in case of errors. Because we cannot reset
760 * the ACSI bus or a single device, there is no other choice than
761 * retrying several times :-(
762 */
763
764 static void bad_rw_intr( void )
765
766 {
767 if (!CURRENT)
768 return;
769
770 if (++CURRENT->errors >= MAX_ERRORS)
771 end_request(CURRENT, 0);
772 /* Otherwise just retry */
773 }
774
775
776 static void read_intr( void )
777
778 { int status;
779
780 status = acsi_getstatus();
781 if (status != 0) {
782 struct gendisk *disk = CURRENT->rq_disk;
783 struct acsi_info_struct *aip = disk->private_data;
784 printk(KERN_ERR "%s: ", disk->disk_name);
785 if (!acsi_reqsense(acsi_buffer, aip->target, aip->lun))
786 printk( "ACSI error and REQUEST SENSE failed (status=0x%02x)\n", status );
787 else {
788 acsi_print_error(acsi_buffer, aip);
789 if (CARTRCH_STAT(aip, acsi_buffer))
790 aip->changed = 1;
791 }
792 ENABLE_IRQ();
793 bad_rw_intr();
794 redo_acsi_request();
795 return;
796 }
797
798 dma_cache_maintenance( virt_to_phys(CurrentBuffer), CurrentNSect*512, 0 );
799 if (CurrentBuffer == acsi_buffer)
800 copy_from_acsibuffer();
801
802 do_end_requests();
803 redo_acsi_request();
804 }
805
806
807 static void write_intr(void)
808
809 { int status;
810
811 status = acsi_getstatus();
812 if (status != 0) {
813 struct gendisk *disk = CURRENT->rq_disk;
814 struct acsi_info_struct *aip = disk->private_data;
815 printk( KERN_ERR "%s: ", disk->disk_name);
816 if (!acsi_reqsense( acsi_buffer, aip->target, aip->lun))
817 printk( "ACSI error and REQUEST SENSE failed (status=0x%02x)\n", status );
818 else {
819 acsi_print_error(acsi_buffer, aip);
820 if (CARTRCH_STAT(aip, acsi_buffer))
821 aip->changed = 1;
822 }
823 bad_rw_intr();
824 redo_acsi_request();
825 return;
826 }
827
828 do_end_requests();
829 redo_acsi_request();
830 }
831
832
833 static void acsi_times_out( unsigned long dummy )
834
835 {
836 DISABLE_IRQ();
837 if (!do_acsi) return;
838
839 do_acsi = NULL;
840 printk( KERN_ERR "ACSI timeout\n" );
841 if (!CURRENT)
842 return;
843 if (++CURRENT->errors >= MAX_ERRORS) {
844 #ifdef DEBUG
845 printk( KERN_ERR "ACSI: too many errors.\n" );
846 #endif
847 end_request(CURRENT, 0);
848 }
849
850 redo_acsi_request();
851 }
852
853
854 \f
855 /***********************************************************************
856 *
857 * Scatter-gather utility functions
858 *
859 ***********************************************************************/
860
861
862 static void copy_to_acsibuffer( void )
863
864 { int i;
865 char *src, *dst;
866 struct buffer_head *bh;
867
868 src = CURRENT->buffer;
869 dst = acsi_buffer;
870 bh = CURRENT->bh;
871
872 if (!bh)
873 memcpy( dst, src, CurrentNSect*512 );
874 else
875 for( i = 0; i < CurrentNReq; ++i ) {
876 memcpy( dst, src, bh->b_size );
877 dst += bh->b_size;
878 if ((bh = bh->b_reqnext))
879 src = bh->b_data;
880 }
881 }
882
883
884 static void copy_from_acsibuffer( void )
885
886 { int i;
887 char *src, *dst;
888 struct buffer_head *bh;
889
890 dst = CURRENT->buffer;
891 src = acsi_buffer;
892 bh = CURRENT->bh;
893
894 if (!bh)
895 memcpy( dst, src, CurrentNSect*512 );
896 else
897 for( i = 0; i < CurrentNReq; ++i ) {
898 memcpy( dst, src, bh->b_size );
899 src += bh->b_size;
900 if ((bh = bh->b_reqnext))
901 dst = bh->b_data;
902 }
903 }
904
905
906 static void do_end_requests( void )
907
908 { int i, n;
909
910 if (!CURRENT->bh) {
911 CURRENT->nr_sectors -= CurrentNSect;
912 CURRENT->current_nr_sectors -= CurrentNSect;
913 CURRENT->sector += CurrentNSect;
914 if (CURRENT->nr_sectors == 0)
915 end_request(CURRENT, 1);
916 }
917 else {
918 for( i = 0; i < CurrentNReq; ++i ) {
919 n = CURRENT->bh->b_size >> 9;
920 CURRENT->nr_sectors -= n;
921 CURRENT->current_nr_sectors -= n;
922 CURRENT->sector += n;
923 end_request(CURRENT, 1);
924 }
925 }
926 }
927
928
929
930 \f
931 /***********************************************************************
932 *
933 * do_acsi_request and friends
934 *
935 ***********************************************************************/
936
937 static void do_acsi_request( request_queue_t * q )
938
939 {
940 stdma_lock( acsi_interrupt, NULL );
941 redo_acsi_request();
942 }
943
944
945 static void redo_acsi_request( void )
946 {
947 unsigned block, target, lun, nsect;
948 char *buffer;
949 unsigned long pbuffer;
950 struct buffer_head *bh;
951 struct gendisk *disk;
952 struct acsi_info_struct *aip;
953
954 repeat:
955 CLEAR_TIMER();
956
957 if (do_acsi)
958 return;
959
960 if (!CURRENT) {
961 do_acsi = NULL;
962 ENABLE_IRQ();
963 stdma_release();
964 return;
965 }
966
967 disk = CURRENT->rq_disk;
968 aip = disk->private_data;
969 if (CURRENT->bh) {
970 if (!CURRENT->bh && !buffer_locked(CURRENT->bh))
971 panic("ACSI: block not locked");
972 }
973
974 block = CURRENT->sector;
975 if (block+CURRENT->nr_sectors >= get_capacity(disk)) {
976 #ifdef DEBUG
977 printk( "%s: attempted access for blocks %d...%ld past end of device at block %ld.\n",
978 disk->disk_name,
979 block, block + CURRENT->nr_sectors - 1,
980 get_capacity(disk));
981 #endif
982 end_request(CURRENT, 0);
983 goto repeat;
984 }
985 if (aip->changed) {
986 printk( KERN_NOTICE "%s: request denied because cartridge has "
987 "been changed.\n", disk->disk_name);
988 end_request(CURRENT, 0);
989 goto repeat;
990 }
991
992 target = aip->target;
993 lun = aip->lun;
994
995 /* Find out how many sectors should be transferred from/to
996 * consecutive buffers and thus can be done with a single command.
997 */
998 buffer = CURRENT->buffer;
999 pbuffer = virt_to_phys(buffer);
1000 nsect = CURRENT->current_nr_sectors;
1001 CurrentNReq = 1;
1002
1003 if ((bh = CURRENT->bh) && bh != CURRENT->bhtail) {
1004 if (!STRAM_ADDR(pbuffer)) {
1005 /* If transfer is done via the ACSI buffer anyway, we can
1006 * assemble as much bh's as fit in the buffer.
1007 */
1008 while( (bh = bh->b_reqnext) ) {
1009 if (nsect + (bh->b_size>>9) > ACSI_BUFFER_SECTORS) break;
1010 nsect += bh->b_size >> 9;
1011 ++CurrentNReq;
1012 if (bh == CURRENT->bhtail) break;
1013 }
1014 buffer = acsi_buffer;
1015 pbuffer = phys_acsi_buffer;
1016 }
1017 else {
1018 unsigned long pendadr, pnewadr;
1019 pendadr = pbuffer + nsect*512;
1020 while( (bh = bh->b_reqnext) ) {
1021 pnewadr = virt_to_phys(bh->b_data);
1022 if (!STRAM_ADDR(pnewadr) || pendadr != pnewadr) break;
1023 nsect += bh->b_size >> 9;
1024 pendadr = pnewadr + bh->b_size;
1025 ++CurrentNReq;
1026 if (bh == CURRENT->bhtail) break;
1027 }
1028 }
1029 }
1030 else {
1031 if (!STRAM_ADDR(pbuffer)) {
1032 buffer = acsi_buffer;
1033 pbuffer = phys_acsi_buffer;
1034 if (nsect > ACSI_BUFFER_SECTORS)
1035 nsect = ACSI_BUFFER_SECTORS;
1036 }
1037 }
1038 CurrentBuffer = buffer;
1039 CurrentNSect = nsect;
1040
1041 if (rq_data_dir(CURRENT) == WRITE) {
1042 CMDSET_TARG_LUN( write_cmd, target, lun );
1043 CMDSET_BLOCK( write_cmd, block );
1044 CMDSET_LEN( write_cmd, nsect );
1045 if (buffer == acsi_buffer)
1046 copy_to_acsibuffer();
1047 dma_cache_maintenance( pbuffer, nsect*512, 1 );
1048 do_acsi = write_intr;
1049 if (!acsicmd_dma( write_cmd, buffer, nsect, 1, 1)) {
1050 do_acsi = NULL;
1051 printk( KERN_ERR "ACSI (write): Timeout in command block\n" );
1052 bad_rw_intr();
1053 goto repeat;
1054 }
1055 SET_TIMER();
1056 return;
1057 }
1058 if (rq_data_dir(CURRENT) == READ) {
1059 CMDSET_TARG_LUN( read_cmd, target, lun );
1060 CMDSET_BLOCK( read_cmd, block );
1061 CMDSET_LEN( read_cmd, nsect );
1062 do_acsi = read_intr;
1063 if (!acsicmd_dma( read_cmd, buffer, nsect, 0, 1)) {
1064 do_acsi = NULL;
1065 printk( KERN_ERR "ACSI (read): Timeout in command block\n" );
1066 bad_rw_intr();
1067 goto repeat;
1068 }
1069 SET_TIMER();
1070 return;
1071 }
1072 panic("unknown ACSI command");
1073 }
1074
1075
1076 \f
1077 /***********************************************************************
1078 *
1079 * Misc functions: ioctl, open, release, check_change, ...
1080 *
1081 ***********************************************************************/
1082
1083
1084 static int acsi_ioctl( struct inode *inode, struct file *file,
1085 unsigned int cmd, unsigned long arg )
1086 {
1087 struct gendisk *disk = inode->i_bdev->bd_disk;
1088 struct acsi_info_struct *aip = disk->private_data;
1089 switch (cmd) {
1090 case HDIO_GETGEO:
1091 /* HDIO_GETGEO is supported more for getting the partition's
1092 * start sector... */
1093 { struct hd_geometry *geo = (struct hd_geometry *)arg;
1094 /* just fake some geometry here, it's nonsense anyway; to make it
1095 * easy, use Adaptec's usual 64/32 mapping */
1096 put_user( 64, &geo->heads );
1097 put_user( 32, &geo->sectors );
1098 put_user( aip->size >> 11, &geo->cylinders );
1099 put_user(get_start_sect(inode->i_bdev), &geo->start);
1100 return 0;
1101 }
1102 case SCSI_IOCTL_GET_IDLUN:
1103 /* SCSI compatible GET_IDLUN call to get target's ID and LUN number */
1104 put_user( aip->target | (aip->lun << 8),
1105 &((Scsi_Idlun *) arg)->dev_id );
1106 put_user( 0, &((Scsi_Idlun *) arg)->host_unique_id );
1107 return 0;
1108 default:
1109 return -EINVAL;
1110 }
1111 }
1112
1113
1114 /*
1115 * Open a device, check for read-only and lock the medium if it is
1116 * removable.
1117 *
1118 * Changes by Martin Rogge, 9th Aug 1995:
1119 * Check whether check_disk_change (and therefore revalidate_acsidisk)
1120 * was successful. They fail when there is no medium in the drive.
1121 *
1122 * The problem of media being changed during an operation can be
1123 * ignored because of the prevent_removal code.
1124 *
1125 * Added check for the validity of the device number.
1126 *
1127 */
1128
1129 static int acsi_open( struct inode * inode, struct file * filp )
1130 {
1131 struct gendisk *disk = inode->i_bdev->bd_disk;
1132 struct acsi_info_struct *aip = disk->private_data;
1133
1134 if (aip->access_count == 0 && aip->removable) {
1135 #if 0
1136 aip->changed = 1; /* safety first */
1137 #endif
1138 check_disk_change( inode->i_bdev );
1139 if (aip->changed) /* revalidate was not successful (no medium) */
1140 return -ENXIO;
1141 acsi_prevent_removal(aip, 1);
1142 }
1143 aip->access_count++;
1144
1145 if (filp && filp->f_mode) {
1146 check_disk_change( inode->i_bdev );
1147 if (filp->f_mode & 2) {
1148 if (aip->read_only) {
1149 acsi_release( inode, filp );
1150 return -EROFS;
1151 }
1152 }
1153 }
1154
1155 return 0;
1156 }
1157
1158 /*
1159 * Releasing a block device means we sync() it, so that it can safely
1160 * be forgotten about...
1161 */
1162
1163 static int acsi_release( struct inode * inode, struct file * file )
1164 {
1165 struct gendisk *disk = inode->i_bdev->bd_disk;
1166 struct acsi_info_struct *aip = disk->private_data;
1167 if (--aip->access_count == 0 && aip->removable)
1168 acsi_prevent_removal(aip, 0);
1169 return( 0 );
1170 }
1171
1172 /*
1173 * Prevent or allow a media change for removable devices.
1174 */
1175
1176 static void acsi_prevent_removal(struct acsi_info_struct *aip, int flag)
1177 {
1178 stdma_lock( NULL, NULL );
1179
1180 CMDSET_TARG_LUN(pa_med_rem_cmd, aip->target, aip->lun);
1181 CMDSET_LEN( pa_med_rem_cmd, flag );
1182
1183 if (acsicmd_nodma(pa_med_rem_cmd, 0) && acsi_wait_for_IRQ(3*HZ))
1184 acsi_getstatus();
1185 /* Do not report errors -- some devices may not know this command. */
1186
1187 ENABLE_IRQ();
1188 stdma_release();
1189 }
1190
1191 static int acsi_media_change(struct gendisk *disk)
1192 {
1193 struct acsi_info_struct *aip = disk->private_data;
1194
1195 if (!aip->removable)
1196 return 0;
1197
1198 if (aip->changed)
1199 /* We can be sure that the medium has been changed -- REQUEST
1200 * SENSE has reported this earlier.
1201 */
1202 return 1;
1203
1204 /* If the flag isn't set, make a test by reading block 0.
1205 * If errors happen, it seems to be better to say "changed"...
1206 */
1207 stdma_lock( NULL, NULL );
1208 CMDSET_TARG_LUN(read_cmd, aip->target, aip->lun);
1209 CMDSET_BLOCK( read_cmd, 0 );
1210 CMDSET_LEN( read_cmd, 1 );
1211 if (acsicmd_dma(read_cmd, acsi_buffer, 1, 0, 0) &&
1212 acsi_wait_for_IRQ(3*HZ)) {
1213 if (acsi_getstatus()) {
1214 if (acsi_reqsense(acsi_buffer, aip->target, aip->lun)) {
1215 if (CARTRCH_STAT(aip, acsi_buffer))
1216 aip->changed = 1;
1217 }
1218 else {
1219 printk( KERN_ERR "%s: REQUEST SENSE failed in test for "
1220 "medium change; assuming a change\n", disk->disk_name );
1221 aip->changed = 1;
1222 }
1223 }
1224 }
1225 else {
1226 printk( KERN_ERR "%s: Test for medium changed timed out; "
1227 "assuming a change\n", disk->disk_name);
1228 aip->changed = 1;
1229 }
1230 ENABLE_IRQ();
1231 stdma_release();
1232
1233 /* Now, after reading a block, the changed status is surely valid. */
1234 return aip->changed;
1235 }
1236
1237
1238 static int acsi_change_blk_size( int target, int lun)
1239
1240 { int i;
1241
1242 for (i=0; i<12; i++)
1243 acsi_buffer[i] = 0;
1244
1245 acsi_buffer[3] = 8;
1246 acsi_buffer[10] = 2;
1247 CMDSET_TARG_LUN( modeselect_cmd, target, lun);
1248
1249 if (!acsicmd_dma( modeselect_cmd, acsi_buffer, 1,1,0) ||
1250 !acsi_wait_for_IRQ( 3*HZ ) ||
1251 acsi_getstatus() != 0 ) {
1252 return(0);
1253 }
1254 return(1);
1255 }
1256
1257
1258 static int acsi_mode_sense( int target, int lun, SENSE_DATA *sd )
1259
1260 {
1261 int page;
1262
1263 CMDSET_TARG_LUN( modesense_cmd, target, lun );
1264 for (page=0; page<4; page++) {
1265 modesense_cmd[2] = page;
1266 if (!acsicmd_dma( modesense_cmd, acsi_buffer, 1, 0, 0 ) ||
1267 !acsi_wait_for_IRQ( 3*HZ ) ||
1268 acsi_getstatus())
1269 continue;
1270
1271 /* read twice to jump over the second 16-byte border! */
1272 udelay(300);
1273 if (acsi_wait_for_noIRQ( 20 ) &&
1274 acsicmd_nodma( modesense_cmd, 0 ) &&
1275 acsi_wait_for_IRQ( 3*HZ ) &&
1276 acsi_getstatus() == 0)
1277 break;
1278 }
1279 if (page == 4) {
1280 return(0);
1281 }
1282
1283 dma_cache_maintenance( phys_acsi_buffer, sizeof(SENSE_DATA), 0 );
1284 *sd = *(SENSE_DATA *)acsi_buffer;
1285
1286 /* Validity check, depending on type of data */
1287
1288 switch( SENSE_TYPE(*sd) ) {
1289
1290 case SENSE_TYPE_ATARI:
1291 if (CAPACITY(*sd) == 0)
1292 goto invalid_sense;
1293 break;
1294
1295 case SENSE_TYPE_SCSI:
1296 if (sd->scsi.descriptor_size != 8)
1297 goto invalid_sense;
1298 break;
1299
1300 case SENSE_TYPE_UNKNOWN:
1301
1302 printk( KERN_ERR "ACSI target %d, lun %d: Cannot interpret "
1303 "sense data\n", target, lun );
1304
1305 invalid_sense:
1306
1307 #ifdef DEBUG
1308 { int i;
1309 printk( "Mode sense data for ACSI target %d, lun %d seem not valid:",
1310 target, lun );
1311 for( i = 0; i < sizeof(SENSE_DATA); ++i )
1312 printk( "%02x ", (unsigned char)acsi_buffer[i] );
1313 printk( "\n" );
1314 }
1315 #endif
1316 return( 0 );
1317 }
1318
1319 return( 1 );
1320 }
1321
1322
1323
1324 /*******************************************************************
1325 *
1326 * Initialization
1327 *
1328 ********************************************************************/
1329
1330
1331 extern struct block_device_operations acsi_fops;
1332
1333 static struct gendisk *acsi_gendisk[MAX_DEV];
1334
1335 #define MAX_SCSI_DEVICE_CODE 10
1336
1337 static const char *const scsi_device_types[MAX_SCSI_DEVICE_CODE] =
1338 {
1339 "Direct-Access ",
1340 "Sequential-Access",
1341 "Printer ",
1342 "Processor ",
1343 "WORM ",
1344 "CD-ROM ",
1345 "Scanner ",
1346 "Optical Device ",
1347 "Medium Changer ",
1348 "Communications "
1349 };
1350
1351 static void print_inquiry(unsigned char *data)
1352 {
1353 int i;
1354
1355 printk(KERN_INFO " Vendor: ");
1356 for (i = 8; i < 16; i++)
1357 {
1358 if (data[i] >= 0x20 && i < data[4] + 5)
1359 printk("%c", data[i]);
1360 else
1361 printk(" ");
1362 }
1363
1364 printk(" Model: ");
1365 for (i = 16; i < 32; i++)
1366 {
1367 if (data[i] >= 0x20 && i < data[4] + 5)
1368 printk("%c", data[i]);
1369 else
1370 printk(" ");
1371 }
1372
1373 printk(" Rev: ");
1374 for (i = 32; i < 36; i++)
1375 {
1376 if (data[i] >= 0x20 && i < data[4] + 5)
1377 printk("%c", data[i]);
1378 else
1379 printk(" ");
1380 }
1381
1382 printk("\n");
1383
1384 i = data[0] & 0x1f;
1385
1386 printk(KERN_INFO " Type: %s ", (i < MAX_SCSI_DEVICE_CODE
1387 ? scsi_device_types[i]
1388 : "Unknown "));
1389 printk(" ANSI SCSI revision: %02x", data[2] & 0x07);
1390 if ((data[2] & 0x07) == 1 && (data[3] & 0x0f) == 1)
1391 printk(" CCS\n");
1392 else
1393 printk("\n");
1394 }
1395
1396
1397 /*
1398 * Changes by Martin Rogge, 9th Aug 1995:
1399 * acsi_devinit has been taken out of acsi_geninit, because it needs
1400 * to be called from revalidate_acsidisk. The result of request sense
1401 * is now checked for DRIVE NOT READY.
1402 *
1403 * The structure *aip is only valid when acsi_devinit returns
1404 * DEV_SUPPORTED.
1405 *
1406 */
1407
1408 #define DEV_NONE 0
1409 #define DEV_UNKNOWN 1
1410 #define DEV_SUPPORTED 2
1411 #define DEV_SLM 3
1412
1413 static int acsi_devinit(struct acsi_info_struct *aip)
1414 {
1415 int status, got_inquiry;
1416 SENSE_DATA sense;
1417 unsigned char reqsense, extsense;
1418
1419 /*****************************************************************/
1420 /* Do a TEST UNIT READY command to test the presence of a device */
1421 /*****************************************************************/
1422
1423 CMDSET_TARG_LUN(tur_cmd, aip->target, aip->lun);
1424 if (!acsicmd_nodma(tur_cmd, 0)) {
1425 /* timed out -> no device here */
1426 #ifdef DEBUG_DETECT
1427 printk("target %d lun %d: timeout\n", aip->target, aip->lun);
1428 #endif
1429 return DEV_NONE;
1430 }
1431
1432 /*************************/
1433 /* Read the ACSI status. */
1434 /*************************/
1435
1436 status = acsi_getstatus();
1437 if (status) {
1438 if (status == 0x12) {
1439 /* The SLM printer should be the only device that
1440 * responds with the error code in the status byte. In
1441 * correct status bytes, bit 4 is never set.
1442 */
1443 printk( KERN_INFO "Detected SLM printer at id %d lun %d\n",
1444 aip->target, aip->lun);
1445 return DEV_SLM;
1446 }
1447 /* ignore CHECK CONDITION, since some devices send a
1448 UNIT ATTENTION */
1449 if ((status & 0x1e) != 0x2) {
1450 #ifdef DEBUG_DETECT
1451 printk("target %d lun %d: status %d\n",
1452 aip->target, aip->lun, status);
1453 #endif
1454 return DEV_UNKNOWN;
1455 }
1456 }
1457
1458 /*******************************/
1459 /* Do a REQUEST SENSE command. */
1460 /*******************************/
1461
1462 if (!acsi_reqsense(acsi_buffer, aip->target, aip->lun)) {
1463 printk( KERN_WARNING "acsi_reqsense failed\n");
1464 acsi_buffer[0] = 0;
1465 acsi_buffer[2] = UNIT_ATTENTION;
1466 }
1467 reqsense = acsi_buffer[0];
1468 extsense = acsi_buffer[2] & 0xf;
1469 if (status) {
1470 if ((reqsense & 0x70) == 0x70) { /* extended sense */
1471 if (extsense != UNIT_ATTENTION &&
1472 extsense != NOT_READY) {
1473 #ifdef DEBUG_DETECT
1474 printk("target %d lun %d: extended sense %d\n",
1475 aip->target, aip->lun, extsense);
1476 #endif
1477 return DEV_UNKNOWN;
1478 }
1479 }
1480 else {
1481 if (reqsense & 0x7f) {
1482 #ifdef DEBUG_DETECT
1483 printk("target %d lun %d: sense %d\n",
1484 aip->target, aip->lun, reqsense);
1485 #endif
1486 return DEV_UNKNOWN;
1487 }
1488 }
1489 }
1490 else
1491 if (reqsense == 0x4) { /* SH204 Bug workaround */
1492 #ifdef DEBUG_DETECT
1493 printk("target %d lun %d status=0 sense=4\n",
1494 aip->target, aip->lun);
1495 #endif
1496 return DEV_UNKNOWN;
1497 }
1498
1499 /***********************************************************/
1500 /* Do an INQUIRY command to get more infos on this device. */
1501 /***********************************************************/
1502
1503 /* Assume default values */
1504 aip->removable = 1;
1505 aip->read_only = 0;
1506 aip->old_atari_disk = 0;
1507 aip->changed = (extsense == NOT_READY); /* medium inserted? */
1508 aip->size = DEFAULT_SIZE;
1509 got_inquiry = 0;
1510 /* Fake inquiry result for old atari disks */
1511 memcpy(acsi_buffer, "\000\000\001\000 Adaptec 40xx"
1512 " ", 40);
1513 CMDSET_TARG_LUN(inquiry_cmd, aip->target, aip->lun);
1514 if (acsicmd_dma(inquiry_cmd, acsi_buffer, 1, 0, 0) &&
1515 acsi_getstatus() == 0) {
1516 acsicmd_nodma(inquiry_cmd, 0);
1517 acsi_getstatus();
1518 dma_cache_maintenance( phys_acsi_buffer, 256, 0 );
1519 got_inquiry = 1;
1520 aip->removable = !!(acsi_buffer[1] & 0x80);
1521 }
1522 if (aip->type == NONE) /* only at boot time */
1523 print_inquiry(acsi_buffer);
1524 switch(acsi_buffer[0]) {
1525 case TYPE_DISK:
1526 aip->type = HARDDISK;
1527 break;
1528 case TYPE_ROM:
1529 aip->type = CDROM;
1530 aip->read_only = 1;
1531 break;
1532 default:
1533 return DEV_UNKNOWN;
1534 }
1535 /****************************/
1536 /* Do a MODE SENSE command. */
1537 /****************************/
1538
1539 if (!acsi_mode_sense(aip->target, aip->lun, &sense)) {
1540 printk( KERN_WARNING "No mode sense data.\n" );
1541 return DEV_UNKNOWN;
1542 }
1543 if ((SECTOR_SIZE(sense) != 512) &&
1544 ((aip->type != CDROM) ||
1545 !acsi_change_blk_size(aip->target, aip->lun) ||
1546 !acsi_mode_sense(aip->target, aip->lun, &sense) ||
1547 (SECTOR_SIZE(sense) != 512))) {
1548 printk( KERN_WARNING "Sector size != 512 not supported.\n" );
1549 return DEV_UNKNOWN;
1550 }
1551 /* There are disks out there that claim to have 0 sectors... */
1552 if (CAPACITY(sense))
1553 aip->size = CAPACITY(sense); /* else keep DEFAULT_SIZE */
1554 if (!got_inquiry && SENSE_TYPE(sense) == SENSE_TYPE_ATARI) {
1555 /* If INQUIRY failed and the sense data suggest an old
1556 * Atari disk (SH20x, Megafile), the disk is not removable
1557 */
1558 aip->removable = 0;
1559 aip->old_atari_disk = 1;
1560 }
1561
1562 /******************/
1563 /* We've done it. */
1564 /******************/
1565
1566 return DEV_SUPPORTED;
1567 }
1568
1569 EXPORT_SYMBOL(acsi_delay_start);
1570 EXPORT_SYMBOL(acsi_delay_end);
1571 EXPORT_SYMBOL(acsi_wait_for_IRQ);
1572 EXPORT_SYMBOL(acsi_wait_for_noIRQ);
1573 EXPORT_SYMBOL(acsicmd_nodma);
1574 EXPORT_SYMBOL(acsi_getstatus);
1575 EXPORT_SYMBOL(acsi_buffer);
1576 EXPORT_SYMBOL(phys_acsi_buffer);
1577
1578 #ifdef CONFIG_ATARI_SLM_MODULE
1579 void acsi_attach_SLMs( int (*attach_func)( int, int ) );
1580
1581 EXPORT_SYMBOL(acsi_extstatus);
1582 EXPORT_SYMBOL(acsi_end_extstatus);
1583 EXPORT_SYMBOL(acsi_extcmd);
1584 EXPORT_SYMBOL(acsi_attach_SLMs);
1585
1586 /* to remember IDs of SLM devices, SLM module is loaded later
1587 * (index is target#, contents is lun#, -1 means "no SLM") */
1588 int SLM_devices[8];
1589 #endif
1590
1591 static struct block_device_operations acsi_fops = {
1592 .owner = THIS_MODULE,
1593 .open = acsi_open,
1594 .release = acsi_release,
1595 .ioctl = acsi_ioctl,
1596 .media_changed = acsi_media_change,
1597 .revalidate_disk= acsi_revalidate,
1598 };
1599
1600 #ifdef CONFIG_ATARI_SLM_MODULE
1601 /* call attach_slm() for each device that is a printer; needed for init of SLM
1602 * driver as a module, since it's not yet present if acsi.c is inited and thus
1603 * the bus gets scanned. */
1604 void acsi_attach_SLMs( int (*attach_func)( int, int ) )
1605 {
1606 int i, n = 0;
1607
1608 for( i = 0; i < 8; ++i )
1609 if (SLM_devices[i] >= 0)
1610 n += (*attach_func)( i, SLM_devices[i] );
1611 printk( KERN_INFO "Found %d SLM printer(s) total.\n", n );
1612 }
1613 #endif /* CONFIG_ATARI_SLM_MODULE */
1614
1615
1616 int acsi_init( void )
1617 {
1618 int err = 0;
1619 int i, target, lun;
1620 struct acsi_info_struct *aip;
1621 #ifdef CONFIG_ATARI_SLM
1622 int n_slm = 0;
1623 #endif
1624 if (!MACH_IS_ATARI || !ATARIHW_PRESENT(ACSI))
1625 return 0;
1626 if (register_blkdev(ACSI_MAJOR, "ad")) {
1627 err = -EBUSY;
1628 goto out1;
1629 }
1630 if (!(acsi_buffer =
1631 (char *)atari_stram_alloc(ACSI_BUFFER_SIZE, "acsi"))) {
1632 err = -ENOMEM;
1633 printk( KERN_ERR "Unable to get ACSI ST-Ram buffer.\n" );
1634 goto out2;
1635 }
1636 phys_acsi_buffer = virt_to_phys( acsi_buffer );
1637 STramMask = ATARIHW_PRESENT(EXTD_DMA) ? 0x00000000 : 0xff000000;
1638
1639 acsi_queue = blk_init_queue(do_acsi_request, &acsi_lock);
1640 if (!acsi_queue) {
1641 err = -ENOMEM;
1642 goto out2a;
1643 }
1644 #ifdef CONFIG_ATARI_SLM
1645 err = slm_init();
1646 #endif
1647 if (err)
1648 goto out3;
1649
1650 printk( KERN_INFO "Probing ACSI devices:\n" );
1651 NDevices = 0;
1652 #ifdef CONFIG_ATARI_SLM_MODULE
1653 for( i = 0; i < 8; ++i )
1654 SLM_devices[i] = -1;
1655 #endif
1656 stdma_lock(NULL, NULL);
1657
1658 for (target = 0; target < 8 && NDevices < MAX_DEV; ++target) {
1659 lun = 0;
1660 do {
1661 aip = &acsi_info[NDevices];
1662 aip->type = NONE;
1663 aip->target = target;
1664 aip->lun = lun;
1665 i = acsi_devinit(aip);
1666 switch (i) {
1667 case DEV_SUPPORTED:
1668 printk( KERN_INFO "Detected ");
1669 switch (aip->type) {
1670 case HARDDISK:
1671 printk("disk");
1672 break;
1673 case CDROM:
1674 printk("cdrom");
1675 break;
1676 default:
1677 }
1678 printk(" ad%c at id %d lun %d ",
1679 'a' + NDevices, target, lun);
1680 if (aip->removable)
1681 printk("(removable) ");
1682 if (aip->read_only)
1683 printk("(read-only) ");
1684 if (aip->size == DEFAULT_SIZE)
1685 printk(" unkown size, using default ");
1686 printk("%ld MByte\n",
1687 (aip->size*512+1024*1024/2)/(1024*1024));
1688 NDevices++;
1689 break;
1690 case DEV_SLM:
1691 #ifdef CONFIG_ATARI_SLM
1692 n_slm += attach_slm( target, lun );
1693 break;
1694 #endif
1695 #ifdef CONFIG_ATARI_SLM_MODULE
1696 SLM_devices[target] = lun;
1697 break;
1698 #endif
1699 /* neither of the above: fall through to unknown device */
1700 case DEV_UNKNOWN:
1701 printk( KERN_INFO "Detected unsupported device at "
1702 "id %d lun %d\n", target, lun);
1703 break;
1704 }
1705 }
1706 #ifdef CONFIG_ACSI_MULTI_LUN
1707 while (i != DEV_NONE && ++lun < MAX_LUN);
1708 #else
1709 while (0);
1710 #endif
1711 }
1712
1713 /* reenable interrupt */
1714 ENABLE_IRQ();
1715 stdma_release();
1716
1717 #ifndef CONFIG_ATARI_SLM
1718 printk( KERN_INFO "Found %d ACSI device(s) total.\n", NDevices );
1719 #else
1720 printk( KERN_INFO "Found %d ACSI device(s) and %d SLM printer(s) total.\n",
1721 NDevices, n_slm );
1722 #endif
1723 err = -ENOMEM;
1724 for( i = 0; i < NDevices; ++i ) {
1725 acsi_gendisk[i] = alloc_disk(16);
1726 if (!acsi_gendisk[i])
1727 goto out4;
1728 }
1729
1730 for( i = 0; i < NDevices; ++i ) {
1731 struct gendisk *disk = acsi_gendisk[i];
1732 sprintf(disk->disk_name, "ad%c", 'a'+i);
1733 aip = &acsi_info[NDevices];
1734 sprintf(disk->devfs_name, "ad/target%d/lun%d", aip->target, aip->lun);
1735 disk->major = ACSI_MAJOR;
1736 disk->first_minor = i << 4;
1737 if (acsi_info[i].type != HARDDISK) {
1738 disk->minors = 1;
1739 strcat(disk->devfs_name, "/disc");
1740 }
1741 disk->fops = &acsi_fops;
1742 disk->private_data = &acsi_info[i];
1743 set_capacity(disk, acsi_info[i].size);
1744 disk->queue = acsi_queue;
1745 add_disk(disk);
1746 }
1747 return 0;
1748 out4:
1749 while (i--)
1750 put_disk(acsi_gendisk[i]);
1751 out3:
1752 blk_cleanup_queue(acsi_queue);
1753 out2a:
1754 atari_stram_free( acsi_buffer );
1755 out2:
1756 unregister_blkdev( ACSI_MAJOR, "ad" );
1757 out1:
1758 return err;
1759 }
1760
1761
1762 #ifdef MODULE
1763
1764 MODULE_LICENSE("GPL");
1765
1766 int init_module(void)
1767 {
1768 int err;
1769
1770 if ((err = acsi_init()))
1771 return( err );
1772 printk( KERN_INFO "ACSI driver loaded as module.\n");
1773 return( 0 );
1774 }
1775
1776 void cleanup_module(void)
1777 {
1778 int i;
1779 del_timer( &acsi_timer );
1780 blk_cleanup_queue(acsi_queue);
1781 atari_stram_free( acsi_buffer );
1782
1783 if (unregister_blkdev( ACSI_MAJOR, "ad" ) != 0)
1784 printk( KERN_ERR "acsi: cleanup_module failed\n");
1785
1786 for (i = 0; i < NDevices; i++) {
1787 del_gendisk(acsi_gendisk[i]);
1788 put_disk(acsi_gendisk[i]);
1789 }
1790 }
1791 #endif
1792
1793 /*
1794 * This routine is called to flush all partitions and partition tables
1795 * for a changed scsi disk, and then re-read the new partition table.
1796 * If we are revalidating a disk because of a media change, then we
1797 * enter with usage == 0. If we are using an ioctl, we automatically have
1798 * usage == 1 (we need an open channel to use an ioctl :-), so this
1799 * is our limit.
1800 *
1801 * Changes by Martin Rogge, 9th Aug 1995:
1802 * got cd-roms to work by calling acsi_devinit. There are only two problems:
1803 * First, if there is no medium inserted, the status will remain "changed".
1804 * That is no problem at all, but our design of three-valued logic (medium
1805 * changed, medium not changed, no medium inserted).
1806 * Secondly the check could fail completely and the drive could deliver
1807 * nonsensical data, which could mess up the acsi_info[] structure. In
1808 * that case we try to make the entry safe.
1809 *
1810 */
1811
1812 static int acsi_revalidate(struct gendisk *disk)
1813 {
1814 struct acsi_info_struct *aip = disk->private_data;
1815 stdma_lock( NULL, NULL );
1816 if (acsi_devinit(aip) != DEV_SUPPORTED) {
1817 printk( KERN_ERR "ACSI: revalidate failed for target %d lun %d\n",
1818 aip->target, aip->lun);
1819 aip->size = 0;
1820 aip->read_only = 1;
1821 aip->removable = 1;
1822 aip->changed = 1; /* next acsi_open will try again... */
1823 }
1824
1825 ENABLE_IRQ();
1826 stdma_release();
1827 set_capacity(disk, aip->size);
1828 return 0;
1829 }
CRIS linux kernel tree