ide: add ide_transfer_pc() helper
[linux-2.6.git] / drivers / ide / ide-floppy.c
1 /*
2  * IDE ATAPI floppy driver.
3  *
4  * Copyright (C) 1996-1999  Gadi Oxman <gadio@netvision.net.il>
5  * Copyright (C) 2000-2002  Paul Bristow <paul@paulbristow.net>
6  * Copyright (C) 2005       Bartlomiej Zolnierkiewicz
7  *
8  * This driver supports the following IDE floppy drives:
9  *
10  * LS-120/240 SuperDisk
11  * Iomega Zip 100/250
12  * Iomega PC Card Clik!/PocketZip
13  *
14  * For a historical changelog see
15  * Documentation/ide/ChangeLog.ide-floppy.1996-2002
16  */
17
18 #define IDEFLOPPY_VERSION "1.00"
19
20 #include <linux/module.h>
21 #include <linux/types.h>
22 #include <linux/string.h>
23 #include <linux/kernel.h>
24 #include <linux/delay.h>
25 #include <linux/timer.h>
26 #include <linux/mm.h>
27 #include <linux/interrupt.h>
28 #include <linux/major.h>
29 #include <linux/errno.h>
30 #include <linux/genhd.h>
31 #include <linux/slab.h>
32 #include <linux/cdrom.h>
33 #include <linux/ide.h>
34 #include <linux/bitops.h>
35 #include <linux/mutex.h>
36
37 #include <scsi/scsi_ioctl.h>
38
39 #include <asm/byteorder.h>
40 #include <linux/irq.h>
41 #include <linux/uaccess.h>
42 #include <linux/io.h>
43 #include <asm/unaligned.h>
44
45 /* define to see debug info */
46 #define IDEFLOPPY_DEBUG_LOG             0
47
48 /* #define IDEFLOPPY_DEBUG(fmt, args...) printk(KERN_INFO fmt, ## args) */
49 #define IDEFLOPPY_DEBUG(fmt, args...)
50
51 #if IDEFLOPPY_DEBUG_LOG
52 #define debug_log(fmt, args...) \
53         printk(KERN_INFO "ide-floppy: " fmt, ## args)
54 #else
55 #define debug_log(fmt, args...) do {} while (0)
56 #endif
57
58
59 /* Some drives require a longer irq timeout. */
60 #define IDEFLOPPY_WAIT_CMD              (5 * WAIT_CMD)
61
62 /*
63  * After each failed packet command we issue a request sense command and retry
64  * the packet command IDEFLOPPY_MAX_PC_RETRIES times.
65  */
66 #define IDEFLOPPY_MAX_PC_RETRIES        3
67
68 /*
69  * With each packet command, we allocate a buffer of IDEFLOPPY_PC_BUFFER_SIZE
70  * bytes.
71  */
72 #define IDEFLOPPY_PC_BUFFER_SIZE        256
73
74 /*
75  * In various places in the driver, we need to allocate storage for packet
76  * commands and requests, which will remain valid while we leave the driver to
77  * wait for an interrupt or a timeout event.
78  */
79 #define IDEFLOPPY_PC_STACK              (10 + IDEFLOPPY_MAX_PC_RETRIES)
80
81 /* format capacities descriptor codes */
82 #define CAPACITY_INVALID        0x00
83 #define CAPACITY_UNFORMATTED    0x01
84 #define CAPACITY_CURRENT        0x02
85 #define CAPACITY_NO_CARTRIDGE   0x03
86
87 /*
88  * Most of our global data which we need to save even as we leave the driver
89  * due to an interrupt or a timer event is stored in a variable of type
90  * idefloppy_floppy_t, defined below.
91  */
92 typedef struct ide_floppy_obj {
93         ide_drive_t     *drive;
94         ide_driver_t    *driver;
95         struct gendisk  *disk;
96         struct kref     kref;
97         unsigned int    openers;        /* protected by BKL for now */
98
99         /* Current packet command */
100         struct ide_atapi_pc *pc;
101         /* Last failed packet command */
102         struct ide_atapi_pc *failed_pc;
103         /* Packet command stack */
104         struct ide_atapi_pc pc_stack[IDEFLOPPY_PC_STACK];
105         /* Next free packet command storage space */
106         int pc_stack_index;
107         struct request rq_stack[IDEFLOPPY_PC_STACK];
108         /* We implement a circular array */
109         int rq_stack_index;
110
111         /* Last error information */
112         u8 sense_key, asc, ascq;
113         /* delay this long before sending packet command */
114         u8 ticks;
115         int progress_indication;
116
117         /* Device information */
118         /* Current format */
119         int blocks, block_size, bs_factor;
120         /* Last format capacity descriptor */
121         u8 cap_desc[8];
122         /* Copy of the flexible disk page */
123         u8 flexible_disk_page[32];
124         /* Write protect */
125         int wp;
126         /* Supports format progress report */
127         int srfp;
128         /* Status/Action flags */
129         unsigned long flags;
130 } idefloppy_floppy_t;
131
132 #define IDEFLOPPY_TICKS_DELAY   HZ/20   /* default delay for ZIP 100 (50ms) */
133
134 /* Floppy flag bits values. */
135 enum {
136         /* DRQ interrupt device */
137         IDEFLOPPY_FLAG_DRQ_INTERRUPT            = (1 << 0),
138         /* Media may have changed */
139         IDEFLOPPY_FLAG_MEDIA_CHANGED            = (1 << 1),
140         /* Format in progress */
141         IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS       = (1 << 2),
142         /* Avoid commands not supported in Clik drive */
143         IDEFLOPPY_FLAG_CLIK_DRIVE               = (1 << 3),
144         /* Requires BH algorithm for packets */
145         IDEFLOPPY_FLAG_ZIP_DRIVE                = (1 << 4),
146 };
147
148 /* Defines for the MODE SENSE command */
149 #define MODE_SENSE_CURRENT              0x00
150 #define MODE_SENSE_CHANGEABLE           0x01
151 #define MODE_SENSE_DEFAULT              0x02
152 #define MODE_SENSE_SAVED                0x03
153
154 /* IOCTLs used in low-level formatting. */
155 #define IDEFLOPPY_IOCTL_FORMAT_SUPPORTED        0x4600
156 #define IDEFLOPPY_IOCTL_FORMAT_GET_CAPACITY     0x4601
157 #define IDEFLOPPY_IOCTL_FORMAT_START            0x4602
158 #define IDEFLOPPY_IOCTL_FORMAT_GET_PROGRESS     0x4603
159
160 /* Error code returned in rq->errors to the higher part of the driver. */
161 #define IDEFLOPPY_ERROR_GENERAL         101
162
163 /*
164  * Pages of the SELECT SENSE / MODE SENSE packet commands.
165  * See SFF-8070i spec.
166  */
167 #define IDEFLOPPY_CAPABILITIES_PAGE     0x1b
168 #define IDEFLOPPY_FLEXIBLE_DISK_PAGE    0x05
169
170 static DEFINE_MUTEX(idefloppy_ref_mutex);
171
172 #define to_ide_floppy(obj) container_of(obj, struct ide_floppy_obj, kref)
173
174 #define ide_floppy_g(disk) \
175         container_of((disk)->private_data, struct ide_floppy_obj, driver)
176
177 static struct ide_floppy_obj *ide_floppy_get(struct gendisk *disk)
178 {
179         struct ide_floppy_obj *floppy = NULL;
180
181         mutex_lock(&idefloppy_ref_mutex);
182         floppy = ide_floppy_g(disk);
183         if (floppy)
184                 kref_get(&floppy->kref);
185         mutex_unlock(&idefloppy_ref_mutex);
186         return floppy;
187 }
188
189 static void idefloppy_cleanup_obj(struct kref *);
190
191 static void ide_floppy_put(struct ide_floppy_obj *floppy)
192 {
193         mutex_lock(&idefloppy_ref_mutex);
194         kref_put(&floppy->kref, idefloppy_cleanup_obj);
195         mutex_unlock(&idefloppy_ref_mutex);
196 }
197
198 /*
199  * Used to finish servicing a request. For read/write requests, we will call
200  * ide_end_request to pass to the next buffer.
201  */
202 static int idefloppy_end_request(ide_drive_t *drive, int uptodate, int nsecs)
203 {
204         idefloppy_floppy_t *floppy = drive->driver_data;
205         struct request *rq = HWGROUP(drive)->rq;
206         int error;
207
208         debug_log("Reached %s\n", __func__);
209
210         switch (uptodate) {
211         case 0: error = IDEFLOPPY_ERROR_GENERAL; break;
212         case 1: error = 0; break;
213         default: error = uptodate;
214         }
215         if (error)
216                 floppy->failed_pc = NULL;
217         /* Why does this happen? */
218         if (!rq)
219                 return 0;
220         if (!blk_special_request(rq)) {
221                 /* our real local end request function */
222                 ide_end_request(drive, uptodate, nsecs);
223                 return 0;
224         }
225         rq->errors = error;
226         /* fixme: need to move this local also */
227         ide_end_drive_cmd(drive, 0, 0);
228         return 0;
229 }
230
231 static void ide_floppy_io_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
232                                   unsigned int bcount, int direction)
233 {
234         ide_hwif_t *hwif = drive->hwif;
235         struct request *rq = pc->rq;
236         struct req_iterator iter;
237         struct bio_vec *bvec;
238         unsigned long flags;
239         int count, done = 0;
240         char *data;
241
242         rq_for_each_segment(bvec, rq, iter) {
243                 if (!bcount)
244                         break;
245
246                 count = min(bvec->bv_len, bcount);
247
248                 data = bvec_kmap_irq(bvec, &flags);
249                 if (direction)
250                         hwif->output_data(drive, NULL, data, count);
251                 else
252                         hwif->input_data(drive, NULL, data, count);
253                 bvec_kunmap_irq(data, &flags);
254
255                 bcount -= count;
256                 pc->b_count += count;
257                 done += count;
258         }
259
260         idefloppy_end_request(drive, 1, done >> 9);
261
262         if (bcount) {
263                 printk(KERN_ERR "%s: leftover data in %s, bcount == %d\n",
264                                 drive->name, __func__, bcount);
265                 ide_pad_transfer(drive, direction, bcount);
266         }
267 }
268
269 static void idefloppy_update_buffers(ide_drive_t *drive,
270                                 struct ide_atapi_pc *pc)
271 {
272         struct request *rq = pc->rq;
273         struct bio *bio = rq->bio;
274
275         while ((bio = rq->bio) != NULL)
276                 idefloppy_end_request(drive, 1, 0);
277 }
278
279 /*
280  * Generate a new packet command request in front of the request queue, before
281  * the current request so that it will be processed immediately, on the next
282  * pass through the driver.
283  */
284 static void idefloppy_queue_pc_head(ide_drive_t *drive, struct ide_atapi_pc *pc,
285                 struct request *rq)
286 {
287         struct ide_floppy_obj *floppy = drive->driver_data;
288
289         blk_rq_init(NULL, rq);
290         rq->buffer = (char *) pc;
291         rq->cmd_type = REQ_TYPE_SPECIAL;
292         rq->cmd_flags |= REQ_PREEMPT;
293         rq->rq_disk = floppy->disk;
294         ide_do_drive_cmd(drive, rq);
295 }
296
297 static struct ide_atapi_pc *idefloppy_next_pc_storage(ide_drive_t *drive)
298 {
299         idefloppy_floppy_t *floppy = drive->driver_data;
300
301         if (floppy->pc_stack_index == IDEFLOPPY_PC_STACK)
302                 floppy->pc_stack_index = 0;
303         return (&floppy->pc_stack[floppy->pc_stack_index++]);
304 }
305
306 static struct request *idefloppy_next_rq_storage(ide_drive_t *drive)
307 {
308         idefloppy_floppy_t *floppy = drive->driver_data;
309
310         if (floppy->rq_stack_index == IDEFLOPPY_PC_STACK)
311                 floppy->rq_stack_index = 0;
312         return (&floppy->rq_stack[floppy->rq_stack_index++]);
313 }
314
315 static void ide_floppy_callback(ide_drive_t *drive)
316 {
317         idefloppy_floppy_t *floppy = drive->driver_data;
318         struct ide_atapi_pc *pc = floppy->pc;
319         int uptodate = pc->error ? 0 : 1;
320
321         debug_log("Reached %s\n", __func__);
322
323         if (pc->c[0] == GPCMD_READ_10 || pc->c[0] == GPCMD_WRITE_10 ||
324             (pc->rq && blk_pc_request(pc->rq)))
325                 uptodate = 1; /* FIXME */
326         else if (pc->c[0] == GPCMD_REQUEST_SENSE) {
327                 u8 *buf = floppy->pc->buf;
328
329                 if (!pc->error) {
330                         floppy->sense_key = buf[2] & 0x0F;
331                         floppy->asc = buf[12];
332                         floppy->ascq = buf[13];
333                         floppy->progress_indication = buf[15] & 0x80 ?
334                                 (u16)get_unaligned((u16 *)&buf[16]) : 0x10000;
335
336                         if (floppy->failed_pc)
337                                 debug_log("pc = %x, ", floppy->failed_pc->c[0]);
338
339                         debug_log("sense key = %x, asc = %x, ascq = %x\n",
340                                   floppy->sense_key, floppy->asc, floppy->ascq);
341                 } else
342                         printk(KERN_ERR "Error in REQUEST SENSE itself - "
343                                         "Aborting request!\n");
344         }
345
346         idefloppy_end_request(drive, uptodate, 0);
347 }
348
349 static void idefloppy_init_pc(struct ide_atapi_pc *pc)
350 {
351         memset(pc->c, 0, 12);
352         pc->retries = 0;
353         pc->flags = 0;
354         pc->req_xfer = 0;
355         pc->buf = pc->pc_buf;
356         pc->buf_size = IDEFLOPPY_PC_BUFFER_SIZE;
357         pc->callback = ide_floppy_callback;
358 }
359
360 static void idefloppy_create_request_sense_cmd(struct ide_atapi_pc *pc)
361 {
362         idefloppy_init_pc(pc);
363         pc->c[0] = GPCMD_REQUEST_SENSE;
364         pc->c[4] = 255;
365         pc->req_xfer = 18;
366 }
367
368 /*
369  * Called when an error was detected during the last packet command. We queue a
370  * request sense packet command in the head of the request list.
371  */
372 static void idefloppy_retry_pc(ide_drive_t *drive)
373 {
374         struct ide_atapi_pc *pc;
375         struct request *rq;
376
377         (void)ide_read_error(drive);
378         pc = idefloppy_next_pc_storage(drive);
379         rq = idefloppy_next_rq_storage(drive);
380         idefloppy_create_request_sense_cmd(pc);
381         idefloppy_queue_pc_head(drive, pc, rq);
382 }
383
384 /* The usual interrupt handler called during a packet command. */
385 static ide_startstop_t idefloppy_pc_intr(ide_drive_t *drive)
386 {
387         idefloppy_floppy_t *floppy = drive->driver_data;
388         ide_hwif_t *hwif = drive->hwif;
389         struct ide_atapi_pc *pc = floppy->pc;
390         struct request *rq = pc->rq;
391         xfer_func_t *xferfunc;
392         unsigned int temp;
393         int dma_error = 0;
394         u16 bcount;
395         u8 stat, ireason;
396
397         debug_log("Reached %s interrupt handler\n", __func__);
398
399         if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
400                 dma_error = hwif->dma_ops->dma_end(drive);
401                 if (dma_error) {
402                         printk(KERN_ERR "%s: DMA %s error\n", drive->name,
403                                         rq_data_dir(rq) ? "write" : "read");
404                         pc->flags |= PC_FLAG_DMA_ERROR;
405                 } else {
406                         pc->xferred = pc->req_xfer;
407                         idefloppy_update_buffers(drive, pc);
408                 }
409                 debug_log("DMA finished\n");
410         }
411
412         /* Clear the interrupt */
413         stat = ide_read_status(drive);
414
415         /* No more interrupts */
416         if ((stat & DRQ_STAT) == 0) {
417                 debug_log("Packet command completed, %d bytes transferred\n",
418                                 pc->xferred);
419                 pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
420
421                 local_irq_enable_in_hardirq();
422
423                 if ((stat & ERR_STAT) || (pc->flags & PC_FLAG_DMA_ERROR)) {
424                         /* Error detected */
425                         debug_log("%s: I/O error\n", drive->name);
426                         rq->errors++;
427                         if (pc->c[0] == GPCMD_REQUEST_SENSE) {
428                                 printk(KERN_ERR "%s: I/O error in request sense"
429                                                 " command\n", drive->name);
430                                 return ide_do_reset(drive);
431                         }
432                         /* Retry operation */
433                         idefloppy_retry_pc(drive);
434                         /* queued, but not started */
435                         return ide_stopped;
436                 }
437                 pc->error = 0;
438                 if (floppy->failed_pc == pc)
439                         floppy->failed_pc = NULL;
440                 /* Command finished - Call the callback function */
441                 pc->callback(drive);
442                 return ide_stopped;
443         }
444
445         if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
446                 pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
447                 printk(KERN_ERR "%s: The device wants to issue more interrupts "
448                                 "in DMA mode\n", drive->name);
449                 ide_dma_off(drive);
450                 return ide_do_reset(drive);
451         }
452
453         /* Get the number of bytes to transfer */
454         bcount = (hwif->INB(hwif->io_ports.lbah_addr) << 8) |
455                   hwif->INB(hwif->io_ports.lbam_addr);
456         /* on this interrupt */
457         ireason = hwif->INB(hwif->io_ports.nsect_addr);
458
459         if (ireason & CD) {
460                 printk(KERN_ERR "%s: CoD != 0 in %s\n", drive->name, __func__);
461                 return ide_do_reset(drive);
462         }
463         if (((ireason & IO) == IO) == !!(pc->flags & PC_FLAG_WRITING)) {
464                 /* Hopefully, we will never get here */
465                 printk(KERN_ERR "%s: We wanted to %s, but the device wants us "
466                                 "to %s!\n", drive->name,
467                                 (ireason & IO) ? "Write" : "Read",
468                                 (ireason & IO) ? "Read" : "Write");
469                 return ide_do_reset(drive);
470         }
471         if (!(pc->flags & PC_FLAG_WRITING)) {
472                 /* Reading - Check that we have enough space */
473                 temp = pc->xferred + bcount;
474                 if (temp > pc->req_xfer) {
475                         if (temp > pc->buf_size) {
476                                 printk(KERN_ERR "%s: The device wants to send "
477                                                 "us more data than expected - "
478                                                 "discarding data\n",
479                                                 drive->name);
480                                 ide_pad_transfer(drive, 0, bcount);
481
482                                 ide_set_handler(drive,
483                                                 &idefloppy_pc_intr,
484                                                 IDEFLOPPY_WAIT_CMD,
485                                                 NULL);
486                                 return ide_started;
487                         }
488                         debug_log("The device wants to send us more data than "
489                                   "expected - allowing transfer\n");
490                 }
491         }
492         if (pc->flags & PC_FLAG_WRITING)
493                 xferfunc = hwif->output_data;
494         else
495                 xferfunc = hwif->input_data;
496
497         if (pc->buf)
498                 xferfunc(drive, NULL, pc->cur_pos, bcount);
499         else
500                 ide_floppy_io_buffers(drive, pc, bcount,
501                                       !!(pc->flags & PC_FLAG_WRITING));
502
503         /* Update the current position */
504         pc->xferred += bcount;
505         pc->cur_pos += bcount;
506
507         /* And set the interrupt handler again */
508         ide_set_handler(drive, &idefloppy_pc_intr, IDEFLOPPY_WAIT_CMD, NULL);
509         return ide_started;
510 }
511
512 /*
513  * What we have here is a classic case of a top half / bottom half interrupt
514  * service routine. In interrupt mode, the device sends an interrupt to signal
515  * that it is ready to receive a packet. However, we need to delay about 2-3
516  * ticks before issuing the packet or we gets in trouble.
517  *
518  * So, follow carefully. transfer_pc1 is called as an interrupt (or directly).
519  * In either case, when the device says it's ready for a packet, we schedule
520  * the packet transfer to occur about 2-3 ticks later in transfer_pc2.
521  */
522 static int idefloppy_transfer_pc2(ide_drive_t *drive)
523 {
524         idefloppy_floppy_t *floppy = drive->driver_data;
525
526         /* Send the actual packet */
527         drive->hwif->output_data(drive, NULL, floppy->pc->c, 12);
528
529         /* Timeout for the packet command */
530         return IDEFLOPPY_WAIT_CMD;
531 }
532
533 static ide_startstop_t idefloppy_transfer_pc1(ide_drive_t *drive)
534 {
535         idefloppy_floppy_t *floppy = drive->driver_data;
536         struct ide_atapi_pc *pc = floppy->pc;
537         ide_expiry_t *expiry;
538         unsigned int timeout;
539
540         /*
541          * The following delay solves a problem with ATAPI Zip 100 drives
542          * where the Busy flag was apparently being deasserted before the
543          * unit was ready to receive data. This was happening on a
544          * 1200 MHz Athlon system. 10/26/01 25msec is too short,
545          * 40 and 50msec work well. idefloppy_pc_intr will not be actually
546          * used until after the packet is moved in about 50 msec.
547          */
548         if (pc->flags & PC_FLAG_ZIP_DRIVE) {
549                 timeout = floppy->ticks;
550                 expiry = &idefloppy_transfer_pc2;
551         } else {
552                 timeout = IDEFLOPPY_WAIT_CMD;
553                 expiry = NULL;
554         }
555
556         return ide_transfer_pc(drive, pc, idefloppy_pc_intr, timeout, expiry);
557 }
558
559 static void ide_floppy_report_error(idefloppy_floppy_t *floppy,
560                                     struct ide_atapi_pc *pc)
561 {
562         /* supress error messages resulting from Medium not present */
563         if (floppy->sense_key == 0x02 &&
564             floppy->asc       == 0x3a &&
565             floppy->ascq      == 0x00)
566                 return;
567
568         printk(KERN_ERR "ide-floppy: %s: I/O error, pc = %2x, key = %2x, "
569                         "asc = %2x, ascq = %2x\n",
570                         floppy->drive->name, pc->c[0], floppy->sense_key,
571                         floppy->asc, floppy->ascq);
572
573 }
574
575 static ide_startstop_t idefloppy_issue_pc(ide_drive_t *drive,
576                 struct ide_atapi_pc *pc)
577 {
578         idefloppy_floppy_t *floppy = drive->driver_data;
579         ide_hwif_t *hwif = drive->hwif;
580         u16 bcount;
581         u8 dma;
582
583         if (floppy->failed_pc == NULL &&
584             pc->c[0] != GPCMD_REQUEST_SENSE)
585                 floppy->failed_pc = pc;
586         /* Set the current packet command */
587         floppy->pc = pc;
588
589         if (pc->retries > IDEFLOPPY_MAX_PC_RETRIES) {
590                 if (!(pc->flags & PC_FLAG_SUPPRESS_ERROR))
591                         ide_floppy_report_error(floppy, pc);
592                 /* Giving up */
593                 pc->error = IDEFLOPPY_ERROR_GENERAL;
594
595                 floppy->failed_pc = NULL;
596                 pc->callback(drive);
597                 return ide_stopped;
598         }
599
600         debug_log("Retry number - %d\n", pc->retries);
601
602         pc->retries++;
603         /* We haven't transferred any data yet */
604         pc->xferred = 0;
605         pc->cur_pos = pc->buf;
606         bcount = min(pc->req_xfer, 63 * 1024);
607
608         if (pc->flags & PC_FLAG_DMA_ERROR) {
609                 pc->flags &= ~PC_FLAG_DMA_ERROR;
610                 ide_dma_off(drive);
611         }
612         dma = 0;
613
614         if ((pc->flags & PC_FLAG_DMA_OK) && drive->using_dma)
615                 dma = !hwif->dma_ops->dma_setup(drive);
616
617         if (!dma)
618                 pc->flags &= ~PC_FLAG_DMA_OK;
619
620         ide_pktcmd_tf_load(drive, IDE_TFLAG_OUT_DEVICE, bcount, dma);
621
622         if (floppy->flags & IDEFLOPPY_FLAG_DRQ_INTERRUPT) {
623                 /* Issue the packet command */
624                 ide_execute_command(drive, WIN_PACKETCMD,
625                                 &idefloppy_transfer_pc1,
626                                 IDEFLOPPY_WAIT_CMD,
627                                 NULL);
628                 return ide_started;
629         } else {
630                 /* Issue the packet command */
631                 ide_execute_pkt_cmd(drive);
632                 return idefloppy_transfer_pc1(drive);
633         }
634 }
635
636 static void idefloppy_create_prevent_cmd(struct ide_atapi_pc *pc, int prevent)
637 {
638         debug_log("creating prevent removal command, prevent = %d\n", prevent);
639
640         idefloppy_init_pc(pc);
641         pc->c[0] = GPCMD_PREVENT_ALLOW_MEDIUM_REMOVAL;
642         pc->c[4] = prevent;
643 }
644
645 static void idefloppy_create_read_capacity_cmd(struct ide_atapi_pc *pc)
646 {
647         idefloppy_init_pc(pc);
648         pc->c[0] = GPCMD_READ_FORMAT_CAPACITIES;
649         pc->c[7] = 255;
650         pc->c[8] = 255;
651         pc->req_xfer = 255;
652 }
653
654 static void idefloppy_create_format_unit_cmd(struct ide_atapi_pc *pc, int b,
655                 int l, int flags)
656 {
657         idefloppy_init_pc(pc);
658         pc->c[0] = GPCMD_FORMAT_UNIT;
659         pc->c[1] = 0x17;
660
661         memset(pc->buf, 0, 12);
662         pc->buf[1] = 0xA2;
663         /* Default format list header, u8 1: FOV/DCRT/IMM bits set */
664
665         if (flags & 1)                          /* Verify bit on... */
666                 pc->buf[1] ^= 0x20;             /* ... turn off DCRT bit */
667         pc->buf[3] = 8;
668
669         put_unaligned(cpu_to_be32(b), (unsigned int *)(&pc->buf[4]));
670         put_unaligned(cpu_to_be32(l), (unsigned int *)(&pc->buf[8]));
671         pc->buf_size = 12;
672         pc->flags |= PC_FLAG_WRITING;
673 }
674
675 /* A mode sense command is used to "sense" floppy parameters. */
676 static void idefloppy_create_mode_sense_cmd(struct ide_atapi_pc *pc,
677                 u8 page_code, u8 type)
678 {
679         u16 length = 8; /* sizeof(Mode Parameter Header) = 8 Bytes */
680
681         idefloppy_init_pc(pc);
682         pc->c[0] = GPCMD_MODE_SENSE_10;
683         pc->c[1] = 0;
684         pc->c[2] = page_code + (type << 6);
685
686         switch (page_code) {
687         case IDEFLOPPY_CAPABILITIES_PAGE:
688                 length += 12;
689                 break;
690         case IDEFLOPPY_FLEXIBLE_DISK_PAGE:
691                 length += 32;
692                 break;
693         default:
694                 printk(KERN_ERR "ide-floppy: unsupported page code "
695                                 "in create_mode_sense_cmd\n");
696         }
697         put_unaligned(cpu_to_be16(length), (u16 *) &pc->c[7]);
698         pc->req_xfer = length;
699 }
700
701 static void idefloppy_create_start_stop_cmd(struct ide_atapi_pc *pc, int start)
702 {
703         idefloppy_init_pc(pc);
704         pc->c[0] = GPCMD_START_STOP_UNIT;
705         pc->c[4] = start;
706 }
707
708 static void idefloppy_create_test_unit_ready_cmd(struct ide_atapi_pc *pc)
709 {
710         idefloppy_init_pc(pc);
711         pc->c[0] = GPCMD_TEST_UNIT_READY;
712 }
713
714 static void idefloppy_create_rw_cmd(idefloppy_floppy_t *floppy,
715                                     struct ide_atapi_pc *pc, struct request *rq,
716                                     unsigned long sector)
717 {
718         int block = sector / floppy->bs_factor;
719         int blocks = rq->nr_sectors / floppy->bs_factor;
720         int cmd = rq_data_dir(rq);
721
722         debug_log("create_rw10_cmd: block == %d, blocks == %d\n",
723                 block, blocks);
724
725         idefloppy_init_pc(pc);
726         pc->c[0] = cmd == READ ? GPCMD_READ_10 : GPCMD_WRITE_10;
727         put_unaligned(cpu_to_be16(blocks), (unsigned short *)&pc->c[7]);
728         put_unaligned(cpu_to_be32(block), (unsigned int *) &pc->c[2]);
729
730         pc->rq = rq;
731         pc->b_count = cmd == READ ? 0 : rq->bio->bi_size;
732         if (rq->cmd_flags & REQ_RW)
733                 pc->flags |= PC_FLAG_WRITING;
734         pc->buf = NULL;
735         pc->req_xfer = pc->buf_size = blocks * floppy->block_size;
736         pc->flags |= PC_FLAG_DMA_OK;
737 }
738
739 static void idefloppy_blockpc_cmd(idefloppy_floppy_t *floppy,
740                 struct ide_atapi_pc *pc, struct request *rq)
741 {
742         idefloppy_init_pc(pc);
743         memcpy(pc->c, rq->cmd, sizeof(pc->c));
744         pc->rq = rq;
745         pc->b_count = rq->data_len;
746         if (rq->data_len && rq_data_dir(rq) == WRITE)
747                 pc->flags |= PC_FLAG_WRITING;
748         pc->buf = rq->data;
749         if (rq->bio)
750                 pc->flags |= PC_FLAG_DMA_OK;
751         /*
752          * possibly problematic, doesn't look like ide-floppy correctly
753          * handled scattered requests if dma fails...
754          */
755         pc->req_xfer = pc->buf_size = rq->data_len;
756 }
757
758 static ide_startstop_t idefloppy_do_request(ide_drive_t *drive,
759                 struct request *rq, sector_t block_s)
760 {
761         idefloppy_floppy_t *floppy = drive->driver_data;
762         struct ide_atapi_pc *pc;
763         unsigned long block = (unsigned long)block_s;
764
765         debug_log("dev: %s, cmd_type: %x, errors: %d\n",
766                         rq->rq_disk ? rq->rq_disk->disk_name : "?",
767                         rq->cmd_type, rq->errors);
768         debug_log("sector: %ld, nr_sectors: %ld, "
769                         "current_nr_sectors: %d\n", (long)rq->sector,
770                         rq->nr_sectors, rq->current_nr_sectors);
771
772         if (rq->errors >= ERROR_MAX) {
773                 if (floppy->failed_pc)
774                         ide_floppy_report_error(floppy, floppy->failed_pc);
775                 else
776                         printk(KERN_ERR "ide-floppy: %s: I/O error\n",
777                                 drive->name);
778                 idefloppy_end_request(drive, 0, 0);
779                 return ide_stopped;
780         }
781         if (blk_fs_request(rq)) {
782                 if (((long)rq->sector % floppy->bs_factor) ||
783                     (rq->nr_sectors % floppy->bs_factor)) {
784                         printk(KERN_ERR "%s: unsupported r/w request size\n",
785                                         drive->name);
786                         idefloppy_end_request(drive, 0, 0);
787                         return ide_stopped;
788                 }
789                 pc = idefloppy_next_pc_storage(drive);
790                 idefloppy_create_rw_cmd(floppy, pc, rq, block);
791         } else if (blk_special_request(rq)) {
792                 pc = (struct ide_atapi_pc *) rq->buffer;
793         } else if (blk_pc_request(rq)) {
794                 pc = idefloppy_next_pc_storage(drive);
795                 idefloppy_blockpc_cmd(floppy, pc, rq);
796         } else {
797                 blk_dump_rq_flags(rq,
798                         "ide-floppy: unsupported command in queue");
799                 idefloppy_end_request(drive, 0, 0);
800                 return ide_stopped;
801         }
802
803         if (floppy->flags & IDEFLOPPY_FLAG_ZIP_DRIVE)
804                 pc->flags |= PC_FLAG_ZIP_DRIVE;
805
806         pc->rq = rq;
807
808         return idefloppy_issue_pc(drive, pc);
809 }
810
811 /*
812  * Add a special packet command request to the tail of the request queue,
813  * and wait for it to be serviced.
814  */
815 static int idefloppy_queue_pc_tail(ide_drive_t *drive, struct ide_atapi_pc *pc)
816 {
817         struct ide_floppy_obj *floppy = drive->driver_data;
818         struct request *rq;
819         int error;
820
821         rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
822         rq->buffer = (char *) pc;
823         rq->cmd_type = REQ_TYPE_SPECIAL;
824         error = blk_execute_rq(drive->queue, floppy->disk, rq, 0);
825         blk_put_request(rq);
826
827         return error;
828 }
829
830 /*
831  * Look at the flexible disk page parameters. We ignore the CHS capacity
832  * parameters and use the LBA parameters instead.
833  */
834 static int ide_floppy_get_flexible_disk_page(ide_drive_t *drive)
835 {
836         idefloppy_floppy_t *floppy = drive->driver_data;
837         struct ide_atapi_pc pc;
838         u8 *page;
839         int capacity, lba_capacity;
840         u16 transfer_rate, sector_size, cyls, rpm;
841         u8 heads, sectors;
842
843         idefloppy_create_mode_sense_cmd(&pc, IDEFLOPPY_FLEXIBLE_DISK_PAGE,
844                                         MODE_SENSE_CURRENT);
845
846         if (idefloppy_queue_pc_tail(drive, &pc)) {
847                 printk(KERN_ERR "ide-floppy: Can't get flexible disk page"
848                                 " parameters\n");
849                 return 1;
850         }
851         floppy->wp = !!(pc.buf[3] & 0x80);
852         set_disk_ro(floppy->disk, floppy->wp);
853         page = &pc.buf[8];
854
855         transfer_rate = be16_to_cpu(*(u16 *)&pc.buf[8 + 2]);
856         sector_size   = be16_to_cpu(*(u16 *)&pc.buf[8 + 6]);
857         cyls          = be16_to_cpu(*(u16 *)&pc.buf[8 + 8]);
858         rpm           = be16_to_cpu(*(u16 *)&pc.buf[8 + 28]);
859         heads         = pc.buf[8 + 4];
860         sectors       = pc.buf[8 + 5];
861
862         capacity = cyls * heads * sectors * sector_size;
863
864         if (memcmp(page, &floppy->flexible_disk_page, 32))
865                 printk(KERN_INFO "%s: %dkB, %d/%d/%d CHS, %d kBps, "
866                                 "%d sector size, %d rpm\n",
867                                 drive->name, capacity / 1024, cyls, heads,
868                                 sectors, transfer_rate / 8, sector_size, rpm);
869
870         memcpy(&floppy->flexible_disk_page, page, 32);
871         drive->bios_cyl = cyls;
872         drive->bios_head = heads;
873         drive->bios_sect = sectors;
874         lba_capacity = floppy->blocks * floppy->block_size;
875
876         if (capacity < lba_capacity) {
877                 printk(KERN_NOTICE "%s: The disk reports a capacity of %d "
878                         "bytes, but the drive only handles %d\n",
879                         drive->name, lba_capacity, capacity);
880                 floppy->blocks = floppy->block_size ?
881                         capacity / floppy->block_size : 0;
882         }
883         return 0;
884 }
885
886 static int idefloppy_get_sfrp_bit(ide_drive_t *drive)
887 {
888         idefloppy_floppy_t *floppy = drive->driver_data;
889         struct ide_atapi_pc pc;
890
891         floppy->srfp = 0;
892         idefloppy_create_mode_sense_cmd(&pc, IDEFLOPPY_CAPABILITIES_PAGE,
893                                                  MODE_SENSE_CURRENT);
894
895         pc.flags |= PC_FLAG_SUPPRESS_ERROR;
896         if (idefloppy_queue_pc_tail(drive, &pc))
897                 return 1;
898
899         floppy->srfp = pc.buf[8 + 2] & 0x40;
900         return (0);
901 }
902
903 /*
904  * Determine if a media is present in the floppy drive, and if so, its LBA
905  * capacity.
906  */
907 static int ide_floppy_get_capacity(ide_drive_t *drive)
908 {
909         idefloppy_floppy_t *floppy = drive->driver_data;
910         struct ide_atapi_pc pc;
911         u8 *cap_desc;
912         u8 header_len, desc_cnt;
913         int i, rc = 1, blocks, length;
914
915         drive->bios_cyl = 0;
916         drive->bios_head = drive->bios_sect = 0;
917         floppy->blocks = 0;
918         floppy->bs_factor = 1;
919         set_capacity(floppy->disk, 0);
920
921         idefloppy_create_read_capacity_cmd(&pc);
922         if (idefloppy_queue_pc_tail(drive, &pc)) {
923                 printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
924                 return 1;
925         }
926         header_len = pc.buf[3];
927         cap_desc = &pc.buf[4];
928         desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */
929
930         for (i = 0; i < desc_cnt; i++) {
931                 unsigned int desc_start = 4 + i*8;
932
933                 blocks = be32_to_cpu(*(u32 *)&pc.buf[desc_start]);
934                 length = be16_to_cpu(*(u16 *)&pc.buf[desc_start + 6]);
935
936                 debug_log("Descriptor %d: %dkB, %d blocks, %d sector size\n",
937                                 i, blocks * length / 1024, blocks, length);
938
939                 if (i)
940                         continue;
941                 /*
942                  * the code below is valid only for the 1st descriptor, ie i=0
943                  */
944
945                 switch (pc.buf[desc_start + 4] & 0x03) {
946                 /* Clik! drive returns this instead of CAPACITY_CURRENT */
947                 case CAPACITY_UNFORMATTED:
948                         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE))
949                                 /*
950                                  * If it is not a clik drive, break out
951                                  * (maintains previous driver behaviour)
952                                  */
953                                 break;
954                 case CAPACITY_CURRENT:
955                         /* Normal Zip/LS-120 disks */
956                         if (memcmp(cap_desc, &floppy->cap_desc, 8))
957                                 printk(KERN_INFO "%s: %dkB, %d blocks, %d "
958                                         "sector size\n", drive->name,
959                                         blocks * length / 1024, blocks, length);
960                         memcpy(&floppy->cap_desc, cap_desc, 8);
961
962                         if (!length || length % 512) {
963                                 printk(KERN_NOTICE "%s: %d bytes block size "
964                                         "not supported\n", drive->name, length);
965                         } else {
966                                 floppy->blocks = blocks;
967                                 floppy->block_size = length;
968                                 floppy->bs_factor = length / 512;
969                                 if (floppy->bs_factor != 1)
970                                         printk(KERN_NOTICE "%s: warning: non "
971                                                 "512 bytes block size not "
972                                                 "fully supported\n",
973                                                 drive->name);
974                                 rc = 0;
975                         }
976                         break;
977                 case CAPACITY_NO_CARTRIDGE:
978                         /*
979                          * This is a KERN_ERR so it appears on screen
980                          * for the user to see
981                          */
982                         printk(KERN_ERR "%s: No disk in drive\n", drive->name);
983                         break;
984                 case CAPACITY_INVALID:
985                         printk(KERN_ERR "%s: Invalid capacity for disk "
986                                 "in drive\n", drive->name);
987                         break;
988                 }
989                 debug_log("Descriptor 0 Code: %d\n",
990                           pc.buf[desc_start + 4] & 0x03);
991         }
992
993         /* Clik! disk does not support get_flexible_disk_page */
994         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE))
995                 (void) ide_floppy_get_flexible_disk_page(drive);
996
997         set_capacity(floppy->disk, floppy->blocks * floppy->bs_factor);
998         return rc;
999 }
1000
1001 /*
1002  * Obtain the list of formattable capacities.
1003  * Very similar to ide_floppy_get_capacity, except that we push the capacity
1004  * descriptors to userland, instead of our own structures.
1005  *
1006  * Userland gives us the following structure:
1007  *
1008  * struct idefloppy_format_capacities {
1009  *      int nformats;
1010  *      struct {
1011  *              int nblocks;
1012  *              int blocksize;
1013  *      } formats[];
1014  * };
1015  *
1016  * userland initializes nformats to the number of allocated formats[] records.
1017  * On exit we set nformats to the number of records we've actually initialized.
1018  */
1019
1020 static int ide_floppy_get_format_capacities(ide_drive_t *drive, int __user *arg)
1021 {
1022         struct ide_atapi_pc pc;
1023         u8 header_len, desc_cnt;
1024         int i, blocks, length, u_array_size, u_index;
1025         int __user *argp;
1026
1027         if (get_user(u_array_size, arg))
1028                 return (-EFAULT);
1029
1030         if (u_array_size <= 0)
1031                 return (-EINVAL);
1032
1033         idefloppy_create_read_capacity_cmd(&pc);
1034         if (idefloppy_queue_pc_tail(drive, &pc)) {
1035                 printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
1036                 return (-EIO);
1037         }
1038         header_len = pc.buf[3];
1039         desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */
1040
1041         u_index = 0;
1042         argp = arg + 1;
1043
1044         /*
1045          * We always skip the first capacity descriptor.  That's the current
1046          * capacity.  We are interested in the remaining descriptors, the
1047          * formattable capacities.
1048          */
1049         for (i = 1; i < desc_cnt; i++) {
1050                 unsigned int desc_start = 4 + i*8;
1051
1052                 if (u_index >= u_array_size)
1053                         break;  /* User-supplied buffer too small */
1054
1055                 blocks = be32_to_cpu(*(u32 *)&pc.buf[desc_start]);
1056                 length = be16_to_cpu(*(u16 *)&pc.buf[desc_start + 6]);
1057
1058                 if (put_user(blocks, argp))
1059                         return(-EFAULT);
1060                 ++argp;
1061
1062                 if (put_user(length, argp))
1063                         return (-EFAULT);
1064                 ++argp;
1065
1066                 ++u_index;
1067         }
1068
1069         if (put_user(u_index, arg))
1070                 return (-EFAULT);
1071         return (0);
1072 }
1073
1074 /*
1075  * Get ATAPI_FORMAT_UNIT progress indication.
1076  *
1077  * Userland gives a pointer to an int.  The int is set to a progress
1078  * indicator 0-65536, with 65536=100%.
1079  *
1080  * If the drive does not support format progress indication, we just check
1081  * the dsc bit, and return either 0 or 65536.
1082  */
1083
1084 static int idefloppy_get_format_progress(ide_drive_t *drive, int __user *arg)
1085 {
1086         idefloppy_floppy_t *floppy = drive->driver_data;
1087         struct ide_atapi_pc pc;
1088         int progress_indication = 0x10000;
1089
1090         if (floppy->srfp) {
1091                 idefloppy_create_request_sense_cmd(&pc);
1092                 if (idefloppy_queue_pc_tail(drive, &pc))
1093                         return (-EIO);
1094
1095                 if (floppy->sense_key == 2 &&
1096                     floppy->asc == 4 &&
1097                     floppy->ascq == 4)
1098                         progress_indication = floppy->progress_indication;
1099
1100                 /* Else assume format_unit has finished, and we're at 0x10000 */
1101         } else {
1102                 unsigned long flags;
1103                 u8 stat;
1104
1105                 local_irq_save(flags);
1106                 stat = ide_read_status(drive);
1107                 local_irq_restore(flags);
1108
1109                 progress_indication = ((stat & SEEK_STAT) == 0) ? 0 : 0x10000;
1110         }
1111         if (put_user(progress_indication, arg))
1112                 return (-EFAULT);
1113
1114         return (0);
1115 }
1116
1117 static sector_t idefloppy_capacity(ide_drive_t *drive)
1118 {
1119         idefloppy_floppy_t *floppy = drive->driver_data;
1120         unsigned long capacity = floppy->blocks * floppy->bs_factor;
1121
1122         return capacity;
1123 }
1124
1125 /*
1126  * Check whether we can support a drive, based on the ATAPI IDENTIFY command
1127  * results.
1128  */
1129 static int idefloppy_identify_device(ide_drive_t *drive, struct hd_driveid *id)
1130 {
1131         u8 gcw[2];
1132         u8 device_type, protocol, removable, drq_type, packet_size;
1133
1134         *((u16 *) &gcw) = id->config;
1135
1136         device_type =  gcw[1] & 0x1F;
1137         removable   = (gcw[0] & 0x80) >> 7;
1138         protocol    = (gcw[1] & 0xC0) >> 6;
1139         drq_type    = (gcw[0] & 0x60) >> 5;
1140         packet_size =  gcw[0] & 0x03;
1141
1142 #ifdef CONFIG_PPC
1143         /* kludge for Apple PowerBook internal zip */
1144         if (device_type == 5 &&
1145             !strstr(id->model, "CD-ROM") && strstr(id->model, "ZIP"))
1146                 device_type = 0;
1147 #endif
1148
1149         if (protocol != 2)
1150                 printk(KERN_ERR "ide-floppy: Protocol (0x%02x) is not ATAPI\n",
1151                         protocol);
1152         else if (device_type != 0)
1153                 printk(KERN_ERR "ide-floppy: Device type (0x%02x) is not set "
1154                                 "to floppy\n", device_type);
1155         else if (!removable)
1156                 printk(KERN_ERR "ide-floppy: The removable flag is not set\n");
1157         else if (drq_type == 3)
1158                 printk(KERN_ERR "ide-floppy: Sorry, DRQ type (0x%02x) not "
1159                                 "supported\n", drq_type);
1160         else if (packet_size != 0)
1161                 printk(KERN_ERR "ide-floppy: Packet size (0x%02x) is not 12 "
1162                                 "bytes\n", packet_size);
1163         else
1164                 return 1;
1165         return 0;
1166 }
1167
1168 #ifdef CONFIG_IDE_PROC_FS
1169 static void idefloppy_add_settings(ide_drive_t *drive)
1170 {
1171         idefloppy_floppy_t *floppy = drive->driver_data;
1172
1173         ide_add_setting(drive, "bios_cyl", SETTING_RW, TYPE_INT, 0, 1023, 1, 1,
1174                         &drive->bios_cyl, NULL);
1175         ide_add_setting(drive, "bios_head", SETTING_RW, TYPE_BYTE, 0, 255, 1, 1,
1176                         &drive->bios_head, NULL);
1177         ide_add_setting(drive, "bios_sect", SETTING_RW, TYPE_BYTE, 0,  63, 1, 1,
1178                         &drive->bios_sect, NULL);
1179         ide_add_setting(drive, "ticks",    SETTING_RW, TYPE_BYTE, 0, 255, 1, 1,
1180                         &floppy->ticks,  NULL);
1181 }
1182 #else
1183 static inline void idefloppy_add_settings(ide_drive_t *drive) { ; }
1184 #endif
1185
1186 static void idefloppy_setup(ide_drive_t *drive, idefloppy_floppy_t *floppy)
1187 {
1188         u8 gcw[2];
1189
1190         *((u16 *) &gcw) = drive->id->config;
1191         floppy->pc = floppy->pc_stack;
1192
1193         if (((gcw[0] & 0x60) >> 5) == 1)
1194                 floppy->flags |= IDEFLOPPY_FLAG_DRQ_INTERRUPT;
1195         /*
1196          * We used to check revisions here. At this point however I'm giving up.
1197          * Just assume they are all broken, its easier.
1198          *
1199          * The actual reason for the workarounds was likely a driver bug after
1200          * all rather than a firmware bug, and the workaround below used to hide
1201          * it. It should be fixed as of version 1.9, but to be on the safe side
1202          * we'll leave the limitation below for the 2.2.x tree.
1203          */
1204         if (!strncmp(drive->id->model, "IOMEGA ZIP 100 ATAPI", 20)) {
1205                 floppy->flags |= IDEFLOPPY_FLAG_ZIP_DRIVE;
1206                 /* This value will be visible in the /proc/ide/hdx/settings */
1207                 floppy->ticks = IDEFLOPPY_TICKS_DELAY;
1208                 blk_queue_max_sectors(drive->queue, 64);
1209         }
1210
1211         /*
1212          * Guess what? The IOMEGA Clik! drive also needs the above fix. It makes
1213          * nasty clicking noises without it, so please don't remove this.
1214          */
1215         if (strncmp(drive->id->model, "IOMEGA Clik!", 11) == 0) {
1216                 blk_queue_max_sectors(drive->queue, 64);
1217                 floppy->flags |= IDEFLOPPY_FLAG_CLIK_DRIVE;
1218         }
1219
1220         (void) ide_floppy_get_capacity(drive);
1221         idefloppy_add_settings(drive);
1222 }
1223
1224 static void ide_floppy_remove(ide_drive_t *drive)
1225 {
1226         idefloppy_floppy_t *floppy = drive->driver_data;
1227         struct gendisk *g = floppy->disk;
1228
1229         ide_proc_unregister_driver(drive, floppy->driver);
1230
1231         del_gendisk(g);
1232
1233         ide_floppy_put(floppy);
1234 }
1235
1236 static void idefloppy_cleanup_obj(struct kref *kref)
1237 {
1238         struct ide_floppy_obj *floppy = to_ide_floppy(kref);
1239         ide_drive_t *drive = floppy->drive;
1240         struct gendisk *g = floppy->disk;
1241
1242         drive->driver_data = NULL;
1243         g->private_data = NULL;
1244         put_disk(g);
1245         kfree(floppy);
1246 }
1247
1248 #ifdef CONFIG_IDE_PROC_FS
1249 static int proc_idefloppy_read_capacity(char *page, char **start, off_t off,
1250                 int count, int *eof, void *data)
1251 {
1252         ide_drive_t*drive = (ide_drive_t *)data;
1253         int len;
1254
1255         len = sprintf(page, "%llu\n", (long long)idefloppy_capacity(drive));
1256         PROC_IDE_READ_RETURN(page, start, off, count, eof, len);
1257 }
1258
1259 static ide_proc_entry_t idefloppy_proc[] = {
1260         { "capacity",   S_IFREG|S_IRUGO, proc_idefloppy_read_capacity,  NULL },
1261         { "geometry",   S_IFREG|S_IRUGO, proc_ide_read_geometry,        NULL },
1262         { NULL, 0, NULL, NULL }
1263 };
1264 #endif  /* CONFIG_IDE_PROC_FS */
1265
1266 static int ide_floppy_probe(ide_drive_t *);
1267
1268 static ide_driver_t idefloppy_driver = {
1269         .gen_driver = {
1270                 .owner          = THIS_MODULE,
1271                 .name           = "ide-floppy",
1272                 .bus            = &ide_bus_type,
1273         },
1274         .probe                  = ide_floppy_probe,
1275         .remove                 = ide_floppy_remove,
1276         .version                = IDEFLOPPY_VERSION,
1277         .media                  = ide_floppy,
1278         .supports_dsc_overlap   = 0,
1279         .do_request             = idefloppy_do_request,
1280         .end_request            = idefloppy_end_request,
1281         .error                  = __ide_error,
1282         .abort                  = __ide_abort,
1283 #ifdef CONFIG_IDE_PROC_FS
1284         .proc                   = idefloppy_proc,
1285 #endif
1286 };
1287
1288 static int idefloppy_open(struct inode *inode, struct file *filp)
1289 {
1290         struct gendisk *disk = inode->i_bdev->bd_disk;
1291         struct ide_floppy_obj *floppy;
1292         ide_drive_t *drive;
1293         struct ide_atapi_pc pc;
1294         int ret = 0;
1295
1296         debug_log("Reached %s\n", __func__);
1297
1298         floppy = ide_floppy_get(disk);
1299         if (!floppy)
1300                 return -ENXIO;
1301
1302         drive = floppy->drive;
1303
1304         floppy->openers++;
1305
1306         if (floppy->openers == 1) {
1307                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1308                 /* Just in case */
1309
1310                 idefloppy_create_test_unit_ready_cmd(&pc);
1311                 if (idefloppy_queue_pc_tail(drive, &pc)) {
1312                         idefloppy_create_start_stop_cmd(&pc, 1);
1313                         (void) idefloppy_queue_pc_tail(drive, &pc);
1314                 }
1315
1316                 if (ide_floppy_get_capacity(drive)
1317                    && (filp->f_flags & O_NDELAY) == 0
1318                     /*
1319                      * Allow O_NDELAY to open a drive without a disk, or with an
1320                      * unreadable disk, so that we can get the format capacity
1321                      * of the drive or begin the format - Sam
1322                      */
1323                     ) {
1324                         ret = -EIO;
1325                         goto out_put_floppy;
1326                 }
1327
1328                 if (floppy->wp && (filp->f_mode & 2)) {
1329                         ret = -EROFS;
1330                         goto out_put_floppy;
1331                 }
1332                 floppy->flags |= IDEFLOPPY_FLAG_MEDIA_CHANGED;
1333                 /* IOMEGA Clik! drives do not support lock/unlock commands */
1334                 if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1335                         idefloppy_create_prevent_cmd(&pc, 1);
1336                         (void) idefloppy_queue_pc_tail(drive, &pc);
1337                 }
1338                 check_disk_change(inode->i_bdev);
1339         } else if (floppy->flags & IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS) {
1340                 ret = -EBUSY;
1341                 goto out_put_floppy;
1342         }
1343         return 0;
1344
1345 out_put_floppy:
1346         floppy->openers--;
1347         ide_floppy_put(floppy);
1348         return ret;
1349 }
1350
1351 static int idefloppy_release(struct inode *inode, struct file *filp)
1352 {
1353         struct gendisk *disk = inode->i_bdev->bd_disk;
1354         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1355         ide_drive_t *drive = floppy->drive;
1356         struct ide_atapi_pc pc;
1357
1358         debug_log("Reached %s\n", __func__);
1359
1360         if (floppy->openers == 1) {
1361                 /* IOMEGA Clik! drives do not support lock/unlock commands */
1362                 if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1363                         idefloppy_create_prevent_cmd(&pc, 0);
1364                         (void) idefloppy_queue_pc_tail(drive, &pc);
1365                 }
1366
1367                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1368         }
1369
1370         floppy->openers--;
1371
1372         ide_floppy_put(floppy);
1373
1374         return 0;
1375 }
1376
1377 static int idefloppy_getgeo(struct block_device *bdev, struct hd_geometry *geo)
1378 {
1379         struct ide_floppy_obj *floppy = ide_floppy_g(bdev->bd_disk);
1380         ide_drive_t *drive = floppy->drive;
1381
1382         geo->heads = drive->bios_head;
1383         geo->sectors = drive->bios_sect;
1384         geo->cylinders = (u16)drive->bios_cyl; /* truncate */
1385         return 0;
1386 }
1387
1388 static int ide_floppy_lockdoor(idefloppy_floppy_t *floppy,
1389                 struct ide_atapi_pc *pc, unsigned long arg, unsigned int cmd)
1390 {
1391         if (floppy->openers > 1)
1392                 return -EBUSY;
1393
1394         /* The IOMEGA Clik! Drive doesn't support this command -
1395          * no room for an eject mechanism */
1396         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1397                 int prevent = arg ? 1 : 0;
1398
1399                 if (cmd == CDROMEJECT)
1400                         prevent = 0;
1401
1402                 idefloppy_create_prevent_cmd(pc, prevent);
1403                 (void) idefloppy_queue_pc_tail(floppy->drive, pc);
1404         }
1405
1406         if (cmd == CDROMEJECT) {
1407                 idefloppy_create_start_stop_cmd(pc, 2);
1408                 (void) idefloppy_queue_pc_tail(floppy->drive, pc);
1409         }
1410
1411         return 0;
1412 }
1413
1414 static int ide_floppy_format_unit(idefloppy_floppy_t *floppy,
1415                                   int __user *arg)
1416 {
1417         int blocks, length, flags, err = 0;
1418         struct ide_atapi_pc pc;
1419
1420         if (floppy->openers > 1) {
1421                 /* Don't format if someone is using the disk */
1422                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1423                 return -EBUSY;
1424         }
1425
1426         floppy->flags |= IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1427
1428         /*
1429          * Send ATAPI_FORMAT_UNIT to the drive.
1430          *
1431          * Userland gives us the following structure:
1432          *
1433          * struct idefloppy_format_command {
1434          *        int nblocks;
1435          *        int blocksize;
1436          *        int flags;
1437          *        } ;
1438          *
1439          * flags is a bitmask, currently, the only defined flag is:
1440          *
1441          *        0x01 - verify media after format.
1442          */
1443         if (get_user(blocks, arg) ||
1444                         get_user(length, arg+1) ||
1445                         get_user(flags, arg+2)) {
1446                 err = -EFAULT;
1447                 goto out;
1448         }
1449
1450         (void) idefloppy_get_sfrp_bit(floppy->drive);
1451         idefloppy_create_format_unit_cmd(&pc, blocks, length, flags);
1452
1453         if (idefloppy_queue_pc_tail(floppy->drive, &pc))
1454                 err = -EIO;
1455
1456 out:
1457         if (err)
1458                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1459         return err;
1460 }
1461
1462
1463 static int idefloppy_ioctl(struct inode *inode, struct file *file,
1464                         unsigned int cmd, unsigned long arg)
1465 {
1466         struct block_device *bdev = inode->i_bdev;
1467         struct ide_floppy_obj *floppy = ide_floppy_g(bdev->bd_disk);
1468         ide_drive_t *drive = floppy->drive;
1469         struct ide_atapi_pc pc;
1470         void __user *argp = (void __user *)arg;
1471         int err;
1472
1473         switch (cmd) {
1474         case CDROMEJECT:
1475                 /* fall through */
1476         case CDROM_LOCKDOOR:
1477                 return ide_floppy_lockdoor(floppy, &pc, arg, cmd);
1478         case IDEFLOPPY_IOCTL_FORMAT_SUPPORTED:
1479                 return 0;
1480         case IDEFLOPPY_IOCTL_FORMAT_GET_CAPACITY:
1481                 return ide_floppy_get_format_capacities(drive, argp);
1482         case IDEFLOPPY_IOCTL_FORMAT_START:
1483                 if (!(file->f_mode & 2))
1484                         return -EPERM;
1485
1486                 return ide_floppy_format_unit(floppy, (int __user *)arg);
1487         case IDEFLOPPY_IOCTL_FORMAT_GET_PROGRESS:
1488                 return idefloppy_get_format_progress(drive, argp);
1489         }
1490
1491         /*
1492          * skip SCSI_IOCTL_SEND_COMMAND (deprecated)
1493          * and CDROM_SEND_PACKET (legacy) ioctls
1494          */
1495         if (cmd != CDROM_SEND_PACKET && cmd != SCSI_IOCTL_SEND_COMMAND)
1496                 err = scsi_cmd_ioctl(file, bdev->bd_disk->queue,
1497                                         bdev->bd_disk, cmd, argp);
1498         else
1499                 err = -ENOTTY;
1500
1501         if (err == -ENOTTY)
1502                 err = generic_ide_ioctl(drive, file, bdev, cmd, arg);
1503
1504         return err;
1505 }
1506
1507 static int idefloppy_media_changed(struct gendisk *disk)
1508 {
1509         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1510         ide_drive_t *drive = floppy->drive;
1511         int ret;
1512
1513         /* do not scan partitions twice if this is a removable device */
1514         if (drive->attach) {
1515                 drive->attach = 0;
1516                 return 0;
1517         }
1518         ret = !!(floppy->flags & IDEFLOPPY_FLAG_MEDIA_CHANGED);
1519         floppy->flags &= ~IDEFLOPPY_FLAG_MEDIA_CHANGED;
1520         return ret;
1521 }
1522
1523 static int idefloppy_revalidate_disk(struct gendisk *disk)
1524 {
1525         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1526         set_capacity(disk, idefloppy_capacity(floppy->drive));
1527         return 0;
1528 }
1529
1530 static struct block_device_operations idefloppy_ops = {
1531         .owner                  = THIS_MODULE,
1532         .open                   = idefloppy_open,
1533         .release                = idefloppy_release,
1534         .ioctl                  = idefloppy_ioctl,
1535         .getgeo                 = idefloppy_getgeo,
1536         .media_changed          = idefloppy_media_changed,
1537         .revalidate_disk        = idefloppy_revalidate_disk
1538 };
1539
1540 static int ide_floppy_probe(ide_drive_t *drive)
1541 {
1542         idefloppy_floppy_t *floppy;
1543         struct gendisk *g;
1544
1545         if (!strstr("ide-floppy", drive->driver_req))
1546                 goto failed;
1547         if (!drive->present)
1548                 goto failed;
1549         if (drive->media != ide_floppy)
1550                 goto failed;
1551         if (!idefloppy_identify_device(drive, drive->id)) {
1552                 printk(KERN_ERR "ide-floppy: %s: not supported by this version"
1553                                 " of ide-floppy\n", drive->name);
1554                 goto failed;
1555         }
1556         floppy = kzalloc(sizeof(idefloppy_floppy_t), GFP_KERNEL);
1557         if (!floppy) {
1558                 printk(KERN_ERR "ide-floppy: %s: Can't allocate a floppy"
1559                                 " structure\n", drive->name);
1560                 goto failed;
1561         }
1562
1563         g = alloc_disk(1 << PARTN_BITS);
1564         if (!g)
1565                 goto out_free_floppy;
1566
1567         ide_init_disk(g, drive);
1568
1569         ide_proc_register_driver(drive, &idefloppy_driver);
1570
1571         kref_init(&floppy->kref);
1572
1573         floppy->drive = drive;
1574         floppy->driver = &idefloppy_driver;
1575         floppy->disk = g;
1576
1577         g->private_data = &floppy->driver;
1578
1579         drive->driver_data = floppy;
1580
1581         idefloppy_setup(drive, floppy);
1582
1583         g->minors = 1 << PARTN_BITS;
1584         g->driverfs_dev = &drive->gendev;
1585         g->flags = drive->removable ? GENHD_FL_REMOVABLE : 0;
1586         g->fops = &idefloppy_ops;
1587         drive->attach = 1;
1588         add_disk(g);
1589         return 0;
1590
1591 out_free_floppy:
1592         kfree(floppy);
1593 failed:
1594         return -ENODEV;
1595 }
1596
1597 static void __exit idefloppy_exit(void)
1598 {
1599         driver_unregister(&idefloppy_driver.gen_driver);
1600 }
1601
1602 static int __init idefloppy_init(void)
1603 {
1604         printk("ide-floppy driver " IDEFLOPPY_VERSION "\n");
1605         return driver_register(&idefloppy_driver.gen_driver);
1606 }
1607
1608 MODULE_ALIAS("ide:*m-floppy*");
1609 module_init(idefloppy_init);
1610 module_exit(idefloppy_exit);
1611 MODULE_LICENSE("GPL");
1612 MODULE_DESCRIPTION("ATAPI FLOPPY Driver");
1613