1 // SPDX-License-Identifier: GPL-2.0-only
2 /* imm.c -- low level driver for the IOMEGA MatchMaker
3 * parallel port SCSI host adapter.
5 * (The IMM is the embedded controller in the ZIP Plus drive.)
7 * My unofficial company acronym list is 21 pages long:
8 * FLA: Four letter acronym with built in facility for
9 * future expansion to five letters.
12 #include <linux/init.h>
13 #include <linux/kernel.h>
14 #include <linux/module.h>
15 #include <linux/blkdev.h>
16 #include <linux/parport.h>
17 #include <linux/workqueue.h>
18 #include <linux/delay.h>
19 #include <linux/slab.h>
22 #include <scsi/scsi.h>
23 #include <scsi/scsi_cmnd.h>
24 #include <scsi/scsi_device.h>
25 #include <scsi/scsi_host.h>
27 /* The following #define is to avoid a clash with hosts.c */
28 #define IMM_PROBE_SPP 0x0001
29 #define IMM_PROBE_PS2 0x0002
30 #define IMM_PROBE_ECR 0x0010
31 #define IMM_PROBE_EPP17 0x0100
32 #define IMM_PROBE_EPP19 0x0200
36 struct pardevice
*dev
; /* Parport device entry */
37 int base
; /* Actual port address */
38 int base_hi
; /* Hi Base address for ECP-ISA chipset */
39 int mode
; /* Transfer mode */
40 struct scsi_cmnd
*cur_cmd
; /* Current queued command */
41 struct delayed_work imm_tq
; /* Polling interrupt stuff */
42 unsigned long jstart
; /* Jiffies at start */
43 unsigned failed
:1; /* Failure flag */
44 unsigned dp
:1; /* Data phase present */
45 unsigned rd
:1; /* Read data in data phase */
46 unsigned wanted
:1; /* Parport sharing busy flag */
47 unsigned int dev_no
; /* Device number */
48 wait_queue_head_t
*waiting
;
49 struct Scsi_Host
*host
;
50 struct list_head list
;
53 static void imm_reset_pulse(unsigned int base
);
54 static int device_check(imm_struct
*dev
);
58 static inline imm_struct
*imm_dev(struct Scsi_Host
*host
)
60 return *(imm_struct
**)&host
->hostdata
;
63 static DEFINE_SPINLOCK(arbitration_lock
);
65 static void got_it(imm_struct
*dev
)
67 dev
->base
= dev
->dev
->port
->base
;
69 dev
->cur_cmd
->SCp
.phase
= 1;
71 wake_up(dev
->waiting
);
74 static void imm_wakeup(void *ref
)
76 imm_struct
*dev
= (imm_struct
*) ref
;
79 spin_lock_irqsave(&arbitration_lock
, flags
);
81 if (parport_claim(dev
->dev
) == 0) {
86 spin_unlock_irqrestore(&arbitration_lock
, flags
);
89 static int imm_pb_claim(imm_struct
*dev
)
93 spin_lock_irqsave(&arbitration_lock
, flags
);
94 if (parport_claim(dev
->dev
) == 0) {
99 spin_unlock_irqrestore(&arbitration_lock
, flags
);
103 static void imm_pb_dismiss(imm_struct
*dev
)
107 spin_lock_irqsave(&arbitration_lock
, flags
);
108 wanted
= dev
->wanted
;
110 spin_unlock_irqrestore(&arbitration_lock
, flags
);
112 parport_release(dev
->dev
);
115 static inline void imm_pb_release(imm_struct
*dev
)
117 parport_release(dev
->dev
);
120 /* This is to give the imm driver a way to modify the timings (and other
121 * parameters) by writing to the /proc/scsi/imm/0 file.
122 * Very simple method really... (Too simple, no error checking :( )
123 * Reason: Kernel hackers HATE having to unload and reload modules for
125 * Also gives a method to use a script to obtain optimum timings (TODO)
127 static int imm_write_info(struct Scsi_Host
*host
, char *buffer
, int length
)
129 imm_struct
*dev
= imm_dev(host
);
131 if ((length
> 5) && (strncmp(buffer
, "mode=", 5) == 0)) {
132 dev
->mode
= simple_strtoul(buffer
+ 5, NULL
, 0);
135 printk("imm /proc: invalid variable\n");
139 static int imm_show_info(struct seq_file
*m
, struct Scsi_Host
*host
)
141 imm_struct
*dev
= imm_dev(host
);
143 seq_printf(m
, "Version : %s\n", IMM_VERSION
);
144 seq_printf(m
, "Parport : %s\n", dev
->dev
->port
->name
);
145 seq_printf(m
, "Mode : %s\n", IMM_MODE_STRING
[dev
->mode
]);
150 #define imm_fail(x,y) printk("imm: imm_fail(%i) from %s at line %d\n",\
151 y, __func__, __LINE__); imm_fail_func(x,y);
153 imm_fail_func(imm_struct
*dev
, int error_code
)
156 imm_fail(imm_struct
*dev
, int error_code
)
159 /* If we fail a device then we trash status / message bytes */
161 dev
->cur_cmd
->result
= error_code
<< 16;
167 * Wait for the high bit to be set.
169 * In principle, this could be tied to an interrupt, but the adapter
170 * doesn't appear to be designed to support interrupts. We spin on
171 * the 0x80 ready bit.
173 static unsigned char imm_wait(imm_struct
*dev
)
176 unsigned short ppb
= dev
->base
;
187 while (!(r
& 0x80) && (k
));
190 * STR register (LPT base+1) to SCSI mapping:
193 * ===================================
201 * ==================================
203 * 0xc0 0x88 ZIP wants more data
204 * 0xd0 0x98 ZIP wants to send more data
205 * 0xe0 0xa8 ZIP is expecting SCSI command data
206 * 0xf0 0xb8 end of transfer, ZIP is sending status
212 /* Counter expired - Time out occurred */
213 imm_fail(dev
, DID_TIME_OUT
);
214 printk("imm timeout in imm_wait\n");
215 return 0; /* command timed out */
218 static int imm_negotiate(imm_struct
* tmp
)
221 * The following is supposedly the IEEE 1284-1994 negotiate
222 * sequence. I have yet to obtain a copy of the above standard
223 * so this is a bit of a guess...
225 * A fair chunk of this is based on the Linux parport implementation
228 * Return 0 if data available
229 * 1 if no data available
232 unsigned short base
= tmp
->base
;
233 unsigned char a
, mode
;
252 a
= (r_str(base
) & 0x20) ? 0 : 1;
260 ("IMM: IEEE1284 negotiate indicates no data available.\n");
261 imm_fail(tmp
, DID_ERROR
);
267 * Clear EPP timeout bit.
269 static inline void epp_reset(unsigned short ppb
)
275 w_str(ppb
, i
& 0xfe);
279 * Wait for empty ECP fifo (if we are in ECP fifo mode only)
281 static inline void ecp_sync(imm_struct
*dev
)
283 int i
, ppb_hi
= dev
->base_hi
;
288 if ((r_ecr(ppb_hi
) & 0xe0) == 0x60) { /* mode 011 == ECP fifo mode */
289 for (i
= 0; i
< 100; i
++) {
290 if (r_ecr(ppb_hi
) & 0x01)
294 printk("imm: ECP sync failed as data still present in FIFO.\n");
298 static int imm_byte_out(unsigned short base
, const char *buffer
, int len
)
302 w_ctr(base
, 0x4); /* apparently a sane mode */
303 for (i
= len
>> 1; i
; i
--) {
304 w_dtr(base
, *buffer
++);
305 w_ctr(base
, 0x5); /* Drop STROBE low */
306 w_dtr(base
, *buffer
++);
307 w_ctr(base
, 0x0); /* STROBE high + INIT low */
309 w_ctr(base
, 0x4); /* apparently a sane mode */
310 return 1; /* All went well - we hope! */
313 static int imm_nibble_in(unsigned short base
, char *buffer
, int len
)
319 * The following is based on documented timing signals
322 for (i
= len
; i
; i
--) {
324 l
= (r_str(base
) & 0xf0) >> 4;
326 *buffer
++ = (r_str(base
) & 0xf0) | l
;
329 return 1; /* All went well - we hope! */
332 static int imm_byte_in(unsigned short base
, char *buffer
, int len
)
337 * The following is based on documented timing signals
340 for (i
= len
; i
; i
--) {
342 *buffer
++ = r_dtr(base
);
345 return 1; /* All went well - we hope! */
348 static int imm_out(imm_struct
*dev
, char *buffer
, int len
)
350 unsigned short ppb
= dev
->base
;
351 int r
= imm_wait(dev
);
355 * a) the SCSI bus is BUSY (device still listening)
356 * b) the device is listening
358 if ((r
& 0x18) != 0x08) {
359 imm_fail(dev
, DID_ERROR
);
360 printk("IMM: returned SCSI status %2x\n", r
);
369 #ifdef CONFIG_SCSI_IZIP_EPP16
370 if (!(((long) buffer
| len
) & 0x01))
371 outsw(ppb
+ 4, buffer
, len
>> 1);
373 if (!(((long) buffer
| len
) & 0x03))
374 outsl(ppb
+ 4, buffer
, len
>> 2);
377 outsb(ppb
+ 4, buffer
, len
);
379 r
= !(r_str(ppb
) & 0x01);
386 /* 8 bit output, with a loop */
387 r
= imm_byte_out(ppb
, buffer
, len
);
391 printk("IMM: bug in imm_out()\n");
397 static int imm_in(imm_struct
*dev
, char *buffer
, int len
)
399 unsigned short ppb
= dev
->base
;
400 int r
= imm_wait(dev
);
404 * a) the SCSI bus is BUSY (device still listening)
405 * b) the device is sending data
407 if ((r
& 0x18) != 0x18) {
408 imm_fail(dev
, DID_ERROR
);
413 /* 4 bit input, with a loop */
414 r
= imm_nibble_in(ppb
, buffer
, len
);
419 /* 8 bit input, with a loop */
420 r
= imm_byte_in(ppb
, buffer
, len
);
429 #ifdef CONFIG_SCSI_IZIP_EPP16
430 if (!(((long) buffer
| len
) & 0x01))
431 insw(ppb
+ 4, buffer
, len
>> 1);
433 if (!(((long) buffer
| len
) & 0x03))
434 insl(ppb
+ 4, buffer
, len
>> 2);
437 insb(ppb
+ 4, buffer
, len
);
439 r
= !(r_str(ppb
) & 0x01);
445 printk("IMM: bug in imm_ins()\n");
452 static int imm_cpp(unsigned short ppb
, unsigned char b
)
455 * Comments on udelay values refer to the
456 * Command Packet Protocol (CPP) timing diagram.
459 unsigned char s1
, s2
, s3
;
461 udelay(2); /* 1 usec - infinite */
463 udelay(10); /* 7 usec - infinite */
465 udelay(10); /* 7 usec - infinite */
467 udelay(10); /* 7 usec - infinite */
469 udelay(10); /* 7 usec - infinite */
470 s1
= r_str(ppb
) & 0xb8;
472 udelay(10); /* 7 usec - infinite */
473 s2
= r_str(ppb
) & 0xb8;
475 udelay(10); /* 7 usec - infinite */
476 s3
= r_str(ppb
) & 0x38;
479 * 0000 00aa Assign address aa to current device
480 * 0010 00aa Select device aa in EPP Winbond mode
481 * 0010 10aa Select device aa in EPP mode
482 * 0011 xxxx Deselect all devices
483 * 0110 00aa Test device aa
484 * 1101 00aa Select device aa in ECP mode
485 * 1110 00aa Select device aa in Compatible mode
488 udelay(2); /* 1 usec - infinite */
490 udelay(10); /* 7 usec - infinite */
492 udelay(2); /* 1 usec - infinite */
494 udelay(10); /* 7 usec - infinite */
496 udelay(10); /* 7 usec - infinite */
499 * The following table is electrical pin values.
500 * (BSY is inverted at the CTR register)
502 * BSY ACK POut SEL Fault
507 * L => Last device in chain
510 * Observered values for S1,S2,S3 are:
511 * Disconnect => f8/58/78
512 * Connect => f8/58/70
514 if ((s1
== 0xb8) && (s2
== 0x18) && (s3
== 0x30))
515 return 1; /* Connected */
516 if ((s1
== 0xb8) && (s2
== 0x18) && (s3
== 0x38))
517 return 0; /* Disconnected */
519 return -1; /* No device present */
522 static inline int imm_connect(imm_struct
*dev
, int flag
)
524 unsigned short ppb
= dev
->base
;
526 imm_cpp(ppb
, 0xe0); /* Select device 0 in compatible mode */
527 imm_cpp(ppb
, 0x30); /* Disconnect all devices */
529 if ((dev
->mode
== IMM_EPP_8
) ||
530 (dev
->mode
== IMM_EPP_16
) ||
531 (dev
->mode
== IMM_EPP_32
))
532 return imm_cpp(ppb
, 0x28); /* Select device 0 in EPP mode */
533 return imm_cpp(ppb
, 0xe0); /* Select device 0 in compatible mode */
536 static void imm_disconnect(imm_struct
*dev
)
538 imm_cpp(dev
->base
, 0x30); /* Disconnect all devices */
541 static int imm_select(imm_struct
*dev
, int target
)
544 unsigned short ppb
= dev
->base
;
547 * Firstly we want to make sure there is nothing
548 * holding onto the SCSI bus.
555 } while ((r_str(ppb
) & 0x08) && (k
));
561 * Now assert the SCSI ID (HOST and TARGET) on the data bus
564 w_dtr(ppb
, 0x80 | (1 << target
));
568 * Deassert SELIN first followed by STROBE
574 * ACK should drop low while SELIN is deasserted.
575 * FAULT should drop low when the SCSI device latches the bus.
581 while (!(r_str(ppb
) & 0x08) && (k
));
584 * Place the interface back into a sane state (status mode)
590 static int imm_init(imm_struct
*dev
)
592 if (imm_connect(dev
, 0) != 1)
594 imm_reset_pulse(dev
->base
);
595 mdelay(1); /* Delay to allow devices to settle */
597 mdelay(1); /* Another delay to allow devices to settle */
598 return device_check(dev
);
601 static inline int imm_send_command(struct scsi_cmnd
*cmd
)
603 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
606 /* NOTE: IMM uses byte pairs */
607 for (k
= 0; k
< cmd
->cmd_len
; k
+= 2)
608 if (!imm_out(dev
, &cmd
->cmnd
[k
], 2))
614 * The bulk flag enables some optimisations in the data transfer loops,
615 * it should be true for any command that transfers data in integral
616 * numbers of sectors.
618 * The driver appears to remain stable if we speed up the parallel port
619 * i/o in this function, but not elsewhere.
621 static int imm_completion(struct scsi_cmnd
*cmd
)
626 * 1 Finished data transfer
628 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
629 unsigned short ppb
= dev
->base
;
630 unsigned long start_jiffies
= jiffies
;
633 int fast
, bulk
, status
;
636 bulk
= ((v
== READ_6
) ||
637 (v
== READ_10
) || (v
== WRITE_6
) || (v
== WRITE_10
));
640 * We only get here if the drive is ready to comunicate,
641 * hence no need for a full imm_wait.
644 r
= (r_str(ppb
) & 0xb8);
647 * while (device is not ready to send status byte)
650 while (r
!= (unsigned char) 0xb8) {
652 * If we have been running for more than a full timer tick
655 if (time_after(jiffies
, start_jiffies
+ 1))
660 * a) Drive status is screwy (!ready && !present)
661 * b) Drive is requesting/sending more data than expected
663 if (((r
& 0x88) != 0x88) || (cmd
->SCp
.this_residual
<= 0)) {
664 imm_fail(dev
, DID_ERROR
);
665 return -1; /* ERROR_RETURN */
667 /* determine if we should use burst I/O */
670 && (cmd
->SCp
.this_residual
>=
671 IMM_BURST_SIZE
)) ? IMM_BURST_SIZE
: 2;
672 status
= imm_out(dev
, cmd
->SCp
.ptr
, fast
);
675 && (cmd
->SCp
.this_residual
>=
676 IMM_BURST_SIZE
)) ? IMM_BURST_SIZE
: 1;
677 status
= imm_in(dev
, cmd
->SCp
.ptr
, fast
);
680 cmd
->SCp
.ptr
+= fast
;
681 cmd
->SCp
.this_residual
-= fast
;
684 imm_fail(dev
, DID_BUS_BUSY
);
685 return -1; /* ERROR_RETURN */
687 if (cmd
->SCp
.buffer
&& !cmd
->SCp
.this_residual
) {
688 /* if scatter/gather, advance to the next segment */
689 if (cmd
->SCp
.buffers_residual
--) {
690 cmd
->SCp
.buffer
= sg_next(cmd
->SCp
.buffer
);
691 cmd
->SCp
.this_residual
=
692 cmd
->SCp
.buffer
->length
;
693 cmd
->SCp
.ptr
= sg_virt(cmd
->SCp
.buffer
);
696 * Make sure that we transfer even number of bytes
697 * otherwise it makes imm_byte_out() messy.
699 if (cmd
->SCp
.this_residual
& 0x01)
700 cmd
->SCp
.this_residual
++;
703 /* Now check to see if the drive is ready to comunicate */
705 r
= (r_str(ppb
) & 0xb8);
707 /* If not, drop back down to the scheduler and wait a timer tick */
711 return 1; /* FINISH_RETURN */
715 * Since the IMM itself doesn't generate interrupts, we use
716 * the scheduler's task queue to generate a stream of call-backs and
717 * complete the request when the drive is ready.
719 static void imm_interrupt(struct work_struct
*work
)
721 imm_struct
*dev
= container_of(work
, imm_struct
, imm_tq
.work
);
722 struct scsi_cmnd
*cmd
= dev
->cur_cmd
;
723 struct Scsi_Host
*host
= cmd
->device
->host
;
726 if (imm_engine(dev
, cmd
)) {
727 schedule_delayed_work(&dev
->imm_tq
, 1);
730 /* Command must of completed hence it is safe to let go... */
732 switch ((cmd
->result
>> 16) & 0xff) {
736 printk("imm: no device at SCSI ID %i\n", cmd
->device
->id
);
739 printk("imm: BUS BUSY - EPP timeout detected\n");
742 printk("imm: unknown timeout\n");
745 printk("imm: told to abort\n");
748 printk("imm: parity error (???)\n");
751 printk("imm: internal driver error\n");
754 printk("imm: told to reset device\n");
757 printk("imm: bad interrupt (???)\n");
760 printk("imm: bad return code (%02x)\n",
761 (cmd
->result
>> 16) & 0xff);
765 if (cmd
->SCp
.phase
> 1)
770 spin_lock_irqsave(host
->host_lock
, flags
);
773 spin_unlock_irqrestore(host
->host_lock
, flags
);
777 static int imm_engine(imm_struct
*dev
, struct scsi_cmnd
*cmd
)
779 unsigned short ppb
= dev
->base
;
780 unsigned char l
= 0, h
= 0;
783 /* First check for any errors that may have occurred
784 * Here we check for internal errors
789 switch (cmd
->SCp
.phase
) {
790 case 0: /* Phase 0 - Waiting for parport */
791 if (time_after(jiffies
, dev
->jstart
+ HZ
)) {
793 * We waited more than a second
794 * for parport to call us
796 imm_fail(dev
, DID_BUS_BUSY
);
799 return 1; /* wait until imm_wakeup claims parport */
801 case 1: /* Phase 1 - Connected */
802 imm_connect(dev
, CONNECT_EPP_MAYBE
);
806 case 2: /* Phase 2 - We are now talking to the scsi bus */
807 if (!imm_select(dev
, scmd_id(cmd
))) {
808 imm_fail(dev
, DID_NO_CONNECT
);
814 case 3: /* Phase 3 - Ready to accept a command */
816 if (!(r_str(ppb
) & 0x80))
819 if (!imm_send_command(cmd
))
824 case 4: /* Phase 4 - Setup scatter/gather buffers */
825 if (scsi_bufflen(cmd
)) {
826 cmd
->SCp
.buffer
= scsi_sglist(cmd
);
827 cmd
->SCp
.this_residual
= cmd
->SCp
.buffer
->length
;
828 cmd
->SCp
.ptr
= sg_virt(cmd
->SCp
.buffer
);
830 cmd
->SCp
.buffer
= NULL
;
831 cmd
->SCp
.this_residual
= 0;
834 cmd
->SCp
.buffers_residual
= scsi_sg_count(cmd
) - 1;
836 if (cmd
->SCp
.this_residual
& 0x01)
837 cmd
->SCp
.this_residual
++;
840 case 5: /* Phase 5 - Pre-Data transfer stage */
841 /* Spin lock for BUSY */
843 if (!(r_str(ppb
) & 0x80))
846 /* Require negotiation for read requests */
847 x
= (r_str(ppb
) & 0xb8);
848 dev
->rd
= (x
& 0x10) ? 1 : 0;
849 dev
->dp
= (x
& 0x20) ? 0 : 1;
851 if ((dev
->dp
) && (dev
->rd
))
852 if (imm_negotiate(dev
))
857 case 6: /* Phase 6 - Data transfer stage */
858 /* Spin lock for BUSY */
860 if (!(r_str(ppb
) & 0x80))
864 retv
= imm_completion(cmd
);
873 case 7: /* Phase 7 - Post data transfer stage */
874 if ((dev
->dp
) && (dev
->rd
)) {
875 if ((dev
->mode
== IMM_NIBBLE
) || (dev
->mode
== IMM_PS2
)) {
885 case 8: /* Phase 8 - Read status/message */
886 /* Check for data overrun */
887 if (imm_wait(dev
) != (unsigned char) 0xb8) {
888 imm_fail(dev
, DID_ERROR
);
891 if (imm_negotiate(dev
))
893 if (imm_in(dev
, &l
, 1)) { /* read status byte */
894 /* Check for optional message byte */
895 if (imm_wait(dev
) == (unsigned char) 0xb8)
897 cmd
->result
= (DID_OK
<< 16) | (l
& STATUS_MASK
);
899 if ((dev
->mode
== IMM_NIBBLE
) || (dev
->mode
== IMM_PS2
)) {
905 return 0; /* Finished */
908 printk("imm: Invalid scsi phase\n");
913 static int imm_queuecommand_lck(struct scsi_cmnd
*cmd
,
914 void (*done
)(struct scsi_cmnd
*))
916 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
919 printk("IMM: bug in imm_queuecommand\n");
923 dev
->jstart
= jiffies
;
925 cmd
->scsi_done
= done
;
926 cmd
->result
= DID_ERROR
<< 16; /* default return code */
927 cmd
->SCp
.phase
= 0; /* bus free */
929 schedule_delayed_work(&dev
->imm_tq
, 0);
936 static DEF_SCSI_QCMD(imm_queuecommand
)
939 * Apparently the disk->capacity attribute is off by 1 sector
940 * for all disk drives. We add the one here, but it should really
941 * be done in sd.c. Even if it gets fixed there, this will still
944 static int imm_biosparam(struct scsi_device
*sdev
, struct block_device
*dev
,
945 sector_t capacity
, int ip
[])
949 ip
[2] = ((unsigned long) capacity
+ 1) / (ip
[0] * ip
[1]);
953 ip
[2] = ((unsigned long) capacity
+ 1) / (ip
[0] * ip
[1]);
958 static int imm_abort(struct scsi_cmnd
*cmd
)
960 imm_struct
*dev
= imm_dev(cmd
->device
->host
);
962 * There is no method for aborting commands since Iomega
963 * have tied the SCSI_MESSAGE line high in the interface
966 switch (cmd
->SCp
.phase
) {
967 case 0: /* Do not have access to parport */
968 case 1: /* Have not connected to interface */
969 dev
->cur_cmd
= NULL
; /* Forget the problem */
971 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_host_reset_handler
= imm_reset
,
1109 .bios_param
= imm_biosparam
,
1111 .sg_tablesize
= SG_ALL
,
1113 .slave_alloc
= imm_adjust_queue
,
1116 /***************************************************************************
1117 * Parallel port probing routines *
1118 ***************************************************************************/
1120 static LIST_HEAD(imm_hosts
);
1123 * Finds the first available device number that can be alloted to the
1124 * new imm device and returns the address of the previous node so that
1125 * we can add to the tail and have a list in the ascending order.
1128 static inline imm_struct
*find_parent(void)
1130 imm_struct
*dev
, *par
= NULL
;
1131 unsigned int cnt
= 0;
1133 if (list_empty(&imm_hosts
))
1136 list_for_each_entry(dev
, &imm_hosts
, list
) {
1137 if (dev
->dev_no
!= cnt
)
1146 static int __imm_attach(struct parport
*pb
)
1148 struct Scsi_Host
*host
;
1149 imm_struct
*dev
, *temp
;
1150 DECLARE_WAIT_QUEUE_HEAD_ONSTACK(waiting
);
1155 struct pardev_cb imm_cb
;
1157 init_waitqueue_head(&waiting
);
1159 dev
= kzalloc(sizeof(imm_struct
), GFP_KERNEL
);
1165 dev
->mode
= IMM_AUTODETECT
;
1166 INIT_LIST_HEAD(&dev
->list
);
1168 temp
= find_parent();
1170 dev
->dev_no
= temp
->dev_no
+ 1;
1172 memset(&imm_cb
, 0, sizeof(imm_cb
));
1173 imm_cb
.private = dev
;
1174 imm_cb
.wakeup
= imm_wakeup
;
1176 dev
->dev
= parport_register_dev_model(pb
, "imm", &imm_cb
, dev
->dev_no
);
1181 /* Claim the bus so it remembers what we do to the control
1182 * registers. [ CTR and ECP ]
1185 dev
->waiting
= &waiting
;
1186 prepare_to_wait(&waiting
, &wait
, TASK_UNINTERRUPTIBLE
);
1187 if (imm_pb_claim(dev
))
1188 schedule_timeout(3 * HZ
);
1190 printk(KERN_ERR
"imm%d: failed to claim parport because "
1191 "a pardevice is owning the port for too long "
1192 "time!\n", pb
->number
);
1193 imm_pb_dismiss(dev
);
1194 dev
->waiting
= NULL
;
1195 finish_wait(&waiting
, &wait
);
1198 dev
->waiting
= NULL
;
1199 finish_wait(&waiting
, &wait
);
1200 ppb
= dev
->base
= dev
->dev
->port
->base
;
1201 dev
->base_hi
= dev
->dev
->port
->base_hi
;
1203 modes
= dev
->dev
->port
->modes
;
1205 /* Mode detection works up the chain of speed
1206 * This avoids a nasty if-then-else-if-... tree
1208 dev
->mode
= IMM_NIBBLE
;
1210 if (modes
& PARPORT_MODE_TRISTATE
)
1211 dev
->mode
= IMM_PS2
;
1213 /* Done configuration */
1215 err
= imm_init(dev
);
1217 imm_pb_release(dev
);
1222 /* now the glue ... */
1223 if (dev
->mode
== IMM_NIBBLE
|| dev
->mode
== IMM_PS2
)
1228 INIT_DELAYED_WORK(&dev
->imm_tq
, imm_interrupt
);
1231 host
= scsi_host_alloc(&imm_template
, sizeof(imm_struct
*));
1234 host
->io_port
= pb
->base
;
1235 host
->n_io_port
= ports
;
1236 host
->dma_channel
= -1;
1237 host
->unique_id
= pb
->number
;
1238 *(imm_struct
**)&host
->hostdata
= dev
;
1241 list_add_tail(&dev
->list
, &imm_hosts
);
1243 list_add_tail(&dev
->list
, &temp
->list
);
1244 err
= scsi_add_host(host
, NULL
);
1247 scsi_scan_host(host
);
1251 list_del_init(&dev
->list
);
1252 scsi_host_put(host
);
1254 parport_unregister_device(dev
->dev
);
1260 static void imm_attach(struct parport
*pb
)
1265 static void imm_detach(struct parport
*pb
)
1268 list_for_each_entry(dev
, &imm_hosts
, list
) {
1269 if (dev
->dev
->port
== pb
) {
1270 list_del_init(&dev
->list
);
1271 scsi_remove_host(dev
->host
);
1272 scsi_host_put(dev
->host
);
1273 parport_unregister_device(dev
->dev
);
1280 static struct parport_driver imm_driver
= {
1282 .match_port
= imm_attach
,
1283 .detach
= imm_detach
,
1287 static int __init
imm_driver_init(void)
1289 printk("imm: Version %s\n", IMM_VERSION
);
1290 return parport_register_driver(&imm_driver
);
1293 static void __exit
imm_driver_exit(void)
1295 parport_unregister_driver(&imm_driver
);
1298 module_init(imm_driver_init
);
1299 module_exit(imm_driver_exit
);
1301 MODULE_LICENSE("GPL");