sys/dev/disk/nata/atapi-cd.c

   1 /*-
   2  * Copyright (c) 1998 - 2006 Søren Schmidt <sos@FreeBSD.org>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer,
  10  *    without modification, immediately at the beginning of the file.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  *
  26  * $FreeBSD: src/sys/dev/ata/atapi-cd.c,v 1.189 2006/06/28 15:04:10 sos Exp $
  27  * $DragonFly: src/sys/dev/disk/nata/atapi-cd.c,v 1.4 2007/01/09 20:56:16 tgen Exp $
  28  */
  29
  30 #include "opt_ata.h"
  31
  32 #include <sys/param.h>
  33 #include <sys/bio.h>
  34 #include <sys/buf.h>
  35 #include <sys/bus.h>
  36 #include <sys/cdio.h>
  37 #include <sys/cdrio.h>
  38 #include <sys/device.h>
  39 #include <sys/devicestat.h>
  40 #include <sys/disk.h>
  41 #include <sys/dvdio.h>
  42 #include <sys/kernel.h>
  43 #include <sys/malloc.h>
  44 #include <sys/module.h>
  45 #include <sys/nata.h>
  46 #include <sys/proc.h>
  47 #include <sys/systm.h>
  48
  49 #include "ata-all.h"
  50 #include "atapi-cd.h"
  51 #include "ata_if.h"
  52
  53 /* device structure */
  54 static  d_open_t        acd_open;
  55 static  d_close_t       acd_close;
  56 static  d_ioctl_t       acd_ioctl;
  57 static  d_strategy_t    acd_strategy;
  58 static struct dev_ops acd_ops = {
  59         { "acd", 117, D_DISK | D_TRACKCLOSE },
  60         .d_open =       acd_open,
  61         .d_close =      acd_close,
  62         .d_read =       physread,
  63         .d_write =      physwrite,
  64         .d_ioctl =      acd_ioctl,
  65         .d_strategy =   acd_strategy,
  66 };
  67
  68 /* prototypes */
  69 static void acd_set_ioparm(device_t);
  70 static void acd_describe(device_t);
  71 static void lba2msf(u_int32_t, u_int8_t *, u_int8_t *, u_int8_t *);
  72 static u_int32_t msf2lba(u_int8_t, u_int8_t, u_int8_t);
  73 static void acd_start(device_t, struct bio *);
  74 static void acd_done(struct ata_request *);
  75 static void acd_read_toc(device_t);
  76 static struct acd_tracknode * acd_make_tracknode(device_t, int);
  77 static void acd_destroy_tracknode(device_t, int);
  78 static int acd_play(device_t, int, int);
  79 static int acd_setchan(device_t, u_int8_t, u_int8_t, u_int8_t, u_int8_t);
  80 static int acd_init_writer(device_t, int);
  81 static int acd_fixate(device_t, int);
  82 static int acd_init_track(device_t, struct cdr_track *);
  83 static int acd_flush(device_t);
  84 static int acd_read_track_info(device_t, int32_t, struct acd_track_info *);
  85 static int acd_get_progress(device_t, int *);
  86 static int acd_send_cue(device_t, struct cdr_cuesheet *);
  87 static int acd_report_key(device_t, struct dvd_authinfo *);
  88 static int acd_send_key(device_t, struct dvd_authinfo *);
  89 static int acd_read_structure(device_t, struct dvd_struct *);
  90 static int acd_tray(device_t, int);
  91 static int acd_blank(device_t, int);
  92 static int acd_prevent_allow(device_t, int);
  93 static int acd_start_stop(device_t, int);
  94 static int acd_pause_resume(device_t, int);
  95 static int acd_mode_sense(device_t, int, caddr_t, int);
  96 static int acd_mode_select(device_t, caddr_t, int);
  97 static int acd_set_speed(device_t, int, int);
  98 static void acd_get_cap(device_t);
  99 #ifdef ACD_CDR_FORMAT
 100 /* not yet ready */
 101 static int acd_read_format_caps(device_t, struct cdr_format_capacities *);
 102 static int acd_format(device_t, struct cdr_format_params *);
 103 #endif /* ACD_CDR_FORMAT */
 104 static int acd_test_ready(device_t);
 105
 106 /* internal vars */
 107 static MALLOC_DEFINE(M_ACD, "acd_driver", "ATAPI CD driver buffers");
 108
 109 static int
 110 acd_probe(device_t dev)
 111 {
 112     struct ata_device *atadev = device_get_softc(dev);
 113
 114     if ((atadev->param.config & ATA_PROTO_ATAPI) &&
 115         (atadev->param.config & ATA_ATAPI_TYPE_MASK) == ATA_ATAPI_TYPE_CDROM)
 116         return 0;
 117     else
 118         return ENXIO;
 119 }
 120
 121 static int
 122 acd_attach(device_t dev)
 123 {
 124     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
 125     struct ata_device *atadev = device_get_softc(dev);
 126     struct acd_softc *cdp;
 127     cdev_t cdev;
 128
 129     /* XXX TGEN We're not in interrupt context, so we can M_WAITOK and remove
 130        the OOM check. */
 131     if (!(cdp = kmalloc(sizeof(struct acd_softc), M_ACD, M_NOWAIT | M_ZERO))) {
 132         device_printf(dev, "out of memory\n");
 133         return ENOMEM;
 134     }
 135     cdp->block_size = 2048;
 136     device_set_ivars(dev, cdp);
 137     ATA_SETMODE(device_get_parent(dev), dev);
 138     ata_controlcmd(dev, ATA_DEVICE_RESET, 0, 0, 0);
 139     acd_get_cap(dev);
 140
 141     devstat_add_entry(&cdp->stats, "acd", device_get_unit(dev), DEV_BSIZE,
 142                       DEVSTAT_NO_ORDERED_TAGS,
 143                       DEVSTAT_TYPE_CDROM | DEVSTAT_TYPE_IF_IDE,
 144                       DEVSTAT_PRIORITY_CD);
 145     dev_ops_add(&acd_ops, dkunitmask(), dkmakeunit(device_get_unit(dev)));
 146     cdev = make_dev(&acd_ops, dkmakeminor(device_get_unit(dev), 0, 0),
 147                       UID_ROOT, GID_OPERATOR, 0644, "acd%d",
 148                       device_get_unit(dev));
 149     reference_dev(cdev);
 150     cdev->si_drv1 = dev;
 151     /* XXX TGEN acd_set_ioparm(dev); */
 152     if (ch->dma)
 153         cdev->si_iosize_max = ch->dma->max_iosize;
 154     else
 155         cdev->si_iosize_max = DFLTPHYS;
 156     cdp->cdev = cdev;
 157     atadev->flags |= ATA_D_MEDIA_CHANGED;
 158
 159     /* announce we are here */
 160     acd_describe(dev);
 161     return 0;
 162 }
 163
 164 static int
 165 acd_detach(device_t dev)
 166 {
 167     struct acd_softc *cdp = device_get_ivars(dev);
 168     int track;
 169
 170     /* destroy devices from the system so we don't get any further requests */
 171     for (track = 1; track < MAXTRK; track++) {
 172         if (cdp->track[track] == NULL)
 173             continue;
 174         acd_destroy_tracknode(dev, track);
 175     }
 176     destroy_dev(cdp->cdev);
 177
 178     /* fail requests on the queue and any "in flight" for this device */
 179     ata_fail_requests(dev);
 180
 181     /* don't leave anything behind */
 182     dev_ops_remove(&acd_ops, dkunitmask(), dkmakeunit(device_get_unit(dev)));
 183     devstat_remove_entry(&cdp->stats);
 184     device_set_ivars(dev, NULL);
 185     kfree(cdp, M_ACD);
 186     return 0;
 187 }
 188
 189 static void
 190 acd_shutdown(device_t dev)
 191 {
 192     struct ata_device *atadev = device_get_softc(dev);
 193
 194     if (atadev->param.support.command2 & ATA_SUPPORT_FLUSHCACHE)
 195         ata_controlcmd(dev, ATA_FLUSHCACHE, 0, 0, 0);
 196 }
 197
 198 static int
 199 acd_reinit(device_t dev)
 200 {
 201     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
 202     struct ata_device *atadev = device_get_softc(dev);
 203     struct acd_softc *cdp = device_get_ivars(dev);
 204
 205     if (((atadev->unit == ATA_MASTER) && !(ch->devices & ATA_ATAPI_MASTER)) ||
 206         ((atadev->unit == ATA_SLAVE) && !(ch->devices & ATA_ATAPI_SLAVE))) {
 207         device_set_ivars(dev, NULL);
 208         kfree(cdp, M_ACD);
 209         return 1;
 210     }
 211     ATA_SETMODE(device_get_parent(dev), dev);
 212     return 0;
 213 }
 214
 215 static int
 216 acd_open(struct dev_open_args *ap)
 217 {
 218     device_t dev = ap->a_head.a_dev->si_drv1;
 219     /* XXX TGEN Sometimes, we're fed a cdev_t which we didn't create. It
 220        doesn't have si_drv1 set, leading to evil NULL derefs. I can actually
 221        recover our device_t otherwise, but really, this is a bug, so I'll bail
 222        out. */
 223     if (!dev)
 224         return ENXIO;
 225     struct ata_device *atadev = device_get_softc(dev);
 226     struct acd_softc *cdp = device_get_ivars(dev);
 227     struct ata_request *request;
 228     int8_t ccb[16] = { ATAPI_TEST_UNIT_READY, 0, 0, 0, 0,
 229                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
 230     int timeout = 60;
 231
 232     if (!cdp)
 233         return ENXIO;
 234     if (!device_is_attached(dev))
 235         return EBUSY;
 236     if (!(request = ata_alloc_request()))
 237         return ENOMEM;
 238
 239     /* wait if drive is not finished loading the medium */
 240     while(timeout--) {
 241         bzero(request, sizeof(struct ata_request));
 242         request->dev = dev;
 243         bcopy(ccb, request->u.atapi.ccb, 16);
 244         request->flags = ATA_R_ATAPI;
 245         request->timeout = 5;
 246         ata_queue_request(request);
 247         if (!request->error &&
 248             (request->u.atapi.sense.key == 2 ||
 249              request->u.atapi.sense.key == 7) &&
 250             request->u.atapi.sense.asc == 4 &&
 251             request->u.atapi.sense.ascq == 1)
 252             tsleep(&timeout, 0, "acdld", hz / 2);
 253         else
 254             break;
 255     }
 256     ata_free_request(request);
 257
 258     if (count_dev(cdp->cdev) == 1) {
 259         acd_prevent_allow(dev, 1);
 260         cdp->flags |= F_LOCKED;
 261         acd_read_toc(dev);
 262     }
 263     return 0;
 264 }
 265
 266 static int
 267 acd_close(struct dev_close_args *ap)
 268 {
 269     device_t dev = ap->a_head.a_dev->si_drv1;
 270     struct acd_softc *cdp = device_get_ivars(dev);
 271
 272     if (!cdp)
 273         return ENXIO;
 274
 275     if (count_dev(cdp->cdev) == 1) {
 276         acd_prevent_allow(dev, 0);
 277         cdp->flags &= ~F_LOCKED;
 278     }
 279     return 0;
 280 }
 281
 282 static int
 283 acd_ioctl(struct dev_ioctl_args *ap)
 284 {
 285     device_t dev = ap->a_head.a_dev->si_drv1;
 286     struct ata_device *atadev = device_get_softc(dev);
 287     struct acd_softc *cdp = device_get_ivars(dev);
 288     int error = 0, nocopyout = 0;
 289
 290     if (!cdp)
 291         return ENXIO;
 292
 293     if (atadev->flags & ATA_D_MEDIA_CHANGED) {
 294         switch (ap->a_cmd) {
 295         case CDIOCRESET:
 296             acd_test_ready(dev);
 297             break;
 298
 299         default:
 300             acd_read_toc(dev);
 301             acd_prevent_allow(dev, 1);
 302             cdp->flags |= F_LOCKED;
 303             break;
 304         }
 305     }
 306
 307     switch (ap->a_cmd) {
 308
 309     case CDIOCRESUME:
 310         error = acd_pause_resume(dev, 1);
 311         break;
 312
 313     case CDIOCPAUSE:
 314         error = acd_pause_resume(dev, 0);
 315         break;
 316
 317     case CDIOCSTART:
 318         error = acd_start_stop(dev, 1);
 319         break;
 320
 321     case CDIOCSTOP:
 322         error = acd_start_stop(dev, 0);
 323         break;
 324
 325     case CDIOCALLOW:
 326         error = acd_prevent_allow(dev, 0);
 327         cdp->flags &= ~F_LOCKED;
 328         break;
 329
 330     case CDIOCPREVENT:
 331         error = acd_prevent_allow(dev, 1);
 332         cdp->flags |= F_LOCKED;
 333         break;
 334
 335     case CDIOCRESET:
 336         error = suser_cred(ap->a_cred, 0);
 337         if (error)
 338             break;
 339         error = acd_test_ready(dev);
 340         break;
 341
 342     case CDIOCEJECT:
 343         if (count_dev(cdp->cdev) > 1) {
 344             error = EBUSY;
 345             break;
 346         }
 347         error = acd_tray(dev, 0);
 348         break;
 349
 350     case CDIOCCLOSE:
 351         if (count_dev(cdp->cdev) > 1)
 352             break;
 353         error = acd_tray(dev, 1);
 354         break;
 355
 356     case CDIOREADTOCHEADER:
 357         if (!cdp->toc.hdr.ending_track) {
 358             error = EIO;
 359             break;
 360         }
 361         bcopy(&cdp->toc.hdr, ap->a_data, sizeof(cdp->toc.hdr));
 362         break;
 363
 364     case CDIOREADTOCENTRYS:
 365         {
 366             struct ioc_read_toc_entry *te = (struct ioc_read_toc_entry *)ap->a_data;
 367             struct toc *toc = &cdp->toc;
 368             int starting_track = te->starting_track;
 369             int len;
 370
 371             if (!toc->hdr.ending_track) {
 372                 error = EIO;
 373                 break;
 374             }
 375
 376             if (te->data_len < sizeof(toc->tab[0]) ||
 377                 (te->data_len % sizeof(toc->tab[0])) != 0 ||
 378                 (te->address_format != CD_MSF_FORMAT &&
 379                 te->address_format != CD_LBA_FORMAT)) {
 380                 error = EINVAL;
 381                 break;
 382             }
 383
 384             if (!starting_track)
 385                 starting_track = toc->hdr.starting_track;
 386             else if (starting_track == 170)
 387                 starting_track = toc->hdr.ending_track + 1;
 388             else if (starting_track < toc->hdr.starting_track ||
 389                      starting_track > toc->hdr.ending_track + 1) {
 390                 error = EINVAL;
 391                 break;
 392             }
 393
 394             len = ((toc->hdr.ending_track + 1 - starting_track) + 1) *
 395                   sizeof(toc->tab[0]);
 396             if (te->data_len < len)
 397                 len = te->data_len;
 398             if (len > sizeof(toc->tab)) {
 399                 error = EINVAL;
 400                 break;
 401             }
 402
 403             if (te->address_format == CD_MSF_FORMAT) {
 404                 struct cd_toc_entry *entry;
 405
 406                 /* XXX TGEN Use M_WAITOK, not in intr ctx. */
 407                 if (!(toc = kmalloc(sizeof(struct toc), M_ACD, M_NOWAIT))) {
 408                     error = ENOMEM;
 409                     break;
 410                 }
 411                 bcopy(&cdp->toc, toc, sizeof(struct toc));
 412                 entry = toc->tab + (toc->hdr.ending_track + 1 -
 413                         toc->hdr.starting_track) + 1;
 414                 while (--entry >= toc->tab) {
 415                     lba2msf(ntohl(entry->addr.lba), &entry->addr.msf.minute,
 416                             &entry->addr.msf.second, &entry->addr.msf.frame);
 417                     entry->addr_type = CD_MSF_FORMAT;
 418                 }
 419             }
 420             error = copyout(toc->tab + starting_track - toc->hdr.starting_track,
 421                             te->data, len);
 422             if (te->address_format == CD_MSF_FORMAT)
 423                 kfree(toc, M_ACD);
 424         }
 425         break;
 426
 427     case CDIOREADTOCENTRY:
 428         {
 429             struct ioc_read_toc_single_entry *te =
 430                 (struct ioc_read_toc_single_entry *)ap->a_data;
 431             struct toc *toc = &cdp->toc;
 432             u_char track = te->track;
 433
 434             if (!toc->hdr.ending_track) {
 435                 error = EIO;
 436                 break;
 437             }
 438
 439             if (te->address_format != CD_MSF_FORMAT &&
 440                 te->address_format != CD_LBA_FORMAT) {
 441                 error = EINVAL;
 442                 break;
 443             }
 444
 445             if (!track)
 446                 track = toc->hdr.starting_track;
 447             else if (track == 170)
 448                 track = toc->hdr.ending_track + 1;
 449             else if (track < toc->hdr.starting_track ||
 450                      track > toc->hdr.ending_track + 1) {
 451                 error = EINVAL;
 452                 break;
 453             }
 454
 455             if (te->address_format == CD_MSF_FORMAT) {
 456                 struct cd_toc_entry *entry;
 457
 458                 /* XXX TGEN Use M_WAITOK, not in intr ctx. */
 459                 if (!(toc = kmalloc(sizeof(struct toc), M_ACD, M_NOWAIT))) {
 460                     error = ENOMEM;
 461                     break;
 462                 }
 463                 bcopy(&cdp->toc, toc, sizeof(struct toc));
 464                 entry = toc->tab + (track - toc->hdr.starting_track);
 465                 lba2msf(ntohl(entry->addr.lba), &entry->addr.msf.minute,
 466                         &entry->addr.msf.second, &entry->addr.msf.frame);
 467             }
 468             bcopy(toc->tab + track - toc->hdr.starting_track,
 469                   &te->entry, sizeof(struct cd_toc_entry));
 470             if (te->address_format == CD_MSF_FORMAT)
 471                 kfree(toc, M_ACD);
 472         }
 473         break;
 474
 475 /* XXX TGEN Remove this and the rest of the nocopyout logic? */
 476 #if __FreeBSD_version > 600008
 477     case CDIOCREADSUBCHANNEL_SYSSPACE:
 478         nocopyout = 1;
 479         /* FALLTHROUGH */
 480
 481 #endif
 482     case CDIOCREADSUBCHANNEL:
 483         {
 484             struct ioc_read_subchannel *args =
 485                 (struct ioc_read_subchannel *)ap->a_data;
 486             u_int8_t format;
 487             int8_t ccb[16] = { ATAPI_READ_SUBCHANNEL, 0, 0x40, 1, 0, 0, 0,
 488                                sizeof(cdp->subchan)>>8, sizeof(cdp->subchan),
 489                                0, 0, 0, 0, 0, 0, 0 };
 490
 491             if (args->data_len > sizeof(struct cd_sub_channel_info) ||
 492                 args->data_len < sizeof(struct cd_sub_channel_header)) {
 493                 error = EINVAL;
 494                 break;
 495             }
 496
 497             format = args->data_format;
 498             if ((format != CD_CURRENT_POSITION) &&
 499                 (format != CD_MEDIA_CATALOG) && (format != CD_TRACK_INFO)) {
 500                 error = EINVAL;
 501                 break;
 502             }
 503
 504             ccb[1] = args->address_format & CD_MSF_FORMAT;
 505
 506             if ((error = ata_atapicmd(dev, ccb, (caddr_t)&cdp->subchan,
 507                                       sizeof(cdp->subchan), ATA_R_READ, 10)))
 508                 break;
 509
 510             if ((format == CD_MEDIA_CATALOG) || (format == CD_TRACK_INFO)) {
 511                 if (cdp->subchan.header.audio_status == 0x11) {
 512                     error = EINVAL;
 513                     break;
 514                 }
 515
 516                 ccb[3] = format;
 517                 if (format == CD_TRACK_INFO)
 518                     ccb[6] = args->track;
 519
 520                 if ((error = ata_atapicmd(dev, ccb, (caddr_t)&cdp->subchan,
 521                                           sizeof(cdp->subchan),ATA_R_READ,10))){
 522                     break;
 523                 }
 524             }
 525             /* XXX TGEN Remove this and the rest of the nocopyout logic? */
 526             if (nocopyout == 0) {
 527                 error = copyout(&cdp->subchan, args->data, args->data_len);
 528             } else {
 529                 error = 0;
 530                 bcopy(&cdp->subchan, args->data, args->data_len);
 531             }
 532         }
 533         break;
 534
 535     case CDIOCPLAYMSF:
 536         {
 537             struct ioc_play_msf *args = (struct ioc_play_msf *)ap->a_data;
 538
 539             error =
 540                 acd_play(dev,
 541                          msf2lba(args->start_m, args->start_s, args->start_f),
 542                          msf2lba(args->end_m, args->end_s, args->end_f));
 543         }
 544         break;
 545
 546     case CDIOCPLAYBLOCKS:
 547         {
 548             struct ioc_play_blocks *args = (struct ioc_play_blocks *)ap->a_data;
 549
 550             error = acd_play(dev, args->blk, args->blk + args->len);
 551         }
 552         break;
 553
 554     case CDIOCPLAYTRACKS:
 555         {
 556             struct ioc_play_track *args = (struct ioc_play_track *)ap->a_data;
 557             int t1, t2;
 558
 559             if (!cdp->toc.hdr.ending_track) {
 560                 error = EIO;
 561                 break;
 562             }
 563             if (args->end_track < cdp->toc.hdr.ending_track + 1)
 564                 ++args->end_track;
 565             if (args->end_track > cdp->toc.hdr.ending_track + 1)
 566                 args->end_track = cdp->toc.hdr.ending_track + 1;
 567             t1 = args->start_track - cdp->toc.hdr.starting_track;
 568             t2 = args->end_track - cdp->toc.hdr.starting_track;
 569             if (t1 < 0 || t2 < 0 ||
 570                 t1 > (cdp->toc.hdr.ending_track-cdp->toc.hdr.starting_track)) {
 571                 error = EINVAL;
 572                 break;
 573             }
 574             error = acd_play(dev, ntohl(cdp->toc.tab[t1].addr.lba),
 575                              ntohl(cdp->toc.tab[t2].addr.lba));
 576         }
 577         break;
 578
 579     case CDIOCGETVOL:
 580         {
 581             struct ioc_vol *arg = (struct ioc_vol *)ap->a_data;
 582
 583             if ((error = acd_mode_sense(dev, ATAPI_CDROM_AUDIO_PAGE,
 584                                         (caddr_t)&cdp->au, sizeof(cdp->au))))
 585                 break;
 586
 587             if (cdp->au.page_code != ATAPI_CDROM_AUDIO_PAGE) {
 588                 error = EIO;
 589                 break;
 590             }
 591             arg->vol[0] = cdp->au.port[0].volume;
 592             arg->vol[1] = cdp->au.port[1].volume;
 593             arg->vol[2] = cdp->au.port[2].volume;
 594             arg->vol[3] = cdp->au.port[3].volume;
 595         }
 596         break;
 597
 598     case CDIOCSETVOL:
 599         {
 600             struct ioc_vol *arg = (struct ioc_vol *)ap->a_data;
 601
 602             if ((error = acd_mode_sense(dev, ATAPI_CDROM_AUDIO_PAGE,
 603                                         (caddr_t)&cdp->au, sizeof(cdp->au))))
 604                 break;
 605             if (cdp->au.page_code != ATAPI_CDROM_AUDIO_PAGE) {
 606                 error = EIO;
 607                 break;
 608             }
 609             if ((error = acd_mode_sense(dev, ATAPI_CDROM_AUDIO_PAGE_MASK,
 610                                         (caddr_t)&cdp->aumask,
 611                                         sizeof(cdp->aumask))))
 612                 break;
 613             cdp->au.data_length = 0;
 614             cdp->au.port[0].channels = CHANNEL_0;
 615             cdp->au.port[1].channels = CHANNEL_1;
 616             cdp->au.port[0].volume = arg->vol[0] & cdp->aumask.port[0].volume;
 617             cdp->au.port[1].volume = arg->vol[1] & cdp->aumask.port[1].volume;
 618             cdp->au.port[2].volume = arg->vol[2] & cdp->aumask.port[2].volume;
 619             cdp->au.port[3].volume = arg->vol[3] & cdp->aumask.port[3].volume;
 620             error =  acd_mode_select(dev, (caddr_t)&cdp->au, sizeof(cdp->au));
 621         }
 622         break;
 623
 624     case CDIOCSETPATCH:
 625         {
 626             struct ioc_patch *arg = (struct ioc_patch *)ap->a_data;
 627
 628             error = acd_setchan(dev, arg->patch[0], arg->patch[1],
 629                                 arg->patch[2], arg->patch[3]);
 630         }
 631         break;
 632
 633     case CDIOCSETMONO:
 634         error = acd_setchan(dev, CHANNEL_0|CHANNEL_1, CHANNEL_0|CHANNEL_1, 0,0);
 635         break;
 636
 637     case CDIOCSETSTEREO:
 638         error = acd_setchan(dev, CHANNEL_0, CHANNEL_1, 0, 0);
 639         break;
 640
 641     case CDIOCSETMUTE:
 642         error = acd_setchan(dev, 0, 0, 0, 0);
 643         break;
 644
 645     case CDIOCSETLEFT:
 646         error = acd_setchan(dev, CHANNEL_0, CHANNEL_0, 0, 0);
 647         break;
 648
 649     case CDIOCSETRIGHT:
 650         error = acd_setchan(dev, CHANNEL_1, CHANNEL_1, 0, 0);
 651         break;
 652
 653     case CDRIOCBLANK:
 654         error = acd_blank(dev, (*(int *)ap->a_data));
 655         break;
 656
 657     case CDRIOCNEXTWRITEABLEADDR:
 658         {
 659             struct acd_track_info track_info;
 660
 661             if ((error = acd_read_track_info(dev, 0xff, &track_info)))
 662                 break;
 663
 664             if (!track_info.nwa_valid) {
 665                 error = EINVAL;
 666                 break;
 667             }
 668             *(int*)ap->a_data = track_info.next_writeable_addr;
 669         }
 670         break;
 671
 672     case CDRIOCINITWRITER:
 673         error = acd_init_writer(dev, (*(int *)ap->a_data));
 674         break;
 675
 676     case CDRIOCINITTRACK:
 677         error = acd_init_track(dev, (struct cdr_track *)ap->a_data);
 678         break;
 679
 680     case CDRIOCFLUSH:
 681         error = acd_flush(dev);
 682         break;
 683
 684     case CDRIOCFIXATE:
 685         error = acd_fixate(dev, (*(int *)ap->a_data));
 686         break;
 687
 688     case CDRIOCREADSPEED:
 689         {
 690             int speed = *(int *)ap->a_data;
 691
 692             /* Preserve old behavior: units in multiples of CDROM speed */
 693             if (speed < 177)
 694                 speed *= 177;
 695             error = acd_set_speed(dev, speed, CDR_MAX_SPEED);
 696         }
 697         break;
 698
 699     case CDRIOCWRITESPEED:
 700         {
 701             int speed = *(int *)ap->a_data;
 702
 703             if (speed < 177)
 704                 speed *= 177;
 705             error = acd_set_speed(dev, CDR_MAX_SPEED, speed);
 706         }
 707         break;
 708
 709     case CDRIOCGETBLOCKSIZE:
 710         *(int *)ap->a_data = cdp->block_size;
 711         break;
 712
 713     case CDRIOCSETBLOCKSIZE:
 714         cdp->block_size = *(int *)ap->a_data;
 715         acd_set_ioparm(dev);
 716         break;
 717
 718     case CDRIOCGETPROGRESS:
 719         error = acd_get_progress(dev, (int *)ap->a_data);
 720         break;
 721
 722     case CDRIOCSENDCUE:
 723         error = acd_send_cue(dev, (struct cdr_cuesheet *)ap->a_data);
 724         break;
 725
 726 #ifdef ACD_CDR_FORMAT
 727     case CDRIOCREADFORMATCAPS:
 728         error = acd_read_format_caps(dev,
 729                         (struct cdr_format_capacities *)ap->a_data);
 730         break;
 731
 732     case CDRIOCFORMAT:
 733         error = acd_format(dev, (struct cdr_format_params *)ap->a_data);
 734         break;
 735 #endif /* ACD_CDR_FORMAT */
 736
 737     case DVDIOCREPORTKEY:
 738         if (cdp->cap.media & MST_READ_DVDROM)
 739             error = acd_report_key(dev, (struct dvd_authinfo *)ap->a_data);
 740         else
 741             error = EINVAL;
 742         break;
 743
 744     case DVDIOCSENDKEY:
 745         if (cdp->cap.media & MST_READ_DVDROM)
 746             error = acd_send_key(dev, (struct dvd_authinfo *)ap->a_data);
 747         else
 748             error = EINVAL;
 749         break;
 750
 751     case DVDIOCREADSTRUCTURE:
 752         if (cdp->cap.media & MST_READ_DVDROM)
 753             error = acd_read_structure(dev, (struct dvd_struct *)ap->a_data);
 754         else
 755             error = EINVAL;
 756         break;
 757
 758     default:
 759         error = ata_device_ioctl(dev, ap->a_cmd, ap->a_data);
 760     }
 761     return error;
 762 }
 763
 764 static int
 765 acd_strategy(struct dev_strategy_args *ap)
 766 {
 767     device_t dev = ap->a_head.a_dev->si_drv1;
 768     struct bio *bp = ap->a_bio;
 769     struct buf *bbp = bp->bio_buf;
 770     struct ata_device *atadev = device_get_softc(dev);
 771     struct acd_softc *cdp = device_get_ivars(dev);
 772     cdev_t cdev = cdp->cdev;
 773
 774     if (bbp->b_cmd != BUF_CMD_READ && bbp->b_cmd != BUF_CMD_WRITE) {
 775         bbp->b_flags |= B_ERROR;
 776         bbp->b_error = EOPNOTSUPP;
 777         biodone(bp);
 778         return 0;
 779     }
 780
 781     if (bbp->b_cmd == BUF_CMD_READ && cdp->disk_size == -1) {
 782         bbp->b_flags |= B_ERROR;
 783         bbp->b_error = EIO;
 784         biodone(bp);
 785         return 0;
 786     }
 787
 788     bp->bio_driver_info = cdev;
 789     bbp->b_resid = bbp->b_bcount;
 790
 791     acd_start(dev, bp);
 792     return 0;
 793 }
 794
 795 /* XXX TGEN Collapse this with acd_strategy()? */
 796 static void
 797 acd_start(device_t dev, struct bio *bp)
 798 {
 799     struct buf *bbp = bp->bio_buf;
 800     struct ata_device *atadev = device_get_softc(dev);
 801     struct acd_softc *cdp = device_get_ivars(dev);
 802     struct ata_request *request;
 803     cdev_t cdev;
 804     u_int32_t lba, lastlba, count;
 805     int8_t ccb[16];
 806     int track, blocksize;
 807
 808     cdev = bp->bio_driver_info;
 809
 810     /* reject all queued entries if media changed */
 811     if (atadev->flags & ATA_D_MEDIA_CHANGED) {
 812         bbp->b_flags |= B_ERROR;
 813         bbp->b_error = EIO;
 814         biodone(bp);
 815         return;
 816     }
 817
 818     bzero(ccb, sizeof(ccb));
 819
 820     /* AND the unit number out of the minor, and shift the tracknumber back */
 821     track = (cdev->si_udev & 0x00ff0000) >> 16;
 822
 823     if (track) {
 824         blocksize = (cdp->toc.tab[track - 1].control & 4) ? 2048 : 2352;
 825         lastlba = ntohl(cdp->toc.tab[track].addr.lba);
 826         lba = bp->bio_offset / blocksize;
 827         lba += ntohl(cdp->toc.tab[track - 1].addr.lba);
 828     }
 829     else {
 830         blocksize = cdp->block_size;
 831         lastlba = cdp->disk_size;
 832         lba = bp->bio_offset / blocksize;
 833     }
 834
 835     count = bbp->b_bcount / blocksize;
 836
 837     if (bbp->b_cmd == BUF_CMD_READ) {
 838         /* if transfer goes beyond range adjust it to be within limits */
 839         if (lba + count > lastlba) {
 840             /* if we are entirely beyond EOM return EOF */
 841             if (lastlba <= lba) {
 842                 bbp->b_resid = bbp->b_bcount;
 843                 biodone(bp);
 844                 return;
 845             }
 846             count = lastlba - lba;
 847         }
 848         switch (blocksize) {
 849         case 2048:
 850             ccb[0] = ATAPI_READ_BIG;
 851             break;
 852
 853         case 2352:
 854             ccb[0] = ATAPI_READ_CD;
 855             ccb[9] = 0xf8;
 856             break;
 857
 858         default:
 859             ccb[0] = ATAPI_READ_CD;
 860             ccb[9] = 0x10;
 861         }
 862     }
 863     else
 864         ccb[0] = ATAPI_WRITE_BIG;
 865
 866     ccb[1] = 0;
 867     ccb[2] = lba>>24;
 868     ccb[3] = lba>>16;
 869     ccb[4] = lba>>8;
 870     ccb[5] = lba;
 871     ccb[6] = count>>16;
 872     ccb[7] = count>>8;
 873     ccb[8] = count;
 874
 875     if (!(request = ata_alloc_request())) {
 876         bbp->b_flags |= B_ERROR;
 877         bbp->b_error = ENOMEM;
 878         biodone(bp);
 879         return;
 880     }
 881     request->dev = dev;
 882     request->bio = bp;
 883     bcopy(ccb, request->u.atapi.ccb,
 884           (atadev->param.config & ATA_PROTO_MASK) ==
 885           ATA_PROTO_ATAPI_12 ? 16 : 12);
 886     request->data = bbp->b_data;
 887     request->bytecount = count * blocksize;
 888     request->transfersize = min(request->bytecount, 65534);
 889     request->timeout = (ccb[0] == ATAPI_WRITE_BIG) ? 60 : 30;
 890     request->retries = 2;
 891     request->callback = acd_done;
 892     request->flags = ATA_R_ATAPI;
 893     if (atadev->mode >= ATA_DMA)
 894         request->flags |= ATA_R_DMA;
 895     switch (bbp->b_cmd) {
 896     case BUF_CMD_READ:
 897         request->flags |= ATA_R_READ;
 898         break;
 899     case BUF_CMD_WRITE:
 900         request->flags |= ATA_R_WRITE;
 901         break;
 902     default:
 903         device_printf(dev, "unknown BUF operation\n");
 904         ata_free_request(request);
 905         bbp->b_flags |= B_ERROR;
 906         bbp->b_error = EIO;
 907         biodone(bp);
 908         return;
 909     }
 910     devstat_start_transaction(&cdp->stats);
 911     ata_queue_request(request);
 912 }
 913
 914 static void
 915 acd_done(struct ata_request *request)
 916 {
 917     struct acd_softc *cdp = device_get_ivars(request->dev);
 918     struct bio *bp = request->bio;
 919     struct buf *bbp = bp->bio_buf;
 920
 921     /* finish up transfer */
 922     if ((bbp->b_error = request->result))
 923         bbp->b_flags |= B_ERROR;
 924     bbp->b_resid = bbp->b_bcount - request->donecount;
 925     devstat_end_transaction_buf(&cdp->stats, bbp);
 926     biodone(bp);
 927     ata_free_request(request);
 928 }
 929
 930 static void
 931 acd_set_ioparm(device_t dev)
 932 {
 933     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
 934     struct acd_softc *cdp = device_get_ivars(dev);
 935
 936     if (ch->dma)
 937         cdp->iomax = min(ch->dma->max_iosize, 65534);
 938     else
 939         cdp->iomax = min(DFLTPHYS, 65534);
 940 }
 941
 942 static void
 943 lba2msf(u_int32_t lba, u_int8_t *m, u_int8_t *s, u_int8_t *f)
 944 {
 945     lba += 150;
 946     lba &= 0xffffff;
 947     *m = lba / (60 * 75);
 948     lba %= (60 * 75);
 949     *s = lba / 75;
 950     *f = lba % 75;
 951 }
 952
 953 static u_int32_t
 954 msf2lba(u_int8_t m, u_int8_t s, u_int8_t f)
 955 {
 956     return (m * 60 + s) * 75 + f - 150;
 957 }
 958
 959 static void
 960 acd_read_toc(device_t dev)
 961 {
 962     struct ata_device *atadev = device_get_softc(dev);
 963     struct acd_softc *cdp = device_get_ivars(dev);
 964     struct acd_tracknode *tracknode;
 965     u_int32_t sizes[2];
 966     int8_t ccb[16];
 967     int track, ntracks, len;
 968
 969     atadev->flags &= ~ATA_D_MEDIA_CHANGED;
 970     bzero(&cdp->toc, sizeof(cdp->toc));
 971
 972     if (acd_test_ready(dev))
 973         return;
 974
 975     bzero(ccb, sizeof(ccb));
 976     len = sizeof(struct ioc_toc_header) + sizeof(struct cd_toc_entry);
 977     ccb[0] = ATAPI_READ_TOC;
 978     ccb[7] = len>>8;
 979     ccb[8] = len;
 980     if (ata_atapicmd(dev, ccb, (caddr_t)&cdp->toc, len,
 981                      ATA_R_READ | ATA_R_QUIET, 30)) {
 982         bzero(&cdp->toc, sizeof(cdp->toc));
 983         return;
 984     }
 985     ntracks = cdp->toc.hdr.ending_track - cdp->toc.hdr.starting_track + 1;
 986     if (ntracks <= 0 || ntracks > MAXTRK) {
 987         bzero(&cdp->toc, sizeof(cdp->toc));
 988         return;
 989     }
 990
 991     len = sizeof(struct ioc_toc_header)+(ntracks+1)*sizeof(struct cd_toc_entry);
 992     bzero(ccb, sizeof(ccb));
 993     ccb[0] = ATAPI_READ_TOC;
 994     ccb[7] = len>>8;
 995     ccb[8] = len;
 996     if (ata_atapicmd(dev, ccb, (caddr_t)&cdp->toc, len,
 997                      ATA_R_READ | ATA_R_QUIET, 30)) {
 998         bzero(&cdp->toc, sizeof(cdp->toc));
 999         return;
1000     }
1001     cdp->toc.hdr.len = ntohs(cdp->toc.hdr.len);
1002
1003     cdp->block_size = (cdp->toc.tab[0].control & 4) ? 2048 : 2352;
1004     acd_set_ioparm(dev);
1005     bzero(ccb, sizeof(ccb));
1006     ccb[0] = ATAPI_READ_CAPACITY;
1007     if (ata_atapicmd(dev, ccb, (caddr_t)sizes, sizeof(sizes),
1008                      ATA_R_READ | ATA_R_QUIET, 30)) {
1009         bzero(&cdp->toc, sizeof(cdp->toc));
1010         return;
1011     }
1012     cdp->disk_size = ntohl(sizes[0]) + 1;
1013
1014     for (track = 1; track <= ntracks; track ++) {
1015         if (cdp->track[track] != NULL)
1016             continue;
1017         tracknode = acd_make_tracknode(dev, track);
1018         cdp->track[track] = tracknode;
1019     }
1020     for (; track < MAXTRK; track ++) {
1021         if (cdp->track[track] == NULL)
1022             continue;
1023         acd_destroy_tracknode(dev, track);
1024         cdp->track[track] = NULL;
1025     }
1026
1027 #ifdef ACD_DEBUG
1028     if (cdp->disk_size && cdp->toc.hdr.ending_track) {
1029         device_printf(dev, "(%d sectors (%d bytes)), %d tracks ",
1030                       cdp->disk_size, cdp->block_size,
1031                       cdp->toc.hdr.ending_track-cdp->toc.hdr.starting_track+1);
1032         if (cdp->toc.tab[0].control & 4)
1033             kprintf("%dMB\n", cdp->disk_size * cdp->block_size / 1048576);
1034         else
1035             kprintf("%d:%d audio\n",
1036                    cdp->disk_size / 75 / 60, cdp->disk_size / 75 % 60);
1037     }
1038 #endif
1039 }
1040
1041 /*
1042  * Makes a new device node for the numbered track and returns a struct
1043  * acd_tracknode pointer to be included in the list of tracks available on the
1044  * medium.
1045  */
1046 static struct acd_tracknode *
1047 acd_make_tracknode(device_t dev, int track)
1048 {
1049     struct acd_softc *cdp = device_get_ivars(dev);
1050     struct acd_tracknode *tracknode;
1051     char name[16];
1052
1053     ksprintf(name, "acd%dt%d", device_get_unit(dev), track);
1054     tracknode = kmalloc(sizeof(struct acd_tracknode), M_ACD, M_WAITOK | M_ZERO);
1055     tracknode->cdev = make_dev(&acd_ops, (device_get_unit(dev) << 3) |
1056                               (track << 16), UID_ROOT, GID_OPERATOR, 0644,
1057                               name, NULL);
1058     tracknode->cdev->si_drv1 = cdp->cdev->si_drv1;
1059     reference_dev(tracknode->cdev);
1060     return tracknode;
1061 }
1062
1063 /*
1064  * Destroys the device node of a numbered track and frees the related struct
1065  * acd_tracknode. It could be done just in acd_read_toc(), but it's nice to
1066  * have a complementary function to acd_make_tracknode().
1067  */
1068 static void
1069 acd_destroy_tracknode(device_t dev, int track)
1070 {
1071     struct acd_softc *cdp = device_get_ivars(dev);
1072     struct acd_tracknode *tracknode;
1073
1074     tracknode = cdp->track[track];
1075     destroy_dev(tracknode->cdev);
1076     kfree(tracknode, M_ACD);
1077 }
1078
1079 static int
1080 acd_play(device_t dev, int start, int end)
1081 {
1082     int8_t ccb[16];
1083
1084     bzero(ccb, sizeof(ccb));
1085     ccb[0] = ATAPI_PLAY_MSF;
1086     lba2msf(start, &ccb[3], &ccb[4], &ccb[5]);
1087     lba2msf(end, &ccb[6], &ccb[7], &ccb[8]);
1088     return ata_atapicmd(dev, ccb, NULL, 0, 0, 10);
1089 }
1090
1091 static int
1092 acd_setchan(device_t dev, u_int8_t c0, u_int8_t c1, u_int8_t c2, u_int8_t c3)
1093 {
1094     struct acd_softc *cdp = device_get_ivars(dev);
1095     int error;
1096
1097     if ((error = acd_mode_sense(dev, ATAPI_CDROM_AUDIO_PAGE, (caddr_t)&cdp->au,
1098                                 sizeof(cdp->au))))
1099         return error;
1100     if (cdp->au.page_code != ATAPI_CDROM_AUDIO_PAGE)
1101         return EIO;
1102     cdp->au.data_length = 0;
1103     cdp->au.port[0].channels = c0;
1104     cdp->au.port[1].channels = c1;
1105     cdp->au.port[2].channels = c2;
1106     cdp->au.port[3].channels = c3;
1107     return acd_mode_select(dev, (caddr_t)&cdp->au, sizeof(cdp->au));
1108 }
1109
1110 static int
1111 acd_init_writer(device_t dev, int test_write)
1112 {
1113     int8_t ccb[16];
1114
1115     bzero(ccb, sizeof(ccb));
1116     ccb[0] = ATAPI_REZERO;
1117     ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 60);
1118     ccb[0] = ATAPI_SEND_OPC_INFO;
1119     ccb[1] = 0x01;
1120     ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 30);
1121     return 0;
1122 }
1123
1124 static int
1125 acd_fixate(device_t dev, int multisession)
1126 {
1127     struct acd_softc *cdp = device_get_ivars(dev);
1128     int8_t ccb[16] = { ATAPI_CLOSE_TRACK, 0x01, 0x02, 0, 0, 0, 0, 0,
1129                        0, 0, 0, 0, 0, 0, 0, 0 };
1130     int timeout = 5*60*2;
1131     int error, dummy;
1132     struct write_param param;
1133
1134     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1135                                 (caddr_t)&param, sizeof(param))))
1136         return error;
1137
1138     param.data_length = 0;
1139     if (multisession)
1140         param.session_type = CDR_SESS_MULTI;
1141     else
1142         param.session_type = CDR_SESS_NONE;
1143
1144     if ((error = acd_mode_select(dev, (caddr_t)&param, param.page_length + 10)))
1145         return error;
1146
1147     error = ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1148     if (error)
1149         return error;
1150
1151     /* some drives just return ready, wait for the expected fixate time */
1152     if ((error = acd_test_ready(dev)) != EBUSY) {
1153         timeout = timeout / (cdp->cap.cur_write_speed / 177);
1154         tsleep(&error, 0, "acdfix", timeout * hz / 2);
1155         return acd_test_ready(dev);
1156     }
1157
1158     while (timeout-- > 0) {
1159         if ((error = acd_get_progress(dev, &dummy)))
1160             return error;
1161         if ((error = acd_test_ready(dev)) != EBUSY)
1162             return error;
1163         tsleep(&error, 0, "acdcld", hz / 2);
1164     }
1165     return EIO;
1166 }
1167
1168 static int
1169 acd_init_track(device_t dev, struct cdr_track *track)
1170 {
1171     struct acd_softc *cdp = device_get_ivars(dev);
1172     struct write_param param;
1173     int error;
1174
1175     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1176                                 (caddr_t)&param, sizeof(param))))
1177         return error;
1178
1179     param.data_length = 0;
1180     param.page_code = ATAPI_CDROM_WRITE_PARAMETERS_PAGE;
1181     param.page_length = 0x32;
1182     param.test_write = track->test_write ? 1 : 0;
1183     param.write_type = CDR_WTYPE_TRACK;
1184     param.session_type = CDR_SESS_NONE;
1185     param.fp = 0;
1186     param.packet_size = 0;
1187
1188     if (cdp->cap.capabilities & MST_BURNPROOF)
1189         param.burnproof = 1;
1190
1191     switch (track->datablock_type) {
1192
1193     case CDR_DB_RAW:
1194         if (track->preemp)
1195             param.track_mode = CDR_TMODE_AUDIO_PREEMP;
1196         else
1197             param.track_mode = CDR_TMODE_AUDIO;
1198         cdp->block_size = 2352;
1199         param.datablock_type = CDR_DB_RAW;
1200         param.session_format = CDR_SESS_CDROM;
1201         break;
1202
1203     case CDR_DB_ROM_MODE1:
1204         cdp->block_size = 2048;
1205         param.track_mode = CDR_TMODE_DATA;
1206         param.datablock_type = CDR_DB_ROM_MODE1;
1207         param.session_format = CDR_SESS_CDROM;
1208         break;
1209
1210     case CDR_DB_ROM_MODE2:
1211         cdp->block_size = 2336;
1212         param.track_mode = CDR_TMODE_DATA;
1213         param.datablock_type = CDR_DB_ROM_MODE2;
1214         param.session_format = CDR_SESS_CDROM;
1215         break;
1216
1217     case CDR_DB_XA_MODE1:
1218         cdp->block_size = 2048;
1219         param.track_mode = CDR_TMODE_DATA;
1220         param.datablock_type = CDR_DB_XA_MODE1;
1221         param.session_format = CDR_SESS_CDROM_XA;
1222         break;
1223
1224     case CDR_DB_XA_MODE2_F1:
1225         cdp->block_size = 2056;
1226         param.track_mode = CDR_TMODE_DATA;
1227         param.datablock_type = CDR_DB_XA_MODE2_F1;
1228         param.session_format = CDR_SESS_CDROM_XA;
1229         break;
1230
1231     case CDR_DB_XA_MODE2_F2:
1232         cdp->block_size = 2324;
1233         param.track_mode = CDR_TMODE_DATA;
1234         param.datablock_type = CDR_DB_XA_MODE2_F2;
1235         param.session_format = CDR_SESS_CDROM_XA;
1236         break;
1237
1238     case CDR_DB_XA_MODE2_MIX:
1239         cdp->block_size = 2332;
1240         param.track_mode = CDR_TMODE_DATA;
1241         param.datablock_type = CDR_DB_XA_MODE2_MIX;
1242         param.session_format = CDR_SESS_CDROM_XA;
1243         break;
1244     }
1245     acd_set_ioparm(dev);
1246     return acd_mode_select(dev, (caddr_t)&param, param.page_length + 10);
1247 }
1248
1249 static int
1250 acd_flush(device_t dev)
1251 {
1252     int8_t ccb[16] = { ATAPI_SYNCHRONIZE_CACHE, 0, 0, 0, 0, 0, 0, 0,
1253                        0, 0, 0, 0, 0, 0, 0, 0 };
1254
1255     return ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 60);
1256 }
1257
1258 static int
1259 acd_read_track_info(device_t dev, int32_t lba, struct acd_track_info *info)
1260 {
1261     int8_t ccb[16] = { ATAPI_READ_TRACK_INFO, 1,
1262                        lba>>24, lba>>16, lba>>8, lba, 0,
1263                        sizeof(*info)>>8, sizeof(*info),
1264                        0, 0, 0, 0, 0, 0, 0 };
1265     int error;
1266
1267     if ((error = ata_atapicmd(dev, ccb, (caddr_t)info, sizeof(*info),
1268                               ATA_R_READ, 30)))
1269         return error;
1270     info->track_start_addr = ntohl(info->track_start_addr);
1271     info->next_writeable_addr = ntohl(info->next_writeable_addr);
1272     info->free_blocks = ntohl(info->free_blocks);
1273     info->fixed_packet_size = ntohl(info->fixed_packet_size);
1274     info->track_length = ntohl(info->track_length);
1275     return 0;
1276 }
1277
1278 static int
1279 acd_get_progress(device_t dev, int *finished)
1280 {
1281     int8_t ccb[16] = { ATAPI_READ_CAPACITY, 0, 0, 0, 0, 0, 0, 0,
1282                        0, 0, 0, 0, 0, 0, 0, 0 };
1283     struct ata_request *request;
1284     int8_t dummy[8];
1285
1286     if (!(request = ata_alloc_request()))
1287         return ENOMEM;
1288
1289     request->dev = dev;
1290     bcopy(ccb, request->u.atapi.ccb, 16);
1291     request->data = dummy;
1292     request->bytecount = sizeof(dummy);
1293     request->transfersize = min(request->bytecount, 65534);
1294     request->flags = ATA_R_ATAPI | ATA_R_READ;
1295     request->timeout = 30;
1296     ata_queue_request(request);
1297     if (!request->error && request->u.atapi.sense.error & ATA_SENSE_VALID)
1298         *finished = ((request->u.atapi.sense.specific2 |
1299                      (request->u.atapi.sense.specific1 << 8)) * 100) / 65535;
1300     else
1301         *finished = 0;
1302     ata_free_request(request);
1303     return 0;
1304 }
1305
1306 static int
1307 acd_send_cue(device_t dev, struct cdr_cuesheet *cuesheet)
1308 {
1309     struct acd_softc *cdp = device_get_ivars(dev);
1310     struct write_param param;
1311     int8_t ccb[16] = { ATAPI_SEND_CUE_SHEET, 0, 0, 0, 0, 0,
1312                        cuesheet->len>>16, cuesheet->len>>8, cuesheet->len,
1313                        0, 0, 0, 0, 0, 0, 0 };
1314     int8_t *buffer;
1315     int32_t error;
1316
1317     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1318                                 (caddr_t)&param, sizeof(param))))
1319         return error;
1320
1321     param.data_length = 0;
1322     param.page_code = ATAPI_CDROM_WRITE_PARAMETERS_PAGE;
1323     param.page_length = 0x32;
1324     param.test_write = cuesheet->test_write ? 1 : 0;
1325     param.write_type = CDR_WTYPE_SESSION;
1326     param.session_type = cuesheet->session_type;
1327     param.fp = 0;
1328     param.packet_size = 0;
1329     param.track_mode = CDR_TMODE_AUDIO;
1330     param.datablock_type = CDR_DB_RAW;
1331     param.session_format = cuesheet->session_format;
1332     if (cdp->cap.capabilities & MST_BURNPROOF)
1333         param.burnproof = 1;
1334
1335     if ((error = acd_mode_select(dev, (caddr_t)&param, param.page_length + 10)))
1336         return error;
1337
1338     /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1339     if (!(buffer = kmalloc(cuesheet->len, M_ACD, M_NOWAIT)))
1340         return ENOMEM;
1341
1342     if (!(error = copyin(cuesheet->entries, buffer, cuesheet->len)))
1343         error = ata_atapicmd(dev, ccb, buffer, cuesheet->len, 0, 30);
1344     kfree(buffer, M_ACD);
1345     return error;
1346 }
1347
1348 static int
1349 acd_report_key(device_t dev, struct dvd_authinfo *ai)
1350 {
1351     struct dvd_miscauth *d = NULL;
1352     u_int32_t lba = 0;
1353     int16_t length;
1354     int8_t ccb[16];
1355     int error;
1356
1357     switch (ai->format) {
1358     case DVD_REPORT_AGID:
1359     case DVD_REPORT_ASF:
1360     case DVD_REPORT_RPC:
1361         length = 8;
1362         break;
1363     case DVD_REPORT_KEY1:
1364         length = 12;
1365         break;
1366     case DVD_REPORT_TITLE_KEY:
1367         length = 12;
1368         lba = ai->lba;
1369         break;
1370     case DVD_REPORT_CHALLENGE:
1371         length = 16;
1372         break;
1373     case DVD_INVALIDATE_AGID:
1374         length = 0;
1375         break;
1376     default:
1377         return EINVAL;
1378     }
1379
1380     bzero(ccb, sizeof(ccb));
1381     ccb[0] = ATAPI_REPORT_KEY;
1382     ccb[2] = (lba >> 24) & 0xff;
1383     ccb[3] = (lba >> 16) & 0xff;
1384     ccb[4] = (lba >> 8) & 0xff;
1385     ccb[5] = lba & 0xff;
1386     ccb[8] = (length >> 8) & 0xff;
1387     ccb[9] = length & 0xff;
1388     ccb[10] = (ai->agid << 6) | ai->format;
1389
1390     if (length) {
1391         /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1392         if (!(d = kmalloc(length, M_ACD, M_NOWAIT | M_ZERO)))
1393             return ENOMEM;
1394         d->length = htons(length - 2);
1395     }
1396
1397     error = ata_atapicmd(dev, ccb, (caddr_t)d, length,
1398                          ai->format == DVD_INVALIDATE_AGID ? 0 : ATA_R_READ,10);
1399     if (error) {
1400         if (length)
1401             kfree(d, M_ACD);
1402         return error;
1403     }
1404
1405     switch (ai->format) {
1406     case DVD_REPORT_AGID:
1407         ai->agid = d->data[3] >> 6;
1408         break;
1409
1410     case DVD_REPORT_CHALLENGE:
1411         bcopy(&d->data[0], &ai->keychal[0], 10);
1412         break;
1413
1414     case DVD_REPORT_KEY1:
1415         bcopy(&d->data[0], &ai->keychal[0], 5);
1416         break;
1417
1418     case DVD_REPORT_TITLE_KEY:
1419         ai->cpm = (d->data[0] >> 7);
1420         ai->cp_sec = (d->data[0] >> 6) & 0x1;
1421         ai->cgms = (d->data[0] >> 4) & 0x3;
1422         bcopy(&d->data[1], &ai->keychal[0], 5);
1423         break;
1424
1425     case DVD_REPORT_ASF:
1426         ai->asf = d->data[3] & 1;
1427         break;
1428
1429     case DVD_REPORT_RPC:
1430         ai->reg_type = (d->data[0] >> 6);
1431         ai->vend_rsts = (d->data[0] >> 3) & 0x7;
1432         ai->user_rsts = d->data[0] & 0x7;
1433         ai->region = d->data[1];
1434         ai->rpc_scheme = d->data[2];
1435         break;
1436
1437     case DVD_INVALIDATE_AGID:
1438         break;
1439
1440     default:
1441         error = EINVAL;
1442     }
1443     if (length)
1444         kfree(d, M_ACD);
1445     return error;
1446 }
1447
1448 static int
1449 acd_send_key(device_t dev, struct dvd_authinfo *ai)
1450 {
1451     struct dvd_miscauth *d;
1452     int16_t length;
1453     int8_t ccb[16];
1454     int error;
1455
1456     switch (ai->format) {
1457     case DVD_SEND_CHALLENGE:
1458         length = 16;
1459         /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1460         if (!(d = kmalloc(length, M_ACD, M_NOWAIT | M_ZERO)))
1461             return ENOMEM;
1462         bcopy(ai->keychal, &d->data[0], 10);
1463         break;
1464
1465     case DVD_SEND_KEY2:
1466         length = 12;
1467         /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1468         if (!(d = kmalloc(length, M_ACD, M_NOWAIT | M_ZERO)))
1469             return ENOMEM;
1470         bcopy(&ai->keychal[0], &d->data[0], 5);
1471         break;
1472
1473     case DVD_SEND_RPC:
1474         length = 8;
1475         /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1476         if (!(d = kmalloc(length, M_ACD, M_NOWAIT | M_ZERO)))
1477             return ENOMEM;
1478         d->data[0] = ai->region;
1479         break;
1480
1481     default:
1482         return EINVAL;
1483     }
1484
1485     bzero(ccb, sizeof(ccb));
1486     ccb[0] = ATAPI_SEND_KEY;
1487     ccb[8] = (length >> 8) & 0xff;
1488     ccb[9] = length & 0xff;
1489     ccb[10] = (ai->agid << 6) | ai->format;
1490     d->length = htons(length - 2);
1491     error = ata_atapicmd(dev, ccb, (caddr_t)d, length, 0, 10);
1492     kfree(d, M_ACD);
1493     return error;
1494 }
1495
1496 static int
1497 acd_read_structure(device_t dev, struct dvd_struct *s)
1498 {
1499     struct dvd_miscauth *d;
1500     u_int16_t length;
1501     int8_t ccb[16];
1502     int error = 0;
1503
1504     switch(s->format) {
1505     case DVD_STRUCT_PHYSICAL:
1506         length = 21;
1507         break;
1508
1509     case DVD_STRUCT_COPYRIGHT:
1510         length = 8;
1511         break;
1512
1513     case DVD_STRUCT_DISCKEY:
1514         length = 2052;
1515         break;
1516
1517     case DVD_STRUCT_BCA:
1518         length = 192;
1519         break;
1520
1521     case DVD_STRUCT_MANUFACT:
1522         length = 2052;
1523         break;
1524
1525     case DVD_STRUCT_DDS:
1526     case DVD_STRUCT_PRERECORDED:
1527     case DVD_STRUCT_UNIQUEID:
1528     case DVD_STRUCT_LIST:
1529     case DVD_STRUCT_CMI:
1530     case DVD_STRUCT_RMD_LAST:
1531     case DVD_STRUCT_RMD_RMA:
1532     case DVD_STRUCT_DCB:
1533         return ENOSYS;
1534
1535     default:
1536         return EINVAL;
1537     }
1538
1539     /* XXX TGEN Use M_WAITOK, not in intr ctx. */
1540     if (!(d = kmalloc(length, M_ACD, M_NOWAIT | M_ZERO)))
1541         return ENOMEM;
1542     d->length = htons(length - 2);
1543
1544     bzero(ccb, sizeof(ccb));
1545     ccb[0] = ATAPI_READ_STRUCTURE;
1546     ccb[6] = s->layer_num;
1547     ccb[7] = s->format;
1548     ccb[8] = (length >> 8) & 0xff;
1549     ccb[9] = length & 0xff;
1550     ccb[10] = s->agid << 6;
1551     error = ata_atapicmd(dev, ccb, (caddr_t)d, length, ATA_R_READ, 30);
1552     if (error) {
1553         kfree(d, M_ACD);
1554         return error;
1555     }
1556
1557     switch (s->format) {
1558     case DVD_STRUCT_PHYSICAL: {
1559         struct dvd_layer *layer = (struct dvd_layer *)&s->data[0];
1560
1561         layer->book_type = d->data[0] >> 4;
1562         layer->book_version = d->data[0] & 0xf;
1563         layer->disc_size = d->data[1] >> 4;
1564         layer->max_rate = d->data[1] & 0xf;
1565         layer->nlayers = (d->data[2] >> 5) & 3;
1566         layer->track_path = (d->data[2] >> 4) & 1;
1567         layer->layer_type = d->data[2] & 0xf;
1568         layer->linear_density = d->data[3] >> 4;
1569         layer->track_density = d->data[3] & 0xf;
1570         layer->start_sector = d->data[5] << 16 | d->data[6] << 8 | d->data[7];
1571         layer->end_sector = d->data[9] << 16 | d->data[10] << 8 | d->data[11];
1572         layer->end_sector_l0 = d->data[13] << 16 | d->data[14] << 8|d->data[15];
1573         layer->bca = d->data[16] >> 7;
1574         break;
1575     }
1576
1577     case DVD_STRUCT_COPYRIGHT:
1578         s->cpst = d->data[0];
1579         s->rmi = d->data[1];
1580         break;
1581
1582     case DVD_STRUCT_DISCKEY:
1583         bcopy(&d->data[0], &s->data[0], 2048);
1584         break;
1585
1586     case DVD_STRUCT_BCA:
1587         s->length = ntohs(d->length);
1588         bcopy(&d->data[0], &s->data[0], s->length);
1589         break;
1590
1591     case DVD_STRUCT_MANUFACT:
1592         s->length = ntohs(d->length);
1593         bcopy(&d->data[0], &s->data[0], s->length);
1594         break;
1595
1596     default:
1597         error = EINVAL;
1598     }
1599     kfree(d, M_ACD);
1600     return error;
1601 }
1602
1603 static int
1604 acd_tray(device_t dev, int close)
1605 {
1606     struct ata_device *atadev = device_get_softc(dev);
1607     struct acd_softc *cdp = device_get_ivars(dev);
1608     int error = ENODEV;
1609
1610     if (cdp->cap.mechanism & MST_EJECT) {
1611         if (close) {
1612             if (!(error = acd_start_stop(dev, 3))) {
1613                 acd_read_toc(dev);
1614                 acd_prevent_allow(dev, 1);
1615                 cdp->flags |= F_LOCKED;
1616             }
1617         }
1618         else {
1619             acd_start_stop(dev, 0);
1620             acd_prevent_allow(dev, 0);
1621             cdp->flags &= ~F_LOCKED;
1622             atadev->flags |= ATA_D_MEDIA_CHANGED;
1623             error = acd_start_stop(dev, 2);
1624         }
1625     }
1626     return error;
1627 }
1628
1629 static int
1630 acd_blank(device_t dev, int blanktype)
1631 {
1632     struct ata_device *atadev = device_get_softc(dev);
1633     int8_t ccb[16] = { ATAPI_BLANK, 0x10 | (blanktype & 0x7), 0, 0, 0, 0, 0, 0,
1634                        0, 0, 0, 0, 0, 0, 0, 0 };
1635
1636     atadev->flags |= ATA_D_MEDIA_CHANGED;
1637     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1638 }
1639
1640 static int
1641 acd_prevent_allow(device_t dev, int lock)
1642 {
1643     int8_t ccb[16] = { ATAPI_PREVENT_ALLOW, 0, 0, 0, lock,
1644                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1645
1646     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1647 }
1648
1649 static int
1650 acd_start_stop(device_t dev, int start)
1651 {
1652     int8_t ccb[16] = { ATAPI_START_STOP, 0, 0, 0, start,
1653                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1654
1655     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1656 }
1657
1658 static int
1659 acd_pause_resume(device_t dev, int pause)
1660 {
1661     int8_t ccb[16] = { ATAPI_PAUSE, 0, 0, 0, 0, 0, 0, 0, pause,
1662                        0, 0, 0, 0, 0, 0, 0 };
1663
1664     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1665 }
1666
1667 static int
1668 acd_mode_sense(device_t dev, int page, caddr_t pagebuf, int pagesize)
1669 {
1670     int8_t ccb[16] = { ATAPI_MODE_SENSE_BIG, 0, page, 0, 0, 0, 0,
1671                        pagesize>>8, pagesize, 0, 0, 0, 0, 0, 0, 0 };
1672     int error;
1673
1674     error = ata_atapicmd(dev, ccb, pagebuf, pagesize, ATA_R_READ, 10);
1675     return error;
1676 }
1677
1678 static int
1679 acd_mode_select(device_t dev, caddr_t pagebuf, int pagesize)
1680 {
1681     int8_t ccb[16] = { ATAPI_MODE_SELECT_BIG, 0x10, 0, 0, 0, 0, 0,
1682                      pagesize>>8, pagesize, 0, 0, 0, 0, 0, 0, 0 };
1683
1684     return ata_atapicmd(dev, ccb, pagebuf, pagesize, 0, 30);
1685 }
1686
1687 static int
1688 acd_set_speed(device_t dev, int rdspeed, int wrspeed)
1689 {
1690     int8_t ccb[16] = { ATAPI_SET_SPEED, 0, rdspeed >> 8, rdspeed,
1691                        wrspeed >> 8, wrspeed, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1692     int error;
1693
1694     error = ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1695     if (!error)
1696         acd_get_cap(dev);
1697     return error;
1698 }
1699
1700 static void
1701 acd_get_cap(device_t dev)
1702 {
1703     struct acd_softc *cdp = device_get_ivars(dev);
1704     int count;
1705
1706     /* get drive capabilities, some bugridden drives needs this repeated */
1707     for (count = 0 ; count < 5 ; count++) {
1708         if (!acd_mode_sense(dev, ATAPI_CDROM_CAP_PAGE,
1709                             (caddr_t)&cdp->cap, sizeof(cdp->cap)) &&
1710                             cdp->cap.page_code == ATAPI_CDROM_CAP_PAGE) {
1711             cdp->cap.max_read_speed = ntohs(cdp->cap.max_read_speed);
1712             cdp->cap.cur_read_speed = ntohs(cdp->cap.cur_read_speed);
1713             cdp->cap.max_write_speed = ntohs(cdp->cap.max_write_speed);
1714             cdp->cap.cur_write_speed = max(ntohs(cdp->cap.cur_write_speed),177);
1715             cdp->cap.max_vol_levels = ntohs(cdp->cap.max_vol_levels);
1716             cdp->cap.buf_size = ntohs(cdp->cap.buf_size);
1717         }
1718     }
1719 }
1720
1721 #ifdef ACD_CDR_FORMAT
1722 static int
1723 acd_read_format_caps(device_t dev, struct cdr_format_capacities *caps)
1724 {
1725     int8_t ccb[16] = { ATAPI_READ_FORMAT_CAPACITIES, 0, 0, 0, 0, 0, 0,
1726                        (sizeof(struct cdr_format_capacities) >> 8) & 0xff,
1727                        sizeof(struct cdr_format_capacities) & 0xff,
1728                        0, 0, 0, 0, 0, 0, 0 };
1729
1730     return ata_atapicmd(dev, ccb, (caddr_t)caps,
1731                         sizeof(struct cdr_format_capacities), ATA_R_READ, 30);
1732 }
1733
1734 static int
1735 acd_format(device_t dev, struct cdr_format_params* params)
1736 {
1737     int8_t ccb[16] = { ATAPI_FORMAT, 0x11, 0, 0, 0, 0, 0, 0, 0, 0,
1738                        0, 0, 0, 0, 0, 0 };
1739     int error;
1740
1741     error = ata_atapicmd(dev, ccb, (u_int8_t *)params,
1742                          sizeof(struct cdr_format_params), 0, 30);
1743     return error;
1744 }
1745 #endif /* ACD_CDR_FORMAT */
1746
1747 static int
1748 acd_test_ready(device_t dev)
1749 {
1750     int8_t ccb[16] = { ATAPI_TEST_UNIT_READY, 0, 0, 0, 0,
1751                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1752
1753     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1754 }
1755
1756 static void
1757 acd_describe(device_t dev)
1758 {
1759     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
1760     struct ata_device *atadev = device_get_softc(dev);
1761     struct acd_softc *cdp = device_get_ivars(dev);
1762     int comma = 0;
1763     char *mechanism;
1764
1765     if (bootverbose) {
1766         device_printf(dev, "<%.40s/%.8s> %s drive at ata%d as %s\n",
1767                       atadev->param.model, atadev->param.revision,
1768                       (cdp->cap.media & MST_WRITE_DVDR) ? "DVDR" :
1769                        (cdp->cap.media & MST_WRITE_DVDRAM) ? "DVDRAM" :
1770                         (cdp->cap.media & MST_WRITE_CDRW) ? "CDRW" :
1771                          (cdp->cap.media & MST_WRITE_CDR) ? "CDR" :
1772                           (cdp->cap.media & MST_READ_DVDROM) ? "DVDROM":"CDROM",
1773                       device_get_unit(ch->dev),
1774                       (atadev->unit == ATA_MASTER) ? "master" : "slave");
1775
1776         device_printf(dev, "%s", "");
1777         if (cdp->cap.cur_read_speed) {
1778             kprintf("read %dKB/s", cdp->cap.cur_read_speed * 1000 / 1024);
1779             if (cdp->cap.max_read_speed)
1780                 kprintf(" (%dKB/s)", cdp->cap.max_read_speed * 1000 / 1024);
1781             if ((cdp->cap.cur_write_speed) &&
1782                 (cdp->cap.media & (MST_WRITE_CDR | MST_WRITE_CDRW |
1783                                    MST_WRITE_DVDR | MST_WRITE_DVDRAM))) {
1784                 kprintf(" write %dKB/s", cdp->cap.cur_write_speed * 1000 / 1024);
1785                 if (cdp->cap.max_write_speed)
1786                     kprintf(" (%dKB/s)", cdp->cap.max_write_speed * 1000 / 1024);
1787             }
1788             comma = 1;
1789         }
1790         if (cdp->cap.buf_size) {
1791             kprintf("%s %dKB buffer", comma ? "," : "", cdp->cap.buf_size);
1792             comma = 1;
1793         }
1794         kprintf("%s %s\n", comma ? "," : "", ata_mode2str(atadev->mode));
1795
1796         device_printf(dev, "Reads:");
1797         comma = 0;
1798         if (cdp->cap.media & MST_READ_CDR) {
1799             kprintf(" CDR"); comma = 1;
1800         }
1801         if (cdp->cap.media & MST_READ_CDRW) {
1802             kprintf("%s CDRW", comma ? "," : ""); comma = 1;
1803         }
1804         if (cdp->cap.capabilities & MST_READ_CDDA) {
1805             if (cdp->cap.capabilities & MST_CDDA_STREAM)
1806                 kprintf("%s CDDA stream", comma ? "," : "");
1807             else
1808                 kprintf("%s CDDA", comma ? "," : "");
1809             comma = 1;
1810         }
1811         if (cdp->cap.media & MST_READ_DVDROM) {
1812             kprintf("%s DVDROM", comma ? "," : ""); comma = 1;
1813         }
1814         if (cdp->cap.media & MST_READ_DVDR) {
1815             kprintf("%s DVDR", comma ? "," : ""); comma = 1;
1816         }
1817         if (cdp->cap.media & MST_READ_DVDRAM) {
1818             kprintf("%s DVDRAM", comma ? "," : ""); comma = 1;
1819         }
1820         if (cdp->cap.media & MST_READ_PACKET)
1821             kprintf("%s packet", comma ? "," : "");
1822
1823         kprintf("\n");
1824         device_printf(dev, "Writes:");
1825         if (cdp->cap.media & (MST_WRITE_CDR | MST_WRITE_CDRW |
1826                               MST_WRITE_DVDR | MST_WRITE_DVDRAM)) {
1827             comma = 0;
1828             if (cdp->cap.media & MST_WRITE_CDR) {
1829                 kprintf(" CDR" ); comma = 1;
1830             }
1831             if (cdp->cap.media & MST_WRITE_CDRW) {
1832                 kprintf("%s CDRW", comma ? "," : ""); comma = 1;
1833             }
1834             if (cdp->cap.media & MST_WRITE_DVDR) {
1835                 kprintf("%s DVDR", comma ? "," : ""); comma = 1;
1836             }
1837             if (cdp->cap.media & MST_WRITE_DVDRAM) {
1838                 kprintf("%s DVDRAM", comma ? "," : ""); comma = 1;
1839             }
1840             if (cdp->cap.media & MST_WRITE_TEST) {
1841                 kprintf("%s test write", comma ? "," : ""); comma = 1;
1842             }
1843             if (cdp->cap.capabilities & MST_BURNPROOF)
1844                 kprintf("%s burnproof", comma ? "," : "");
1845         }
1846         kprintf("\n");
1847         if (cdp->cap.capabilities & MST_AUDIO_PLAY) {
1848             device_printf(dev, "Audio: ");
1849             if (cdp->cap.capabilities & MST_AUDIO_PLAY)
1850                 kprintf("play");
1851             if (cdp->cap.max_vol_levels)
1852                 kprintf(", %d volume levels", cdp->cap.max_vol_levels);
1853             kprintf("\n");
1854         }
1855         device_printf(dev, "Mechanism: ");
1856         switch (cdp->cap.mechanism & MST_MECH_MASK) {
1857         case MST_MECH_CADDY:
1858             mechanism = "caddy"; break;
1859         case MST_MECH_TRAY:
1860             mechanism = "tray"; break;
1861         case MST_MECH_POPUP:
1862             mechanism = "popup"; break;
1863         case MST_MECH_CHANGER:
1864             mechanism = "changer"; break;
1865         case MST_MECH_CARTRIDGE:
1866             mechanism = "cartridge"; break;
1867         default:
1868             mechanism = 0; break;
1869         }
1870         if (mechanism)
1871             kprintf("%s%s", (cdp->cap.mechanism & MST_EJECT) ?
1872                    "ejectable " : "", mechanism);
1873         else if (cdp->cap.mechanism & MST_EJECT)
1874             kprintf("ejectable");
1875
1876         if (cdp->cap.mechanism & MST_LOCKABLE)
1877             kprintf((cdp->cap.mechanism & MST_LOCKED) ? ", locked":", unlocked");
1878         if (cdp->cap.mechanism & MST_PREVENT)
1879             kprintf(", lock protected");
1880         kprintf("\n");
1881
1882         if ((cdp->cap.mechanism & MST_MECH_MASK) != MST_MECH_CHANGER) {
1883             device_printf(dev, "Medium: ");
1884             switch (cdp->cap.medium_type & MST_TYPE_MASK_HIGH) {
1885             case MST_CDROM:
1886                 kprintf("CD-ROM "); break;
1887             case MST_CDR:
1888                 kprintf("CD-R "); break;
1889             case MST_CDRW:
1890                 kprintf("CD-RW "); break;
1891             case MST_DOOR_OPEN:
1892                 kprintf("door open"); break;
1893             case MST_NO_DISC:
1894                 kprintf("no/blank disc"); break;
1895             case MST_FMT_ERROR:
1896                 kprintf("medium format error"); break;
1897             }
1898             if ((cdp->cap.medium_type & MST_TYPE_MASK_HIGH)<MST_TYPE_MASK_HIGH){
1899                 switch (cdp->cap.medium_type & MST_TYPE_MASK_LOW) {
1900                 case MST_DATA_120:
1901                     kprintf("120mm data disc"); break;
1902                 case MST_AUDIO_120:
1903                     kprintf("120mm audio disc"); break;
1904                 case MST_COMB_120:
1905                     kprintf("120mm data/audio disc"); break;
1906                 case MST_PHOTO_120:
1907                     kprintf("120mm photo disc"); break;
1908                 case MST_DATA_80:
1909                     kprintf("80mm data disc"); break;
1910                 case MST_AUDIO_80:
1911                     kprintf("80mm audio disc"); break;
1912                 case MST_COMB_80:
1913                     kprintf("80mm data/audio disc"); break;
1914                 case MST_PHOTO_80:
1915                     kprintf("80mm photo disc"); break;
1916                 case MST_FMT_NONE:
1917                     switch (cdp->cap.medium_type & MST_TYPE_MASK_HIGH) {
1918                     case MST_CDROM:
1919                         kprintf("unknown"); break;
1920                     case MST_CDR:
1921                     case MST_CDRW:
1922                         kprintf("blank"); break;
1923                     }
1924                     break;
1925                 default:
1926                     kprintf("unknown (0x%x)", cdp->cap.medium_type); break;
1927                 }
1928             }
1929             kprintf("\n");
1930         }
1931     }
1932     else {
1933         device_printf(dev, "%s ",
1934                       (cdp->cap.media & MST_WRITE_DVDR) ? "DVDR" :
1935                        (cdp->cap.media & MST_WRITE_DVDRAM) ? "DVDRAM" :
1936                         (cdp->cap.media & MST_WRITE_CDRW) ? "CDRW" :
1937                          (cdp->cap.media & MST_WRITE_CDR) ? "CDR" :
1938                           (cdp->cap.media & MST_READ_DVDROM) ? "DVDROM" :
1939                           "CDROM");
1940         kprintf("<%.40s/%.8s> at ata%d-%s %s\n",
1941                atadev->param.model, atadev->param.revision,
1942                device_get_unit(ch->dev),
1943                (atadev->unit == ATA_MASTER) ? "master" : "slave",
1944                ata_mode2str(atadev->mode) );
1945     }
1946 }
1947
1948 static device_method_t acd_methods[] = {
1949     /* device interface */
1950     DEVMETHOD(device_probe,     acd_probe),
1951     DEVMETHOD(device_attach,    acd_attach),
1952     DEVMETHOD(device_detach,    acd_detach),
1953     DEVMETHOD(device_shutdown,  acd_shutdown),
1954
1955     /* ATA methods */
1956     DEVMETHOD(ata_reinit,       acd_reinit),
1957
1958     { 0, 0 }
1959 };
1960
1961 static driver_t acd_driver = {
1962     "acd",
1963     acd_methods,
1964     0,
1965 };
1966
1967 static devclass_t acd_devclass;
1968
1969 DRIVER_MODULE(acd, ata, acd_driver, acd_devclass, NULL, NULL);
1970 MODULE_VERSION(acd, 1);
1971 MODULE_DEPEND(acd, ata, 1, 1, 1);