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