drivers/scsi/sr.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  *  sr.c Copyright (C) 1992 David Giller
   4  *           Copyright (C) 1993, 1994, 1995, 1999 Eric Youngdale
   5  *
   6  *  adapted from:
   7  *      sd.c Copyright (C) 1992 Drew Eckhardt
   8  *      Linux scsi disk driver by
   9  *              Drew Eckhardt <drew@colorado.edu>
  10  *
  11  *      Modified by Eric Youngdale ericy@andante.org to
  12  *      add scatter-gather, multiple outstanding request, and other
  13  *      enhancements.
  14  *
  15  *      Modified by Eric Youngdale eric@andante.org to support loadable
  16  *      low-level scsi drivers.
  17  *
  18  *      Modified by Thomas Quinot thomas@melchior.cuivre.fdn.fr to
  19  *      provide auto-eject.
  20  *
  21  *      Modified by Gerd Knorr <kraxel@cs.tu-berlin.de> to support the
  22  *      generic cdrom interface
  23  *
  24  *      Modified by Jens Axboe <axboe@suse.de> - Uniform sr_packet()
  25  *      interface, capabilities probe additions, ioctl cleanups, etc.
  26  *
  27  *      Modified by Richard Gooch <rgooch@atnf.csiro.au> to support devfs
  28  *
  29  *      Modified by Jens Axboe <axboe@suse.de> - support DVD-RAM
  30  *      transparently and lose the GHOST hack
  31  *
  32  *      Modified by Arnaldo Carvalho de Melo <acme@conectiva.com.br>
  33  *      check resource allocation in sr_init and some cleanups
  34  */
  35
  36 #include <linux/module.h>
  37 #include <linux/fs.h>
  38 #include <linux/kernel.h>
  39 #include <linux/mm.h>
  40 #include <linux/bio.h>
  41 #include <linux/compat.h>
  42 #include <linux/string.h>
  43 #include <linux/errno.h>
  44 #include <linux/cdrom.h>
  45 #include <linux/interrupt.h>
  46 #include <linux/init.h>
  47 #include <linux/blkdev.h>
  48 #include <linux/blk-pm.h>
  49 #include <linux/mutex.h>
  50 #include <linux/slab.h>
  51 #include <linux/pm_runtime.h>
  52 #include <linux/uaccess.h>
  53
  54 #include <asm/unaligned.h>
  55
  56 #include <scsi/scsi.h>
  57 #include <scsi/scsi_dbg.h>
  58 #include <scsi/scsi_device.h>
  59 #include <scsi/scsi_driver.h>
  60 #include <scsi/scsi_cmnd.h>
  61 #include <scsi/scsi_eh.h>
  62 #include <scsi/scsi_host.h>
  63 #include <scsi/scsi_ioctl.h>    /* For the door lock/unlock commands */
  64
  65 #include "scsi_logging.h"
  66 #include "sr.h"
  67
  68
  69 MODULE_DESCRIPTION("SCSI cdrom (sr) driver");
  70 MODULE_LICENSE("GPL");
  71 MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_CDROM_MAJOR);
  72 MODULE_ALIAS_SCSI_DEVICE(TYPE_ROM);
  73 MODULE_ALIAS_SCSI_DEVICE(TYPE_WORM);
  74
  75 #define SR_DISKS        256
  76
  77 #define SR_CAPABILITIES \
  78         (CDC_CLOSE_TRAY|CDC_OPEN_TRAY|CDC_LOCK|CDC_SELECT_SPEED| \
  79          CDC_SELECT_DISC|CDC_MULTI_SESSION|CDC_MCN|CDC_MEDIA_CHANGED| \
  80          CDC_PLAY_AUDIO|CDC_RESET|CDC_DRIVE_STATUS| \
  81          CDC_CD_R|CDC_CD_RW|CDC_DVD|CDC_DVD_R|CDC_DVD_RAM|CDC_GENERIC_PACKET| \
  82          CDC_MRW|CDC_MRW_W|CDC_RAM)
  83
  84 static int sr_probe(struct device *);
  85 static int sr_remove(struct device *);
  86 static blk_status_t sr_init_command(struct scsi_cmnd *SCpnt);
  87 static int sr_done(struct scsi_cmnd *);
  88 static int sr_runtime_suspend(struct device *dev);
  89
  90 static const struct dev_pm_ops sr_pm_ops = {
  91         .runtime_suspend        = sr_runtime_suspend,
  92 };
  93
  94 static struct scsi_driver sr_template = {
  95         .gendrv = {
  96                 .name           = "sr",
  97                 .owner          = THIS_MODULE,
  98                 .probe          = sr_probe,
  99                 .remove         = sr_remove,
 100                 .pm             = &sr_pm_ops,
 101         },
 102         .init_command           = sr_init_command,
 103         .done                   = sr_done,
 104 };
 105
 106 static unsigned long sr_index_bits[SR_DISKS / BITS_PER_LONG];
 107 static DEFINE_SPINLOCK(sr_index_lock);
 108
 109 /* This semaphore is used to mediate the 0->1 reference get in the
 110  * face of object destruction (i.e. we can't allow a get on an
 111  * object after last put) */
 112 static DEFINE_MUTEX(sr_ref_mutex);
 113
 114 static int sr_open(struct cdrom_device_info *, int);
 115 static void sr_release(struct cdrom_device_info *);
 116
 117 static void get_sectorsize(struct scsi_cd *);
 118 static void get_capabilities(struct scsi_cd *);
 119
 120 static unsigned int sr_check_events(struct cdrom_device_info *cdi,
 121                                     unsigned int clearing, int slot);
 122 static int sr_packet(struct cdrom_device_info *, struct packet_command *);
 123
 124 static const struct cdrom_device_ops sr_dops = {
 125         .open                   = sr_open,
 126         .release                = sr_release,
 127         .drive_status           = sr_drive_status,
 128         .check_events           = sr_check_events,
 129         .tray_move              = sr_tray_move,
 130         .lock_door              = sr_lock_door,
 131         .select_speed           = sr_select_speed,
 132         .get_last_session       = sr_get_last_session,
 133         .get_mcn                = sr_get_mcn,
 134         .reset                  = sr_reset,
 135         .audio_ioctl            = sr_audio_ioctl,
 136         .capability             = SR_CAPABILITIES,
 137         .generic_packet         = sr_packet,
 138 };
 139
 140 static void sr_kref_release(struct kref *kref);
 141
 142 static inline struct scsi_cd *scsi_cd(struct gendisk *disk)
 143 {
 144         return container_of(disk->private_data, struct scsi_cd, driver);
 145 }
 146
 147 static int sr_runtime_suspend(struct device *dev)
 148 {
 149         struct scsi_cd *cd = dev_get_drvdata(dev);
 150
 151         if (!cd)        /* E.g.: runtime suspend following sr_remove() */
 152                 return 0;
 153
 154         if (cd->media_present)
 155                 return -EBUSY;
 156         else
 157                 return 0;
 158 }
 159
 160 /*
 161  * The get and put routines for the struct scsi_cd.  Note this entity
 162  * has a scsi_device pointer and owns a reference to this.
 163  */
 164 static inline struct scsi_cd *scsi_cd_get(struct gendisk *disk)
 165 {
 166         struct scsi_cd *cd = NULL;
 167
 168         mutex_lock(&sr_ref_mutex);
 169         if (disk->private_data == NULL)
 170                 goto out;
 171         cd = scsi_cd(disk);
 172         kref_get(&cd->kref);
 173         if (scsi_device_get(cd->device)) {
 174                 kref_put(&cd->kref, sr_kref_release);
 175                 cd = NULL;
 176         }
 177  out:
 178         mutex_unlock(&sr_ref_mutex);
 179         return cd;
 180 }
 181
 182 static void scsi_cd_put(struct scsi_cd *cd)
 183 {
 184         struct scsi_device *sdev = cd->device;
 185
 186         mutex_lock(&sr_ref_mutex);
 187         kref_put(&cd->kref, sr_kref_release);
 188         scsi_device_put(sdev);
 189         mutex_unlock(&sr_ref_mutex);
 190 }
 191
 192 static unsigned int sr_get_events(struct scsi_device *sdev)
 193 {
 194         u8 buf[8];
 195         u8 cmd[] = { GET_EVENT_STATUS_NOTIFICATION,
 196                      1,                 /* polled */
 197                      0, 0,              /* reserved */
 198                      1 << 4,            /* notification class: media */
 199                      0, 0,              /* reserved */
 200                      0, sizeof(buf),    /* allocation length */
 201                      0,                 /* control */
 202         };
 203         struct event_header *eh = (void *)buf;
 204         struct media_event_desc *med = (void *)(buf + 4);
 205         struct scsi_sense_hdr sshdr;
 206         int result;
 207
 208         result = scsi_execute_req(sdev, cmd, DMA_FROM_DEVICE, buf, sizeof(buf),
 209                                   &sshdr, SR_TIMEOUT, MAX_RETRIES, NULL);
 210         if (scsi_sense_valid(&sshdr) && sshdr.sense_key == UNIT_ATTENTION)
 211                 return DISK_EVENT_MEDIA_CHANGE;
 212
 213         if (result || be16_to_cpu(eh->data_len) < sizeof(*med))
 214                 return 0;
 215
 216         if (eh->nea || eh->notification_class != 0x4)
 217                 return 0;
 218
 219         if (med->media_event_code == 1)
 220                 return DISK_EVENT_EJECT_REQUEST;
 221         else if (med->media_event_code == 2)
 222                 return DISK_EVENT_MEDIA_CHANGE;
 223         return 0;
 224 }
 225
 226 /*
 227  * This function checks to see if the media has been changed or eject
 228  * button has been pressed.  It is possible that we have already
 229  * sensed a change, or the drive may have sensed one and not yet
 230  * reported it.  The past events are accumulated in sdev->changed and
 231  * returned together with the current state.
 232  */
 233 static unsigned int sr_check_events(struct cdrom_device_info *cdi,
 234                                     unsigned int clearing, int slot)
 235 {
 236         struct scsi_cd *cd = cdi->handle;
 237         bool last_present;
 238         struct scsi_sense_hdr sshdr;
 239         unsigned int events;
 240         int ret;
 241
 242         /* no changer support */
 243         if (CDSL_CURRENT != slot)
 244                 return 0;
 245
 246         events = sr_get_events(cd->device);
 247         cd->get_event_changed |= events & DISK_EVENT_MEDIA_CHANGE;
 248
 249         /*
 250          * If earlier GET_EVENT_STATUS_NOTIFICATION and TUR did not agree
 251          * for several times in a row.  We rely on TUR only for this likely
 252          * broken device, to prevent generating incorrect media changed
 253          * events for every open().
 254          */
 255         if (cd->ignore_get_event) {
 256                 events &= ~DISK_EVENT_MEDIA_CHANGE;
 257                 goto do_tur;
 258         }
 259
 260         /*
 261          * GET_EVENT_STATUS_NOTIFICATION is enough unless MEDIA_CHANGE
 262          * is being cleared.  Note that there are devices which hang
 263          * if asked to execute TUR repeatedly.
 264          */
 265         if (cd->device->changed) {
 266                 events |= DISK_EVENT_MEDIA_CHANGE;
 267                 cd->device->changed = 0;
 268                 cd->tur_changed = true;
 269         }
 270
 271         if (!(clearing & DISK_EVENT_MEDIA_CHANGE))
 272                 return events;
 273 do_tur:
 274         /* let's see whether the media is there with TUR */
 275         last_present = cd->media_present;
 276         ret = scsi_test_unit_ready(cd->device, SR_TIMEOUT, MAX_RETRIES, &sshdr);
 277
 278         /*
 279          * Media is considered to be present if TUR succeeds or fails with
 280          * sense data indicating something other than media-not-present
 281          * (ASC 0x3a).
 282          */
 283         cd->media_present = scsi_status_is_good(ret) ||
 284                 (scsi_sense_valid(&sshdr) && sshdr.asc != 0x3a);
 285
 286         if (last_present != cd->media_present)
 287                 cd->device->changed = 1;
 288
 289         if (cd->device->changed) {
 290                 events |= DISK_EVENT_MEDIA_CHANGE;
 291                 cd->device->changed = 0;
 292                 cd->tur_changed = true;
 293         }
 294
 295         if (cd->ignore_get_event)
 296                 return events;
 297
 298         /* check whether GET_EVENT is reporting spurious MEDIA_CHANGE */
 299         if (!cd->tur_changed) {
 300                 if (cd->get_event_changed) {
 301                         if (cd->tur_mismatch++ > 8) {
 302                                 sr_printk(KERN_WARNING, cd,
 303                                           "GET_EVENT and TUR disagree continuously, suppress GET_EVENT events\n");
 304                                 cd->ignore_get_event = true;
 305                         }
 306                 } else {
 307                         cd->tur_mismatch = 0;
 308                 }
 309         }
 310         cd->tur_changed = false;
 311         cd->get_event_changed = false;
 312
 313         return events;
 314 }
 315
 316 /*
 317  * sr_done is the interrupt routine for the device driver.
 318  *
 319  * It will be notified on the end of a SCSI read / write, and will take one
 320  * of several actions based on success or failure.
 321  */
 322 static int sr_done(struct scsi_cmnd *SCpnt)
 323 {
 324         int result = SCpnt->result;
 325         int this_count = scsi_bufflen(SCpnt);
 326         int good_bytes = (result == 0 ? this_count : 0);
 327         int block_sectors = 0;
 328         long error_sector;
 329         struct scsi_cd *cd = scsi_cd(SCpnt->request->rq_disk);
 330
 331 #ifdef DEBUG
 332         scmd_printk(KERN_INFO, SCpnt, "done: %x\n", result);
 333 #endif
 334
 335         /*
 336          * Handle MEDIUM ERRORs or VOLUME OVERFLOWs that indicate partial
 337          * success.  Since this is a relatively rare error condition, no
 338          * care is taken to avoid unnecessary additional work such as
 339          * memcpy's that could be avoided.
 340          */
 341         if (driver_byte(result) != 0 &&         /* An error occurred */
 342             (SCpnt->sense_buffer[0] & 0x7f) == 0x70) { /* Sense current */
 343                 switch (SCpnt->sense_buffer[2]) {
 344                 case MEDIUM_ERROR:
 345                 case VOLUME_OVERFLOW:
 346                 case ILLEGAL_REQUEST:
 347                         if (!(SCpnt->sense_buffer[0] & 0x90))
 348                                 break;
 349                         error_sector =
 350                                 get_unaligned_be32(&SCpnt->sense_buffer[3]);
 351                         if (SCpnt->request->bio != NULL)
 352                                 block_sectors =
 353                                         bio_sectors(SCpnt->request->bio);
 354                         if (block_sectors < 4)
 355                                 block_sectors = 4;
 356                         if (cd->device->sector_size == 2048)
 357                                 error_sector <<= 2;
 358                         error_sector &= ~(block_sectors - 1);
 359                         good_bytes = (error_sector -
 360                                       blk_rq_pos(SCpnt->request)) << 9;
 361                         if (good_bytes < 0 || good_bytes >= this_count)
 362                                 good_bytes = 0;
 363                         /*
 364                          * The SCSI specification allows for the value
 365                          * returned by READ CAPACITY to be up to 75 2K
 366                          * sectors past the last readable block.
 367                          * Therefore, if we hit a medium error within the
 368                          * last 75 2K sectors, we decrease the saved size
 369                          * value.
 370                          */
 371                         if (error_sector < get_capacity(cd->disk) &&
 372                             cd->capacity - error_sector < 4 * 75)
 373                                 set_capacity(cd->disk, error_sector);
 374                         break;
 375
 376                 case RECOVERED_ERROR:
 377                         good_bytes = this_count;
 378                         break;
 379
 380                 default:
 381                         break;
 382                 }
 383         }
 384
 385         return good_bytes;
 386 }
 387
 388 static blk_status_t sr_init_command(struct scsi_cmnd *SCpnt)
 389 {
 390         int block = 0, this_count, s_size;
 391         struct scsi_cd *cd;
 392         struct request *rq = SCpnt->request;
 393         blk_status_t ret;
 394
 395         ret = scsi_init_io(SCpnt);
 396         if (ret != BLK_STS_OK)
 397                 goto out;
 398         cd = scsi_cd(rq->rq_disk);
 399
 400         /* from here on until we're complete, any goto out
 401          * is used for a killable error condition */
 402         ret = BLK_STS_IOERR;
 403
 404         SCSI_LOG_HLQUEUE(1, scmd_printk(KERN_INFO, SCpnt,
 405                 "Doing sr request, block = %d\n", block));
 406
 407         if (!cd->device || !scsi_device_online(cd->device)) {
 408                 SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
 409                         "Finishing %u sectors\n", blk_rq_sectors(rq)));
 410                 SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
 411                         "Retry with 0x%p\n", SCpnt));
 412                 goto out;
 413         }
 414
 415         if (cd->device->changed) {
 416                 /*
 417                  * quietly refuse to do anything to a changed disc until the
 418                  * changed bit has been reset
 419                  */
 420                 goto out;
 421         }
 422
 423         /*
 424          * we do lazy blocksize switching (when reading XA sectors,
 425          * see CDROMREADMODE2 ioctl)
 426          */
 427         s_size = cd->device->sector_size;
 428         if (s_size > 2048) {
 429                 if (!in_interrupt())
 430                         sr_set_blocklength(cd, 2048);
 431                 else
 432                         scmd_printk(KERN_INFO, SCpnt,
 433                                     "can't switch blocksize: in interrupt\n");
 434         }
 435
 436         if (s_size != 512 && s_size != 1024 && s_size != 2048) {
 437                 scmd_printk(KERN_ERR, SCpnt, "bad sector size %d\n", s_size);
 438                 goto out;
 439         }
 440
 441         switch (req_op(rq)) {
 442         case REQ_OP_WRITE:
 443                 if (!cd->writeable)
 444                         goto out;
 445                 SCpnt->cmnd[0] = WRITE_10;
 446                 cd->cdi.media_written = 1;
 447                 break;
 448         case REQ_OP_READ:
 449                 SCpnt->cmnd[0] = READ_10;
 450                 break;
 451         default:
 452                 blk_dump_rq_flags(rq, "Unknown sr command");
 453                 goto out;
 454         }
 455
 456         {
 457                 struct scatterlist *sg;
 458                 int i, size = 0, sg_count = scsi_sg_count(SCpnt);
 459
 460                 scsi_for_each_sg(SCpnt, sg, sg_count, i)
 461                         size += sg->length;
 462
 463                 if (size != scsi_bufflen(SCpnt)) {
 464                         scmd_printk(KERN_ERR, SCpnt,
 465                                 "mismatch count %d, bytes %d\n",
 466                                 size, scsi_bufflen(SCpnt));
 467                         if (scsi_bufflen(SCpnt) > size)
 468                                 SCpnt->sdb.length = size;
 469                 }
 470         }
 471
 472         /*
 473          * request doesn't start on hw block boundary, add scatter pads
 474          */
 475         if (((unsigned int)blk_rq_pos(rq) % (s_size >> 9)) ||
 476             (scsi_bufflen(SCpnt) % s_size)) {
 477                 scmd_printk(KERN_NOTICE, SCpnt, "unaligned transfer\n");
 478                 goto out;
 479         }
 480
 481         this_count = (scsi_bufflen(SCpnt) >> 9) / (s_size >> 9);
 482
 483
 484         SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
 485                                         "%s %d/%u 512 byte blocks.\n",
 486                                         (rq_data_dir(rq) == WRITE) ?
 487                                         "writing" : "reading",
 488                                         this_count, blk_rq_sectors(rq)));
 489
 490         SCpnt->cmnd[1] = 0;
 491         block = (unsigned int)blk_rq_pos(rq) / (s_size >> 9);
 492
 493         if (this_count > 0xffff) {
 494                 this_count = 0xffff;
 495                 SCpnt->sdb.length = this_count * s_size;
 496         }
 497
 498         put_unaligned_be32(block, &SCpnt->cmnd[2]);
 499         SCpnt->cmnd[6] = SCpnt->cmnd[9] = 0;
 500         put_unaligned_be16(this_count, &SCpnt->cmnd[7]);
 501
 502         /*
 503          * We shouldn't disconnect in the middle of a sector, so with a dumb
 504          * host adapter, it's safe to assume that we can at least transfer
 505          * this many bytes between each connect / disconnect.
 506          */
 507         SCpnt->transfersize = cd->device->sector_size;
 508         SCpnt->underflow = this_count << 9;
 509         SCpnt->allowed = MAX_RETRIES;
 510
 511         /*
 512          * This indicates that the command is ready from our end to be
 513          * queued.
 514          */
 515         ret = BLK_STS_OK;
 516  out:
 517         return ret;
 518 }
 519
 520 static void sr_revalidate_disk(struct scsi_cd *cd)
 521 {
 522         struct scsi_sense_hdr sshdr;
 523
 524         /* if the unit is not ready, nothing more to do */
 525         if (scsi_test_unit_ready(cd->device, SR_TIMEOUT, MAX_RETRIES, &sshdr))
 526                 return;
 527         sr_cd_check(&cd->cdi);
 528         get_sectorsize(cd);
 529 }
 530
 531 static int sr_block_open(struct block_device *bdev, fmode_t mode)
 532 {
 533         struct scsi_cd *cd;
 534         struct scsi_device *sdev;
 535         int ret = -ENXIO;
 536
 537         cd = scsi_cd_get(bdev->bd_disk);
 538         if (!cd)
 539                 goto out;
 540
 541         sdev = cd->device;
 542         scsi_autopm_get_device(sdev);
 543         if (bdev_check_media_change(bdev))
 544                 sr_revalidate_disk(cd);
 545
 546         mutex_lock(&cd->lock);
 547         ret = cdrom_open(&cd->cdi, bdev, mode);
 548         mutex_unlock(&cd->lock);
 549
 550         scsi_autopm_put_device(sdev);
 551         if (ret)
 552                 scsi_cd_put(cd);
 553
 554 out:
 555         return ret;
 556 }
 557
 558 static void sr_block_release(struct gendisk *disk, fmode_t mode)
 559 {
 560         struct scsi_cd *cd = scsi_cd(disk);
 561
 562         mutex_lock(&cd->lock);
 563         cdrom_release(&cd->cdi, mode);
 564         mutex_unlock(&cd->lock);
 565
 566         scsi_cd_put(cd);
 567 }
 568
 569 static int sr_block_ioctl(struct block_device *bdev, fmode_t mode, unsigned cmd,
 570                           unsigned long arg)
 571 {
 572         struct scsi_cd *cd = scsi_cd(bdev->bd_disk);
 573         struct scsi_device *sdev = cd->device;
 574         void __user *argp = (void __user *)arg;
 575         int ret;
 576
 577         mutex_lock(&cd->lock);
 578
 579         ret = scsi_ioctl_block_when_processing_errors(sdev, cmd,
 580                         (mode & FMODE_NDELAY) != 0);
 581         if (ret)
 582                 goto out;
 583
 584         scsi_autopm_get_device(sdev);
 585
 586         /*
 587          * Send SCSI addressing ioctls directly to mid level, send other
 588          * ioctls to cdrom/block level.
 589          */
 590         switch (cmd) {
 591         case SCSI_IOCTL_GET_IDLUN:
 592         case SCSI_IOCTL_GET_BUS_NUMBER:
 593                 ret = scsi_ioctl(sdev, cmd, argp);
 594                 goto put;
 595         }
 596
 597         ret = cdrom_ioctl(&cd->cdi, bdev, mode, cmd, arg);
 598         if (ret != -ENOSYS)
 599                 goto put;
 600
 601         ret = scsi_ioctl(sdev, cmd, argp);
 602
 603 put:
 604         scsi_autopm_put_device(sdev);
 605
 606 out:
 607         mutex_unlock(&cd->lock);
 608         return ret;
 609 }
 610
 611 #ifdef CONFIG_COMPAT
 612 static int sr_block_compat_ioctl(struct block_device *bdev, fmode_t mode, unsigned cmd,
 613                           unsigned long arg)
 614 {
 615         struct scsi_cd *cd = scsi_cd(bdev->bd_disk);
 616         struct scsi_device *sdev = cd->device;
 617         void __user *argp = compat_ptr(arg);
 618         int ret;
 619
 620         mutex_lock(&cd->lock);
 621
 622         ret = scsi_ioctl_block_when_processing_errors(sdev, cmd,
 623                         (mode & FMODE_NDELAY) != 0);
 624         if (ret)
 625                 goto out;
 626
 627         scsi_autopm_get_device(sdev);
 628
 629         /*
 630          * Send SCSI addressing ioctls directly to mid level, send other
 631          * ioctls to cdrom/block level.
 632          */
 633         switch (cmd) {
 634         case SCSI_IOCTL_GET_IDLUN:
 635         case SCSI_IOCTL_GET_BUS_NUMBER:
 636                 ret = scsi_compat_ioctl(sdev, cmd, argp);
 637                 goto put;
 638         }
 639
 640         ret = cdrom_ioctl(&cd->cdi, bdev, mode, cmd, (unsigned long)argp);
 641         if (ret != -ENOSYS)
 642                 goto put;
 643
 644         ret = scsi_compat_ioctl(sdev, cmd, argp);
 645
 646 put:
 647         scsi_autopm_put_device(sdev);
 648
 649 out:
 650         mutex_unlock(&cd->lock);
 651         return ret;
 652
 653 }
 654 #endif
 655
 656 static unsigned int sr_block_check_events(struct gendisk *disk,
 657                                           unsigned int clearing)
 658 {
 659         unsigned int ret = 0;
 660         struct scsi_cd *cd;
 661
 662         cd = scsi_cd_get(disk);
 663         if (!cd)
 664                 return 0;
 665
 666         if (!atomic_read(&cd->device->disk_events_disable_depth))
 667                 ret = cdrom_check_events(&cd->cdi, clearing);
 668
 669         scsi_cd_put(cd);
 670         return ret;
 671 }
 672
 673 static const struct block_device_operations sr_bdops =
 674 {
 675         .owner          = THIS_MODULE,
 676         .open           = sr_block_open,
 677         .release        = sr_block_release,
 678         .ioctl          = sr_block_ioctl,
 679 #ifdef CONFIG_COMPAT
 680         .compat_ioctl   = sr_block_compat_ioctl,
 681 #endif
 682         .check_events   = sr_block_check_events,
 683 };
 684
 685 static int sr_open(struct cdrom_device_info *cdi, int purpose)
 686 {
 687         struct scsi_cd *cd = cdi->handle;
 688         struct scsi_device *sdev = cd->device;
 689         int retval;
 690
 691         /*
 692          * If the device is in error recovery, wait until it is done.
 693          * If the device is offline, then disallow any access to it.
 694          */
 695         retval = -ENXIO;
 696         if (!scsi_block_when_processing_errors(sdev))
 697                 goto error_out;
 698
 699         return 0;
 700
 701 error_out:
 702         return retval;
 703 }
 704
 705 static void sr_release(struct cdrom_device_info *cdi)
 706 {
 707         struct scsi_cd *cd = cdi->handle;
 708
 709         if (cd->device->sector_size > 2048)
 710                 sr_set_blocklength(cd, 2048);
 711
 712 }
 713
 714 static int sr_probe(struct device *dev)
 715 {
 716         struct scsi_device *sdev = to_scsi_device(dev);
 717         struct gendisk *disk;
 718         struct scsi_cd *cd;
 719         int minor, error;
 720
 721         scsi_autopm_get_device(sdev);
 722         error = -ENODEV;
 723         if (sdev->type != TYPE_ROM && sdev->type != TYPE_WORM)
 724                 goto fail;
 725
 726         error = -ENOMEM;
 727         cd = kzalloc(sizeof(*cd), GFP_KERNEL);
 728         if (!cd)
 729                 goto fail;
 730
 731         kref_init(&cd->kref);
 732
 733         disk = alloc_disk(1);
 734         if (!disk)
 735                 goto fail_free;
 736         mutex_init(&cd->lock);
 737
 738         spin_lock(&sr_index_lock);
 739         minor = find_first_zero_bit(sr_index_bits, SR_DISKS);
 740         if (minor == SR_DISKS) {
 741                 spin_unlock(&sr_index_lock);
 742                 error = -EBUSY;
 743                 goto fail_put;
 744         }
 745         __set_bit(minor, sr_index_bits);
 746         spin_unlock(&sr_index_lock);
 747
 748         disk->major = SCSI_CDROM_MAJOR;
 749         disk->first_minor = minor;
 750         sprintf(disk->disk_name, "sr%d", minor);
 751         disk->fops = &sr_bdops;
 752         disk->flags = GENHD_FL_CD | GENHD_FL_BLOCK_EVENTS_ON_EXCL_WRITE;
 753         disk->events = DISK_EVENT_MEDIA_CHANGE | DISK_EVENT_EJECT_REQUEST;
 754         disk->event_flags = DISK_EVENT_FLAG_POLL | DISK_EVENT_FLAG_UEVENT;
 755
 756         blk_queue_rq_timeout(sdev->request_queue, SR_TIMEOUT);
 757
 758         cd->device = sdev;
 759         cd->disk = disk;
 760         cd->driver = &sr_template;
 761         cd->disk = disk;
 762         cd->capacity = 0x1fffff;
 763         cd->device->changed = 1;        /* force recheck CD type */
 764         cd->media_present = 1;
 765         cd->use = 1;
 766         cd->readcd_known = 0;
 767         cd->readcd_cdda = 0;
 768
 769         cd->cdi.ops = &sr_dops;
 770         cd->cdi.handle = cd;
 771         cd->cdi.mask = 0;
 772         cd->cdi.capacity = 1;
 773         sprintf(cd->cdi.name, "sr%d", minor);
 774
 775         sdev->sector_size = 2048;       /* A guess, just in case */
 776
 777         /* FIXME: need to handle a get_capabilities failure properly ?? */
 778         get_capabilities(cd);
 779         sr_vendor_init(cd);
 780
 781         set_capacity(disk, cd->capacity);
 782         disk->private_data = &cd->driver;
 783         disk->queue = sdev->request_queue;
 784
 785         if (register_cdrom(disk, &cd->cdi))
 786                 goto fail_minor;
 787
 788         /*
 789          * Initialize block layer runtime PM stuffs before the
 790          * periodic event checking request gets started in add_disk.
 791          */
 792         blk_pm_runtime_init(sdev->request_queue, dev);
 793
 794         dev_set_drvdata(dev, cd);
 795         disk->flags |= GENHD_FL_REMOVABLE;
 796         sr_revalidate_disk(cd);
 797         device_add_disk(&sdev->sdev_gendev, disk, NULL);
 798
 799         sdev_printk(KERN_DEBUG, sdev,
 800                     "Attached scsi CD-ROM %s\n", cd->cdi.name);
 801         scsi_autopm_put_device(cd->device);
 802
 803         return 0;
 804
 805 fail_minor:
 806         spin_lock(&sr_index_lock);
 807         clear_bit(minor, sr_index_bits);
 808         spin_unlock(&sr_index_lock);
 809 fail_put:
 810         put_disk(disk);
 811         mutex_destroy(&cd->lock);
 812 fail_free:
 813         kfree(cd);
 814 fail:
 815         scsi_autopm_put_device(sdev);
 816         return error;
 817 }
 818
 819
 820 static void get_sectorsize(struct scsi_cd *cd)
 821 {
 822         unsigned char cmd[10];
 823         unsigned char buffer[8];
 824         int the_result, retries = 3;
 825         int sector_size;
 826         struct request_queue *queue;
 827
 828         do {
 829                 cmd[0] = READ_CAPACITY;
 830                 memset((void *) &cmd[1], 0, 9);
 831                 memset(buffer, 0, sizeof(buffer));
 832
 833                 /* Do the command and wait.. */
 834                 the_result = scsi_execute_req(cd->device, cmd, DMA_FROM_DEVICE,
 835                                               buffer, sizeof(buffer), NULL,
 836                                               SR_TIMEOUT, MAX_RETRIES, NULL);
 837
 838                 retries--;
 839
 840         } while (the_result && retries);
 841
 842
 843         if (the_result) {
 844                 cd->capacity = 0x1fffff;
 845                 sector_size = 2048;     /* A guess, just in case */
 846         } else {
 847                 long last_written;
 848
 849                 cd->capacity = 1 + get_unaligned_be32(&buffer[0]);
 850                 /*
 851                  * READ_CAPACITY doesn't return the correct size on
 852                  * certain UDF media.  If last_written is larger, use
 853                  * it instead.
 854                  *
 855                  * http://bugzilla.kernel.org/show_bug.cgi?id=9668
 856                  */
 857                 if (!cdrom_get_last_written(&cd->cdi, &last_written))
 858                         cd->capacity = max_t(long, cd->capacity, last_written);
 859
 860                 sector_size = get_unaligned_be32(&buffer[4]);
 861                 switch (sector_size) {
 862                         /*
 863                          * HP 4020i CD-Recorder reports 2340 byte sectors
 864                          * Philips CD-Writers report 2352 byte sectors
 865                          *
 866                          * Use 2k sectors for them..
 867                          */
 868                 case 0:
 869                 case 2340:
 870                 case 2352:
 871                         sector_size = 2048;
 872                         fallthrough;
 873                 case 2048:
 874                         cd->capacity *= 4;
 875                         fallthrough;
 876                 case 512:
 877                         break;
 878                 default:
 879                         sr_printk(KERN_INFO, cd,
 880                                   "unsupported sector size %d.", sector_size);
 881                         cd->capacity = 0;
 882                 }
 883
 884                 cd->device->sector_size = sector_size;
 885
 886                 /*
 887                  * Add this so that we have the ability to correctly gauge
 888                  * what the device is capable of.
 889                  */
 890                 set_capacity(cd->disk, cd->capacity);
 891         }
 892
 893         queue = cd->device->request_queue;
 894         blk_queue_logical_block_size(queue, sector_size);
 895
 896         return;
 897 }
 898
 899 static void get_capabilities(struct scsi_cd *cd)
 900 {
 901         unsigned char *buffer;
 902         struct scsi_mode_data data;
 903         struct scsi_sense_hdr sshdr;
 904         unsigned int ms_len = 128;
 905         int rc, n;
 906
 907         static const char *loadmech[] =
 908         {
 909                 "caddy",
 910                 "tray",
 911                 "pop-up",
 912                 "",
 913                 "changer",
 914                 "cartridge changer",
 915                 "",
 916                 ""
 917         };
 918
 919
 920         /* allocate transfer buffer */
 921         buffer = kmalloc(512, GFP_KERNEL | GFP_DMA);
 922         if (!buffer) {
 923                 sr_printk(KERN_ERR, cd, "out of memory.\n");
 924                 return;
 925         }
 926
 927         /* eat unit attentions */
 928         scsi_test_unit_ready(cd->device, SR_TIMEOUT, MAX_RETRIES, &sshdr);
 929
 930         /* ask for mode page 0x2a */
 931         rc = scsi_mode_sense(cd->device, 0, 0x2a, buffer, ms_len,
 932                              SR_TIMEOUT, 3, &data, NULL);
 933
 934         if (!scsi_status_is_good(rc) || data.length > ms_len ||
 935             data.header_length + data.block_descriptor_length > data.length) {
 936                 /* failed, drive doesn't have capabilities mode page */
 937                 cd->cdi.speed = 1;
 938                 cd->cdi.mask |= (CDC_CD_R | CDC_CD_RW | CDC_DVD_R |
 939                                  CDC_DVD | CDC_DVD_RAM |
 940                                  CDC_SELECT_DISC | CDC_SELECT_SPEED |
 941                                  CDC_MRW | CDC_MRW_W | CDC_RAM);
 942                 kfree(buffer);
 943                 sr_printk(KERN_INFO, cd, "scsi-1 drive");
 944                 return;
 945         }
 946
 947         n = data.header_length + data.block_descriptor_length;
 948         cd->cdi.speed = get_unaligned_be16(&buffer[n + 8]) / 176;
 949         cd->readcd_known = 1;
 950         cd->readcd_cdda = buffer[n + 5] & 0x01;
 951         /* print some capability bits */
 952         sr_printk(KERN_INFO, cd,
 953                   "scsi3-mmc drive: %dx/%dx %s%s%s%s%s%s\n",
 954                   get_unaligned_be16(&buffer[n + 14]) / 176,
 955                   cd->cdi.speed,
 956                   buffer[n + 3] & 0x01 ? "writer " : "", /* CD Writer */
 957                   buffer[n + 3] & 0x20 ? "dvd-ram " : "",
 958                   buffer[n + 2] & 0x02 ? "cd/rw " : "", /* can read rewriteable */
 959                   buffer[n + 4] & 0x20 ? "xa/form2 " : "",      /* can read xa/from2 */
 960                   buffer[n + 5] & 0x01 ? "cdda " : "", /* can read audio data */
 961                   loadmech[buffer[n + 6] >> 5]);
 962         if ((buffer[n + 6] >> 5) == 0)
 963                 /* caddy drives can't close tray... */
 964                 cd->cdi.mask |= CDC_CLOSE_TRAY;
 965         if ((buffer[n + 2] & 0x8) == 0)
 966                 /* not a DVD drive */
 967                 cd->cdi.mask |= CDC_DVD;
 968         if ((buffer[n + 3] & 0x20) == 0)
 969                 /* can't write DVD-RAM media */
 970                 cd->cdi.mask |= CDC_DVD_RAM;
 971         if ((buffer[n + 3] & 0x10) == 0)
 972                 /* can't write DVD-R media */
 973                 cd->cdi.mask |= CDC_DVD_R;
 974         if ((buffer[n + 3] & 0x2) == 0)
 975                 /* can't write CD-RW media */
 976                 cd->cdi.mask |= CDC_CD_RW;
 977         if ((buffer[n + 3] & 0x1) == 0)
 978                 /* can't write CD-R media */
 979                 cd->cdi.mask |= CDC_CD_R;
 980         if ((buffer[n + 6] & 0x8) == 0)
 981                 /* can't eject */
 982                 cd->cdi.mask |= CDC_OPEN_TRAY;
 983
 984         if ((buffer[n + 6] >> 5) == mechtype_individual_changer ||
 985             (buffer[n + 6] >> 5) == mechtype_cartridge_changer)
 986                 cd->cdi.capacity =
 987                     cdrom_number_of_slots(&cd->cdi);
 988         if (cd->cdi.capacity <= 1)
 989                 /* not a changer */
 990                 cd->cdi.mask |= CDC_SELECT_DISC;
 991         /*else    I don't think it can close its tray
 992                 cd->cdi.mask |= CDC_CLOSE_TRAY; */
 993
 994         /*
 995          * if DVD-RAM, MRW-W or CD-RW, we are randomly writable
 996          */
 997         if ((cd->cdi.mask & (CDC_DVD_RAM | CDC_MRW_W | CDC_RAM | CDC_CD_RW)) !=
 998                         (CDC_DVD_RAM | CDC_MRW_W | CDC_RAM | CDC_CD_RW)) {
 999                 cd->writeable = 1;
1000         }
1001
1002         kfree(buffer);
1003 }
1004
1005 /*
1006  * sr_packet() is the entry point for the generic commands generated
1007  * by the Uniform CD-ROM layer.
1008  */
1009 static int sr_packet(struct cdrom_device_info *cdi,
1010                 struct packet_command *cgc)
1011 {
1012         struct scsi_cd *cd = cdi->handle;
1013         struct scsi_device *sdev = cd->device;
1014
1015         if (cgc->cmd[0] == GPCMD_READ_DISC_INFO && sdev->no_read_disc_info)
1016                 return -EDRIVE_CANT_DO_THIS;
1017
1018         if (cgc->timeout <= 0)
1019                 cgc->timeout = IOCTL_TIMEOUT;
1020
1021         sr_do_ioctl(cd, cgc);
1022
1023         return cgc->stat;
1024 }
1025
1026 /**
1027  *      sr_kref_release - Called to free the scsi_cd structure
1028  *      @kref: pointer to embedded kref
1029  *
1030  *      sr_ref_mutex must be held entering this routine.  Because it is
1031  *      called on last put, you should always use the scsi_cd_get()
1032  *      scsi_cd_put() helpers which manipulate the semaphore directly
1033  *      and never do a direct kref_put().
1034  **/
1035 static void sr_kref_release(struct kref *kref)
1036 {
1037         struct scsi_cd *cd = container_of(kref, struct scsi_cd, kref);
1038         struct gendisk *disk = cd->disk;
1039
1040         spin_lock(&sr_index_lock);
1041         clear_bit(MINOR(disk_devt(disk)), sr_index_bits);
1042         spin_unlock(&sr_index_lock);
1043
1044         unregister_cdrom(&cd->cdi);
1045
1046         disk->private_data = NULL;
1047
1048         put_disk(disk);
1049
1050         mutex_destroy(&cd->lock);
1051
1052         kfree(cd);
1053 }
1054
1055 static int sr_remove(struct device *dev)
1056 {
1057         struct scsi_cd *cd = dev_get_drvdata(dev);
1058
1059         scsi_autopm_get_device(cd->device);
1060
1061         del_gendisk(cd->disk);
1062         dev_set_drvdata(dev, NULL);
1063
1064         mutex_lock(&sr_ref_mutex);
1065         kref_put(&cd->kref, sr_kref_release);
1066         mutex_unlock(&sr_ref_mutex);
1067
1068         return 0;
1069 }
1070
1071 static int __init init_sr(void)
1072 {
1073         int rc;
1074
1075         rc = register_blkdev(SCSI_CDROM_MAJOR, "sr");
1076         if (rc)
1077                 return rc;
1078         rc = scsi_register_driver(&sr_template.gendrv);
1079         if (rc)
1080                 unregister_blkdev(SCSI_CDROM_MAJOR, "sr");
1081
1082         return rc;
1083 }
1084
1085 static void __exit exit_sr(void)
1086 {
1087         scsi_unregister_driver(&sr_template.gendrv);
1088         unregister_blkdev(SCSI_CDROM_MAJOR, "sr");
1089 }
1090
1091 module_init(init_sr);
1092 module_exit(exit_sr);
1093 MODULE_LICENSE("GPL");