683bce375c7476fde30b15311adb66972d19d6fe
[pandora-kernel.git] / drivers / scsi / ide-scsi.c
1 /*
2  * Copyright (C) 1996-1999  Gadi Oxman <gadio@netvision.net.il>
3  * Copyright (C) 2004-2005  Bartlomiej Zolnierkiewicz
4  */
5
6 /*
7  * Emulation of a SCSI host adapter for IDE ATAPI devices.
8  *
9  * With this driver, one can use the Linux SCSI drivers instead of the
10  * native IDE ATAPI drivers.
11  *
12  * Ver 0.1   Dec  3 96   Initial version.
13  * Ver 0.2   Jan 26 97   Fixed bug in cleanup_module() and added emulation
14  *                        of MODE_SENSE_6/MODE_SELECT_6 for cdroms. Thanks
15  *                        to Janos Farkas for pointing this out.
16  *                       Avoid using bitfields in structures for m68k.
17  *                       Added Scatter/Gather and DMA support.
18  * Ver 0.4   Dec  7 97   Add support for ATAPI PD/CD drives.
19  *                       Use variable timeout for each command.
20  * Ver 0.5   Jan  2 98   Fix previous PD/CD support.
21  *                       Allow disabling of SCSI-6 to SCSI-10 transformation.
22  * Ver 0.6   Jan 27 98   Allow disabling of SCSI command translation layer
23  *                        for access through /dev/sg.
24  *                       Fix MODE_SENSE_6/MODE_SELECT_6/INQUIRY translation.
25  * Ver 0.7   Dec 04 98   Ignore commands where lun != 0 to avoid multiple
26  *                        detection of devices with CONFIG_SCSI_MULTI_LUN
27  * Ver 0.8   Feb 05 99   Optical media need translation too. Reverse 0.7.
28  * Ver 0.9   Jul 04 99   Fix a bug in SG_SET_TRANSFORM.
29  * Ver 0.91  Jun 10 02   Fix "off by one" error in transforms
30  * Ver 0.92  Dec 31 02   Implement new SCSI mid level API
31  */
32
33 #define IDESCSI_VERSION "0.92"
34
35 #include <linux/module.h>
36 #include <linux/types.h>
37 #include <linux/string.h>
38 #include <linux/kernel.h>
39 #include <linux/mm.h>
40 #include <linux/ioport.h>
41 #include <linux/blkdev.h>
42 #include <linux/errno.h>
43 #include <linux/hdreg.h>
44 #include <linux/slab.h>
45 #include <linux/ide.h>
46 #include <linux/scatterlist.h>
47 #include <linux/delay.h>
48 #include <linux/mutex.h>
49 #include <linux/bitops.h>
50
51 #include <asm/io.h>
52 #include <asm/uaccess.h>
53
54 #include <scsi/scsi.h>
55 #include <scsi/scsi_cmnd.h>
56 #include <scsi/scsi_device.h>
57 #include <scsi/scsi_host.h>
58 #include <scsi/scsi_tcq.h>
59 #include <scsi/sg.h>
60
61 #define IDESCSI_DEBUG_LOG               0
62
63 #if IDESCSI_DEBUG_LOG
64 #define debug_log(fmt, args...) \
65         printk(KERN_INFO "ide-scsi: " fmt, ## args)
66 #else
67 #define debug_log(fmt, args...) do {} while (0)
68 #endif
69
70 /*
71  *      SCSI command transformation layer
72  */
73 #define IDESCSI_SG_TRANSFORM            1       /* /dev/sg transformation */
74
75 /*
76  *      Log flags
77  */
78 #define IDESCSI_LOG_CMD                 0       /* Log SCSI commands */
79
80 typedef struct ide_scsi_obj {
81         ide_drive_t             *drive;
82         ide_driver_t            *driver;
83         struct gendisk          *disk;
84         struct Scsi_Host        *host;
85
86         struct ide_atapi_pc *pc;                /* Current packet command */
87         unsigned long flags;                    /* Status/Action flags */
88         unsigned long transform;                /* SCSI cmd translation layer */
89         unsigned long log;                      /* log flags */
90 } idescsi_scsi_t;
91
92 static DEFINE_MUTEX(idescsi_ref_mutex);
93 /* Set by module param to skip cd */
94 static int idescsi_nocd;
95
96 #define ide_scsi_g(disk) \
97         container_of((disk)->private_data, struct ide_scsi_obj, driver)
98
99 static struct ide_scsi_obj *ide_scsi_get(struct gendisk *disk)
100 {
101         struct ide_scsi_obj *scsi = NULL;
102
103         mutex_lock(&idescsi_ref_mutex);
104         scsi = ide_scsi_g(disk);
105         if (scsi)
106                 scsi_host_get(scsi->host);
107         mutex_unlock(&idescsi_ref_mutex);
108         return scsi;
109 }
110
111 static void ide_scsi_put(struct ide_scsi_obj *scsi)
112 {
113         mutex_lock(&idescsi_ref_mutex);
114         scsi_host_put(scsi->host);
115         mutex_unlock(&idescsi_ref_mutex);
116 }
117
118 static inline idescsi_scsi_t *scsihost_to_idescsi(struct Scsi_Host *host)
119 {
120         return (idescsi_scsi_t*) (&host[1]);
121 }
122
123 static inline idescsi_scsi_t *drive_to_idescsi(ide_drive_t *ide_drive)
124 {
125         return scsihost_to_idescsi(ide_drive->driver_data);
126 }
127
128 /*
129  *      Per ATAPI device status bits.
130  */
131 #define IDESCSI_DRQ_INTERRUPT           0       /* DRQ interrupt device */
132
133 /*
134  *      ide-scsi requests.
135  */
136 #define IDESCSI_PC_RQ                   90
137
138 /*
139  *      PIO data transfer routine using the scatter gather table.
140  */
141 static void ide_scsi_io_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
142                                 unsigned int bcount, int write)
143 {
144         ide_hwif_t *hwif = drive->hwif;
145         xfer_func_t *xf = write ? hwif->output_data : hwif->input_data;
146         char *buf;
147         int count;
148
149         while (bcount) {
150                 count = min(pc->sg->length - pc->b_count, bcount);
151                 if (PageHighMem(sg_page(pc->sg))) {
152                         unsigned long flags;
153
154                         local_irq_save(flags);
155                         buf = kmap_atomic(sg_page(pc->sg), KM_IRQ0) +
156                                           pc->sg->offset;
157                         xf(drive, NULL, buf + pc->b_count, count);
158                         kunmap_atomic(buf - pc->sg->offset, KM_IRQ0);
159                         local_irq_restore(flags);
160                 } else {
161                         buf = sg_virt(pc->sg);
162                         xf(drive, NULL, buf + pc->b_count, count);
163                 }
164                 bcount -= count; pc->b_count += count;
165                 if (pc->b_count == pc->sg->length) {
166                         if (!--pc->sg_cnt)
167                                 break;
168                         pc->sg = sg_next(pc->sg);
169                         pc->b_count = 0;
170                 }
171         }
172
173         if (bcount) {
174                 printk(KERN_ERR "%s: scatter gather table too small, %s\n",
175                                 drive->name, write ? "padding with zeros"
176                                                    : "discarding data");
177                 ide_pad_transfer(drive, write, bcount);
178         }
179 }
180
181 static void ide_scsi_hex_dump(u8 *data, int len)
182 {
183         print_hex_dump(KERN_CONT, "", DUMP_PREFIX_NONE, 16, 1, data, len, 0);
184 }
185
186 static int idescsi_end_request(ide_drive_t *, int, int);
187
188 static void ide_scsi_callback(ide_drive_t *drive)
189 {
190         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
191         struct ide_atapi_pc *pc = scsi->pc;
192
193         if (pc->flags & PC_FLAG_TIMEDOUT)
194                 debug_log("%s: got timed out packet %lu at %lu\n", __func__,
195                           pc->scsi_cmd->serial_number, jiffies);
196                 /* end this request now - scsi should retry it*/
197         else if (test_bit(IDESCSI_LOG_CMD, &scsi->log))
198                 printk(KERN_INFO "Packet command completed, %d bytes"
199                                  " transferred\n", pc->xferred);
200
201         idescsi_end_request(drive, 1, 0);
202 }
203
204 static int idescsi_check_condition(ide_drive_t *drive,
205                 struct request *failed_cmd)
206 {
207         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
208         struct ide_atapi_pc   *pc;
209         struct request *rq;
210         u8             *buf;
211
212         /* stuff a sense request in front of our current request */
213         pc = kzalloc(sizeof(struct ide_atapi_pc), GFP_ATOMIC);
214         rq = kmalloc(sizeof(struct request), GFP_ATOMIC);
215         buf = kzalloc(SCSI_SENSE_BUFFERSIZE, GFP_ATOMIC);
216         if (!pc || !rq || !buf) {
217                 kfree(buf);
218                 kfree(rq);
219                 kfree(pc);
220                 return -ENOMEM;
221         }
222         blk_rq_init(NULL, rq);
223         rq->special = (char *) pc;
224         pc->rq = rq;
225         pc->buf = buf;
226         pc->c[0] = REQUEST_SENSE;
227         pc->c[4] = pc->req_xfer = pc->buf_size = SCSI_SENSE_BUFFERSIZE;
228         rq->cmd_type = REQ_TYPE_SENSE;
229         rq->cmd_flags |= REQ_PREEMPT;
230         pc->timeout = jiffies + WAIT_READY;
231         pc->callback = ide_scsi_callback;
232         /* NOTE! Save the failed packet command in "rq->buffer" */
233         rq->buffer = (void *) failed_cmd->special;
234         pc->scsi_cmd = ((struct ide_atapi_pc *) failed_cmd->special)->scsi_cmd;
235         if (test_bit(IDESCSI_LOG_CMD, &scsi->log)) {
236                 printk ("ide-scsi: %s: queue cmd = ", drive->name);
237                 ide_scsi_hex_dump(pc->c, 6);
238         }
239         rq->rq_disk = scsi->disk;
240         ide_do_drive_cmd(drive, rq);
241         return 0;
242 }
243
244 static ide_startstop_t
245 idescsi_atapi_error(ide_drive_t *drive, struct request *rq, u8 stat, u8 err)
246 {
247         ide_hwif_t *hwif = drive->hwif;
248
249         if (ide_read_status(drive) & (BUSY_STAT | DRQ_STAT))
250                 /* force an abort */
251                 hwif->OUTBSYNC(hwif, WIN_IDLEIMMEDIATE,
252                                hwif->io_ports.command_addr);
253
254         rq->errors++;
255
256         idescsi_end_request(drive, 0, 0);
257
258         return ide_stopped;
259 }
260
261 static ide_startstop_t
262 idescsi_atapi_abort(ide_drive_t *drive, struct request *rq)
263 {
264         debug_log("%s called for %lu\n", __func__,
265                 ((struct ide_atapi_pc *) rq->special)->scsi_cmd->serial_number);
266
267         rq->errors |= ERROR_MAX;
268
269         idescsi_end_request(drive, 0, 0);
270
271         return ide_stopped;
272 }
273
274 static int idescsi_end_request (ide_drive_t *drive, int uptodate, int nrsecs)
275 {
276         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
277         struct request *rq = HWGROUP(drive)->rq;
278         struct ide_atapi_pc *pc = (struct ide_atapi_pc *) rq->special;
279         int log = test_bit(IDESCSI_LOG_CMD, &scsi->log);
280         struct Scsi_Host *host;
281         int errors = rq->errors;
282         unsigned long flags;
283
284         if (!blk_special_request(rq) && !blk_sense_request(rq)) {
285                 ide_end_request(drive, uptodate, nrsecs);
286                 return 0;
287         }
288         ide_end_drive_cmd (drive, 0, 0);
289         if (blk_sense_request(rq)) {
290                 struct ide_atapi_pc *opc = (struct ide_atapi_pc *) rq->buffer;
291                 if (log) {
292                         printk ("ide-scsi: %s: wrap up check %lu, rst = ", drive->name, opc->scsi_cmd->serial_number);
293                         ide_scsi_hex_dump(pc->buf, 16);
294                 }
295                 memcpy((void *) opc->scsi_cmd->sense_buffer, pc->buf,
296                         SCSI_SENSE_BUFFERSIZE);
297                 kfree(pc->buf);
298                 kfree(pc);
299                 kfree(rq);
300                 pc = opc;
301                 rq = pc->rq;
302                 pc->scsi_cmd->result = (CHECK_CONDITION << 1) |
303                                 (((pc->flags & PC_FLAG_TIMEDOUT) ?
304                                   DID_TIME_OUT :
305                                   DID_OK) << 16);
306         } else if (pc->flags & PC_FLAG_TIMEDOUT) {
307                 if (log)
308                         printk (KERN_WARNING "ide-scsi: %s: timed out for %lu\n",
309                                         drive->name, pc->scsi_cmd->serial_number);
310                 pc->scsi_cmd->result = DID_TIME_OUT << 16;
311         } else if (errors >= ERROR_MAX) {
312                 pc->scsi_cmd->result = DID_ERROR << 16;
313                 if (log)
314                         printk ("ide-scsi: %s: I/O error for %lu\n", drive->name, pc->scsi_cmd->serial_number);
315         } else if (errors) {
316                 if (log)
317                         printk ("ide-scsi: %s: check condition for %lu\n", drive->name, pc->scsi_cmd->serial_number);
318                 if (!idescsi_check_condition(drive, rq))
319                         /* we started a request sense, so we'll be back, exit for now */
320                         return 0;
321                 pc->scsi_cmd->result = (CHECK_CONDITION << 1) | (DID_OK << 16);
322         } else {
323                 pc->scsi_cmd->result = DID_OK << 16;
324         }
325         host = pc->scsi_cmd->device->host;
326         spin_lock_irqsave(host->host_lock, flags);
327         pc->done(pc->scsi_cmd);
328         spin_unlock_irqrestore(host->host_lock, flags);
329         kfree(pc);
330         kfree(rq);
331         scsi->pc = NULL;
332         return 0;
333 }
334
335 static inline unsigned long get_timeout(struct ide_atapi_pc *pc)
336 {
337         return max_t(unsigned long, WAIT_CMD, pc->timeout - jiffies);
338 }
339
340 static int idescsi_expiry(ide_drive_t *drive)
341 {
342         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
343         struct ide_atapi_pc   *pc   = scsi->pc;
344
345         debug_log("%s called for %lu at %lu\n", __func__,
346                   pc->scsi_cmd->serial_number, jiffies);
347
348         pc->flags |= PC_FLAG_TIMEDOUT;
349
350         return 0;                                       /* we do not want the ide subsystem to retry */
351 }
352
353 /*
354  *      Our interrupt handler.
355  */
356 static ide_startstop_t idescsi_pc_intr (ide_drive_t *drive)
357 {
358         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
359         struct ide_atapi_pc *pc = scsi->pc;
360
361         return ide_pc_intr(drive, pc, idescsi_pc_intr, get_timeout(pc),
362                            idescsi_expiry, NULL, NULL, NULL,
363                            ide_scsi_io_buffers);
364 }
365
366 static ide_startstop_t idescsi_transfer_pc(ide_drive_t *drive)
367 {
368         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
369
370         return ide_transfer_pc(drive, scsi->pc, idescsi_pc_intr,
371                                get_timeout(scsi->pc), idescsi_expiry);
372 }
373
374 static inline int idescsi_set_direction(struct ide_atapi_pc *pc)
375 {
376         switch (pc->c[0]) {
377                 case READ_6: case READ_10: case READ_12:
378                         pc->flags &= ~PC_FLAG_WRITING;
379                         return 0;
380                 case WRITE_6: case WRITE_10: case WRITE_12:
381                         pc->flags |= PC_FLAG_WRITING;
382                         return 0;
383                 default:
384                         return 1;
385         }
386 }
387
388 static int idescsi_map_sg(ide_drive_t *drive, struct ide_atapi_pc *pc)
389 {
390         ide_hwif_t *hwif = drive->hwif;
391         struct scatterlist *sg, *scsi_sg;
392         int segments;
393
394         if (!pc->req_xfer || pc->req_xfer % 1024)
395                 return 1;
396
397         if (idescsi_set_direction(pc))
398                 return 1;
399
400         sg = hwif->sg_table;
401         scsi_sg = scsi_sglist(pc->scsi_cmd);
402         segments = scsi_sg_count(pc->scsi_cmd);
403
404         if (segments > hwif->sg_max_nents)
405                 return 1;
406
407         hwif->sg_nents = segments;
408         memcpy(sg, scsi_sg, sizeof(*sg) * segments);
409
410         return 0;
411 }
412
413 static ide_startstop_t idescsi_issue_pc(ide_drive_t *drive,
414                 struct ide_atapi_pc *pc)
415 {
416         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
417
418         /* Set the current packet command */
419         scsi->pc = pc;
420
421         return ide_issue_pc(drive, pc, idescsi_transfer_pc,
422                             get_timeout(pc), idescsi_expiry);
423 }
424
425 /*
426  *      idescsi_do_request is our request handling function.
427  */
428 static ide_startstop_t idescsi_do_request (ide_drive_t *drive, struct request *rq, sector_t block)
429 {
430         debug_log("dev: %s, cmd: %x, errors: %d\n", rq->rq_disk->disk_name,
431                   rq->cmd[0], rq->errors);
432         debug_log("sector: %ld, nr_sectors: %ld, current_nr_sectors: %d\n",
433                   rq->sector, rq->nr_sectors, rq->current_nr_sectors);
434
435         if (blk_sense_request(rq) || blk_special_request(rq)) {
436                 struct ide_atapi_pc *pc = (struct ide_atapi_pc *)rq->special;
437                 idescsi_scsi_t *scsi = drive_to_idescsi(drive);
438
439                 if (test_bit(IDESCSI_DRQ_INTERRUPT, &scsi->flags))
440                         pc->flags |= PC_FLAG_DRQ_INTERRUPT;
441
442                 if (drive->using_dma && !idescsi_map_sg(drive, pc))
443                         pc->flags |= PC_FLAG_DMA_OK;
444
445                 return idescsi_issue_pc(drive, pc);
446         }
447         blk_dump_rq_flags(rq, "ide-scsi: unsup command");
448         idescsi_end_request (drive, 0, 0);
449         return ide_stopped;
450 }
451
452 #ifdef CONFIG_IDE_PROC_FS
453 static void idescsi_add_settings(ide_drive_t *drive)
454 {
455         idescsi_scsi_t *scsi = drive_to_idescsi(drive);
456
457 /*
458  *                      drive   setting name    read/write      data type       min     max     mul_factor      div_factor      data pointer            set function
459  */
460         ide_add_setting(drive,  "bios_cyl",     SETTING_RW,     TYPE_INT,       0,      1023,   1,              1,              &drive->bios_cyl,       NULL);
461         ide_add_setting(drive,  "bios_head",    SETTING_RW,     TYPE_BYTE,      0,      255,    1,              1,              &drive->bios_head,      NULL);
462         ide_add_setting(drive,  "bios_sect",    SETTING_RW,     TYPE_BYTE,      0,      63,     1,              1,              &drive->bios_sect,      NULL);
463         ide_add_setting(drive,  "transform",    SETTING_RW,     TYPE_INT,       0,      3,      1,              1,              &scsi->transform,       NULL);
464         ide_add_setting(drive,  "log",          SETTING_RW,     TYPE_INT,       0,      1,      1,              1,              &scsi->log,             NULL);
465 }
466 #else
467 static inline void idescsi_add_settings(ide_drive_t *drive) { ; }
468 #endif
469
470 /*
471  *      Driver initialization.
472  */
473 static void idescsi_setup (ide_drive_t *drive, idescsi_scsi_t *scsi)
474 {
475         if (drive->id && (drive->id->config & 0x0060) == 0x20)
476                 set_bit (IDESCSI_DRQ_INTERRUPT, &scsi->flags);
477         clear_bit(IDESCSI_SG_TRANSFORM, &scsi->transform);
478 #if IDESCSI_DEBUG_LOG
479         set_bit(IDESCSI_LOG_CMD, &scsi->log);
480 #endif /* IDESCSI_DEBUG_LOG */
481         idescsi_add_settings(drive);
482 }
483
484 static void ide_scsi_remove(ide_drive_t *drive)
485 {
486         struct Scsi_Host *scsihost = drive->driver_data;
487         struct ide_scsi_obj *scsi = scsihost_to_idescsi(scsihost);
488         struct gendisk *g = scsi->disk;
489
490         scsi_remove_host(scsihost);
491         ide_proc_unregister_driver(drive, scsi->driver);
492
493         ide_unregister_region(g);
494
495         drive->driver_data = NULL;
496         g->private_data = NULL;
497         put_disk(g);
498
499         ide_scsi_put(scsi);
500
501         drive->scsi = 0;
502 }
503
504 static int ide_scsi_probe(ide_drive_t *);
505
506 #ifdef CONFIG_IDE_PROC_FS
507 static ide_proc_entry_t idescsi_proc[] = {
508         { "capacity", S_IFREG|S_IRUGO, proc_ide_read_capacity, NULL },
509         { NULL, 0, NULL, NULL }
510 };
511 #endif
512
513 static ide_driver_t idescsi_driver = {
514         .gen_driver = {
515                 .owner          = THIS_MODULE,
516                 .name           = "ide-scsi",
517                 .bus            = &ide_bus_type,
518         },
519         .probe                  = ide_scsi_probe,
520         .remove                 = ide_scsi_remove,
521         .version                = IDESCSI_VERSION,
522         .media                  = ide_scsi,
523         .supports_dsc_overlap   = 0,
524         .do_request             = idescsi_do_request,
525         .end_request            = idescsi_end_request,
526         .error                  = idescsi_atapi_error,
527         .abort                  = idescsi_atapi_abort,
528 #ifdef CONFIG_IDE_PROC_FS
529         .proc                   = idescsi_proc,
530 #endif
531 };
532
533 static int idescsi_ide_open(struct inode *inode, struct file *filp)
534 {
535         struct gendisk *disk = inode->i_bdev->bd_disk;
536         struct ide_scsi_obj *scsi;
537
538         if (!(scsi = ide_scsi_get(disk)))
539                 return -ENXIO;
540
541         return 0;
542 }
543
544 static int idescsi_ide_release(struct inode *inode, struct file *filp)
545 {
546         struct gendisk *disk = inode->i_bdev->bd_disk;
547         struct ide_scsi_obj *scsi = ide_scsi_g(disk);
548
549         ide_scsi_put(scsi);
550
551         return 0;
552 }
553
554 static int idescsi_ide_ioctl(struct inode *inode, struct file *file,
555                         unsigned int cmd, unsigned long arg)
556 {
557         struct block_device *bdev = inode->i_bdev;
558         struct ide_scsi_obj *scsi = ide_scsi_g(bdev->bd_disk);
559         return generic_ide_ioctl(scsi->drive, file, bdev, cmd, arg);
560 }
561
562 static struct block_device_operations idescsi_ops = {
563         .owner          = THIS_MODULE,
564         .open           = idescsi_ide_open,
565         .release        = idescsi_ide_release,
566         .ioctl          = idescsi_ide_ioctl,
567 };
568
569 static int idescsi_slave_configure(struct scsi_device * sdp)
570 {
571         /* Configure detected device */
572         sdp->use_10_for_rw = 1;
573         sdp->use_10_for_ms = 1;
574         scsi_adjust_queue_depth(sdp, MSG_SIMPLE_TAG, sdp->host->cmd_per_lun);
575         return 0;
576 }
577
578 static const char *idescsi_info (struct Scsi_Host *host)
579 {
580         return "SCSI host adapter emulation for IDE ATAPI devices";
581 }
582
583 static int idescsi_ioctl (struct scsi_device *dev, int cmd, void __user *arg)
584 {
585         idescsi_scsi_t *scsi = scsihost_to_idescsi(dev->host);
586
587         if (cmd == SG_SET_TRANSFORM) {
588                 if (arg)
589                         set_bit(IDESCSI_SG_TRANSFORM, &scsi->transform);
590                 else
591                         clear_bit(IDESCSI_SG_TRANSFORM, &scsi->transform);
592                 return 0;
593         } else if (cmd == SG_GET_TRANSFORM)
594                 return put_user(test_bit(IDESCSI_SG_TRANSFORM, &scsi->transform), (int __user *) arg);
595         return -EINVAL;
596 }
597
598 static int idescsi_queue (struct scsi_cmnd *cmd,
599                 void (*done)(struct scsi_cmnd *))
600 {
601         struct Scsi_Host *host = cmd->device->host;
602         idescsi_scsi_t *scsi = scsihost_to_idescsi(host);
603         ide_drive_t *drive = scsi->drive;
604         struct request *rq = NULL;
605         struct ide_atapi_pc *pc = NULL;
606
607         if (!drive) {
608                 scmd_printk (KERN_ERR, cmd, "drive not present\n");
609                 goto abort;
610         }
611         scsi = drive_to_idescsi(drive);
612         pc = kmalloc(sizeof(struct ide_atapi_pc), GFP_ATOMIC);
613         rq = kmalloc(sizeof(struct request), GFP_ATOMIC);
614         if (rq == NULL || pc == NULL) {
615                 printk (KERN_ERR "ide-scsi: %s: out of memory\n", drive->name);
616                 goto abort;
617         }
618
619         memset (pc->c, 0, 12);
620         pc->flags = 0;
621         if (cmd->sc_data_direction == DMA_TO_DEVICE)
622                 pc->flags |= PC_FLAG_WRITING;
623         pc->rq = rq;
624         memcpy (pc->c, cmd->cmnd, cmd->cmd_len);
625         pc->buf = NULL;
626         pc->sg = scsi_sglist(cmd);
627         pc->sg_cnt = scsi_sg_count(cmd);
628         pc->b_count = 0;
629         pc->req_xfer = pc->buf_size = scsi_bufflen(cmd);
630         pc->scsi_cmd = cmd;
631         pc->done = done;
632         pc->timeout = jiffies + cmd->timeout_per_command;
633         pc->callback = ide_scsi_callback;
634
635         if (test_bit(IDESCSI_LOG_CMD, &scsi->log)) {
636                 printk ("ide-scsi: %s: que %lu, cmd = ", drive->name, cmd->serial_number);
637                 ide_scsi_hex_dump(cmd->cmnd, cmd->cmd_len);
638                 if (memcmp(pc->c, cmd->cmnd, cmd->cmd_len)) {
639                         printk ("ide-scsi: %s: que %lu, tsl = ", drive->name, cmd->serial_number);
640                         ide_scsi_hex_dump(pc->c, 12);
641                 }
642         }
643
644         blk_rq_init(NULL, rq);
645         rq->special = (char *) pc;
646         rq->cmd_type = REQ_TYPE_SPECIAL;
647         spin_unlock_irq(host->host_lock);
648         blk_execute_rq_nowait(drive->queue, scsi->disk, rq, 0, NULL);
649         spin_lock_irq(host->host_lock);
650         return 0;
651 abort:
652         kfree (pc);
653         kfree (rq);
654         cmd->result = DID_ERROR << 16;
655         done(cmd);
656         return 0;
657 }
658
659 static int idescsi_eh_abort (struct scsi_cmnd *cmd)
660 {
661         idescsi_scsi_t *scsi  = scsihost_to_idescsi(cmd->device->host);
662         ide_drive_t    *drive = scsi->drive;
663         int             busy;
664         int             ret   = FAILED;
665
666         /* In idescsi_eh_abort we try to gently pry our command from the ide subsystem */
667
668         if (test_bit(IDESCSI_LOG_CMD, &scsi->log))
669                 printk (KERN_WARNING "ide-scsi: abort called for %lu\n", cmd->serial_number);
670
671         if (!drive) {
672                 printk (KERN_WARNING "ide-scsi: Drive not set in idescsi_eh_abort\n");
673                 WARN_ON(1);
674                 goto no_drive;
675         }
676
677         /* First give it some more time, how much is "right" is hard to say :-( */
678
679         busy = ide_wait_not_busy(HWIF(drive), 100);     /* FIXME - uses mdelay which causes latency? */
680         if (test_bit(IDESCSI_LOG_CMD, &scsi->log))
681                 printk (KERN_WARNING "ide-scsi: drive did%s become ready\n", busy?" not":"");
682
683         spin_lock_irq(&ide_lock);
684
685         /* If there is no pc running we're done (our interrupt took care of it) */
686         if (!scsi->pc) {
687                 ret = SUCCESS;
688                 goto ide_unlock;
689         }
690
691         /* It's somewhere in flight. Does ide subsystem agree? */
692         if (scsi->pc->scsi_cmd->serial_number == cmd->serial_number && !busy &&
693             elv_queue_empty(drive->queue) && HWGROUP(drive)->rq != scsi->pc->rq) {
694                 /*
695                  * FIXME - not sure this condition can ever occur
696                  */
697                 printk (KERN_ERR "ide-scsi: cmd aborted!\n");
698
699                 if (blk_sense_request(scsi->pc->rq))
700                         kfree(scsi->pc->buf);
701                 kfree(scsi->pc->rq);
702                 kfree(scsi->pc);
703                 scsi->pc = NULL;
704
705                 ret = SUCCESS;
706         }
707
708 ide_unlock:
709         spin_unlock_irq(&ide_lock);
710 no_drive:
711         if (test_bit(IDESCSI_LOG_CMD, &scsi->log))
712                 printk (KERN_WARNING "ide-scsi: abort returns %s\n", ret == SUCCESS?"success":"failed");
713
714         return ret;
715 }
716
717 static int idescsi_eh_reset (struct scsi_cmnd *cmd)
718 {
719         struct request *req;
720         idescsi_scsi_t *scsi  = scsihost_to_idescsi(cmd->device->host);
721         ide_drive_t    *drive = scsi->drive;
722         int             ready = 0;
723         int             ret   = SUCCESS;
724
725         /* In idescsi_eh_reset we forcefully remove the command from the ide subsystem and reset the device. */
726
727         if (test_bit(IDESCSI_LOG_CMD, &scsi->log))
728                 printk (KERN_WARNING "ide-scsi: reset called for %lu\n", cmd->serial_number);
729
730         if (!drive) {
731                 printk (KERN_WARNING "ide-scsi: Drive not set in idescsi_eh_reset\n");
732                 WARN_ON(1);
733                 return FAILED;
734         }
735
736         spin_lock_irq(cmd->device->host->host_lock);
737         spin_lock(&ide_lock);
738
739         if (!scsi->pc || (req = scsi->pc->rq) != HWGROUP(drive)->rq || !HWGROUP(drive)->handler) {
740                 printk (KERN_WARNING "ide-scsi: No active request in idescsi_eh_reset\n");
741                 spin_unlock(&ide_lock);
742                 spin_unlock_irq(cmd->device->host->host_lock);
743                 return FAILED;
744         }
745
746         /* kill current request */
747         if (__blk_end_request(req, -EIO, 0))
748                 BUG();
749         if (blk_sense_request(req))
750                 kfree(scsi->pc->buf);
751         kfree(scsi->pc);
752         scsi->pc = NULL;
753         kfree(req);
754
755         /* now nuke the drive queue */
756         while ((req = elv_next_request(drive->queue))) {
757                 if (__blk_end_request(req, -EIO, 0))
758                         BUG();
759         }
760
761         HWGROUP(drive)->rq = NULL;
762         HWGROUP(drive)->handler = NULL;
763         HWGROUP(drive)->busy = 1;               /* will set this to zero when ide reset finished */
764         spin_unlock(&ide_lock);
765
766         ide_do_reset(drive);
767
768         /* ide_do_reset starts a polling handler which restarts itself every 50ms until the reset finishes */
769
770         do {
771                 spin_unlock_irq(cmd->device->host->host_lock);
772                 msleep(50);
773                 spin_lock_irq(cmd->device->host->host_lock);
774         } while ( HWGROUP(drive)->handler );
775
776         ready = drive_is_ready(drive);
777         HWGROUP(drive)->busy--;
778         if (!ready) {
779                 printk (KERN_ERR "ide-scsi: reset failed!\n");
780                 ret = FAILED;
781         }
782
783         spin_unlock_irq(cmd->device->host->host_lock);
784         return ret;
785 }
786
787 static int idescsi_bios(struct scsi_device *sdev, struct block_device *bdev,
788                 sector_t capacity, int *parm)
789 {
790         idescsi_scsi_t *idescsi = scsihost_to_idescsi(sdev->host);
791         ide_drive_t *drive = idescsi->drive;
792
793         if (drive->bios_cyl && drive->bios_head && drive->bios_sect) {
794                 parm[0] = drive->bios_head;
795                 parm[1] = drive->bios_sect;
796                 parm[2] = drive->bios_cyl;
797         }
798         return 0;
799 }
800
801 static struct scsi_host_template idescsi_template = {
802         .module                 = THIS_MODULE,
803         .name                   = "idescsi",
804         .info                   = idescsi_info,
805         .slave_configure        = idescsi_slave_configure,
806         .ioctl                  = idescsi_ioctl,
807         .queuecommand           = idescsi_queue,
808         .eh_abort_handler       = idescsi_eh_abort,
809         .eh_host_reset_handler  = idescsi_eh_reset,
810         .bios_param             = idescsi_bios,
811         .can_queue              = 40,
812         .this_id                = -1,
813         .sg_tablesize           = 256,
814         .cmd_per_lun            = 5,
815         .max_sectors            = 128,
816         .use_clustering         = DISABLE_CLUSTERING,
817         .emulated               = 1,
818         .proc_name              = "ide-scsi",
819 };
820
821 static int ide_scsi_probe(ide_drive_t *drive)
822 {
823         idescsi_scsi_t *idescsi;
824         struct Scsi_Host *host;
825         struct gendisk *g;
826         static int warned;
827         int err = -ENOMEM;
828
829         if (!warned && drive->media == ide_cdrom) {
830                 printk(KERN_WARNING "ide-scsi is deprecated for cd burning! Use ide-cd and give dev=/dev/hdX as device\n");
831                 warned = 1;
832         }
833
834         if (idescsi_nocd && drive->media == ide_cdrom)
835                 return -ENODEV;
836
837         if (!strstr("ide-scsi", drive->driver_req) ||
838             !drive->present ||
839             drive->media == ide_disk ||
840             !(host = scsi_host_alloc(&idescsi_template,sizeof(idescsi_scsi_t))))
841                 return -ENODEV;
842
843         drive->scsi = 1;
844
845         g = alloc_disk(1 << PARTN_BITS);
846         if (!g)
847                 goto out_host_put;
848
849         ide_init_disk(g, drive);
850
851         host->max_id = 1;
852
853         if (drive->id->last_lun)
854                 debug_log("%s: id->last_lun=%u\n", drive->name,
855                           drive->id->last_lun);
856
857         if ((drive->id->last_lun & 0x7) != 7)
858                 host->max_lun = (drive->id->last_lun & 0x7) + 1;
859         else
860                 host->max_lun = 1;
861
862         drive->driver_data = host;
863         idescsi = scsihost_to_idescsi(host);
864         idescsi->drive = drive;
865         idescsi->driver = &idescsi_driver;
866         idescsi->host = host;
867         idescsi->disk = g;
868         g->private_data = &idescsi->driver;
869         ide_proc_register_driver(drive, &idescsi_driver);
870         err = 0;
871         idescsi_setup(drive, idescsi);
872         g->fops = &idescsi_ops;
873         ide_register_region(g);
874         err = scsi_add_host(host, &drive->gendev);
875         if (!err) {
876                 scsi_scan_host(host);
877                 return 0;
878         }
879         /* fall through on error */
880         ide_unregister_region(g);
881         ide_proc_unregister_driver(drive, &idescsi_driver);
882
883         put_disk(g);
884 out_host_put:
885         drive->scsi = 0;
886         scsi_host_put(host);
887         return err;
888 }
889
890 static int __init init_idescsi_module(void)
891 {
892         return driver_register(&idescsi_driver.gen_driver);
893 }
894
895 static void __exit exit_idescsi_module(void)
896 {
897         driver_unregister(&idescsi_driver.gen_driver);
898 }
899
900 module_param(idescsi_nocd, int, 0600);
901 MODULE_PARM_DESC(idescsi_nocd, "Disable handling of CD-ROMs so they may be driven by ide-cd");
902 module_init(init_idescsi_module);
903 module_exit(exit_idescsi_module);
904 MODULE_LICENSE("GPL");