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->idefloppy_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->idefloppy_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         ide_hwif_t *hwif = drive->hwif;
 536         idefloppy_floppy_t *floppy = drive->driver_data;
 537         ide_expiry_t *expiry;
 538         unsigned int timeout;
 539         ide_startstop_t startstop;
 540         u8 ireason;
 541
 542         if (ide_wait_stat(&startstop, drive, DRQ_STAT, BUSY_STAT, WAIT_READY)) {
 543                 printk(KERN_ERR "%s: Strange, packet command initiated yet "
 544                                 "DRQ isn't asserted\n", drive->name);
 545                 return startstop;
 546         }
 547         ireason = hwif->INB(hwif->io_ports.nsect_addr);
 548         if ((ireason & CD) == 0 || (ireason & IO)) {
 549                 printk(KERN_ERR "%s: (IO,CoD) != (0,1) while issuing "
 550                                 "a packet command\n", drive->name);
 551                 return ide_do_reset(drive);
 552         }
 553         /*
 554          * The following delay solves a problem with ATAPI Zip 100 drives
 555          * where the Busy flag was apparently being deasserted before the
 556          * unit was ready to receive data. This was happening on a
 557          * 1200 MHz Athlon system. 10/26/01 25msec is too short,
 558          * 40 and 50msec work well. idefloppy_pc_intr will not be actually
 559          * used until after the packet is moved in about 50 msec.
 560          */
 561         if (floppy->flags & IDEFLOPPY_FLAG_ZIP_DRIVE) {
 562                 timeout = floppy->ticks;
 563                 expiry = &idefloppy_transfer_pc2;
 564         } else {
 565                 timeout = IDEFLOPPY_WAIT_CMD;
 566                 expiry = NULL;
 567         }
 568
 569         ide_set_handler(drive, &idefloppy_pc_intr, timeout, expiry);
 570
 571         if ((floppy->flags & IDEFLOPPY_FLAG_ZIP_DRIVE) == 0)
 572                 /* Send the actual packet */
 573                 hwif->output_data(drive, NULL, floppy->pc->c, 12);
 574
 575         return ide_started;
 576 }
 577
 578 static void ide_floppy_report_error(idefloppy_floppy_t *floppy,
 579                                     struct ide_atapi_pc *pc)
 580 {
 581         /* supress error messages resulting from Medium not present */
 582         if (floppy->sense_key == 0x02 &&
 583             floppy->asc       == 0x3a &&
 584             floppy->ascq      == 0x00)
 585                 return;
 586
 587         printk(KERN_ERR "ide-floppy: %s: I/O error, pc = %2x, key = %2x, "
 588                         "asc = %2x, ascq = %2x\n",
 589                         floppy->drive->name, pc->c[0], floppy->sense_key,
 590                         floppy->asc, floppy->ascq);
 591
 592 }
 593
 594 static ide_startstop_t idefloppy_issue_pc(ide_drive_t *drive,
 595                 struct ide_atapi_pc *pc)
 596 {
 597         idefloppy_floppy_t *floppy = drive->driver_data;
 598         ide_hwif_t *hwif = drive->hwif;
 599         u16 bcount;
 600         u8 dma;
 601
 602         if (floppy->failed_pc == NULL &&
 603             pc->c[0] != GPCMD_REQUEST_SENSE)
 604                 floppy->failed_pc = pc;
 605         /* Set the current packet command */
 606         floppy->pc = pc;
 607
 608         if (pc->retries > IDEFLOPPY_MAX_PC_RETRIES) {
 609                 if (!(pc->flags & PC_FLAG_SUPPRESS_ERROR))
 610                         ide_floppy_report_error(floppy, pc);
 611                 /* Giving up */
 612                 pc->error = IDEFLOPPY_ERROR_GENERAL;
 613
 614                 floppy->failed_pc = NULL;
 615                 pc->idefloppy_callback(drive);
 616                 return ide_stopped;
 617         }
 618
 619         debug_log("Retry number - %d\n", pc->retries);
 620
 621         pc->retries++;
 622         /* We haven't transferred any data yet */
 623         pc->xferred = 0;
 624         pc->cur_pos = pc->buf;
 625         bcount = min(pc->req_xfer, 63 * 1024);
 626
 627         if (pc->flags & PC_FLAG_DMA_ERROR) {
 628                 pc->flags &= ~PC_FLAG_DMA_ERROR;
 629                 ide_dma_off(drive);
 630         }
 631         dma = 0;
 632
 633         if ((pc->flags & PC_FLAG_DMA_RECOMMENDED) && drive->using_dma)
 634                 dma = !hwif->dma_ops->dma_setup(drive);
 635
 636         ide_pktcmd_tf_load(drive, IDE_TFLAG_OUT_DEVICE, bcount, dma);
 637
 638         if (dma) {
 639                 /* Begin DMA, if necessary */
 640                 pc->flags |= PC_FLAG_DMA_IN_PROGRESS;
 641                 hwif->dma_ops->dma_start(drive);
 642         }
 643
 644         if (floppy->flags & IDEFLOPPY_FLAG_DRQ_INTERRUPT) {
 645                 /* Issue the packet command */
 646                 ide_execute_command(drive, WIN_PACKETCMD,
 647                                 &idefloppy_transfer_pc1,
 648                                 IDEFLOPPY_WAIT_CMD,
 649                                 NULL);
 650                 return ide_started;
 651         } else {
 652                 /* Issue the packet command */
 653                 ide_execute_pkt_cmd(drive);
 654                 return idefloppy_transfer_pc1(drive);
 655         }
 656 }
 657
 658 static void idefloppy_create_prevent_cmd(struct ide_atapi_pc *pc, int prevent)
 659 {
 660         debug_log("creating prevent removal command, prevent = %d\n", prevent);
 661
 662         idefloppy_init_pc(pc);
 663         pc->c[0] = GPCMD_PREVENT_ALLOW_MEDIUM_REMOVAL;
 664         pc->c[4] = prevent;
 665 }
 666
 667 static void idefloppy_create_read_capacity_cmd(struct ide_atapi_pc *pc)
 668 {
 669         idefloppy_init_pc(pc);
 670         pc->c[0] = GPCMD_READ_FORMAT_CAPACITIES;
 671         pc->c[7] = 255;
 672         pc->c[8] = 255;
 673         pc->req_xfer = 255;
 674 }
 675
 676 static void idefloppy_create_format_unit_cmd(struct ide_atapi_pc *pc, int b,
 677                 int l, int flags)
 678 {
 679         idefloppy_init_pc(pc);
 680         pc->c[0] = GPCMD_FORMAT_UNIT;
 681         pc->c[1] = 0x17;
 682
 683         memset(pc->buf, 0, 12);
 684         pc->buf[1] = 0xA2;
 685         /* Default format list header, u8 1: FOV/DCRT/IMM bits set */
 686
 687         if (flags & 1)                          /* Verify bit on... */
 688                 pc->buf[1] ^= 0x20;             /* ... turn off DCRT bit */
 689         pc->buf[3] = 8;
 690
 691         put_unaligned(cpu_to_be32(b), (unsigned int *)(&pc->buf[4]));
 692         put_unaligned(cpu_to_be32(l), (unsigned int *)(&pc->buf[8]));
 693         pc->buf_size = 12;
 694         pc->flags |= PC_FLAG_WRITING;
 695 }
 696
 697 /* A mode sense command is used to "sense" floppy parameters. */
 698 static void idefloppy_create_mode_sense_cmd(struct ide_atapi_pc *pc,
 699                 u8 page_code, u8 type)
 700 {
 701         u16 length = 8; /* sizeof(Mode Parameter Header) = 8 Bytes */
 702
 703         idefloppy_init_pc(pc);
 704         pc->c[0] = GPCMD_MODE_SENSE_10;
 705         pc->c[1] = 0;
 706         pc->c[2] = page_code + (type << 6);
 707
 708         switch (page_code) {
 709         case IDEFLOPPY_CAPABILITIES_PAGE:
 710                 length += 12;
 711                 break;
 712         case IDEFLOPPY_FLEXIBLE_DISK_PAGE:
 713                 length += 32;
 714                 break;
 715         default:
 716                 printk(KERN_ERR "ide-floppy: unsupported page code "
 717                                 "in create_mode_sense_cmd\n");
 718         }
 719         put_unaligned(cpu_to_be16(length), (u16 *) &pc->c[7]);
 720         pc->req_xfer = length;
 721 }
 722
 723 static void idefloppy_create_start_stop_cmd(struct ide_atapi_pc *pc, int start)
 724 {
 725         idefloppy_init_pc(pc);
 726         pc->c[0] = GPCMD_START_STOP_UNIT;
 727         pc->c[4] = start;
 728 }
 729
 730 static void idefloppy_create_test_unit_ready_cmd(struct ide_atapi_pc *pc)
 731 {
 732         idefloppy_init_pc(pc);
 733         pc->c[0] = GPCMD_TEST_UNIT_READY;
 734 }
 735
 736 static void idefloppy_create_rw_cmd(idefloppy_floppy_t *floppy,
 737                                     struct ide_atapi_pc *pc, struct request *rq,
 738                                     unsigned long sector)
 739 {
 740         int block = sector / floppy->bs_factor;
 741         int blocks = rq->nr_sectors / floppy->bs_factor;
 742         int cmd = rq_data_dir(rq);
 743
 744         debug_log("create_rw10_cmd: block == %d, blocks == %d\n",
 745                 block, blocks);
 746
 747         idefloppy_init_pc(pc);
 748         pc->c[0] = cmd == READ ? GPCMD_READ_10 : GPCMD_WRITE_10;
 749         put_unaligned(cpu_to_be16(blocks), (unsigned short *)&pc->c[7]);
 750         put_unaligned(cpu_to_be32(block), (unsigned int *) &pc->c[2]);
 751
 752         pc->rq = rq;
 753         pc->b_count = cmd == READ ? 0 : rq->bio->bi_size;
 754         if (rq->cmd_flags & REQ_RW)
 755                 pc->flags |= PC_FLAG_WRITING;
 756         pc->buf = NULL;
 757         pc->req_xfer = pc->buf_size = blocks * floppy->block_size;
 758         pc->flags |= PC_FLAG_DMA_RECOMMENDED;
 759 }
 760
 761 static void idefloppy_blockpc_cmd(idefloppy_floppy_t *floppy,
 762                 struct ide_atapi_pc *pc, struct request *rq)
 763 {
 764         idefloppy_init_pc(pc);
 765         memcpy(pc->c, rq->cmd, sizeof(pc->c));
 766         pc->rq = rq;
 767         pc->b_count = rq->data_len;
 768         if (rq->data_len && rq_data_dir(rq) == WRITE)
 769                 pc->flags |= PC_FLAG_WRITING;
 770         pc->buf = rq->data;
 771         if (rq->bio)
 772                 pc->flags |= PC_FLAG_DMA_RECOMMENDED;
 773         /*
 774          * possibly problematic, doesn't look like ide-floppy correctly
 775          * handled scattered requests if dma fails...
 776          */
 777         pc->req_xfer = pc->buf_size = rq->data_len;
 778 }
 779
 780 static ide_startstop_t idefloppy_do_request(ide_drive_t *drive,
 781                 struct request *rq, sector_t block_s)
 782 {
 783         idefloppy_floppy_t *floppy = drive->driver_data;
 784         struct ide_atapi_pc *pc;
 785         unsigned long block = (unsigned long)block_s;
 786
 787         debug_log("dev: %s, cmd_type: %x, errors: %d\n",
 788                         rq->rq_disk ? rq->rq_disk->disk_name : "?",
 789                         rq->cmd_type, rq->errors);
 790         debug_log("sector: %ld, nr_sectors: %ld, "
 791                         "current_nr_sectors: %d\n", (long)rq->sector,
 792                         rq->nr_sectors, rq->current_nr_sectors);
 793
 794         if (rq->errors >= ERROR_MAX) {
 795                 if (floppy->failed_pc)
 796                         ide_floppy_report_error(floppy, floppy->failed_pc);
 797                 else
 798                         printk(KERN_ERR "ide-floppy: %s: I/O error\n",
 799                                 drive->name);
 800                 idefloppy_end_request(drive, 0, 0);
 801                 return ide_stopped;
 802         }
 803         if (blk_fs_request(rq)) {
 804                 if (((long)rq->sector % floppy->bs_factor) ||
 805                     (rq->nr_sectors % floppy->bs_factor)) {
 806                         printk(KERN_ERR "%s: unsupported r/w request size\n",
 807                                         drive->name);
 808                         idefloppy_end_request(drive, 0, 0);
 809                         return ide_stopped;
 810                 }
 811                 pc = idefloppy_next_pc_storage(drive);
 812                 idefloppy_create_rw_cmd(floppy, pc, rq, block);
 813         } else if (blk_special_request(rq)) {
 814                 pc = (struct ide_atapi_pc *) rq->buffer;
 815         } else if (blk_pc_request(rq)) {
 816                 pc = idefloppy_next_pc_storage(drive);
 817                 idefloppy_blockpc_cmd(floppy, pc, rq);
 818         } else {
 819                 blk_dump_rq_flags(rq,
 820                         "ide-floppy: unsupported command in queue");
 821                 idefloppy_end_request(drive, 0, 0);
 822                 return ide_stopped;
 823         }
 824
 825         pc->rq = rq;
 826         return idefloppy_issue_pc(drive, pc);
 827 }
 828
 829 /*
 830  * Add a special packet command request to the tail of the request queue,
 831  * and wait for it to be serviced.
 832  */
 833 static int idefloppy_queue_pc_tail(ide_drive_t *drive, struct ide_atapi_pc *pc)
 834 {
 835         struct ide_floppy_obj *floppy = drive->driver_data;
 836         struct request *rq;
 837         int error;
 838
 839         rq = blk_get_request(drive->queue, READ, __GFP_WAIT);
 840         rq->buffer = (char *) pc;
 841         rq->cmd_type = REQ_TYPE_SPECIAL;
 842         error = blk_execute_rq(drive->queue, floppy->disk, rq, 0);
 843         blk_put_request(rq);
 844
 845         return error;
 846 }
 847
 848 /*
 849  * Look at the flexible disk page parameters. We ignore the CHS capacity
 850  * parameters and use the LBA parameters instead.
 851  */
 852 static int ide_floppy_get_flexible_disk_page(ide_drive_t *drive)
 853 {
 854         idefloppy_floppy_t *floppy = drive->driver_data;
 855         struct ide_atapi_pc pc;
 856         u8 *page;
 857         int capacity, lba_capacity;
 858         u16 transfer_rate, sector_size, cyls, rpm;
 859         u8 heads, sectors;
 860
 861         idefloppy_create_mode_sense_cmd(&pc, IDEFLOPPY_FLEXIBLE_DISK_PAGE,
 862                                         MODE_SENSE_CURRENT);
 863
 864         if (idefloppy_queue_pc_tail(drive, &pc)) {
 865                 printk(KERN_ERR "ide-floppy: Can't get flexible disk page"
 866                                 " parameters\n");
 867                 return 1;
 868         }
 869         floppy->wp = !!(pc.buf[3] & 0x80);
 870         set_disk_ro(floppy->disk, floppy->wp);
 871         page = &pc.buf[8];
 872
 873         transfer_rate = be16_to_cpu(*(u16 *)&pc.buf[8 + 2]);
 874         sector_size   = be16_to_cpu(*(u16 *)&pc.buf[8 + 6]);
 875         cyls          = be16_to_cpu(*(u16 *)&pc.buf[8 + 8]);
 876         rpm           = be16_to_cpu(*(u16 *)&pc.buf[8 + 28]);
 877         heads         = pc.buf[8 + 4];
 878         sectors       = pc.buf[8 + 5];
 879
 880         capacity = cyls * heads * sectors * sector_size;
 881
 882         if (memcmp(page, &floppy->flexible_disk_page, 32))
 883                 printk(KERN_INFO "%s: %dkB, %d/%d/%d CHS, %d kBps, "
 884                                 "%d sector size, %d rpm\n",
 885                                 drive->name, capacity / 1024, cyls, heads,
 886                                 sectors, transfer_rate / 8, sector_size, rpm);
 887
 888         memcpy(&floppy->flexible_disk_page, page, 32);
 889         drive->bios_cyl = cyls;
 890         drive->bios_head = heads;
 891         drive->bios_sect = sectors;
 892         lba_capacity = floppy->blocks * floppy->block_size;
 893
 894         if (capacity < lba_capacity) {
 895                 printk(KERN_NOTICE "%s: The disk reports a capacity of %d "
 896                         "bytes, but the drive only handles %d\n",
 897                         drive->name, lba_capacity, capacity);
 898                 floppy->blocks = floppy->block_size ?
 899                         capacity / floppy->block_size : 0;
 900         }
 901         return 0;
 902 }
 903
 904 static int idefloppy_get_sfrp_bit(ide_drive_t *drive)
 905 {
 906         idefloppy_floppy_t *floppy = drive->driver_data;
 907         struct ide_atapi_pc pc;
 908
 909         floppy->srfp = 0;
 910         idefloppy_create_mode_sense_cmd(&pc, IDEFLOPPY_CAPABILITIES_PAGE,
 911                                                  MODE_SENSE_CURRENT);
 912
 913         pc.flags |= PC_FLAG_SUPPRESS_ERROR;
 914         if (idefloppy_queue_pc_tail(drive, &pc))
 915                 return 1;
 916
 917         floppy->srfp = pc.buf[8 + 2] & 0x40;
 918         return (0);
 919 }
 920
 921 /*
 922  * Determine if a media is present in the floppy drive, and if so, its LBA
 923  * capacity.
 924  */
 925 static int ide_floppy_get_capacity(ide_drive_t *drive)
 926 {
 927         idefloppy_floppy_t *floppy = drive->driver_data;
 928         struct ide_atapi_pc pc;
 929         u8 *cap_desc;
 930         u8 header_len, desc_cnt;
 931         int i, rc = 1, blocks, length;
 932
 933         drive->bios_cyl = 0;
 934         drive->bios_head = drive->bios_sect = 0;
 935         floppy->blocks = 0;
 936         floppy->bs_factor = 1;
 937         set_capacity(floppy->disk, 0);
 938
 939         idefloppy_create_read_capacity_cmd(&pc);
 940         if (idefloppy_queue_pc_tail(drive, &pc)) {
 941                 printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
 942                 return 1;
 943         }
 944         header_len = pc.buf[3];
 945         cap_desc = &pc.buf[4];
 946         desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */
 947
 948         for (i = 0; i < desc_cnt; i++) {
 949                 unsigned int desc_start = 4 + i*8;
 950
 951                 blocks = be32_to_cpu(*(u32 *)&pc.buf[desc_start]);
 952                 length = be16_to_cpu(*(u16 *)&pc.buf[desc_start + 6]);
 953
 954                 debug_log("Descriptor %d: %dkB, %d blocks, %d sector size\n",
 955                                 i, blocks * length / 1024, blocks, length);
 956
 957                 if (i)
 958                         continue;
 959                 /*
 960                  * the code below is valid only for the 1st descriptor, ie i=0
 961                  */
 962
 963                 switch (pc.buf[desc_start + 4] & 0x03) {
 964                 /* Clik! drive returns this instead of CAPACITY_CURRENT */
 965                 case CAPACITY_UNFORMATTED:
 966                         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE))
 967                                 /*
 968                                  * If it is not a clik drive, break out
 969                                  * (maintains previous driver behaviour)
 970                                  */
 971                                 break;
 972                 case CAPACITY_CURRENT:
 973                         /* Normal Zip/LS-120 disks */
 974                         if (memcmp(cap_desc, &floppy->cap_desc, 8))
 975                                 printk(KERN_INFO "%s: %dkB, %d blocks, %d "
 976                                         "sector size\n", drive->name,
 977                                         blocks * length / 1024, blocks, length);
 978                         memcpy(&floppy->cap_desc, cap_desc, 8);
 979
 980                         if (!length || length % 512) {
 981                                 printk(KERN_NOTICE "%s: %d bytes block size "
 982                                         "not supported\n", drive->name, length);
 983                         } else {
 984                                 floppy->blocks = blocks;
 985                                 floppy->block_size = length;
 986                                 floppy->bs_factor = length / 512;
 987                                 if (floppy->bs_factor != 1)
 988                                         printk(KERN_NOTICE "%s: warning: non "
 989                                                 "512 bytes block size not "
 990                                                 "fully supported\n",
 991                                                 drive->name);
 992                                 rc = 0;
 993                         }
 994                         break;
 995                 case CAPACITY_NO_CARTRIDGE:
 996                         /*
 997                          * This is a KERN_ERR so it appears on screen
 998                          * for the user to see
 999                          */
1000                         printk(KERN_ERR "%s: No disk in drive\n", drive->name);
1001                         break;
1002                 case CAPACITY_INVALID:
1003                         printk(KERN_ERR "%s: Invalid capacity for disk "
1004                                 "in drive\n", drive->name);
1005                         break;
1006                 }
1007                 debug_log("Descriptor 0 Code: %d\n",
1008                           pc.buf[desc_start + 4] & 0x03);
1009         }
1010
1011         /* Clik! disk does not support get_flexible_disk_page */
1012         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE))
1013                 (void) ide_floppy_get_flexible_disk_page(drive);
1014
1015         set_capacity(floppy->disk, floppy->blocks * floppy->bs_factor);
1016         return rc;
1017 }
1018
1019 /*
1020  * Obtain the list of formattable capacities.
1021  * Very similar to ide_floppy_get_capacity, except that we push the capacity
1022  * descriptors to userland, instead of our own structures.
1023  *
1024  * Userland gives us the following structure:
1025  *
1026  * struct idefloppy_format_capacities {
1027  *      int nformats;
1028  *      struct {
1029  *              int nblocks;
1030  *              int blocksize;
1031  *      } formats[];
1032  * };
1033  *
1034  * userland initializes nformats to the number of allocated formats[] records.
1035  * On exit we set nformats to the number of records we've actually initialized.
1036  */
1037
1038 static int ide_floppy_get_format_capacities(ide_drive_t *drive, int __user *arg)
1039 {
1040         struct ide_atapi_pc pc;
1041         u8 header_len, desc_cnt;
1042         int i, blocks, length, u_array_size, u_index;
1043         int __user *argp;
1044
1045         if (get_user(u_array_size, arg))
1046                 return (-EFAULT);
1047
1048         if (u_array_size <= 0)
1049                 return (-EINVAL);
1050
1051         idefloppy_create_read_capacity_cmd(&pc);
1052         if (idefloppy_queue_pc_tail(drive, &pc)) {
1053                 printk(KERN_ERR "ide-floppy: Can't get floppy parameters\n");
1054                 return (-EIO);
1055         }
1056         header_len = pc.buf[3];
1057         desc_cnt = header_len / 8; /* capacity descriptor of 8 bytes */
1058
1059         u_index = 0;
1060         argp = arg + 1;
1061
1062         /*
1063          * We always skip the first capacity descriptor.  That's the current
1064          * capacity.  We are interested in the remaining descriptors, the
1065          * formattable capacities.
1066          */
1067         for (i = 1; i < desc_cnt; i++) {
1068                 unsigned int desc_start = 4 + i*8;
1069
1070                 if (u_index >= u_array_size)
1071                         break;  /* User-supplied buffer too small */
1072
1073                 blocks = be32_to_cpu(*(u32 *)&pc.buf[desc_start]);
1074                 length = be16_to_cpu(*(u16 *)&pc.buf[desc_start + 6]);
1075
1076                 if (put_user(blocks, argp))
1077                         return(-EFAULT);
1078                 ++argp;
1079
1080                 if (put_user(length, argp))
1081                         return (-EFAULT);
1082                 ++argp;
1083
1084                 ++u_index;
1085         }
1086
1087         if (put_user(u_index, arg))
1088                 return (-EFAULT);
1089         return (0);
1090 }
1091
1092 /*
1093  * Get ATAPI_FORMAT_UNIT progress indication.
1094  *
1095  * Userland gives a pointer to an int.  The int is set to a progress
1096  * indicator 0-65536, with 65536=100%.
1097  *
1098  * If the drive does not support format progress indication, we just check
1099  * the dsc bit, and return either 0 or 65536.
1100  */
1101
1102 static int idefloppy_get_format_progress(ide_drive_t *drive, int __user *arg)
1103 {
1104         idefloppy_floppy_t *floppy = drive->driver_data;
1105         struct ide_atapi_pc pc;
1106         int progress_indication = 0x10000;
1107
1108         if (floppy->srfp) {
1109                 idefloppy_create_request_sense_cmd(&pc);
1110                 if (idefloppy_queue_pc_tail(drive, &pc))
1111                         return (-EIO);
1112
1113                 if (floppy->sense_key == 2 &&
1114                     floppy->asc == 4 &&
1115                     floppy->ascq == 4)
1116                         progress_indication = floppy->progress_indication;
1117
1118                 /* Else assume format_unit has finished, and we're at 0x10000 */
1119         } else {
1120                 unsigned long flags;
1121                 u8 stat;
1122
1123                 local_irq_save(flags);
1124                 stat = ide_read_status(drive);
1125                 local_irq_restore(flags);
1126
1127                 progress_indication = ((stat & SEEK_STAT) == 0) ? 0 : 0x10000;
1128         }
1129         if (put_user(progress_indication, arg))
1130                 return (-EFAULT);
1131
1132         return (0);
1133 }
1134
1135 static sector_t idefloppy_capacity(ide_drive_t *drive)
1136 {
1137         idefloppy_floppy_t *floppy = drive->driver_data;
1138         unsigned long capacity = floppy->blocks * floppy->bs_factor;
1139
1140         return capacity;
1141 }
1142
1143 /*
1144  * Check whether we can support a drive, based on the ATAPI IDENTIFY command
1145  * results.
1146  */
1147 static int idefloppy_identify_device(ide_drive_t *drive, struct hd_driveid *id)
1148 {
1149         u8 gcw[2];
1150         u8 device_type, protocol, removable, drq_type, packet_size;
1151
1152         *((u16 *) &gcw) = id->config;
1153
1154         device_type =  gcw[1] & 0x1F;
1155         removable   = (gcw[0] & 0x80) >> 7;
1156         protocol    = (gcw[1] & 0xC0) >> 6;
1157         drq_type    = (gcw[0] & 0x60) >> 5;
1158         packet_size =  gcw[0] & 0x03;
1159
1160 #ifdef CONFIG_PPC
1161         /* kludge for Apple PowerBook internal zip */
1162         if (device_type == 5 &&
1163             !strstr(id->model, "CD-ROM") && strstr(id->model, "ZIP"))
1164                 device_type = 0;
1165 #endif
1166
1167         if (protocol != 2)
1168                 printk(KERN_ERR "ide-floppy: Protocol (0x%02x) is not ATAPI\n",
1169                         protocol);
1170         else if (device_type != 0)
1171                 printk(KERN_ERR "ide-floppy: Device type (0x%02x) is not set "
1172                                 "to floppy\n", device_type);
1173         else if (!removable)
1174                 printk(KERN_ERR "ide-floppy: The removable flag is not set\n");
1175         else if (drq_type == 3)
1176                 printk(KERN_ERR "ide-floppy: Sorry, DRQ type (0x%02x) not "
1177                                 "supported\n", drq_type);
1178         else if (packet_size != 0)
1179                 printk(KERN_ERR "ide-floppy: Packet size (0x%02x) is not 12 "
1180                                 "bytes\n", packet_size);
1181         else
1182                 return 1;
1183         return 0;
1184 }
1185
1186 #ifdef CONFIG_IDE_PROC_FS
1187 static void idefloppy_add_settings(ide_drive_t *drive)
1188 {
1189         idefloppy_floppy_t *floppy = drive->driver_data;
1190
1191         ide_add_setting(drive, "bios_cyl", SETTING_RW, TYPE_INT, 0, 1023, 1, 1,
1192                         &drive->bios_cyl, NULL);
1193         ide_add_setting(drive, "bios_head", SETTING_RW, TYPE_BYTE, 0, 255, 1, 1,
1194                         &drive->bios_head, NULL);
1195         ide_add_setting(drive, "bios_sect", SETTING_RW, TYPE_BYTE, 0,  63, 1, 1,
1196                         &drive->bios_sect, NULL);
1197         ide_add_setting(drive, "ticks",    SETTING_RW, TYPE_BYTE, 0, 255, 1, 1,
1198                         &floppy->ticks,  NULL);
1199 }
1200 #else
1201 static inline void idefloppy_add_settings(ide_drive_t *drive) { ; }
1202 #endif
1203
1204 static void idefloppy_setup(ide_drive_t *drive, idefloppy_floppy_t *floppy)
1205 {
1206         u8 gcw[2];
1207
1208         *((u16 *) &gcw) = drive->id->config;
1209         floppy->pc = floppy->pc_stack;
1210
1211         if (((gcw[0] & 0x60) >> 5) == 1)
1212                 floppy->flags |= IDEFLOPPY_FLAG_DRQ_INTERRUPT;
1213         /*
1214          * We used to check revisions here. At this point however I'm giving up.
1215          * Just assume they are all broken, its easier.
1216          *
1217          * The actual reason for the workarounds was likely a driver bug after
1218          * all rather than a firmware bug, and the workaround below used to hide
1219          * it. It should be fixed as of version 1.9, but to be on the safe side
1220          * we'll leave the limitation below for the 2.2.x tree.
1221          */
1222         if (!strncmp(drive->id->model, "IOMEGA ZIP 100 ATAPI", 20)) {
1223                 floppy->flags |= IDEFLOPPY_FLAG_ZIP_DRIVE;
1224                 /* This value will be visible in the /proc/ide/hdx/settings */
1225                 floppy->ticks = IDEFLOPPY_TICKS_DELAY;
1226                 blk_queue_max_sectors(drive->queue, 64);
1227         }
1228
1229         /*
1230          * Guess what? The IOMEGA Clik! drive also needs the above fix. It makes
1231          * nasty clicking noises without it, so please don't remove this.
1232          */
1233         if (strncmp(drive->id->model, "IOMEGA Clik!", 11) == 0) {
1234                 blk_queue_max_sectors(drive->queue, 64);
1235                 floppy->flags |= IDEFLOPPY_FLAG_CLIK_DRIVE;
1236         }
1237
1238         (void) ide_floppy_get_capacity(drive);
1239         idefloppy_add_settings(drive);
1240 }
1241
1242 static void ide_floppy_remove(ide_drive_t *drive)
1243 {
1244         idefloppy_floppy_t *floppy = drive->driver_data;
1245         struct gendisk *g = floppy->disk;
1246
1247         ide_proc_unregister_driver(drive, floppy->driver);
1248
1249         del_gendisk(g);
1250
1251         ide_floppy_put(floppy);
1252 }
1253
1254 static void idefloppy_cleanup_obj(struct kref *kref)
1255 {
1256         struct ide_floppy_obj *floppy = to_ide_floppy(kref);
1257         ide_drive_t *drive = floppy->drive;
1258         struct gendisk *g = floppy->disk;
1259
1260         drive->driver_data = NULL;
1261         g->private_data = NULL;
1262         put_disk(g);
1263         kfree(floppy);
1264 }
1265
1266 #ifdef CONFIG_IDE_PROC_FS
1267 static int proc_idefloppy_read_capacity(char *page, char **start, off_t off,
1268                 int count, int *eof, void *data)
1269 {
1270         ide_drive_t*drive = (ide_drive_t *)data;
1271         int len;
1272
1273         len = sprintf(page, "%llu\n", (long long)idefloppy_capacity(drive));
1274         PROC_IDE_READ_RETURN(page, start, off, count, eof, len);
1275 }
1276
1277 static ide_proc_entry_t idefloppy_proc[] = {
1278         { "capacity",   S_IFREG|S_IRUGO, proc_idefloppy_read_capacity,  NULL },
1279         { "geometry",   S_IFREG|S_IRUGO, proc_ide_read_geometry,        NULL },
1280         { NULL, 0, NULL, NULL }
1281 };
1282 #endif  /* CONFIG_IDE_PROC_FS */
1283
1284 static int ide_floppy_probe(ide_drive_t *);
1285
1286 static ide_driver_t idefloppy_driver = {
1287         .gen_driver = {
1288                 .owner          = THIS_MODULE,
1289                 .name           = "ide-floppy",
1290                 .bus            = &ide_bus_type,
1291         },
1292         .probe                  = ide_floppy_probe,
1293         .remove                 = ide_floppy_remove,
1294         .version                = IDEFLOPPY_VERSION,
1295         .media                  = ide_floppy,
1296         .supports_dsc_overlap   = 0,
1297         .do_request             = idefloppy_do_request,
1298         .end_request            = idefloppy_end_request,
1299         .error                  = __ide_error,
1300         .abort                  = __ide_abort,
1301 #ifdef CONFIG_IDE_PROC_FS
1302         .proc                   = idefloppy_proc,
1303 #endif
1304 };
1305
1306 static int idefloppy_open(struct inode *inode, struct file *filp)
1307 {
1308         struct gendisk *disk = inode->i_bdev->bd_disk;
1309         struct ide_floppy_obj *floppy;
1310         ide_drive_t *drive;
1311         struct ide_atapi_pc pc;
1312         int ret = 0;
1313
1314         debug_log("Reached %s\n", __func__);
1315
1316         floppy = ide_floppy_get(disk);
1317         if (!floppy)
1318                 return -ENXIO;
1319
1320         drive = floppy->drive;
1321
1322         floppy->openers++;
1323
1324         if (floppy->openers == 1) {
1325                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1326                 /* Just in case */
1327
1328                 idefloppy_create_test_unit_ready_cmd(&pc);
1329                 if (idefloppy_queue_pc_tail(drive, &pc)) {
1330                         idefloppy_create_start_stop_cmd(&pc, 1);
1331                         (void) idefloppy_queue_pc_tail(drive, &pc);
1332                 }
1333
1334                 if (ide_floppy_get_capacity(drive)
1335                    && (filp->f_flags & O_NDELAY) == 0
1336                     /*
1337                      * Allow O_NDELAY to open a drive without a disk, or with an
1338                      * unreadable disk, so that we can get the format capacity
1339                      * of the drive or begin the format - Sam
1340                      */
1341                     ) {
1342                         ret = -EIO;
1343                         goto out_put_floppy;
1344                 }
1345
1346                 if (floppy->wp && (filp->f_mode & 2)) {
1347                         ret = -EROFS;
1348                         goto out_put_floppy;
1349                 }
1350                 floppy->flags |= IDEFLOPPY_FLAG_MEDIA_CHANGED;
1351                 /* IOMEGA Clik! drives do not support lock/unlock commands */
1352                 if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1353                         idefloppy_create_prevent_cmd(&pc, 1);
1354                         (void) idefloppy_queue_pc_tail(drive, &pc);
1355                 }
1356                 check_disk_change(inode->i_bdev);
1357         } else if (floppy->flags & IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS) {
1358                 ret = -EBUSY;
1359                 goto out_put_floppy;
1360         }
1361         return 0;
1362
1363 out_put_floppy:
1364         floppy->openers--;
1365         ide_floppy_put(floppy);
1366         return ret;
1367 }
1368
1369 static int idefloppy_release(struct inode *inode, struct file *filp)
1370 {
1371         struct gendisk *disk = inode->i_bdev->bd_disk;
1372         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1373         ide_drive_t *drive = floppy->drive;
1374         struct ide_atapi_pc pc;
1375
1376         debug_log("Reached %s\n", __func__);
1377
1378         if (floppy->openers == 1) {
1379                 /* IOMEGA Clik! drives do not support lock/unlock commands */
1380                 if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1381                         idefloppy_create_prevent_cmd(&pc, 0);
1382                         (void) idefloppy_queue_pc_tail(drive, &pc);
1383                 }
1384
1385                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1386         }
1387
1388         floppy->openers--;
1389
1390         ide_floppy_put(floppy);
1391
1392         return 0;
1393 }
1394
1395 static int idefloppy_getgeo(struct block_device *bdev, struct hd_geometry *geo)
1396 {
1397         struct ide_floppy_obj *floppy = ide_floppy_g(bdev->bd_disk);
1398         ide_drive_t *drive = floppy->drive;
1399
1400         geo->heads = drive->bios_head;
1401         geo->sectors = drive->bios_sect;
1402         geo->cylinders = (u16)drive->bios_cyl; /* truncate */
1403         return 0;
1404 }
1405
1406 static int ide_floppy_lockdoor(idefloppy_floppy_t *floppy,
1407                 struct ide_atapi_pc *pc, unsigned long arg, unsigned int cmd)
1408 {
1409         if (floppy->openers > 1)
1410                 return -EBUSY;
1411
1412         /* The IOMEGA Clik! Drive doesn't support this command -
1413          * no room for an eject mechanism */
1414         if (!(floppy->flags & IDEFLOPPY_FLAG_CLIK_DRIVE)) {
1415                 int prevent = arg ? 1 : 0;
1416
1417                 if (cmd == CDROMEJECT)
1418                         prevent = 0;
1419
1420                 idefloppy_create_prevent_cmd(pc, prevent);
1421                 (void) idefloppy_queue_pc_tail(floppy->drive, pc);
1422         }
1423
1424         if (cmd == CDROMEJECT) {
1425                 idefloppy_create_start_stop_cmd(pc, 2);
1426                 (void) idefloppy_queue_pc_tail(floppy->drive, pc);
1427         }
1428
1429         return 0;
1430 }
1431
1432 static int ide_floppy_format_unit(idefloppy_floppy_t *floppy,
1433                                   int __user *arg)
1434 {
1435         int blocks, length, flags, err = 0;
1436         struct ide_atapi_pc pc;
1437
1438         if (floppy->openers > 1) {
1439                 /* Don't format if someone is using the disk */
1440                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1441                 return -EBUSY;
1442         }
1443
1444         floppy->flags |= IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1445
1446         /*
1447          * Send ATAPI_FORMAT_UNIT to the drive.
1448          *
1449          * Userland gives us the following structure:
1450          *
1451          * struct idefloppy_format_command {
1452          *        int nblocks;
1453          *        int blocksize;
1454          *        int flags;
1455          *        } ;
1456          *
1457          * flags is a bitmask, currently, the only defined flag is:
1458          *
1459          *        0x01 - verify media after format.
1460          */
1461         if (get_user(blocks, arg) ||
1462                         get_user(length, arg+1) ||
1463                         get_user(flags, arg+2)) {
1464                 err = -EFAULT;
1465                 goto out;
1466         }
1467
1468         (void) idefloppy_get_sfrp_bit(floppy->drive);
1469         idefloppy_create_format_unit_cmd(&pc, blocks, length, flags);
1470
1471         if (idefloppy_queue_pc_tail(floppy->drive, &pc))
1472                 err = -EIO;
1473
1474 out:
1475         if (err)
1476                 floppy->flags &= ~IDEFLOPPY_FLAG_FORMAT_IN_PROGRESS;
1477         return err;
1478 }
1479
1480
1481 static int idefloppy_ioctl(struct inode *inode, struct file *file,
1482                         unsigned int cmd, unsigned long arg)
1483 {
1484         struct block_device *bdev = inode->i_bdev;
1485         struct ide_floppy_obj *floppy = ide_floppy_g(bdev->bd_disk);
1486         ide_drive_t *drive = floppy->drive;
1487         struct ide_atapi_pc pc;
1488         void __user *argp = (void __user *)arg;
1489         int err;
1490
1491         switch (cmd) {
1492         case CDROMEJECT:
1493                 /* fall through */
1494         case CDROM_LOCKDOOR:
1495                 return ide_floppy_lockdoor(floppy, &pc, arg, cmd);
1496         case IDEFLOPPY_IOCTL_FORMAT_SUPPORTED:
1497                 return 0;
1498         case IDEFLOPPY_IOCTL_FORMAT_GET_CAPACITY:
1499                 return ide_floppy_get_format_capacities(drive, argp);
1500         case IDEFLOPPY_IOCTL_FORMAT_START:
1501                 if (!(file->f_mode & 2))
1502                         return -EPERM;
1503
1504                 return ide_floppy_format_unit(floppy, (int __user *)arg);
1505         case IDEFLOPPY_IOCTL_FORMAT_GET_PROGRESS:
1506                 return idefloppy_get_format_progress(drive, argp);
1507         }
1508
1509         /*
1510          * skip SCSI_IOCTL_SEND_COMMAND (deprecated)
1511          * and CDROM_SEND_PACKET (legacy) ioctls
1512          */
1513         if (cmd != CDROM_SEND_PACKET && cmd != SCSI_IOCTL_SEND_COMMAND)
1514                 err = scsi_cmd_ioctl(file, bdev->bd_disk->queue,
1515                                         bdev->bd_disk, cmd, argp);
1516         else
1517                 err = -ENOTTY;
1518
1519         if (err == -ENOTTY)
1520                 err = generic_ide_ioctl(drive, file, bdev, cmd, arg);
1521
1522         return err;
1523 }
1524
1525 static int idefloppy_media_changed(struct gendisk *disk)
1526 {
1527         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1528         ide_drive_t *drive = floppy->drive;
1529         int ret;
1530
1531         /* do not scan partitions twice if this is a removable device */
1532         if (drive->attach) {
1533                 drive->attach = 0;
1534                 return 0;
1535         }
1536         ret = !!(floppy->flags & IDEFLOPPY_FLAG_MEDIA_CHANGED);
1537         floppy->flags &= ~IDEFLOPPY_FLAG_MEDIA_CHANGED;
1538         return ret;
1539 }
1540
1541 static int idefloppy_revalidate_disk(struct gendisk *disk)
1542 {
1543         struct ide_floppy_obj *floppy = ide_floppy_g(disk);
1544         set_capacity(disk, idefloppy_capacity(floppy->drive));
1545         return 0;
1546 }
1547
1548 static struct block_device_operations idefloppy_ops = {
1549         .owner                  = THIS_MODULE,
1550         .open                   = idefloppy_open,
1551         .release                = idefloppy_release,
1552         .ioctl                  = idefloppy_ioctl,
1553         .getgeo                 = idefloppy_getgeo,
1554         .media_changed          = idefloppy_media_changed,
1555         .revalidate_disk        = idefloppy_revalidate_disk
1556 };
1557
1558 static int ide_floppy_probe(ide_drive_t *drive)
1559 {
1560         idefloppy_floppy_t *floppy;
1561         struct gendisk *g;
1562
1563         if (!strstr("ide-floppy", drive->driver_req))
1564                 goto failed;
1565         if (!drive->present)
1566                 goto failed;
1567         if (drive->media != ide_floppy)
1568                 goto failed;
1569         if (!idefloppy_identify_device(drive, drive->id)) {
1570                 printk(KERN_ERR "ide-floppy: %s: not supported by this version"
1571                                 " of ide-floppy\n", drive->name);
1572                 goto failed;
1573         }
1574         if (drive->scsi) {
1575                 printk(KERN_INFO "ide-floppy: passing drive %s to ide-scsi"
1576                                 " emulation.\n", drive->name);
1577                 goto failed;
1578         }
1579         floppy = kzalloc(sizeof(idefloppy_floppy_t), GFP_KERNEL);
1580         if (!floppy) {
1581                 printk(KERN_ERR "ide-floppy: %s: Can't allocate a floppy"
1582                                 " structure\n", drive->name);
1583                 goto failed;
1584         }
1585
1586         g = alloc_disk(1 << PARTN_BITS);
1587         if (!g)
1588                 goto out_free_floppy;
1589
1590         ide_init_disk(g, drive);
1591
1592         ide_proc_register_driver(drive, &idefloppy_driver);
1593
1594         kref_init(&floppy->kref);
1595
1596         floppy->drive = drive;
1597         floppy->driver = &idefloppy_driver;
1598         floppy->disk = g;
1599
1600         g->private_data = &floppy->driver;
1601
1602         drive->driver_data = floppy;
1603
1604         idefloppy_setup(drive, floppy);
1605
1606         g->minors = 1 << PARTN_BITS;
1607         g->driverfs_dev = &drive->gendev;
1608         g->flags = drive->removable ? GENHD_FL_REMOVABLE : 0;
1609         g->fops = &idefloppy_ops;
1610         drive->attach = 1;
1611         add_disk(g);
1612         return 0;
1613
1614 out_free_floppy:
1615         kfree(floppy);
1616 failed:
1617         return -ENODEV;
1618 }
1619
1620 static void __exit idefloppy_exit(void)
1621 {
1622         driver_unregister(&idefloppy_driver.gen_driver);
1623 }
1624
1625 static int __init idefloppy_init(void)
1626 {
1627         printk("ide-floppy driver " IDEFLOPPY_VERSION "\n");
1628         return driver_register(&idefloppy_driver.gen_driver);
1629 }
1630
1631 MODULE_ALIAS("ide:*m-floppy*");
1632 module_init(idefloppy_init);
1633 module_exit(idefloppy_exit);
1634 MODULE_LICENSE("GPL");
1635 MODULE_DESCRIPTION("ATAPI FLOPPY Driver");
1636