1 /* $NetBSD: cd.c,v 1.211 2004/10/28 07:07:45 yamt Exp $ */ 2 3 /*- 4 * Copyright (c) 1998, 2001, 2003, 2004 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Charles M. Hannum. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 /* 40 * Originally written by Julian Elischer (julian@tfs.com) 41 * for TRW Financial Systems for use under the MACH(2.5) operating system. 42 * 43 * TRW Financial Systems, in accordance with their agreement with Carnegie 44 * Mellon University, makes this software available to CMU to distribute 45 * or use in any manner that they see fit as long as this message is kept with 46 * the software. For this reason TFS also grants any other persons or 47 * organisations permission to use or modify this software. 48 * 49 * TFS supplies this software to be publicly redistributed 50 * on the understanding that TFS is not responsible for the correct 51 * functioning of this software in any circumstances. 52 * 53 * Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992 54 */ 55 56 #include <sys/cdefs.h> 57 __KERNEL_RCSID(0, "$NetBSD: cd.c,v 1.211 2004/10/28 07:07:45 yamt Exp $"); 58 59 #include "rnd.h" 60 61 #include <sys/param.h> 62 #include <sys/systm.h> 63 #include <sys/kernel.h> 64 #include <sys/file.h> 65 #include <sys/stat.h> 66 #include <sys/ioctl.h> 67 #include <sys/buf.h> 68 #include <sys/bufq.h> 69 #include <sys/uio.h> 70 #include <sys/malloc.h> 71 #include <sys/errno.h> 72 #include <sys/device.h> 73 #include <sys/disklabel.h> 74 #include <sys/disk.h> 75 #include <sys/cdio.h> 76 #include <sys/dvdio.h> 77 #include <sys/scsiio.h> 78 #include <sys/proc.h> 79 #include <sys/conf.h> 80 #include <sys/vnode.h> 81 #if NRND > 0 82 #include <sys/rnd.h> 83 #endif 84 85 #include <dev/scsipi/scsipi_all.h> 86 #include <dev/scsipi/scsipi_cd.h> 87 #include <dev/scsipi/scsipi_disk.h> /* rw_big and start_stop come */ 88 #include <dev/scsipi/scsi_all.h> 89 /* from there */ 90 #include <dev/scsipi/scsi_disk.h> /* rw comes from there */ 91 #include <dev/scsipi/scsipiconf.h> 92 #include <dev/scsipi/scsipi_base.h> 93 #include <dev/scsipi/cdvar.h> 94 95 #define CDUNIT(z) DISKUNIT(z) 96 #define CDPART(z) DISKPART(z) 97 #define CDMINOR(unit, part) DISKMINOR(unit, part) 98 #define MAKECDDEV(maj, unit, part) MAKEDISKDEV(maj, unit, part) 99 100 #define MAXTRACK 99 101 #define CD_BLOCK_OFFSET 150 102 #define CD_FRAMES 75 103 #define CD_SECS 60 104 105 struct cd_toc { 106 struct ioc_toc_header header; 107 struct cd_toc_entry entries[MAXTRACK+1]; /* One extra for the */ 108 /* leadout */ 109 }; 110 111 static void cdstart(struct scsipi_periph *); 112 static void cdrestart(void *); 113 static void cdminphys(struct buf *); 114 static void cdgetdefaultlabel(struct cd_softc *, struct disklabel *); 115 static void cdgetdisklabel(struct cd_softc *); 116 static void cddone(struct scsipi_xfer *, int); 117 static void cdbounce(struct buf *); 118 static int cd_interpret_sense(struct scsipi_xfer *); 119 static u_long cd_size(struct cd_softc *, int); 120 static int cd_play(struct cd_softc *, int, int); 121 static int cd_play_tracks(struct cd_softc *, int, int, int, int); 122 static int cd_play_msf(struct cd_softc *, int, int, int, int, int, int); 123 static int cd_pause(struct cd_softc *, int); 124 static int cd_reset(struct cd_softc *); 125 static int cd_read_subchannel(struct cd_softc *, int, int, int, 126 struct cd_sub_channel_info *, int, int); 127 static int cd_read_toc(struct cd_softc *, int, int, void *, int, int, int); 128 static int cd_get_parms(struct cd_softc *, int); 129 static int cd_load_toc(struct cd_softc *, struct cd_toc *, int); 130 static int cdreadmsaddr(struct cd_softc *, int *); 131 132 static int dvd_auth(struct cd_softc *, dvd_authinfo *); 133 static int dvd_read_physical(struct cd_softc *, dvd_struct *); 134 static int dvd_read_copyright(struct cd_softc *, dvd_struct *); 135 static int dvd_read_disckey(struct cd_softc *, dvd_struct *); 136 static int dvd_read_bca(struct cd_softc *, dvd_struct *); 137 static int dvd_read_manufact(struct cd_softc *, dvd_struct *); 138 static int dvd_read_struct(struct cd_softc *, dvd_struct *); 139 140 static int cd_mode_sense(struct cd_softc *, u_int8_t, void *, size_t, int, 141 int, int *); 142 static int cd_mode_select(struct cd_softc *, u_int8_t, void *, size_t, 143 int, int); 144 static int cd_setchan(struct cd_softc *, int, int, int, int, int); 145 static int cd_getvol(struct cd_softc *, struct ioc_vol *, int); 146 static int cd_setvol(struct cd_softc *, const struct ioc_vol *, int); 147 static int cd_set_pa_immed(struct cd_softc *, int); 148 static int cd_load_unload(struct cd_softc *, struct ioc_load_unload *); 149 static int cd_setblksize(struct cd_softc *); 150 151 static int cdmatch(struct device *, struct cfdata *, void *); 152 static void cdattach(struct device *, struct device *, void *); 153 static int cdactivate(struct device *, enum devact); 154 static int cddetach(struct device *, int); 155 156 CFATTACH_DECL(cd, sizeof(struct cd_softc), cdmatch, cdattach, cddetach, 157 cdactivate); 158 159 extern struct cfdriver cd_cd; 160 161 static const struct scsipi_inquiry_pattern cd_patterns[] = { 162 {T_CDROM, T_REMOV, 163 "", "", ""}, 164 {T_WORM, T_REMOV, 165 "", "", ""}, 166 #if 0 167 {T_CDROM, T_REMOV, /* more luns */ 168 "PIONEER ", "CD-ROM DRM-600 ", ""}, 169 #endif 170 {T_DIRECT, T_REMOV, 171 "NEC CD-ROM DRIVE:260", "", ""}, 172 }; 173 174 static dev_type_open(cdopen); 175 static dev_type_close(cdclose); 176 static dev_type_read(cdread); 177 static dev_type_write(cdwrite); 178 static dev_type_ioctl(cdioctl); 179 static dev_type_strategy(cdstrategy); 180 static dev_type_dump(cddump); 181 static dev_type_size(cdsize); 182 183 const struct bdevsw cd_bdevsw = { 184 cdopen, cdclose, cdstrategy, cdioctl, cddump, cdsize, D_DISK 185 }; 186 187 const struct cdevsw cd_cdevsw = { 188 cdopen, cdclose, cdread, cdwrite, cdioctl, 189 nostop, notty, nopoll, nommap, nokqfilter, D_DISK 190 }; 191 192 static struct dkdriver cddkdriver = { cdstrategy }; 193 194 static const struct scsipi_periphsw cd_switch = { 195 cd_interpret_sense, /* use our error handler first */ 196 cdstart, /* we have a queue, which is started by this */ 197 NULL, /* we do not have an async handler */ 198 cddone, /* deal with stats at interrupt time */ 199 }; 200 201 /* 202 * The routine called by the low level scsi routine when it discovers 203 * A device suitable for this driver 204 */ 205 static int 206 cdmatch(struct device *parent, struct cfdata *match, void *aux) 207 { 208 struct scsipibus_attach_args *sa = aux; 209 int priority; 210 211 (void)scsipi_inqmatch(&sa->sa_inqbuf, 212 (caddr_t)cd_patterns, sizeof(cd_patterns) / sizeof(cd_patterns[0]), 213 sizeof(cd_patterns[0]), &priority); 214 215 return (priority); 216 } 217 218 static void 219 cdattach(struct device *parent, struct device *self, void *aux) 220 { 221 struct cd_softc *cd = (void *)self; 222 struct scsipibus_attach_args *sa = aux; 223 struct scsipi_periph *periph = sa->sa_periph; 224 225 SC_DEBUG(periph, SCSIPI_DB2, ("cdattach: ")); 226 227 lockinit(&cd->sc_lock, PRIBIO | PCATCH, "cdlock", 0, 0); 228 229 if (scsipi_periph_bustype(sa->sa_periph) == SCSIPI_BUSTYPE_SCSI && 230 periph->periph_version == 0) 231 cd->flags |= CDF_ANCIENT; 232 233 bufq_alloc(&cd->buf_queue, BUFQ_DISKSORT|BUFQ_SORT_RAWBLOCK); 234 235 callout_init(&cd->sc_callout); 236 237 /* 238 * Store information needed to contact our base driver 239 */ 240 cd->sc_periph = periph; 241 242 periph->periph_dev = &cd->sc_dev; 243 periph->periph_switch = &cd_switch; 244 245 /* 246 * Increase our openings to the maximum-per-periph 247 * supported by the adapter. This will either be 248 * clamped down or grown by the adapter if necessary. 249 */ 250 periph->periph_openings = 251 SCSIPI_CHAN_MAX_PERIPH(periph->periph_channel); 252 periph->periph_flags |= PERIPH_GROW_OPENINGS; 253 254 /* 255 * Initialize and attach the disk structure. 256 */ 257 cd->sc_dk.dk_driver = &cddkdriver; 258 cd->sc_dk.dk_name = cd->sc_dev.dv_xname; 259 disk_attach(&cd->sc_dk); 260 261 printf("\n"); 262 263 #if NRND > 0 264 rnd_attach_source(&cd->rnd_source, cd->sc_dev.dv_xname, 265 RND_TYPE_DISK, 0); 266 #endif 267 } 268 269 static int 270 cdactivate(struct device *self, enum devact act) 271 { 272 int rv = 0; 273 274 switch (act) { 275 case DVACT_ACTIVATE: 276 rv = EOPNOTSUPP; 277 break; 278 279 case DVACT_DEACTIVATE: 280 /* 281 * Nothing to do; we key off the device's DVF_ACTIVE. 282 */ 283 break; 284 } 285 return (rv); 286 } 287 288 static int 289 cddetach(struct device *self, int flags) 290 { 291 struct cd_softc *cd = (struct cd_softc *) self; 292 struct buf *bp; 293 int s, bmaj, cmaj, i, mn; 294 295 /* locate the major number */ 296 bmaj = bdevsw_lookup_major(&cd_bdevsw); 297 cmaj = cdevsw_lookup_major(&cd_cdevsw); 298 299 /* Nuke the vnodes for any open instances */ 300 for (i = 0; i < MAXPARTITIONS; i++) { 301 mn = CDMINOR(self->dv_unit, i); 302 vdevgone(bmaj, mn, mn, VBLK); 303 vdevgone(cmaj, mn, mn, VCHR); 304 } 305 306 /* kill any pending restart */ 307 callout_stop(&cd->sc_callout); 308 309 s = splbio(); 310 311 /* Kill off any queued buffers. */ 312 while ((bp = BUFQ_GET(&cd->buf_queue)) != NULL) { 313 bp->b_error = EIO; 314 bp->b_flags |= B_ERROR; 315 bp->b_resid = bp->b_bcount; 316 biodone(bp); 317 } 318 319 bufq_free(&cd->buf_queue); 320 321 /* Kill off any pending commands. */ 322 scsipi_kill_pending(cd->sc_periph); 323 324 splx(s); 325 326 lockmgr(&cd->sc_lock, LK_DRAIN, 0); 327 328 /* Detach from the disk list. */ 329 disk_detach(&cd->sc_dk); 330 331 #if 0 332 /* Get rid of the shutdown hook. */ 333 if (cd->sc_sdhook != NULL) 334 shutdownhook_disestablish(cd->sc_sdhook); 335 #endif 336 337 #if NRND > 0 338 /* Unhook the entropy source. */ 339 rnd_detach_source(&cd->rnd_source); 340 #endif 341 342 return (0); 343 } 344 345 /* 346 * open the device. Make sure the partition info is a up-to-date as can be. 347 */ 348 static int 349 cdopen(dev_t dev, int flag, int fmt, struct proc *p) 350 { 351 struct cd_softc *cd; 352 struct scsipi_periph *periph; 353 struct scsipi_adapter *adapt; 354 int unit, part; 355 int error; 356 357 unit = CDUNIT(dev); 358 if (unit >= cd_cd.cd_ndevs) 359 return (ENXIO); 360 cd = cd_cd.cd_devs[unit]; 361 if (cd == NULL) 362 return (ENXIO); 363 364 periph = cd->sc_periph; 365 adapt = periph->periph_channel->chan_adapter; 366 part = CDPART(dev); 367 368 SC_DEBUG(periph, SCSIPI_DB1, 369 ("cdopen: dev=0x%x (unit %d (of %d), partition %d)\n", dev, unit, 370 cd_cd.cd_ndevs, CDPART(dev))); 371 372 /* 373 * If this is the first open of this device, add a reference 374 * to the adapter. 375 */ 376 if (cd->sc_dk.dk_openmask == 0 && 377 (error = scsipi_adapter_addref(adapt)) != 0) 378 return (error); 379 380 if ((error = lockmgr(&cd->sc_lock, LK_EXCLUSIVE, NULL)) != 0) 381 goto bad4; 382 383 if ((periph->periph_flags & PERIPH_OPEN) != 0) { 384 /* 385 * If any partition is open, but the disk has been invalidated, 386 * disallow further opens. 387 */ 388 if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0 && 389 (part != RAW_PART || fmt != S_IFCHR )) { 390 error = EIO; 391 goto bad3; 392 } 393 } else { 394 int silent; 395 396 if (part == RAW_PART && fmt == S_IFCHR) 397 silent = XS_CTL_SILENT; 398 else 399 silent = 0; 400 401 /* Check that it is still responding and ok. */ 402 error = scsipi_test_unit_ready(periph, 403 XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE | 404 silent); 405 406 /* 407 * Start the pack spinning if necessary. Always allow the 408 * raw parition to be opened, for raw IOCTLs. Data transfers 409 * will check for SDEV_MEDIA_LOADED. 410 */ 411 if (error == EIO) { 412 int error2; 413 414 error2 = scsipi_start(periph, SSS_START, silent); 415 switch (error2) { 416 case 0: 417 error = 0; 418 break; 419 case EIO: 420 case EINVAL: 421 break; 422 default: 423 error = error2; 424 break; 425 } 426 } 427 if (error) { 428 if (silent) 429 goto out; 430 goto bad3; 431 } 432 433 periph->periph_flags |= PERIPH_OPEN; 434 435 /* Lock the pack in. */ 436 error = scsipi_prevent(periph, PR_PREVENT, 437 XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE); 438 SC_DEBUG(periph, SCSIPI_DB1, 439 ("cdopen: scsipi_prevent, error=%d\n", error)); 440 if (error) 441 goto bad; 442 443 if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) { 444 periph->periph_flags |= PERIPH_MEDIA_LOADED; 445 446 /* Load the physical device parameters. */ 447 if (cd_get_parms(cd, 0) != 0) { 448 error = ENXIO; 449 goto bad2; 450 } 451 SC_DEBUG(periph, SCSIPI_DB3, ("Params loaded ")); 452 453 /* Fabricate a disk label. */ 454 cdgetdisklabel(cd); 455 SC_DEBUG(periph, SCSIPI_DB3, ("Disklabel fabricated ")); 456 } 457 } 458 459 /* Check that the partition exists. */ 460 if (part != RAW_PART && 461 (part >= cd->sc_dk.dk_label->d_npartitions || 462 cd->sc_dk.dk_label->d_partitions[part].p_fstype == FS_UNUSED)) { 463 error = ENXIO; 464 goto bad; 465 } 466 467 out: /* Insure only one open at a time. */ 468 switch (fmt) { 469 case S_IFCHR: 470 cd->sc_dk.dk_copenmask |= (1 << part); 471 break; 472 case S_IFBLK: 473 cd->sc_dk.dk_bopenmask |= (1 << part); 474 break; 475 } 476 cd->sc_dk.dk_openmask = 477 cd->sc_dk.dk_copenmask | cd->sc_dk.dk_bopenmask; 478 479 SC_DEBUG(periph, SCSIPI_DB3, ("open complete\n")); 480 lockmgr(&cd->sc_lock, LK_RELEASE, NULL); 481 return (0); 482 483 bad2: 484 periph->periph_flags &= ~PERIPH_MEDIA_LOADED; 485 486 bad: 487 if (cd->sc_dk.dk_openmask == 0) { 488 scsipi_prevent(periph, PR_ALLOW, 489 XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE); 490 periph->periph_flags &= ~PERIPH_OPEN; 491 } 492 493 bad3: 494 lockmgr(&cd->sc_lock, LK_RELEASE, NULL); 495 bad4: 496 if (cd->sc_dk.dk_openmask == 0) 497 scsipi_adapter_delref(adapt); 498 return (error); 499 } 500 501 /* 502 * close the device.. only called if we are the LAST 503 * occurence of an open device 504 */ 505 static int 506 cdclose(dev_t dev, int flag, int fmt, struct proc *p) 507 { 508 struct cd_softc *cd = cd_cd.cd_devs[CDUNIT(dev)]; 509 struct scsipi_periph *periph = cd->sc_periph; 510 struct scsipi_adapter *adapt = periph->periph_channel->chan_adapter; 511 int part = CDPART(dev); 512 int error; 513 514 if ((error = lockmgr(&cd->sc_lock, LK_EXCLUSIVE, NULL)) != 0) 515 return (error); 516 517 switch (fmt) { 518 case S_IFCHR: 519 cd->sc_dk.dk_copenmask &= ~(1 << part); 520 break; 521 case S_IFBLK: 522 cd->sc_dk.dk_bopenmask &= ~(1 << part); 523 break; 524 } 525 cd->sc_dk.dk_openmask = 526 cd->sc_dk.dk_copenmask | cd->sc_dk.dk_bopenmask; 527 528 if (cd->sc_dk.dk_openmask == 0) { 529 scsipi_wait_drain(periph); 530 531 scsipi_prevent(periph, PR_ALLOW, 532 XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE | 533 XS_CTL_IGNORE_NOT_READY); 534 periph->periph_flags &= ~PERIPH_OPEN; 535 536 scsipi_wait_drain(periph); 537 538 scsipi_adapter_delref(adapt); 539 } 540 541 lockmgr(&cd->sc_lock, LK_RELEASE, NULL); 542 return (0); 543 } 544 545 /* 546 * Actually translate the requested transfer into one the physical driver can 547 * understand. The transfer is described by a buf and will include only one 548 * physical transfer. 549 */ 550 static void 551 cdstrategy(struct buf *bp) 552 { 553 struct cd_softc *cd = cd_cd.cd_devs[CDUNIT(bp->b_dev)]; 554 struct disklabel *lp; 555 struct scsipi_periph *periph = cd->sc_periph; 556 daddr_t blkno; 557 int s; 558 559 SC_DEBUG(cd->sc_periph, SCSIPI_DB2, ("cdstrategy ")); 560 SC_DEBUG(cd->sc_periph, SCSIPI_DB1, 561 ("%d bytes @ blk %" PRId64 "\n", bp->b_bcount, bp->b_blkno)); 562 /* 563 * If the device has been made invalid, error out 564 * maybe the media changed 565 */ 566 if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) { 567 if (periph->periph_flags & PERIPH_OPEN) 568 bp->b_error = EIO; 569 else 570 bp->b_error = ENODEV; 571 goto bad; 572 } 573 574 lp = cd->sc_dk.dk_label; 575 576 /* 577 * The transfer must be a whole number of blocks, offset must not 578 * be negative. 579 */ 580 if ((bp->b_bcount % lp->d_secsize) != 0 || 581 bp->b_blkno < 0 ) { 582 bp->b_error = EINVAL; 583 goto bad; 584 } 585 /* 586 * If it's a null transfer, return immediately 587 */ 588 if (bp->b_bcount == 0) 589 goto done; 590 591 /* 592 * Do bounds checking, adjust transfer. if error, process. 593 * If end of partition, just return. 594 */ 595 if (CDPART(bp->b_dev) == RAW_PART) { 596 if (bounds_check_with_mediasize(bp, DEV_BSIZE, 597 cd->params.disksize512) <= 0) 598 goto done; 599 } else { 600 if (bounds_check_with_label(&cd->sc_dk, bp, 601 (cd->flags & (CDF_WLABEL|CDF_LABELLING)) != 0) <= 0) 602 goto done; 603 } 604 605 /* 606 * Now convert the block number to absolute and put it in 607 * terms of the device's logical block size. 608 */ 609 blkno = bp->b_blkno / (lp->d_secsize / DEV_BSIZE); 610 if (CDPART(bp->b_dev) != RAW_PART) 611 blkno += lp->d_partitions[CDPART(bp->b_dev)].p_offset; 612 613 bp->b_rawblkno = blkno; 614 615 /* 616 * If the disklabel sector size does not match the device 617 * sector size we may need to do some extra work. 618 */ 619 if (lp->d_secsize != cd->params.blksize) { 620 621 /* 622 * If the xfer is not a multiple of the device block size 623 * or it is not block aligned, we need to bounce it. 624 */ 625 if ((bp->b_bcount % cd->params.blksize) != 0 || 626 ((blkno * lp->d_secsize) % cd->params.blksize) != 0) { 627 struct buf *nbp; 628 void *bounce = NULL; 629 long count; 630 631 if ((bp->b_flags & B_READ) == 0) { 632 633 /* XXXX We don't support bouncing writes. */ 634 bp->b_error = EACCES; 635 goto bad; 636 } 637 count = ((blkno * lp->d_secsize) % cd->params.blksize); 638 /* XXX Store starting offset in bp->b_rawblkno */ 639 bp->b_rawblkno = count; 640 641 count += bp->b_bcount; 642 count = roundup(count, cd->params.blksize); 643 644 blkno = ((blkno * lp->d_secsize) / cd->params.blksize); 645 s = splbio(); 646 nbp = pool_get(&bufpool, PR_NOWAIT); 647 splx(s); 648 if (!nbp) { 649 /* No memory -- fail the iop. */ 650 bp->b_error = ENOMEM; 651 goto bad; 652 } 653 bounce = malloc(count, M_DEVBUF, M_NOWAIT); 654 if (!bounce) { 655 /* No memory -- fail the iop. */ 656 s = splbio(); 657 pool_put(&bufpool, nbp); 658 splx(s); 659 bp->b_error = ENOMEM; 660 goto bad; 661 } 662 663 /* Set up the IOP to the bounce buffer. */ 664 BUF_INIT(nbp); 665 nbp->b_error = 0; 666 nbp->b_proc = bp->b_proc; 667 nbp->b_vp = NULLVP; 668 669 nbp->b_bcount = count; 670 nbp->b_bufsize = count; 671 nbp->b_data = bounce; 672 673 nbp->b_rawblkno = blkno; 674 675 /* We need to do a read-modify-write operation */ 676 nbp->b_flags = bp->b_flags | B_READ | B_CALL; 677 nbp->b_iodone = cdbounce; 678 679 /* Put ptr to orig buf in b_private and use new buf */ 680 nbp->b_private = bp; 681 682 BIO_COPYPRIO(nbp, bp); 683 684 bp = nbp; 685 686 } else { 687 /* Xfer is aligned -- just adjust the start block */ 688 bp->b_rawblkno = (blkno * lp->d_secsize) / 689 cd->params.blksize; 690 } 691 } 692 s = splbio(); 693 694 /* 695 * Place it in the queue of disk activities for this disk. 696 * 697 * XXX Only do disksort() if the current operating mode does not 698 * XXX include tagged queueing. 699 */ 700 BUFQ_PUT(&cd->buf_queue, bp); 701 702 /* 703 * Tell the device to get going on the transfer if it's 704 * not doing anything, otherwise just wait for completion 705 */ 706 cdstart(cd->sc_periph); 707 708 splx(s); 709 return; 710 711 bad: 712 bp->b_flags |= B_ERROR; 713 done: 714 /* 715 * Correctly set the buf to indicate a completed xfer 716 */ 717 bp->b_resid = bp->b_bcount; 718 biodone(bp); 719 } 720 721 /* 722 * cdstart looks to see if there is a buf waiting for the device 723 * and that the device is not already busy. If both are true, 724 * It deques the buf and creates a scsi command to perform the 725 * transfer in the buf. The transfer request will call scsipi_done 726 * on completion, which will in turn call this routine again 727 * so that the next queued transfer is performed. 728 * The bufs are queued by the strategy routine (cdstrategy) 729 * 730 * This routine is also called after other non-queued requests 731 * have been made of the scsi driver, to ensure that the queue 732 * continues to be drained. 733 * 734 * must be called at the correct (highish) spl level 735 * cdstart() is called at splbio from cdstrategy, cdrestart and scsipi_done 736 */ 737 static void 738 cdstart(struct scsipi_periph *periph) 739 { 740 struct cd_softc *cd = (void *)periph->periph_dev; 741 struct buf *bp = 0; 742 struct scsipi_rw_big cmd_big; 743 struct scsi_rw cmd_small; 744 struct scsipi_generic *cmdp; 745 struct scsipi_xfer *xs; 746 int flags, nblks, cmdlen, error; 747 748 SC_DEBUG(periph, SCSIPI_DB2, ("cdstart ")); 749 /* 750 * Check if the device has room for another command 751 */ 752 while (periph->periph_active < periph->periph_openings) { 753 /* 754 * there is excess capacity, but a special waits 755 * It'll need the adapter as soon as we clear out of the 756 * way and let it run (user level wait). 757 */ 758 if (periph->periph_flags & PERIPH_WAITING) { 759 periph->periph_flags &= ~PERIPH_WAITING; 760 wakeup((caddr_t)periph); 761 return; 762 } 763 764 /* 765 * If the device has become invalid, abort all the 766 * reads and writes until all files have been closed and 767 * re-opened 768 */ 769 if (__predict_false( 770 (periph->periph_flags & PERIPH_MEDIA_LOADED) == 0)) { 771 if ((bp = BUFQ_GET(&cd->buf_queue)) != NULL) { 772 bp->b_error = EIO; 773 bp->b_flags |= B_ERROR; 774 bp->b_resid = bp->b_bcount; 775 biodone(bp); 776 continue; 777 } else { 778 return; 779 } 780 } 781 782 /* 783 * See if there is a buf with work for us to do.. 784 */ 785 if ((bp = BUFQ_PEEK(&cd->buf_queue)) == NULL) 786 return; 787 788 /* 789 * We have a buf, now we should make a command. 790 */ 791 792 nblks = howmany(bp->b_bcount, cd->params.blksize); 793 794 /* 795 * Fill out the scsi command. If the transfer will 796 * fit in a "small" cdb, use it. 797 */ 798 if (((bp->b_rawblkno & 0x1fffff) == bp->b_rawblkno) && 799 ((nblks & 0xff) == nblks) && 800 !(periph->periph_quirks & PQUIRK_ONLYBIG)) { 801 /* 802 * We can fit in a small cdb. 803 */ 804 memset(&cmd_small, 0, sizeof(cmd_small)); 805 cmd_small.opcode = (bp->b_flags & B_READ) ? 806 SCSI_READ_COMMAND : SCSI_WRITE_COMMAND; 807 _lto3b(bp->b_rawblkno, cmd_small.addr); 808 cmd_small.length = nblks & 0xff; 809 cmdlen = sizeof(cmd_small); 810 cmdp = (struct scsipi_generic *)&cmd_small; 811 } else { 812 /* 813 * Need a large cdb. 814 */ 815 memset(&cmd_big, 0, sizeof(cmd_big)); 816 cmd_big.opcode = (bp->b_flags & B_READ) ? 817 READ_BIG : WRITE_BIG; 818 _lto4b(bp->b_rawblkno, cmd_big.addr); 819 _lto2b(nblks, cmd_big.length); 820 cmdlen = sizeof(cmd_big); 821 cmdp = (struct scsipi_generic *)&cmd_big; 822 } 823 824 /* Instrumentation. */ 825 disk_busy(&cd->sc_dk); 826 827 /* 828 * Figure out what flags to use. 829 */ 830 flags = XS_CTL_NOSLEEP|XS_CTL_ASYNC|XS_CTL_SIMPLE_TAG; 831 if (bp->b_flags & B_READ) 832 flags |= XS_CTL_DATA_IN; 833 else 834 flags |= XS_CTL_DATA_OUT; 835 836 /* 837 * Call the routine that chats with the adapter. 838 * Note: we cannot sleep as we may be an interrupt 839 */ 840 xs = scsipi_make_xs(periph, cmdp, cmdlen, 841 (u_char *)bp->b_data, bp->b_bcount, 842 CDRETRIES, 30000, bp, flags); 843 if (__predict_false(xs == NULL)) { 844 /* 845 * out of memory. Keep this buffer in the queue, and 846 * retry later. 847 */ 848 callout_reset(&cd->sc_callout, hz / 2, cdrestart, 849 periph); 850 return; 851 } 852 /* 853 * need to dequeue the buffer before queuing the command, 854 * because cdstart may be called recursively from the 855 * HBA driver 856 */ 857 #ifdef DIAGNOSTIC 858 if (BUFQ_GET(&cd->buf_queue) != bp) 859 panic("cdstart(): dequeued wrong buf"); 860 #else 861 BUFQ_GET(&cd->buf_queue); 862 #endif 863 error = scsipi_execute_xs(xs); 864 /* with a scsipi_xfer preallocated, scsipi_command can't fail */ 865 KASSERT(error == 0); 866 } 867 } 868 869 static void 870 cdrestart(void *v) 871 { 872 int s = splbio(); 873 cdstart((struct scsipi_periph *)v); 874 splx(s); 875 } 876 877 static void 878 cddone(struct scsipi_xfer *xs, int error) 879 { 880 struct cd_softc *cd = (void *)xs->xs_periph->periph_dev; 881 struct buf *bp = xs->bp; 882 883 if (bp) { 884 bp->b_error = error; 885 bp->b_resid = xs->resid; 886 if (error) 887 bp->b_flags |= B_ERROR; 888 889 disk_unbusy(&cd->sc_dk, bp->b_bcount - bp->b_resid, 890 (bp->b_flags & B_READ)); 891 #if NRND > 0 892 rnd_add_uint32(&cd->rnd_source, bp->b_rawblkno); 893 #endif 894 895 biodone(bp); 896 } 897 } 898 899 static void 900 cdbounce(struct buf *bp) 901 { 902 struct buf *obp = (struct buf *)bp->b_private; 903 904 if (bp->b_flags & B_ERROR) { 905 /* EEK propagate the error and free the memory */ 906 goto done; 907 } 908 if (obp->b_flags & B_READ) { 909 /* Copy data to the final destination and free the buf. */ 910 memcpy(obp->b_data, bp->b_data+obp->b_rawblkno, 911 obp->b_bcount); 912 } else { 913 /* 914 * XXXX This is a CD-ROM -- READ ONLY -- why do we bother with 915 * XXXX any of this write stuff? 916 */ 917 if (bp->b_flags & B_READ) { 918 struct cd_softc *cd = cd_cd.cd_devs[CDUNIT(bp->b_dev)]; 919 struct buf *nbp; 920 int s; 921 922 /* Read part of RMW complete. */ 923 memcpy(bp->b_data+obp->b_rawblkno, obp->b_data, 924 obp->b_bcount); 925 926 s = splbio(); 927 928 /* We need to alloc a new buf. */ 929 nbp = pool_get(&bufpool, PR_NOWAIT); 930 if (!nbp) { 931 splx(s); 932 /* No buf available. */ 933 bp->b_flags |= B_ERROR; 934 bp->b_error = ENOMEM; 935 bp->b_resid = bp->b_bcount; 936 } 937 938 /* Set up the IOP to the bounce buffer. */ 939 BUF_INIT(nbp); 940 nbp->b_error = 0; 941 nbp->b_proc = bp->b_proc; 942 nbp->b_vp = NULLVP; 943 944 nbp->b_bcount = bp->b_bcount; 945 nbp->b_bufsize = bp->b_bufsize; 946 nbp->b_data = bp->b_data; 947 948 nbp->b_rawblkno = bp->b_rawblkno; 949 950 /* We need to do a read-modify-write operation */ 951 nbp->b_flags = obp->b_flags | B_CALL; 952 nbp->b_iodone = cdbounce; 953 954 /* Put ptr to orig buf in b_private and use new buf */ 955 nbp->b_private = obp; 956 957 /* 958 * Place it in the queue of disk activities for this 959 * disk. 960 * 961 * XXX Only do disksort() if the current operating mode 962 * XXX does not include tagged queueing. 963 */ 964 BUFQ_PUT(&cd->buf_queue, nbp); 965 966 /* 967 * Tell the device to get going on the transfer if it's 968 * not doing anything, otherwise just wait for 969 * completion 970 */ 971 cdstart(cd->sc_periph); 972 973 splx(s); 974 return; 975 976 } 977 } 978 done: 979 obp->b_flags |= (bp->b_flags&(B_EINTR|B_ERROR)); 980 obp->b_error = bp->b_error; 981 obp->b_resid = bp->b_resid; 982 free(bp->b_data, M_DEVBUF); 983 biodone(obp); 984 } 985 986 static int 987 cd_interpret_sense(struct scsipi_xfer *xs) 988 { 989 struct scsipi_periph *periph = xs->xs_periph; 990 struct scsipi_sense_data *sense = &xs->sense.scsi_sense; 991 int retval = EJUSTRETURN; 992 993 /* 994 * If it isn't a extended or extended/deferred error, let 995 * the generic code handle it. 996 */ 997 if ((sense->error_code & SSD_ERRCODE) != 0x70 && 998 (sense->error_code & SSD_ERRCODE) != 0x71) { /* DEFERRED */ 999 return (retval); 1000 } 1001 1002 /* 1003 * If we got a "Unit not ready" (SKEY_NOT_READY) and "Logical Unit 1004 * Is In The Process of Becoming Ready" (Sense code 0x04,0x01), then 1005 * wait a bit for the drive to spin up 1006 */ 1007 1008 if ((sense->flags & SSD_KEY) == SKEY_NOT_READY && 1009 sense->add_sense_code == 0x4 && 1010 sense->add_sense_code_qual == 0x01) { 1011 /* 1012 * Sleep for 5 seconds to wait for the drive to spin up 1013 */ 1014 1015 SC_DEBUG(periph, SCSIPI_DB1, ("Waiting 5 sec for CD " 1016 "spinup\n")); 1017 if (!callout_pending(&periph->periph_callout)) 1018 scsipi_periph_freeze(periph, 1); 1019 callout_reset(&periph->periph_callout, 1020 5 * hz, scsipi_periph_timed_thaw, periph); 1021 retval = ERESTART; 1022 } 1023 return (retval); 1024 } 1025 1026 static void 1027 cdminphys(struct buf *bp) 1028 { 1029 struct cd_softc *cd = cd_cd.cd_devs[CDUNIT(bp->b_dev)]; 1030 long max; 1031 1032 /* 1033 * If the device is ancient, we want to make sure that 1034 * the transfer fits into a 6-byte cdb. 1035 * 1036 * XXX Note that the SCSI-I spec says that 256-block transfers 1037 * are allowed in a 6-byte read/write, and are specified 1038 * by settng the "length" to 0. However, we're conservative 1039 * here, allowing only 255-block transfers in case an 1040 * ancient device gets confused by length == 0. A length of 0 1041 * in a 10-byte read/write actually means 0 blocks. 1042 */ 1043 if (cd->flags & CDF_ANCIENT) { 1044 max = cd->sc_dk.dk_label->d_secsize * 0xff; 1045 1046 if (bp->b_bcount > max) 1047 bp->b_bcount = max; 1048 } 1049 1050 (*cd->sc_periph->periph_channel->chan_adapter->adapt_minphys)(bp); 1051 } 1052 1053 static int 1054 cdread(dev_t dev, struct uio *uio, int ioflag) 1055 { 1056 1057 return (physio(cdstrategy, NULL, dev, B_READ, cdminphys, uio)); 1058 } 1059 1060 static int 1061 cdwrite(dev_t dev, struct uio *uio, int ioflag) 1062 { 1063 1064 return (physio(cdstrategy, NULL, dev, B_WRITE, cdminphys, uio)); 1065 } 1066 1067 #if 0 /* XXX Not used */ 1068 /* 1069 * conversion between minute-seconde-frame and logical block address 1070 * addresses format 1071 */ 1072 static void 1073 lba2msf(u_long lba, u_char *m, u_char *s, u_char *f) 1074 { 1075 u_long tmp; 1076 1077 tmp = lba + CD_BLOCK_OFFSET; /* offset of first logical frame */ 1078 tmp &= 0xffffff; /* negative lbas use only 24 bits */ 1079 *m = tmp / (CD_SECS * CD_FRAMES); 1080 tmp %= (CD_SECS * CD_FRAMES); 1081 *s = tmp / CD_FRAMES; 1082 *f = tmp % CD_FRAMES; 1083 } 1084 1085 static u_long 1086 msf2lba(u_char m, u_char s, u_char f) 1087 { 1088 1089 return ((((m * CD_SECS) + s) * CD_FRAMES + f) - CD_BLOCK_OFFSET); 1090 } 1091 #endif /* XXX Not used */ 1092 1093 static int 1094 cdreadmsaddr(struct cd_softc *cd, int *addr) 1095 { 1096 struct scsipi_periph *periph = cd->sc_periph; 1097 int error; 1098 struct cd_toc toc; 1099 struct cd_toc_entry *cte; 1100 1101 error = cd_read_toc(cd, 0, 0, &toc, 1102 sizeof(struct ioc_toc_header) + sizeof(struct cd_toc_entry), 1103 XS_CTL_DATA_ONSTACK, 1104 0x40 /* control word for "get MS info" */); 1105 1106 if (error) 1107 return (error); 1108 1109 cte = &toc.entries[0]; 1110 if (periph->periph_quirks & PQUIRK_LITTLETOC) { 1111 cte->addr.lba = le32toh(cte->addr.lba); 1112 toc.header.len = le16toh(toc.header.len); 1113 } else { 1114 cte->addr.lba = be32toh(cte->addr.lba); 1115 toc.header.len = be16toh(toc.header.len); 1116 } 1117 1118 *addr = (toc.header.len >= 10 && cte->track > 1) ? 1119 cte->addr.lba : 0; 1120 return 0; 1121 } 1122 1123 /* 1124 * Perform special action on behalf of the user. 1125 * Knows about the internals of this device 1126 */ 1127 static int 1128 cdioctl(dev_t dev, u_long cmd, caddr_t addr, int flag, struct proc *p) 1129 { 1130 struct cd_softc *cd = cd_cd.cd_devs[CDUNIT(dev)]; 1131 struct scsipi_periph *periph = cd->sc_periph; 1132 int part = CDPART(dev); 1133 int error = 0; 1134 #ifdef __HAVE_OLD_DISKLABEL 1135 struct disklabel *newlabel = NULL; 1136 #endif 1137 1138 SC_DEBUG(cd->sc_periph, SCSIPI_DB2, ("cdioctl 0x%lx ", cmd)); 1139 1140 /* 1141 * If the device is not valid, some IOCTLs can still be 1142 * handled on the raw partition. Check this here. 1143 */ 1144 if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) { 1145 switch (cmd) { 1146 case DIOCWLABEL: 1147 case DIOCLOCK: 1148 case ODIOCEJECT: 1149 case DIOCEJECT: 1150 case SCIOCIDENTIFY: 1151 case OSCIOCIDENTIFY: 1152 case SCIOCCOMMAND: 1153 case SCIOCDEBUG: 1154 case CDIOCGETVOL: 1155 case CDIOCSETVOL: 1156 case CDIOCSETMONO: 1157 case CDIOCSETSTEREO: 1158 case CDIOCSETMUTE: 1159 case CDIOCSETLEFT: 1160 case CDIOCSETRIGHT: 1161 case CDIOCCLOSE: 1162 case CDIOCEJECT: 1163 case CDIOCALLOW: 1164 case CDIOCPREVENT: 1165 case CDIOCSETDEBUG: 1166 case CDIOCCLRDEBUG: 1167 case CDIOCRESET: 1168 case SCIOCRESET: 1169 case CDIOCLOADUNLOAD: 1170 case DVD_AUTH: 1171 case DVD_READ_STRUCT: 1172 if (part == RAW_PART) 1173 break; 1174 /* FALLTHROUGH */ 1175 default: 1176 if ((periph->periph_flags & PERIPH_OPEN) == 0) 1177 return (ENODEV); 1178 else 1179 return (EIO); 1180 } 1181 } 1182 1183 switch (cmd) { 1184 case DIOCGDINFO: 1185 *(struct disklabel *)addr = *(cd->sc_dk.dk_label); 1186 return (0); 1187 #ifdef __HAVE_OLD_DISKLABEL 1188 case ODIOCGDINFO: 1189 newlabel = malloc(sizeof (*newlabel), M_TEMP, M_WAITOK); 1190 if (newlabel == NULL) 1191 return (EIO); 1192 memcpy(newlabel, cd->sc_dk.dk_label, sizeof (*newlabel)); 1193 if (newlabel->d_npartitions > OLDMAXPARTITIONS) 1194 error = ENOTTY; 1195 else 1196 memcpy(addr, newlabel, sizeof (struct olddisklabel)); 1197 free(newlabel, M_TEMP); 1198 return error; 1199 #endif 1200 1201 case DIOCGPART: 1202 ((struct partinfo *)addr)->disklab = cd->sc_dk.dk_label; 1203 ((struct partinfo *)addr)->part = 1204 &cd->sc_dk.dk_label->d_partitions[part]; 1205 return (0); 1206 1207 case DIOCWDINFO: 1208 case DIOCSDINFO: 1209 #ifdef __HAVE_OLD_DISKLABEL 1210 case ODIOCWDINFO: 1211 case ODIOCSDINFO: 1212 #endif 1213 { 1214 struct disklabel *lp; 1215 1216 if ((flag & FWRITE) == 0) 1217 return (EBADF); 1218 1219 #ifdef __HAVE_OLD_DISKLABEL 1220 if (cmd == ODIOCSDINFO || cmd == ODIOCWDINFO) { 1221 newlabel = malloc(sizeof (*newlabel), M_TEMP, M_WAITOK); 1222 if (newlabel == NULL) 1223 return (EIO); 1224 memset(newlabel, 0, sizeof newlabel); 1225 memcpy(newlabel, addr, sizeof (struct olddisklabel)); 1226 lp = newlabel; 1227 } else 1228 #endif 1229 lp = (struct disklabel *)addr; 1230 1231 if ((error = lockmgr(&cd->sc_lock, LK_EXCLUSIVE, NULL)) != 0) 1232 goto bad; 1233 cd->flags |= CDF_LABELLING; 1234 1235 error = setdisklabel(cd->sc_dk.dk_label, 1236 lp, /*cd->sc_dk.dk_openmask : */0, 1237 cd->sc_dk.dk_cpulabel); 1238 if (error == 0) { 1239 /* XXX ? */ 1240 } 1241 1242 cd->flags &= ~CDF_LABELLING; 1243 lockmgr(&cd->sc_lock, LK_RELEASE, NULL); 1244 bad: 1245 #ifdef __HAVE_OLD_DISKLABEL 1246 if (newlabel != NULL) 1247 free(newlabel, M_TEMP); 1248 #endif 1249 return (error); 1250 } 1251 1252 case DIOCWLABEL: 1253 return (EBADF); 1254 1255 case DIOCGDEFLABEL: 1256 cdgetdefaultlabel(cd, (struct disklabel *)addr); 1257 return (0); 1258 1259 #ifdef __HAVE_OLD_DISKLABEL 1260 case ODIOCGDEFLABEL: 1261 newlabel = malloc(sizeof (*newlabel), M_TEMP, M_WAITOK); 1262 if (newlabel == NULL) 1263 return (EIO); 1264 cdgetdefaultlabel(cd, newlabel); 1265 if (newlabel->d_npartitions > OLDMAXPARTITIONS) 1266 error = ENOTTY; 1267 else 1268 memcpy(addr, newlabel, sizeof (struct olddisklabel)); 1269 free(newlabel, M_TEMP); 1270 return error; 1271 #endif 1272 1273 case CDIOCPLAYTRACKS: { 1274 struct ioc_play_track *args = (struct ioc_play_track *)addr; 1275 1276 if ((error = cd_set_pa_immed(cd, 0)) != 0) 1277 return (error); 1278 return (cd_play_tracks(cd, args->start_track, 1279 args->start_index, args->end_track, args->end_index)); 1280 } 1281 case CDIOCPLAYMSF: { 1282 struct ioc_play_msf *args = (struct ioc_play_msf *)addr; 1283 1284 if ((error = cd_set_pa_immed(cd, 0)) != 0) 1285 return (error); 1286 return (cd_play_msf(cd, args->start_m, args->start_s, 1287 args->start_f, args->end_m, args->end_s, args->end_f)); 1288 } 1289 case CDIOCPLAYBLOCKS: { 1290 struct ioc_play_blocks *args = (struct ioc_play_blocks *)addr; 1291 1292 if ((error = cd_set_pa_immed(cd, 0)) != 0) 1293 return (error); 1294 return (cd_play(cd, args->blk, args->len)); 1295 } 1296 case CDIOCREADSUBCHANNEL: { 1297 struct ioc_read_subchannel *args = 1298 (struct ioc_read_subchannel *)addr; 1299 struct cd_sub_channel_info data; 1300 u_int len = args->data_len; 1301 1302 if (len > sizeof(data) || 1303 len < sizeof(struct cd_sub_channel_header)) 1304 return (EINVAL); 1305 error = cd_read_subchannel(cd, args->address_format, 1306 args->data_format, args->track, &data, len, 1307 XS_CTL_DATA_ONSTACK); 1308 if (error) 1309 return (error); 1310 len = min(len, _2btol(data.header.data_len) + 1311 sizeof(struct cd_sub_channel_header)); 1312 return (copyout(&data, args->data, len)); 1313 } 1314 case CDIOREADTOCHEADER: { 1315 struct ioc_toc_header th; 1316 1317 if ((error = cd_read_toc(cd, 0, 0, &th, sizeof(th), 1318 XS_CTL_DATA_ONSTACK, 0)) != 0) 1319 return (error); 1320 if (cd->sc_periph->periph_quirks & PQUIRK_LITTLETOC) 1321 th.len = le16toh(th.len); 1322 else 1323 th.len = be16toh(th.len); 1324 memcpy(addr, &th, sizeof(th)); 1325 return (0); 1326 } 1327 case CDIOREADTOCENTRYS: { 1328 struct cd_toc toc; 1329 struct ioc_read_toc_entry *te = 1330 (struct ioc_read_toc_entry *)addr; 1331 struct ioc_toc_header *th; 1332 struct cd_toc_entry *cte; 1333 u_int len = te->data_len; 1334 int ntracks; 1335 1336 th = &toc.header; 1337 1338 if (len > sizeof(toc.entries) || 1339 len < sizeof(struct cd_toc_entry)) 1340 return (EINVAL); 1341 error = cd_read_toc(cd, te->address_format, te->starting_track, 1342 &toc, len + sizeof(struct ioc_toc_header), 1343 XS_CTL_DATA_ONSTACK, 0); 1344 if (error) 1345 return (error); 1346 if (te->address_format == CD_LBA_FORMAT) 1347 for (ntracks = 1348 th->ending_track - th->starting_track + 1; 1349 ntracks >= 0; ntracks--) { 1350 cte = &toc.entries[ntracks]; 1351 cte->addr_type = CD_LBA_FORMAT; 1352 if (periph->periph_quirks & PQUIRK_LITTLETOC) 1353 cte->addr.lba = le32toh(cte->addr.lba); 1354 else 1355 cte->addr.lba = be32toh(cte->addr.lba); 1356 } 1357 if (periph->periph_quirks & PQUIRK_LITTLETOC) 1358 th->len = le16toh(th->len); 1359 else 1360 th->len = be16toh(th->len); 1361 len = min(len, th->len - (sizeof(th->starting_track) + 1362 sizeof(th->ending_track))); 1363 return (copyout(toc.entries, te->data, len)); 1364 } 1365 case CDIOREADMSADDR: { 1366 int sessno = *(int*)addr; 1367 1368 if (sessno != 0) 1369 return (EINVAL); 1370 1371 return (cdreadmsaddr(cd, (int*)addr)); 1372 } 1373 case CDIOCSETPATCH: { 1374 struct ioc_patch *arg = (struct ioc_patch *)addr; 1375 1376 return (cd_setchan(cd, arg->patch[0], arg->patch[1], 1377 arg->patch[2], arg->patch[3], 0)); 1378 } 1379 case CDIOCGETVOL: { 1380 struct ioc_vol *arg = (struct ioc_vol *)addr; 1381 1382 return (cd_getvol(cd, arg, 0)); 1383 } 1384 case CDIOCSETVOL: { 1385 struct ioc_vol *arg = (struct ioc_vol *)addr; 1386 1387 return (cd_setvol(cd, arg, 0)); 1388 } 1389 1390 case CDIOCSETMONO: 1391 return (cd_setchan(cd, BOTH_CHANNEL, BOTH_CHANNEL, 1392 MUTE_CHANNEL, MUTE_CHANNEL, 0)); 1393 1394 case CDIOCSETSTEREO: 1395 return (cd_setchan(cd, LEFT_CHANNEL, RIGHT_CHANNEL, 1396 MUTE_CHANNEL, MUTE_CHANNEL, 0)); 1397 1398 case CDIOCSETMUTE: 1399 return (cd_setchan(cd, MUTE_CHANNEL, MUTE_CHANNEL, 1400 MUTE_CHANNEL, MUTE_CHANNEL, 0)); 1401 1402 case CDIOCSETLEFT: 1403 return (cd_setchan(cd, LEFT_CHANNEL, LEFT_CHANNEL, 1404 MUTE_CHANNEL, MUTE_CHANNEL, 0)); 1405 1406 case CDIOCSETRIGHT: 1407 return (cd_setchan(cd, RIGHT_CHANNEL, RIGHT_CHANNEL, 1408 MUTE_CHANNEL, MUTE_CHANNEL, 0)); 1409 1410 case CDIOCRESUME: 1411 return (cd_pause(cd, PA_RESUME)); 1412 case CDIOCPAUSE: 1413 return (cd_pause(cd, PA_PAUSE)); 1414 case CDIOCSTART: 1415 return (scsipi_start(periph, SSS_START, 0)); 1416 case CDIOCSTOP: 1417 return (scsipi_start(periph, SSS_STOP, 0)); 1418 case CDIOCCLOSE: 1419 return (scsipi_start(periph, SSS_START|SSS_LOEJ, 1420 XS_CTL_IGNORE_NOT_READY | XS_CTL_IGNORE_MEDIA_CHANGE)); 1421 case DIOCEJECT: 1422 if (*(int *)addr == 0) { 1423 /* 1424 * Don't force eject: check that we are the only 1425 * partition open. If so, unlock it. 1426 */ 1427 if ((cd->sc_dk.dk_openmask & ~(1 << part)) == 0 && 1428 cd->sc_dk.dk_bopenmask + cd->sc_dk.dk_copenmask == 1429 cd->sc_dk.dk_openmask) { 1430 error = scsipi_prevent(periph, PR_ALLOW, 1431 XS_CTL_IGNORE_NOT_READY); 1432 if (error) 1433 return (error); 1434 } else { 1435 return (EBUSY); 1436 } 1437 } 1438 /* FALLTHROUGH */ 1439 case CDIOCEJECT: /* FALLTHROUGH */ 1440 case ODIOCEJECT: 1441 return (scsipi_start(periph, SSS_STOP|SSS_LOEJ, 0)); 1442 case CDIOCALLOW: 1443 return (scsipi_prevent(periph, PR_ALLOW, 0)); 1444 case CDIOCPREVENT: 1445 return (scsipi_prevent(periph, PR_PREVENT, 0)); 1446 case DIOCLOCK: 1447 return (scsipi_prevent(periph, 1448 (*(int *)addr) ? PR_PREVENT : PR_ALLOW, 0)); 1449 case CDIOCSETDEBUG: 1450 cd->sc_periph->periph_dbflags |= (SCSIPI_DB1 | SCSIPI_DB2); 1451 return (0); 1452 case CDIOCCLRDEBUG: 1453 cd->sc_periph->periph_dbflags &= ~(SCSIPI_DB1 | SCSIPI_DB2); 1454 return (0); 1455 case CDIOCRESET: 1456 case SCIOCRESET: 1457 return (cd_reset(cd)); 1458 case CDIOCLOADUNLOAD: 1459 return (cd_load_unload(cd, (struct ioc_load_unload *)addr)); 1460 case DVD_AUTH: 1461 return (dvd_auth(cd, (dvd_authinfo *)addr)); 1462 case DVD_READ_STRUCT: 1463 return (dvd_read_struct(cd, (dvd_struct *)addr)); 1464 1465 default: 1466 if (part != RAW_PART) 1467 return (ENOTTY); 1468 return (scsipi_do_ioctl(periph, dev, cmd, addr, flag, p)); 1469 } 1470 1471 #ifdef DIAGNOSTIC 1472 panic("cdioctl: impossible"); 1473 #endif 1474 } 1475 1476 static void 1477 cdgetdefaultlabel(struct cd_softc *cd, struct disklabel *lp) 1478 { 1479 int lastsession; 1480 1481 memset(lp, 0, sizeof(struct disklabel)); 1482 1483 lp->d_secsize = cd->params.blksize; 1484 lp->d_ntracks = 1; 1485 lp->d_nsectors = 100; 1486 lp->d_ncylinders = (cd->params.disksize / 100) + 1; 1487 lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors; 1488 1489 switch (scsipi_periph_bustype(cd->sc_periph)) { 1490 case SCSIPI_BUSTYPE_SCSI: 1491 lp->d_type = DTYPE_SCSI; 1492 break; 1493 case SCSIPI_BUSTYPE_ATAPI: 1494 lp->d_type = DTYPE_ATAPI; 1495 break; 1496 } 1497 /* 1498 * XXX 1499 * We could probe the mode pages to figure out what kind of disc it is. 1500 * Is this worthwhile? 1501 */ 1502 strncpy(lp->d_typename, "mydisc", 16); 1503 strncpy(lp->d_packname, "fictitious", 16); 1504 lp->d_secperunit = cd->params.disksize; 1505 lp->d_rpm = 300; 1506 lp->d_interleave = 1; 1507 lp->d_flags = D_REMOVABLE; 1508 1509 if (cdreadmsaddr(cd, &lastsession) != 0) 1510 lastsession = 0; 1511 1512 lp->d_partitions[0].p_offset = 0; 1513 #ifdef notyet /* have to fix bounds_check_with_label() first */ 1514 lp->d_partitions[0].p_size = lp->d_secperunit; 1515 #else 1516 lp->d_partitions[0].p_size = 1517 lp->d_secperunit * (lp->d_secsize / DEV_BSIZE); 1518 #endif 1519 lp->d_partitions[0].p_cdsession = lastsession; 1520 lp->d_partitions[0].p_fstype = FS_ISO9660; 1521 lp->d_partitions[RAW_PART].p_offset = 0; 1522 #ifdef notyet 1523 lp->d_partitions[RAW_PART].p_size = lp->d_secperunit; 1524 #else 1525 lp->d_partitions[RAW_PART].p_size = 1526 lp->d_secperunit * (lp->d_secsize / DEV_BSIZE); 1527 #endif 1528 lp->d_partitions[RAW_PART].p_fstype = FS_ISO9660; 1529 lp->d_npartitions = RAW_PART + 1; 1530 1531 lp->d_magic = DISKMAGIC; 1532 lp->d_magic2 = DISKMAGIC; 1533 lp->d_checksum = dkcksum(lp); 1534 } 1535 1536 /* 1537 * Load the label information on the named device 1538 * Actually fabricate a disklabel 1539 * 1540 * EVENTUALLY take information about different 1541 * data tracks from the TOC and put it in the disklabel 1542 */ 1543 static void 1544 cdgetdisklabel(struct cd_softc *cd) 1545 { 1546 struct disklabel *lp = cd->sc_dk.dk_label; 1547 const char *errstring; 1548 1549 memset(cd->sc_dk.dk_cpulabel, 0, sizeof(struct cpu_disklabel)); 1550 1551 cdgetdefaultlabel(cd, lp); 1552 1553 /* 1554 * Call the generic disklabel extraction routine 1555 */ 1556 errstring = readdisklabel(MAKECDDEV(0, cd->sc_dev.dv_unit, RAW_PART), 1557 cdstrategy, lp, cd->sc_dk.dk_cpulabel); 1558 if (errstring) { 1559 printf("%s: %s\n", cd->sc_dev.dv_xname, errstring); 1560 goto error; 1561 } 1562 return; 1563 1564 error: 1565 /* Reset to default label -- should print a warning */ 1566 memset(cd->sc_dk.dk_cpulabel, 0, sizeof(struct cpu_disklabel)); 1567 1568 cdgetdefaultlabel(cd, lp); 1569 } 1570 1571 /* 1572 * Find out from the device what it's capacity is 1573 */ 1574 static u_long 1575 cd_size(struct cd_softc *cd, int flags) 1576 { 1577 struct scsipi_read_cd_capacity cmd; 1578 struct scsipi_read_cd_cap_data data; 1579 int blksize; 1580 u_long size; 1581 1582 if (cd->sc_periph->periph_quirks & PQUIRK_NOCAPACITY) { 1583 /* 1584 * the drive doesn't support the READ_CD_CAPACITY command 1585 * use a fake size 1586 */ 1587 cd->params.blksize = 2048; 1588 cd->params.disksize = 400000; 1589 cd->params.disksize512 = 1600000; 1590 return (400000); 1591 } 1592 1593 /* 1594 * make up a scsi command and ask the scsi driver to do 1595 * it for you. 1596 */ 1597 memset(&cmd, 0, sizeof(cmd)); 1598 cmd.opcode = READ_CD_CAPACITY; 1599 1600 /* 1601 * If the command works, interpret the result as a 4 byte 1602 * number of blocks and a blocksize 1603 */ 1604 if (scsipi_command(cd->sc_periph, (void *)&cmd, sizeof(cmd), 1605 (void *)&data, sizeof(data), CDRETRIES, 30000, NULL, 1606 flags | XS_CTL_DATA_IN | XS_CTL_DATA_ONSTACK) != 0) 1607 return (0); 1608 1609 blksize = _4btol(data.length); 1610 if ((blksize < 512) || ((blksize & 511) != 0)) 1611 blksize = 2048; /* some drives lie ! */ 1612 if (blksize != 2048) { 1613 if (cd_setblksize(cd) == 0) 1614 blksize = 2048; 1615 } 1616 cd->params.blksize = blksize; 1617 1618 size = _4btol(data.addr) + 1; 1619 if (size < 100) 1620 size = 400000; /* ditto */ 1621 cd->params.disksize = size; 1622 cd->params.disksize512 = ((u_int64_t)cd->params.disksize * blksize) / DEV_BSIZE; 1623 1624 SC_DEBUG(cd->sc_periph, SCSIPI_DB2, 1625 ("cd_size: %d %ld\n", blksize, size)); 1626 return (size); 1627 } 1628 1629 /* 1630 * Get scsi driver to send a "start playing" command 1631 */ 1632 static int 1633 cd_play(struct cd_softc *cd, int blkno, int nblks) 1634 { 1635 struct scsipi_play cmd; 1636 1637 memset(&cmd, 0, sizeof(cmd)); 1638 cmd.opcode = PLAY; 1639 _lto4b(blkno, cmd.blk_addr); 1640 _lto2b(nblks, cmd.xfer_len); 1641 1642 return (scsipi_command(cd->sc_periph, (void *)&cmd, sizeof(cmd), 0, 0, 1643 CDRETRIES, 30000, NULL, 0)); 1644 } 1645 1646 /* 1647 * Get scsi driver to send a "start playing" command 1648 */ 1649 static int 1650 cd_play_tracks(struct cd_softc *cd, int strack, int sindex, int etrack, 1651 int eindex) 1652 { 1653 struct cd_toc toc; 1654 int error; 1655 1656 if (!etrack) 1657 return (EIO); 1658 if (strack > etrack) 1659 return (EINVAL); 1660 1661 if ((error = cd_load_toc(cd, &toc, XS_CTL_DATA_ONSTACK)) != 0) 1662 return (error); 1663 1664 if (++etrack > (toc.header.ending_track+1)) 1665 etrack = toc.header.ending_track+1; 1666 1667 strack -= toc.header.starting_track; 1668 etrack -= toc.header.starting_track; 1669 if (strack < 0) 1670 return (EINVAL); 1671 1672 return (cd_play_msf(cd, toc.entries[strack].addr.msf.minute, 1673 toc.entries[strack].addr.msf.second, 1674 toc.entries[strack].addr.msf.frame, 1675 toc.entries[etrack].addr.msf.minute, 1676 toc.entries[etrack].addr.msf.second, 1677 toc.entries[etrack].addr.msf.frame)); 1678 } 1679 1680 /* 1681 * Get scsi driver to send a "play msf" command 1682 */ 1683 static int 1684 cd_play_msf(struct cd_softc *cd, int startm, int starts, int startf, int endm, 1685 int ends, int endf) 1686 { 1687 struct scsipi_play_msf cmd; 1688 1689 memset(&cmd, 0, sizeof(cmd)); 1690 cmd.opcode = PLAY_MSF; 1691 cmd.start_m = startm; 1692 cmd.start_s = starts; 1693 cmd.start_f = startf; 1694 cmd.end_m = endm; 1695 cmd.end_s = ends; 1696 cmd.end_f = endf; 1697 1698 return (scsipi_command(cd->sc_periph, (void *)&cmd, sizeof(cmd), 0, 0, 1699 CDRETRIES, 30000, NULL, 0)); 1700 } 1701 1702 /* 1703 * Get scsi driver to send a "start up" command 1704 */ 1705 static int 1706 cd_pause(struct cd_softc *cd, int go) 1707 { 1708 struct scsipi_pause cmd; 1709 1710 memset(&cmd, 0, sizeof(cmd)); 1711 cmd.opcode = PAUSE; 1712 cmd.resume = go & 0xff; 1713 1714 return (scsipi_command(cd->sc_periph, (void *)&cmd, sizeof(cmd), 0, 0, 1715 CDRETRIES, 30000, NULL, 0)); 1716 } 1717 1718 /* 1719 * Get scsi driver to send a "RESET" command 1720 */ 1721 static int 1722 cd_reset(struct cd_softc *cd) 1723 { 1724 1725 return (scsipi_command(cd->sc_periph, 0, 0, 0, 0, 1726 CDRETRIES, 30000, NULL, XS_CTL_RESET)); 1727 } 1728 1729 /* 1730 * Read subchannel 1731 */ 1732 static int 1733 cd_read_subchannel(struct cd_softc *cd, int mode, int format, int track, 1734 struct cd_sub_channel_info *data, int len, int flags) 1735 { 1736 struct scsipi_read_subchannel cmd; 1737 1738 memset(&cmd, 0, sizeof(cmd)); 1739 cmd.opcode = READ_SUBCHANNEL; 1740 if (mode == CD_MSF_FORMAT) 1741 cmd.byte2 |= CD_MSF; 1742 cmd.byte3 = SRS_SUBQ; 1743 cmd.subchan_format = format; 1744 cmd.track = track; 1745 _lto2b(len, cmd.data_len); 1746 1747 return (scsipi_command(cd->sc_periph, 1748 (void *)&cmd, sizeof(struct scsipi_read_subchannel), 1749 (void *)data, len, 1750 CDRETRIES, 30000, NULL, flags | XS_CTL_DATA_IN | XS_CTL_SILENT)); 1751 } 1752 1753 /* 1754 * Read table of contents 1755 */ 1756 static int 1757 cd_read_toc(struct cd_softc *cd, int mode, int start, void *data, int len, 1758 int flags, int control) 1759 { 1760 struct scsipi_read_toc cmd; 1761 int ntoc; 1762 1763 memset(&cmd, 0, sizeof(cmd)); 1764 #if 0 1765 if (len != sizeof(struct ioc_toc_header)) 1766 ntoc = ((len) - sizeof(struct ioc_toc_header)) / 1767 sizeof(struct cd_toc_entry); 1768 else 1769 #endif 1770 ntoc = len; 1771 cmd.opcode = READ_TOC; 1772 if (mode == CD_MSF_FORMAT) 1773 cmd.byte2 |= CD_MSF; 1774 cmd.from_track = start; 1775 _lto2b(ntoc, cmd.data_len); 1776 cmd.control = control; 1777 1778 return (scsipi_command(cd->sc_periph, 1779 (void *)&cmd, sizeof(cmd), (void *)data, len, CDRETRIES, 1780 30000, NULL, flags | XS_CTL_DATA_IN)); 1781 } 1782 1783 static int 1784 cd_load_toc(struct cd_softc *cd, struct cd_toc *toc, int flags) 1785 { 1786 int ntracks, len, error; 1787 1788 if ((error = cd_read_toc(cd, 0, 0, toc, sizeof(toc->header), 1789 flags, 0)) != 0) 1790 return (error); 1791 1792 ntracks = toc->header.ending_track - toc->header.starting_track + 1; 1793 len = (ntracks + 1) * sizeof(struct cd_toc_entry) + 1794 sizeof(toc->header); 1795 if ((error = cd_read_toc(cd, CD_MSF_FORMAT, 0, toc, len, 1796 flags, 0)) != 0) 1797 return (error); 1798 return (0); 1799 } 1800 1801 /* 1802 * Get the scsi driver to send a full inquiry to the device and use the 1803 * results to fill out the disk parameter structure. 1804 */ 1805 static int 1806 cd_get_parms(struct cd_softc *cd, int flags) 1807 { 1808 1809 /* 1810 * give a number of sectors so that sec * trks * cyls 1811 * is <= disk_size 1812 */ 1813 if (cd_size(cd, flags) == 0) 1814 return (ENXIO); 1815 return (0); 1816 } 1817 1818 static int 1819 cdsize(dev_t dev) 1820 { 1821 1822 /* CD-ROMs are read-only. */ 1823 return (-1); 1824 } 1825 1826 static int 1827 cddump(dev_t dev, daddr_t blkno, caddr_t va, size_t size) 1828 { 1829 1830 /* Not implemented. */ 1831 return (ENXIO); 1832 } 1833 1834 #define dvd_copy_key(dst, src) memcpy((dst), (src), sizeof(dvd_key)) 1835 #define dvd_copy_challenge(dst, src) memcpy((dst), (src), sizeof(dvd_challenge)) 1836 1837 static int 1838 dvd_auth(struct cd_softc *cd, dvd_authinfo *a) 1839 { 1840 struct scsipi_generic cmd; 1841 u_int8_t buf[20]; 1842 int error; 1843 1844 memset(cmd.bytes, 0, 15); 1845 memset(buf, 0, sizeof(buf)); 1846 1847 switch (a->type) { 1848 case DVD_LU_SEND_AGID: 1849 cmd.opcode = GPCMD_REPORT_KEY; 1850 cmd.bytes[8] = 8; 1851 cmd.bytes[9] = 0 | (0 << 6); 1852 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 8, 1853 CDRETRIES, 30000, NULL, 1854 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1855 if (error) 1856 return (error); 1857 a->lsa.agid = buf[7] >> 6; 1858 return (0); 1859 1860 case DVD_LU_SEND_CHALLENGE: 1861 cmd.opcode = GPCMD_REPORT_KEY; 1862 cmd.bytes[8] = 16; 1863 cmd.bytes[9] = 1 | (a->lsc.agid << 6); 1864 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 16, 1865 CDRETRIES, 30000, NULL, 1866 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1867 if (error) 1868 return (error); 1869 dvd_copy_challenge(a->lsc.chal, &buf[4]); 1870 return (0); 1871 1872 case DVD_LU_SEND_KEY1: 1873 cmd.opcode = GPCMD_REPORT_KEY; 1874 cmd.bytes[8] = 12; 1875 cmd.bytes[9] = 2 | (a->lsk.agid << 6); 1876 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 12, 1877 CDRETRIES, 30000, NULL, 1878 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1879 if (error) 1880 return (error); 1881 dvd_copy_key(a->lsk.key, &buf[4]); 1882 return (0); 1883 1884 case DVD_LU_SEND_TITLE_KEY: 1885 cmd.opcode = GPCMD_REPORT_KEY; 1886 _lto4b(a->lstk.lba, &cmd.bytes[1]); 1887 cmd.bytes[8] = 12; 1888 cmd.bytes[9] = 4 | (a->lstk.agid << 6); 1889 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 12, 1890 CDRETRIES, 30000, NULL, 1891 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1892 if (error) 1893 return (error); 1894 a->lstk.cpm = (buf[4] >> 7) & 1; 1895 a->lstk.cp_sec = (buf[4] >> 6) & 1; 1896 a->lstk.cgms = (buf[4] >> 4) & 3; 1897 dvd_copy_key(a->lstk.title_key, &buf[5]); 1898 return (0); 1899 1900 case DVD_LU_SEND_ASF: 1901 cmd.opcode = GPCMD_REPORT_KEY; 1902 cmd.bytes[8] = 8; 1903 cmd.bytes[9] = 5 | (a->lsasf.agid << 6); 1904 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 8, 1905 CDRETRIES, 30000, NULL, 1906 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1907 if (error) 1908 return (error); 1909 a->lsasf.asf = buf[7] & 1; 1910 return (0); 1911 1912 case DVD_HOST_SEND_CHALLENGE: 1913 cmd.opcode = GPCMD_SEND_KEY; 1914 cmd.bytes[8] = 16; 1915 cmd.bytes[9] = 1 | (a->hsc.agid << 6); 1916 buf[1] = 14; 1917 dvd_copy_challenge(&buf[4], a->hsc.chal); 1918 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 16, 1919 CDRETRIES, 30000, NULL, 1920 XS_CTL_DATA_OUT|XS_CTL_DATA_ONSTACK); 1921 if (error) 1922 return (error); 1923 a->type = DVD_LU_SEND_KEY1; 1924 return (0); 1925 1926 case DVD_HOST_SEND_KEY2: 1927 cmd.opcode = GPCMD_SEND_KEY; 1928 cmd.bytes[8] = 12; 1929 cmd.bytes[9] = 3 | (a->hsk.agid << 6); 1930 buf[1] = 10; 1931 dvd_copy_key(&buf[4], a->hsk.key); 1932 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 12, 1933 CDRETRIES, 30000, NULL, 1934 XS_CTL_DATA_OUT|XS_CTL_DATA_ONSTACK); 1935 if (error) { 1936 a->type = DVD_AUTH_FAILURE; 1937 return (error); 1938 } 1939 a->type = DVD_AUTH_ESTABLISHED; 1940 return (0); 1941 1942 case DVD_INVALIDATE_AGID: 1943 cmd.opcode = GPCMD_REPORT_KEY; 1944 cmd.bytes[9] = 0x3f | (a->lsa.agid << 6); 1945 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 16, 1946 CDRETRIES, 30000, NULL, 0); 1947 if (error) 1948 return (error); 1949 return (0); 1950 1951 case DVD_LU_SEND_RPC_STATE: 1952 cmd.opcode = GPCMD_REPORT_KEY; 1953 cmd.bytes[8] = 8; 1954 cmd.bytes[9] = 8 | (0 << 6); 1955 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 8, 1956 CDRETRIES, 30000, NULL, 1957 XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 1958 if (error) 1959 return (error); 1960 a->lrpcs.type = (buf[4] >> 6) & 3; 1961 a->lrpcs.vra = (buf[4] >> 3) & 7; 1962 a->lrpcs.ucca = (buf[4]) & 7; 1963 a->lrpcs.region_mask = buf[5]; 1964 a->lrpcs.rpc_scheme = buf[6]; 1965 return (0); 1966 1967 case DVD_HOST_SEND_RPC_STATE: 1968 cmd.opcode = GPCMD_SEND_KEY; 1969 cmd.bytes[8] = 8; 1970 cmd.bytes[9] = 6 | (0 << 6); 1971 buf[1] = 6; 1972 buf[4] = a->hrpcs.pdrc; 1973 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 8, 1974 CDRETRIES, 30000, NULL, 1975 XS_CTL_DATA_OUT|XS_CTL_DATA_ONSTACK); 1976 if (error) 1977 return (error); 1978 return (0); 1979 1980 default: 1981 return (ENOTTY); 1982 } 1983 } 1984 1985 static int 1986 dvd_read_physical(struct cd_softc *cd, dvd_struct *s) 1987 { 1988 struct scsipi_generic cmd; 1989 u_int8_t buf[4 + 4 * 20], *bufp; 1990 int error; 1991 struct dvd_layer *layer; 1992 int i; 1993 1994 memset(cmd.bytes, 0, 15); 1995 memset(buf, 0, sizeof(buf)); 1996 cmd.opcode = GPCMD_READ_DVD_STRUCTURE; 1997 cmd.bytes[6] = s->type; 1998 _lto2b(sizeof(buf), &cmd.bytes[7]); 1999 2000 cmd.bytes[5] = s->physical.layer_num; 2001 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, sizeof(buf), 2002 CDRETRIES, 30000, NULL, XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 2003 if (error) 2004 return (error); 2005 for (i = 0, bufp = &buf[4], layer = &s->physical.layer[0]; i < 4; 2006 i++, bufp += 20, layer++) { 2007 memset(layer, 0, sizeof(*layer)); 2008 layer->book_version = bufp[0] & 0xf; 2009 layer->book_type = bufp[0] >> 4; 2010 layer->min_rate = bufp[1] & 0xf; 2011 layer->disc_size = bufp[1] >> 4; 2012 layer->layer_type = bufp[2] & 0xf; 2013 layer->track_path = (bufp[2] >> 4) & 1; 2014 layer->nlayers = (bufp[2] >> 5) & 3; 2015 layer->track_density = bufp[3] & 0xf; 2016 layer->linear_density = bufp[3] >> 4; 2017 layer->start_sector = _4btol(&bufp[4]); 2018 layer->end_sector = _4btol(&bufp[8]); 2019 layer->end_sector_l0 = _4btol(&bufp[12]); 2020 layer->bca = bufp[16] >> 7; 2021 } 2022 return (0); 2023 } 2024 2025 static int 2026 dvd_read_copyright(struct cd_softc *cd, dvd_struct *s) 2027 { 2028 struct scsipi_generic cmd; 2029 u_int8_t buf[8]; 2030 int error; 2031 2032 memset(cmd.bytes, 0, 15); 2033 memset(buf, 0, sizeof(buf)); 2034 cmd.opcode = GPCMD_READ_DVD_STRUCTURE; 2035 cmd.bytes[6] = s->type; 2036 _lto2b(sizeof(buf), &cmd.bytes[7]); 2037 2038 cmd.bytes[5] = s->copyright.layer_num; 2039 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, sizeof(buf), 2040 CDRETRIES, 30000, NULL, XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 2041 if (error) 2042 return (error); 2043 s->copyright.cpst = buf[4]; 2044 s->copyright.rmi = buf[5]; 2045 return (0); 2046 } 2047 2048 static int 2049 dvd_read_disckey(struct cd_softc *cd, dvd_struct *s) 2050 { 2051 struct scsipi_generic cmd; 2052 u_int8_t *buf; 2053 int error; 2054 2055 buf = malloc(4 + 2048, M_TEMP, M_WAITOK|M_ZERO); 2056 if (buf == NULL) 2057 return EIO; 2058 memset(cmd.bytes, 0, 15); 2059 cmd.opcode = GPCMD_READ_DVD_STRUCTURE; 2060 cmd.bytes[6] = s->type; 2061 _lto2b(4 + 2048, &cmd.bytes[7]); 2062 2063 cmd.bytes[9] = s->disckey.agid << 6; 2064 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 4 + 2048, 2065 CDRETRIES, 30000, NULL, XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 2066 if (error == 0) 2067 memcpy(s->disckey.value, &buf[4], 2048); 2068 free(buf, M_TEMP); 2069 return error; 2070 } 2071 2072 static int 2073 dvd_read_bca(struct cd_softc *cd, dvd_struct *s) 2074 { 2075 struct scsipi_generic cmd; 2076 u_int8_t buf[4 + 188]; 2077 int error; 2078 2079 memset(cmd.bytes, 0, 15); 2080 memset(buf, 0, sizeof(buf)); 2081 cmd.opcode = GPCMD_READ_DVD_STRUCTURE; 2082 cmd.bytes[6] = s->type; 2083 _lto2b(sizeof(buf), &cmd.bytes[7]); 2084 2085 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, sizeof(buf), 2086 CDRETRIES, 30000, NULL, XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 2087 if (error) 2088 return (error); 2089 s->bca.len = _2btol(&buf[0]); 2090 if (s->bca.len < 12 || s->bca.len > 188) 2091 return (EIO); 2092 memcpy(s->bca.value, &buf[4], s->bca.len); 2093 return (0); 2094 } 2095 2096 static int 2097 dvd_read_manufact(struct cd_softc *cd, dvd_struct *s) 2098 { 2099 struct scsipi_generic cmd; 2100 u_int8_t *buf; 2101 int error; 2102 2103 buf = malloc(4 + 2048, M_TEMP, M_WAITOK|M_ZERO); 2104 if (buf == NULL) 2105 return (EIO); 2106 memset(cmd.bytes, 0, 15); 2107 cmd.opcode = GPCMD_READ_DVD_STRUCTURE; 2108 cmd.bytes[6] = s->type; 2109 _lto2b(4 + 2048, &cmd.bytes[7]); 2110 2111 error = scsipi_command(cd->sc_periph, &cmd, 12, buf, 4 + 2048, 2112 CDRETRIES, 30000, NULL, XS_CTL_DATA_IN|XS_CTL_DATA_ONSTACK); 2113 if (error == 0) { 2114 s->manufact.len = _2btol(&buf[0]); 2115 if (s->manufact.len >= 0 && s->manufact.len <= 2048) 2116 memcpy(s->manufact.value, &buf[4], s->manufact.len); 2117 else 2118 error = EIO; 2119 } 2120 free(buf, M_TEMP); 2121 return error; 2122 } 2123 2124 static int 2125 dvd_read_struct(struct cd_softc *cd, dvd_struct *s) 2126 { 2127 2128 switch (s->type) { 2129 case DVD_STRUCT_PHYSICAL: 2130 return (dvd_read_physical(cd, s)); 2131 case DVD_STRUCT_COPYRIGHT: 2132 return (dvd_read_copyright(cd, s)); 2133 case DVD_STRUCT_DISCKEY: 2134 return (dvd_read_disckey(cd, s)); 2135 case DVD_STRUCT_BCA: 2136 return (dvd_read_bca(cd, s)); 2137 case DVD_STRUCT_MANUFACT: 2138 return (dvd_read_manufact(cd, s)); 2139 default: 2140 return (EINVAL); 2141 } 2142 } 2143 2144 static int 2145 cd_mode_sense(struct cd_softc *cd, u_int8_t byte2, void *sense, size_t size, 2146 int page, int flags, int *big) 2147 { 2148 2149 if (cd->sc_periph->periph_quirks & PQUIRK_ONLYBIG) { 2150 *big = 1; 2151 return scsipi_mode_sense_big(cd->sc_periph, byte2, page, sense, 2152 size + sizeof(struct scsipi_mode_header_big), 2153 flags | XS_CTL_DATA_ONSTACK, CDRETRIES, 20000); 2154 } else { 2155 *big = 0; 2156 return scsipi_mode_sense(cd->sc_periph, byte2, page, sense, 2157 size + sizeof(struct scsipi_mode_header), 2158 flags | XS_CTL_DATA_ONSTACK, CDRETRIES, 20000); 2159 } 2160 } 2161 2162 static int 2163 cd_mode_select(struct cd_softc *cd, u_int8_t byte2, void *sense, size_t size, 2164 int flags, int big) 2165 { 2166 2167 if (big) { 2168 struct scsipi_mode_header_big *header = sense; 2169 2170 _lto2b(0, header->data_length); 2171 return scsipi_mode_select_big(cd->sc_periph, byte2, sense, 2172 size + sizeof(struct scsipi_mode_header_big), 2173 flags | XS_CTL_DATA_ONSTACK, CDRETRIES, 20000); 2174 } else { 2175 struct scsipi_mode_header *header = sense; 2176 2177 header->data_length = 0; 2178 return scsipi_mode_select(cd->sc_periph, byte2, sense, 2179 size + sizeof(struct scsipi_mode_header), 2180 flags | XS_CTL_DATA_ONSTACK, CDRETRIES, 20000); 2181 } 2182 } 2183 2184 static int 2185 cd_set_pa_immed(struct cd_softc *cd, int flags) 2186 { 2187 struct { 2188 union { 2189 struct scsipi_mode_header small; 2190 struct scsipi_mode_header_big big; 2191 } header; 2192 struct cd_audio_page page; 2193 } data; 2194 int error; 2195 uint8_t oflags; 2196 int big, byte2; 2197 struct cd_audio_page *page; 2198 2199 byte2 = SMS_DBD; 2200 try_again: 2201 if ((error = cd_mode_sense(cd, byte2, &data, sizeof(data.page), 2202 AUDIO_PAGE, flags, &big)) != 0) { 2203 if (byte2 == SMS_DBD) { 2204 /* Device may not understand DBD; retry without */ 2205 byte2 = 0; 2206 goto try_again; 2207 } 2208 return (error); 2209 } 2210 2211 if (big) 2212 page = (void *)((u_long)&data.header.big + 2213 sizeof data.header.big + 2214 _2btol(data.header.big.blk_desc_len)); 2215 else 2216 page = (void *)((u_long)&data.header.small + 2217 sizeof data.header.small + 2218 data.header.small.blk_desc_len); 2219 2220 oflags = page->flags; 2221 page->flags &= ~CD_PA_SOTC; 2222 page->flags |= CD_PA_IMMED; 2223 if (oflags == page->flags) 2224 return (0); 2225 2226 return (cd_mode_select(cd, SMS_PF, &data, 2227 sizeof(struct scsipi_mode_page_header) + page->pg_length, 2228 flags, big)); 2229 } 2230 2231 static int 2232 cd_setchan(struct cd_softc *cd, int p0, int p1, int p2, int p3, int flags) 2233 { 2234 struct { 2235 union { 2236 struct scsipi_mode_header small; 2237 struct scsipi_mode_header_big big; 2238 } header; 2239 struct cd_audio_page page; 2240 } data; 2241 int error; 2242 int big, byte2; 2243 struct cd_audio_page *page; 2244 2245 byte2 = SMS_DBD; 2246 try_again: 2247 if ((error = cd_mode_sense(cd, byte2, &data, sizeof(data.page), 2248 AUDIO_PAGE, flags, &big)) != 0) { 2249 if (byte2 == SMS_DBD) { 2250 /* Device may not understand DBD; retry without */ 2251 byte2 = 0; 2252 goto try_again; 2253 } 2254 return (error); 2255 } 2256 2257 if (big) 2258 page = (void *)((u_long)&data.header.big + 2259 sizeof data.header.big + 2260 _2btol(data.header.big.blk_desc_len)); 2261 else 2262 page = (void *)((u_long)&data.header.small + 2263 sizeof data.header.small + 2264 data.header.small.blk_desc_len); 2265 2266 page->port[0].channels = p0; 2267 page->port[1].channels = p1; 2268 page->port[2].channels = p2; 2269 page->port[3].channels = p3; 2270 2271 return (cd_mode_select(cd, SMS_PF, &data, 2272 sizeof(struct scsipi_mode_page_header) + page->pg_length, 2273 flags, big)); 2274 } 2275 2276 static int 2277 cd_getvol(struct cd_softc *cd, struct ioc_vol *arg, int flags) 2278 { 2279 struct { 2280 union { 2281 struct scsipi_mode_header small; 2282 struct scsipi_mode_header_big big; 2283 } header; 2284 struct cd_audio_page page; 2285 } data; 2286 int error; 2287 int big, byte2; 2288 struct cd_audio_page *page; 2289 2290 byte2 = SMS_DBD; 2291 try_again: 2292 if ((error = cd_mode_sense(cd, byte2, &data, sizeof(data.page), 2293 AUDIO_PAGE, flags, &big)) != 0) { 2294 if (byte2 == SMS_DBD) { 2295 /* Device may not understand DBD; retry without */ 2296 byte2 = 0; 2297 goto try_again; 2298 } 2299 return (error); 2300 } 2301 2302 if (big) 2303 page = (void *)((u_long)&data.header.big + 2304 sizeof data.header.big + 2305 _2btol(data.header.big.blk_desc_len)); 2306 else 2307 page = (void *)((u_long)&data.header.small + 2308 sizeof data.header.small + 2309 data.header.small.blk_desc_len); 2310 2311 arg->vol[0] = page->port[0].volume; 2312 arg->vol[1] = page->port[1].volume; 2313 arg->vol[2] = page->port[2].volume; 2314 arg->vol[3] = page->port[3].volume; 2315 2316 return (0); 2317 } 2318 2319 static int 2320 cd_setvol(struct cd_softc *cd, const struct ioc_vol *arg, int flags) 2321 { 2322 struct { 2323 union { 2324 struct scsipi_mode_header small; 2325 struct scsipi_mode_header_big big; 2326 } header; 2327 struct cd_audio_page page; 2328 } data, mask; 2329 int error; 2330 int big, byte2; 2331 struct cd_audio_page *page, *page2; 2332 2333 byte2 = SMS_DBD; 2334 try_again: 2335 if ((error = cd_mode_sense(cd, byte2, &data, sizeof(data.page), 2336 AUDIO_PAGE, flags, &big)) != 0) { 2337 if (byte2 == SMS_DBD) { 2338 /* Device may not understand DBD; retry without */ 2339 byte2 = 0; 2340 goto try_again; 2341 } 2342 return (error); 2343 } 2344 if ((error = cd_mode_sense(cd, byte2, &mask, sizeof(mask.page), 2345 AUDIO_PAGE|SMS_PAGE_CTRL_CHANGEABLE, flags, &big)) != 0) 2346 return (error); 2347 2348 if (big) { 2349 page = (void *)((u_long)&data.header.big + 2350 sizeof data.header.big + 2351 _2btol(data.header.big.blk_desc_len)); 2352 page2 = (void *)((u_long)&mask.header.big + 2353 sizeof mask.header.big + 2354 _2btol(mask.header.big.blk_desc_len)); 2355 } else { 2356 page = (void *)((u_long)&data.header.small + 2357 sizeof data.header.small + 2358 data.header.small.blk_desc_len); 2359 page2 = (void *)((u_long)&mask.header.small + 2360 sizeof mask.header.small + 2361 mask.header.small.blk_desc_len); 2362 } 2363 2364 page->port[0].volume = arg->vol[0] & page2->port[0].volume; 2365 page->port[1].volume = arg->vol[1] & page2->port[1].volume; 2366 page->port[2].volume = arg->vol[2] & page2->port[2].volume; 2367 page->port[3].volume = arg->vol[3] & page2->port[3].volume; 2368 2369 page->port[0].channels = CHANNEL_0; 2370 page->port[1].channels = CHANNEL_1; 2371 2372 return (cd_mode_select(cd, SMS_PF, &data, 2373 sizeof(struct scsipi_mode_page_header) + page->pg_length, 2374 flags, big)); 2375 } 2376 2377 static int 2378 cd_load_unload(struct cd_softc *cd, struct ioc_load_unload *args) 2379 { 2380 struct scsipi_load_unload cmd; 2381 2382 memset(&cmd, 0, sizeof(cmd)); 2383 cmd.opcode = LOAD_UNLOAD; 2384 cmd.options = args->options; /* ioctl uses MMC values */ 2385 cmd.slot = args->slot; 2386 2387 return (scsipi_command(cd->sc_periph, (void *)&cmd, sizeof(cmd), 0, 0, 2388 CDRETRIES, 200000, NULL, 0)); 2389 } 2390 2391 static int 2392 cd_setblksize(struct cd_softc *cd) 2393 { 2394 struct { 2395 union { 2396 struct scsipi_mode_header small; 2397 struct scsipi_mode_header_big big; 2398 } header; 2399 struct scsi_blk_desc blk_desc; 2400 } data; 2401 int error; 2402 int big, bsize; 2403 struct scsi_blk_desc *bdesc; 2404 2405 if ((error = cd_mode_sense(cd, 0, &data, sizeof(data.blk_desc), 0, 0, 2406 &big)) != 0) 2407 return (error); 2408 2409 if (big) { 2410 bdesc = (void *)(&data.header.big + 1); 2411 bsize = _2btol(data.header.big.blk_desc_len); 2412 } else { 2413 bdesc = (void *)(&data.header.small + 1); 2414 bsize = data.header.small.blk_desc_len; 2415 } 2416 2417 if (bsize == 0) { 2418 printf("cd_setblksize: trying to change bsize, but no blk_desc\n"); 2419 return (EINVAL); 2420 } 2421 if (_3btol(bdesc->blklen) == 2048) { 2422 printf("cd_setblksize: trying to change bsize, but blk_desc is correct\n"); 2423 return (EINVAL); 2424 } 2425 2426 _lto3b(2048, bdesc->blklen); 2427 2428 return (cd_mode_select(cd, SMS_PF, &data, sizeof(data.blk_desc), 0, 2429 big)); 2430 } 2431