1 /* imm.c -- low level driver for the IOMEGA MatchMaker
2 * parallel port SCSI host adapter.
4 * (The IMM is the embedded controller in the ZIP Plus drive.)
6 * My unofficial company acronym list is 21 pages long:
7 * FLA: Four letter acronym with built in facility for
8 * future expansion to five letters.
11 #include <linux/init.h>
12 #include <linux/kernel.h>
13 #include <linux/module.h>
14 #include <linux/blkdev.h>
15 #include <linux/parport.h>
16 #include <linux/workqueue.h>
17 #include <linux/delay.h>
18 #include <linux/slab.h>
21 #include <scsi/scsi.h>
22 #include <scsi/scsi_cmnd.h>
23 #include <scsi/scsi_device.h>
24 #include <scsi/scsi_host.h>
26 /* The following #define is to avoid a clash with hosts.c */
27 #define IMM_PROBE_SPP 0x0001
28 #define IMM_PROBE_PS2 0x0002
29 #define IMM_PROBE_ECR 0x0010
30 #define IMM_PROBE_EPP17 0x0100
31 #define IMM_PROBE_EPP19 0x0200
35 struct pardevice
*dev
; /* Parport device entry */
36 int base
; /* Actual port address */
37 int base_hi
; /* Hi Base address for ECP-ISA chipset */
38 int mode
; /* Transfer mode */
39 struct scsi_cmnd
*cur_cmd
; /* Current queued command */
40 struct delayed_work imm_tq
; /* Polling interrupt stuff */
41 unsigned long jstart
; /* Jiffies at start */
42 unsigned failed
:1; /* Failure flag */
43 unsigned dp
:1; /* Data phase present */
44 unsigned rd
:1; /* Read data in data phase */
45 unsigned wanted
:1; /* Parport sharing busy flag */
46 unsigned int dev_no
; /* Device number */
47 wait_queue_head_t
*waiting
;
48 struct Scsi_Host
*host
;
49 struct list_head list
;
52 static void imm_reset_pulse(unsigned int base
);
53 static int device_check(imm_struct
*dev
);
57 static inline imm_struct
*imm_dev(struct Scsi_Host
*host
)
59 return *(imm_struct
**)&host
->hostdata
;
62 static DEFINE_SPINLOCK(arbitration_lock
);
64 static void got_it(imm_struct
*dev
)
66 dev
->base
= dev
->dev
->port
->base
;
68 dev
->cur_cmd
->SCp
.phase
= 1;
70 wake_up(dev
->waiting
);
73 static void imm_wakeup(void *ref
)
75 imm_struct
*dev
= (imm_struct
*) ref
;
78 spin_lock_irqsave(&arbitration_lock
, flags
);
80 parport_claim(dev
->dev
);
84 spin_unlock_irqrestore(&arbitration_lock
, flags
);
87 static int imm_pb_claim(imm_struct
*dev
)
91 spin_lock_irqsave(&arbitration_lock
, flags
);
92 if (parport_claim(dev
->dev
) == 0) {
97 spin_unlock_irqrestore(&arbitration_lock
, flags
);
101 static void imm_pb_dismiss(imm_struct
*dev
)
105 spin_lock_irqsave(&arbitration_lock
, flags
);
106 wanted
= dev
->wanted
;
108 spin_unlock_irqrestore(&arbitration_lock
, flags
);
110 parport_release(dev
->dev
);
113 static inline void imm_pb_release(imm_struct
*dev
)
115 parport_release(dev
->dev
);
118 /* This is to give the imm driver a way to modify the timings (and other
119 * parameters) by writing to the /proc/scsi/imm/0 file.
120 * Very simple method really... (Too simple, no error checking :( )
121 * Reason: Kernel hackers HATE having to unload and reload modules for
123 * Also gives a method to use a script to obtain optimum timings (TODO)
125 static int imm_write_info(struct Scsi_Host
*host
, char *buffer
, int length
)
127 imm_struct
*dev
= imm_dev(host
);
129 if ((length
> 5) && (strncmp(buffer
, "mode=", 5) == 0)) {
130 dev
->mode
= simple_strtoul(buffer
+ 5, NULL
, 0);
133 printk("imm /proc: invalid variable\n");
137 static int imm_show_info(struct seq_file
*m
, struct Scsi_Host
*host
)
139 imm_struct
*dev
= imm_dev(host
);
141 seq_printf(m
, "Version : %s\n", IMM_VERSION
);
142 seq_printf(m
, "Parport : %s\n", dev
->dev
->port
->name
);
143 seq_printf(m
, "Mode : %s\n", IMM_MODE_STRING
[dev
->mode
]);
148 #define imm_fail(x,y) printk("imm: imm_fail(%i) from %s at line %d\n",\
149 y, __func__, __LINE__); imm_fail_func(x,y);
151 imm_fail_func(imm_struct
*dev
, int error_code
)
154 imm_fail(imm_struct
*dev
, int error_code
)
157 /* If we fail a device then we trash status / message bytes */
159 dev
->cur_cmd
->result
= error_code
<< 16;
165 * Wait for the high bit to be set.
167 * In principle, this could be tied to an interrupt, but the adapter
168 * doesn't appear to be designed to support interrupts. We spin on
169 * the 0x80 ready bit.
171 static unsigned char imm_wait(imm_struct
*dev
)
174 unsigned short ppb
= dev
->base
;
185 while (!(r
& 0x80) && (k
));
188 * STR register (LPT base+1) to SCSI mapping:
191 * ===================================
199 * ==================================
201 * 0xc0 0x88 ZIP wants more data
202 * 0xd0 0x98 ZIP wants to send more data
203 * 0xe0 0xa8 ZIP is expecting SCSI command data
204 * 0xf0 0xb8 end of transfer, ZIP is sending status
210 /* Counter expired - Time out occurred */
211 imm_fail(dev
, DID_TIME_OUT
);
212 printk("imm timeout in imm_wait\n");
213 return 0; /* command timed out */
216 static int imm_negotiate(imm_struct
* tmp
)
219 * The following is supposedly the IEEE 1284-1994 negotiate
220 * sequence. I have yet to obtain a copy of the above standard
221 * so this is a bit of a guess...
223 * A fair chunk of this is based on the Linux parport implementation
226 * Return 0 if data available
227 * 1 if no data available
230 unsigned short base
= tmp
->base
;
231 unsigned char a
, mode
;
250 a
= (r_str(base
) & 0x20) ? 0 : 1;
258 ("IMM: IEEE1284 negotiate indicates no data available.\n");
259 imm_fail(tmp
, DID_ERROR
);
265 * Clear EPP timeout bit.
267 static inline void epp_reset(unsigned short ppb
)
273 w_str(ppb
, i
& 0xfe);
277 * Wait for empty ECP fifo (if we are in ECP fifo mode only)
279 static inline void ecp_sync(imm_struct
*dev
)
281 int i
, ppb_hi
= dev
->base_hi
;
286 if ((r_ecr(ppb_hi
) & 0xe0) == 0x60) { /* mode 011 == ECP fifo mode */
287 for (i
= 0; i
< 100; i
++) {
288 if (r_ecr(ppb_hi
) & 0x01)
292 printk("imm: ECP sync failed as data still present in FIFO.\n");
296 static int imm_byte_out(unsigned short base
, const char *buffer
, int len
)
300 w_ctr(base
, 0x4); /* apparently a sane mode */
301 for (i
= len
>> 1; i
; i
--) {
302 w_dtr(base
, *buffer
++);
303 w_ctr(base
, 0x5); /* Drop STROBE low */
304 w_dtr(base
, *buffer
++);
305 w_ctr(base
, 0x0); /* STROBE high + INIT low */
307 w_ctr(base
, 0x4); /* apparently a sane mode */
308 return 1; /* All went well - we hope! */
311 static int imm_nibble_in(unsigned short base
, char *buffer
, int len
)
317 * The following is based on documented timing signals
320 for (i
= len
; i
; i
--) {
322 l
= (r_str(base
) & 0xf0) >> 4;
324 *buffer
++ = (r_str(base
) & 0xf0) | l
;
327 return 1; /* All went well - we hope! */
330 static int imm_byte_in(unsigned short base
, char *buffer
, int len
)
335 * The following is based on documented timing signals
338 for (i
= len
; i
; i
--) {
340 *buffer
++ = r_dtr(base
);
343 return 1; /* All went well - we hope! */
346 static int imm_out(imm_struct
*dev
, char *buffer
, int len
)
348 unsigned short ppb
= dev
->base
;
349 int r
= imm_wait(dev
);
353 * a) the SCSI bus is BUSY (device still listening)
354 * b) the device is listening
356 if ((r
& 0x18) != 0x08) {
357 imm_fail(dev
, DID_ERROR
);
358 printk("IMM: returned SCSI status %2x\n", r
);
367 #ifdef CONFIG_SCSI_IZIP_EPP16
368 if (!(((long) buffer
| len
) & 0x01))
369 outsw(ppb
+ 4, buffer
, len
>> 1);
371 if (!(((long) buffer
| len
) & 0x03))
372 outsl(ppb
+ 4, buffer
, len
>> 2);
375 outsb(ppb
+ 4, buffer
, len
);
377 r
= !(r_str(ppb
) & 0x01);
384 /* 8 bit output, with a loop */
385 r
= imm_byte_out(ppb
, buffer
, len
);
389 printk("IMM: bug in imm_out()\n");
395 static int imm_in(imm_struct
*dev
, char *buffer
, int len
)
397 unsigned short ppb
= dev
->base
;
398 int r
= imm_wait(dev
);
402 * a) the SCSI bus is BUSY (device still listening)
403 * b) the device is sending data
405 if ((r
& 0x18) != 0x18) {
406 imm_fail(dev
, DID_ERROR
);
411 /* 4 bit input, with a loop */
412 r
= imm_nibble_in(ppb
, buffer
, len
);
417 /* 8 bit input, with a loop */
418 r
= imm_byte_in(ppb
, buffer
, len
);
427 #ifdef CONFIG_SCSI_IZIP_EPP16
428 if (!(((long) buffer
| len
) & 0x01))
429 insw(ppb
+ 4, buffer
, len
>> 1);
431 if (!(((long) buffer
| len
) & 0x03))
432 insl(ppb
+ 4, buffer
, len
>> 2);
435 insb(ppb
+ 4, buffer
, len
);
437 r
= !(r_str(ppb
) & 0x01);
443 printk("IMM: bug in imm_ins()\n");
450 static int imm_cpp(unsigned short ppb
, unsigned char b
)
453 * Comments on udelay values refer to the
454 * Command Packet Protocol (CPP) timing diagram.
457 unsigned char s1
, s2
, s3
;
459 udelay(2); /* 1 usec - infinite */
461 udelay(10); /* 7 usec - infinite */
463 udelay(10); /* 7 usec - infinite */
465 udelay(10); /* 7 usec - infinite */
467 udelay(10); /* 7 usec - infinite */
468 s1
= r_str(ppb
) & 0xb8;
470 udelay(10); /* 7 usec - infinite */
471 s2
= r_str(ppb
) & 0xb8;
473 udelay(10); /* 7 usec - infinite */
474 s3
= r_str(ppb
) & 0x38;
477 * 0000 00aa Assign address aa to current device
478 * 0010 00aa Select device aa in EPP Winbond mode
479 * 0010 10aa Select device aa in EPP mode
480 * 0011 xxxx Deselect all devices
481 * 0110 00aa Test device aa
482 * 1101 00aa Select device aa in ECP mode
483 * 1110 00aa Select device aa in Compatible mode
486 udelay(2); /* 1 usec - infinite */
488 udelay(10); /* 7 usec - infinite */
490 udelay(2); /* 1 usec - infinite */
492 udelay(10); /* 7 usec - infinite */
494 udelay(10); /* 7 usec - infinite */
497 * The following table is electrical pin values.
498 * (BSY is inverted at the CTR register)
500 * BSY ACK POut SEL Fault
505 * L => Last device in chain
508 * Observered values for S1,S2,S3 are:
509 * Disconnect => f8/58/78
510 * Connect => f8/58/70
512 if ((s1
== 0xb8) && (s2
== 0x18) && (s3
== 0x30))
513 return 1; /* Connected */
514 if ((s1
== 0xb8) && (s2
== 0x18) && (s3
== 0x38))
515 return 0; /* Disconnected */
517 return -1; /* No device present */
520 static inline int imm_connect(imm_struct
*dev
, int flag
)
522 unsigned short ppb
= dev
->base
;
524 imm_cpp(ppb
, 0xe0); /* Select device 0 in compatible mode */
525 imm_cpp(ppb
, 0x30); /* Disconnect all devices */
527 if ((dev
->mode
== IMM_EPP_8
) ||
528 (dev
->mode
== IMM_EPP_16
) ||
529 (dev
->mode
== IMM_EPP_32
))
530 return imm_cpp(ppb
, 0x28); /* Select device 0 in EPP mode */
531 return imm_cpp(ppb
, 0xe0); /* Select device 0 in compatible mode */
534 static void imm_disconnect(imm_struct
*dev
)
536 imm_cpp(dev
->base
, 0x30); /* Disconnect all devices */
539 static int imm_select(imm_struct
*dev
, int target
)
542 unsigned short ppb
= dev
->base
;
545 * Firstly we want to make sure there is nothing
546 * holding onto the SCSI bus.
553 } while ((r_str(ppb
) & 0x08) && (k
));
559 * Now assert the SCSI ID (HOST and TARGET) on the data bus
562 w_dtr(ppb
, 0x80 | (1 << target
));
566 * Deassert SELIN first followed by STROBE
572 * ACK should drop low while SELIN is deasserted.
573 * FAULT should drop low when the SCSI device latches the bus.
579 while (!(r_str(ppb
) & 0x08) && (k
));
582 * Place the interface back into a sane state (status mode)
588 static int imm_init(imm_struct
*dev
)
590 if (imm_connect(dev
, 0) != 1)
592 imm_reset_pulse(dev
->base
);
593 mdelay(1); /* Delay to allow devices to settle */
595 mdelay(1); /* Another delay to allow devices to settle */
596 return device_check(dev
);
599 static inline int imm_send_command(struct scsi_cmnd
*cmd
)
601 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
604 /* NOTE: IMM uses byte pairs */
605 for (k
= 0; k
< cmd
->cmd_len
; k
+= 2)
606 if (!imm_out(dev
, &cmd
->cmnd
[k
], 2))
612 * The bulk flag enables some optimisations in the data transfer loops,
613 * it should be true for any command that transfers data in integral
614 * numbers of sectors.
616 * The driver appears to remain stable if we speed up the parallel port
617 * i/o in this function, but not elsewhere.
619 static int imm_completion(struct scsi_cmnd
*cmd
)
624 * 1 Finished data transfer
626 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
627 unsigned short ppb
= dev
->base
;
628 unsigned long start_jiffies
= jiffies
;
631 int fast
, bulk
, status
;
634 bulk
= ((v
== READ_6
) ||
635 (v
== READ_10
) || (v
== WRITE_6
) || (v
== WRITE_10
));
638 * We only get here if the drive is ready to comunicate,
639 * hence no need for a full imm_wait.
642 r
= (r_str(ppb
) & 0xb8);
645 * while (device is not ready to send status byte)
648 while (r
!= (unsigned char) 0xb8) {
650 * If we have been running for more than a full timer tick
653 if (time_after(jiffies
, start_jiffies
+ 1))
658 * a) Drive status is screwy (!ready && !present)
659 * b) Drive is requesting/sending more data than expected
661 if (((r
& 0x88) != 0x88) || (cmd
->SCp
.this_residual
<= 0)) {
662 imm_fail(dev
, DID_ERROR
);
663 return -1; /* ERROR_RETURN */
665 /* determine if we should use burst I/O */
668 && (cmd
->SCp
.this_residual
>=
669 IMM_BURST_SIZE
)) ? IMM_BURST_SIZE
: 2;
670 status
= imm_out(dev
, cmd
->SCp
.ptr
, fast
);
673 && (cmd
->SCp
.this_residual
>=
674 IMM_BURST_SIZE
)) ? IMM_BURST_SIZE
: 1;
675 status
= imm_in(dev
, cmd
->SCp
.ptr
, fast
);
678 cmd
->SCp
.ptr
+= fast
;
679 cmd
->SCp
.this_residual
-= fast
;
682 imm_fail(dev
, DID_BUS_BUSY
);
683 return -1; /* ERROR_RETURN */
685 if (cmd
->SCp
.buffer
&& !cmd
->SCp
.this_residual
) {
686 /* if scatter/gather, advance to the next segment */
687 if (cmd
->SCp
.buffers_residual
--) {
689 cmd
->SCp
.this_residual
=
690 cmd
->SCp
.buffer
->length
;
691 cmd
->SCp
.ptr
= sg_virt(cmd
->SCp
.buffer
);
694 * Make sure that we transfer even number of bytes
695 * otherwise it makes imm_byte_out() messy.
697 if (cmd
->SCp
.this_residual
& 0x01)
698 cmd
->SCp
.this_residual
++;
701 /* Now check to see if the drive is ready to comunicate */
703 r
= (r_str(ppb
) & 0xb8);
705 /* If not, drop back down to the scheduler and wait a timer tick */
709 return 1; /* FINISH_RETURN */
713 * Since the IMM itself doesn't generate interrupts, we use
714 * the scheduler's task queue to generate a stream of call-backs and
715 * complete the request when the drive is ready.
717 static void imm_interrupt(struct work_struct
*work
)
719 imm_struct
*dev
= container_of(work
, imm_struct
, imm_tq
.work
);
720 struct scsi_cmnd
*cmd
= dev
->cur_cmd
;
721 struct Scsi_Host
*host
= cmd
->device
->host
;
724 if (imm_engine(dev
, cmd
)) {
725 schedule_delayed_work(&dev
->imm_tq
, 1);
728 /* Command must of completed hence it is safe to let go... */
730 switch ((cmd
->result
>> 16) & 0xff) {
734 printk("imm: no device at SCSI ID %i\n", cmd
->device
->id
);
737 printk("imm: BUS BUSY - EPP timeout detected\n");
740 printk("imm: unknown timeout\n");
743 printk("imm: told to abort\n");
746 printk("imm: parity error (???)\n");
749 printk("imm: internal driver error\n");
752 printk("imm: told to reset device\n");
755 printk("imm: bad interrupt (???)\n");
758 printk("imm: bad return code (%02x)\n",
759 (cmd
->result
>> 16) & 0xff);
763 if (cmd
->SCp
.phase
> 1)
768 spin_lock_irqsave(host
->host_lock
, flags
);
771 spin_unlock_irqrestore(host
->host_lock
, flags
);
775 static int imm_engine(imm_struct
*dev
, struct scsi_cmnd
*cmd
)
777 unsigned short ppb
= dev
->base
;
778 unsigned char l
= 0, h
= 0;
781 /* First check for any errors that may have occurred
782 * Here we check for internal errors
787 switch (cmd
->SCp
.phase
) {
788 case 0: /* Phase 0 - Waiting for parport */
789 if (time_after(jiffies
, dev
->jstart
+ HZ
)) {
791 * We waited more than a second
792 * for parport to call us
794 imm_fail(dev
, DID_BUS_BUSY
);
797 return 1; /* wait until imm_wakeup claims parport */
798 /* Phase 1 - Connected */
800 imm_connect(dev
, CONNECT_EPP_MAYBE
);
803 /* Phase 2 - We are now talking to the scsi bus */
805 if (!imm_select(dev
, scmd_id(cmd
))) {
806 imm_fail(dev
, DID_NO_CONNECT
);
811 /* Phase 3 - Ready to accept a command */
814 if (!(r_str(ppb
) & 0x80))
817 if (!imm_send_command(cmd
))
821 /* Phase 4 - Setup scatter/gather buffers */
823 if (scsi_bufflen(cmd
)) {
824 cmd
->SCp
.buffer
= scsi_sglist(cmd
);
825 cmd
->SCp
.this_residual
= cmd
->SCp
.buffer
->length
;
826 cmd
->SCp
.ptr
= sg_virt(cmd
->SCp
.buffer
);
828 cmd
->SCp
.buffer
= NULL
;
829 cmd
->SCp
.this_residual
= 0;
832 cmd
->SCp
.buffers_residual
= scsi_sg_count(cmd
) - 1;
834 if (cmd
->SCp
.this_residual
& 0x01)
835 cmd
->SCp
.this_residual
++;
836 /* Phase 5 - Pre-Data transfer stage */
838 /* Spin lock for BUSY */
840 if (!(r_str(ppb
) & 0x80))
843 /* Require negotiation for read requests */
844 x
= (r_str(ppb
) & 0xb8);
845 dev
->rd
= (x
& 0x10) ? 1 : 0;
846 dev
->dp
= (x
& 0x20) ? 0 : 1;
848 if ((dev
->dp
) && (dev
->rd
))
849 if (imm_negotiate(dev
))
853 /* Phase 6 - Data transfer stage */
855 /* Spin lock for BUSY */
857 if (!(r_str(ppb
) & 0x80))
861 retv
= imm_completion(cmd
);
869 /* Phase 7 - Post data transfer stage */
871 if ((dev
->dp
) && (dev
->rd
)) {
872 if ((dev
->mode
== IMM_NIBBLE
) || (dev
->mode
== IMM_PS2
)) {
881 /* Phase 8 - Read status/message */
883 /* Check for data overrun */
884 if (imm_wait(dev
) != (unsigned char) 0xb8) {
885 imm_fail(dev
, DID_ERROR
);
888 if (imm_negotiate(dev
))
890 if (imm_in(dev
, &l
, 1)) { /* read status byte */
891 /* Check for optional message byte */
892 if (imm_wait(dev
) == (unsigned char) 0xb8)
894 cmd
->result
= (DID_OK
<< 16) + (l
& STATUS_MASK
);
896 if ((dev
->mode
== IMM_NIBBLE
) || (dev
->mode
== IMM_PS2
)) {
902 return 0; /* Finished */
906 printk("imm: Invalid scsi phase\n");
911 static int imm_queuecommand_lck(struct scsi_cmnd
*cmd
,
912 void (*done
)(struct scsi_cmnd
*))
914 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
917 printk("IMM: bug in imm_queuecommand\n");
921 dev
->jstart
= jiffies
;
923 cmd
->scsi_done
= done
;
924 cmd
->result
= DID_ERROR
<< 16; /* default return code */
925 cmd
->SCp
.phase
= 0; /* bus free */
927 schedule_delayed_work(&dev
->imm_tq
, 0);
934 static DEF_SCSI_QCMD(imm_queuecommand
)
937 * Apparently the disk->capacity attribute is off by 1 sector
938 * for all disk drives. We add the one here, but it should really
939 * be done in sd.c. Even if it gets fixed there, this will still
942 static int imm_biosparam(struct scsi_device
*sdev
, struct block_device
*dev
,
943 sector_t capacity
, int ip
[])
947 ip
[2] = ((unsigned long) capacity
+ 1) / (ip
[0] * ip
[1]);
951 ip
[2] = ((unsigned long) capacity
+ 1) / (ip
[0] * ip
[1]);
956 static int imm_abort(struct scsi_cmnd
*cmd
)
958 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
960 * There is no method for aborting commands since Iomega
961 * have tied the SCSI_MESSAGE line high in the interface
964 switch (cmd
->SCp
.phase
) {
965 case 0: /* Do not have access to parport */
966 case 1: /* Have not connected to interface */
967 dev
->cur_cmd
= NULL
; /* Forget the problem */
970 default: /* SCSI command sent, can not abort */
976 static void imm_reset_pulse(unsigned int base
)
988 static int imm_reset(struct scsi_cmnd
*cmd
)
990 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
994 dev
->cur_cmd
= NULL
; /* Forget the problem */
996 imm_connect(dev
, CONNECT_NORMAL
);
997 imm_reset_pulse(dev
->base
);
998 mdelay(1); /* device settle delay */
1000 mdelay(1); /* device settle delay */
1004 static int device_check(imm_struct
*dev
)
1006 /* This routine looks for a device and then attempts to use EPP
1007 to send a command. If all goes as planned then EPP is available. */
1009 static char cmd
[6] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };
1010 int loop
, old_mode
, status
, k
, ppb
= dev
->base
;
1013 old_mode
= dev
->mode
;
1014 for (loop
= 0; loop
< 8; loop
++) {
1015 /* Attempt to use EPP for Test Unit Ready */
1016 if ((ppb
& 0x0007) == 0x0000)
1017 dev
->mode
= IMM_EPP_32
;
1020 imm_connect(dev
, CONNECT_EPP_MAYBE
);
1021 /* Select SCSI device */
1022 if (!imm_select(dev
, loop
)) {
1023 imm_disconnect(dev
);
1026 printk("imm: Found device at ID %i, Attempting to use %s\n",
1027 loop
, IMM_MODE_STRING
[dev
->mode
]);
1029 /* Send SCSI command */
1032 for (l
= 0; (l
< 3) && (status
); l
++)
1033 status
= imm_out(dev
, &cmd
[l
<< 1], 2);
1036 imm_disconnect(dev
);
1037 imm_connect(dev
, CONNECT_EPP_MAYBE
);
1038 imm_reset_pulse(dev
->base
);
1040 imm_disconnect(dev
);
1042 if (dev
->mode
== IMM_EPP_32
) {
1043 dev
->mode
= old_mode
;
1046 printk("imm: Unable to establish communication\n");
1051 k
= 1000000; /* 1 Second */
1056 } while (!(l
& 0x80) && (k
));
1061 imm_disconnect(dev
);
1062 imm_connect(dev
, CONNECT_EPP_MAYBE
);
1063 imm_reset_pulse(dev
->base
);
1065 imm_disconnect(dev
);
1067 if (dev
->mode
== IMM_EPP_32
) {
1068 dev
->mode
= old_mode
;
1072 ("imm: Unable to establish communication\n");
1075 imm_disconnect(dev
);
1077 ("imm: Communication established at 0x%x with ID %i using %s\n",
1078 ppb
, loop
, IMM_MODE_STRING
[dev
->mode
]);
1079 imm_connect(dev
, CONNECT_EPP_MAYBE
);
1080 imm_reset_pulse(dev
->base
);
1082 imm_disconnect(dev
);
1086 printk("imm: No devices found\n");
1091 * imm cannot deal with highmem, so this causes all IO pages for this host
1092 * to reside in low memory (hence mapped)
1094 static int imm_adjust_queue(struct scsi_device
*device
)
1096 blk_queue_bounce_limit(device
->request_queue
, BLK_BOUNCE_HIGH
);
1100 static struct scsi_host_template imm_template
= {
1101 .module
= THIS_MODULE
,
1103 .show_info
= imm_show_info
,
1104 .write_info
= imm_write_info
,
1105 .name
= "Iomega VPI2 (imm) interface",
1106 .queuecommand
= imm_queuecommand
,
1107 .eh_abort_handler
= imm_abort
,
1108 .eh_bus_reset_handler
= imm_reset
,
1109 .eh_host_reset_handler
= imm_reset
,
1110 .bios_param
= imm_biosparam
,
1112 .sg_tablesize
= SG_ALL
,
1113 .use_clustering
= ENABLE_CLUSTERING
,
1115 .slave_alloc
= imm_adjust_queue
,
1118 /***************************************************************************
1119 * Parallel port probing routines *
1120 ***************************************************************************/
1122 static LIST_HEAD(imm_hosts
);
1125 * Finds the first available device number that can be alloted to the
1126 * new imm device and returns the address of the previous node so that
1127 * we can add to the tail and have a list in the ascending order.
1130 static inline imm_struct
*find_parent(void)
1132 imm_struct
*dev
, *par
= NULL
;
1133 unsigned int cnt
= 0;
1135 if (list_empty(&imm_hosts
))
1138 list_for_each_entry(dev
, &imm_hosts
, list
) {
1139 if (dev
->dev_no
!= cnt
)
1148 static int __imm_attach(struct parport
*pb
)
1150 struct Scsi_Host
*host
;
1151 imm_struct
*dev
, *temp
;
1152 DECLARE_WAIT_QUEUE_HEAD_ONSTACK(waiting
);
1157 struct pardev_cb imm_cb
;
1159 init_waitqueue_head(&waiting
);
1161 dev
= kzalloc(sizeof(imm_struct
), GFP_KERNEL
);
1167 dev
->mode
= IMM_AUTODETECT
;
1168 INIT_LIST_HEAD(&dev
->list
);
1170 temp
= find_parent();
1172 dev
->dev_no
= temp
->dev_no
+ 1;
1174 memset(&imm_cb
, 0, sizeof(imm_cb
));
1175 imm_cb
.private = dev
;
1176 imm_cb
.wakeup
= imm_wakeup
;
1178 dev
->dev
= parport_register_dev_model(pb
, "imm", &imm_cb
, dev
->dev_no
);
1183 /* Claim the bus so it remembers what we do to the control
1184 * registers. [ CTR and ECP ]
1187 dev
->waiting
= &waiting
;
1188 prepare_to_wait(&waiting
, &wait
, TASK_UNINTERRUPTIBLE
);
1189 if (imm_pb_claim(dev
))
1190 schedule_timeout(3 * HZ
);
1192 printk(KERN_ERR
"imm%d: failed to claim parport because "
1193 "a pardevice is owning the port for too long "
1194 "time!\n", pb
->number
);
1195 imm_pb_dismiss(dev
);
1196 dev
->waiting
= NULL
;
1197 finish_wait(&waiting
, &wait
);
1200 dev
->waiting
= NULL
;
1201 finish_wait(&waiting
, &wait
);
1202 ppb
= dev
->base
= dev
->dev
->port
->base
;
1203 dev
->base_hi
= dev
->dev
->port
->base_hi
;
1205 modes
= dev
->dev
->port
->modes
;
1207 /* Mode detection works up the chain of speed
1208 * This avoids a nasty if-then-else-if-... tree
1210 dev
->mode
= IMM_NIBBLE
;
1212 if (modes
& PARPORT_MODE_TRISTATE
)
1213 dev
->mode
= IMM_PS2
;
1215 /* Done configuration */
1217 err
= imm_init(dev
);
1219 imm_pb_release(dev
);
1224 /* now the glue ... */
1225 if (dev
->mode
== IMM_NIBBLE
|| dev
->mode
== IMM_PS2
)
1230 INIT_DELAYED_WORK(&dev
->imm_tq
, imm_interrupt
);
1233 host
= scsi_host_alloc(&imm_template
, sizeof(imm_struct
*));
1236 host
->io_port
= pb
->base
;
1237 host
->n_io_port
= ports
;
1238 host
->dma_channel
= -1;
1239 host
->unique_id
= pb
->number
;
1240 *(imm_struct
**)&host
->hostdata
= dev
;
1243 list_add_tail(&dev
->list
, &imm_hosts
);
1245 list_add_tail(&dev
->list
, &temp
->list
);
1246 err
= scsi_add_host(host
, NULL
);
1249 scsi_scan_host(host
);
1253 list_del_init(&dev
->list
);
1254 scsi_host_put(host
);
1256 parport_unregister_device(dev
->dev
);
1262 static void imm_attach(struct parport
*pb
)
1267 static void imm_detach(struct parport
*pb
)
1270 list_for_each_entry(dev
, &imm_hosts
, list
) {
1271 if (dev
->dev
->port
== pb
) {
1272 list_del_init(&dev
->list
);
1273 scsi_remove_host(dev
->host
);
1274 scsi_host_put(dev
->host
);
1275 parport_unregister_device(dev
->dev
);
1282 static struct parport_driver imm_driver
= {
1284 .match_port
= imm_attach
,
1285 .detach
= imm_detach
,
1289 static int __init
imm_driver_init(void)
1291 printk("imm: Version %s\n", IMM_VERSION
);
1292 return parport_register_driver(&imm_driver
);
1295 static void __exit
imm_driver_exit(void)
1297 parport_unregister_driver(&imm_driver
);
1300 module_init(imm_driver_init
);
1301 module_exit(imm_driver_exit
);
1303 MODULE_LICENSE("GPL");