xref: /dragonfly/sys/dev/disk/nata/atapi-cd.c (revision 3f625015)
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.5 2007/05/09 00:53:33 dillon 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_uminor & 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);
1972