Merge from vendor branch LIBARCHIVE:
[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.189 2006/06/28 15:04:10 sos Exp $
27  * $DragonFly: src/sys/dev/disk/nata/atapi-cd.c,v 1.7 2007/06/03 04:48:29 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 #if 0
77 static struct acd_tracknode * acd_make_tracknode(device_t, int);
78 #endif
79 static void acd_destroy_tracknode(device_t, int);
80 static int acd_play(device_t, int, int);
81 static int acd_setchan(device_t, u_int8_t, u_int8_t, u_int8_t, u_int8_t);
82 static int acd_init_writer(device_t, int);
83 static int acd_fixate(device_t, int);
84 static int acd_init_track(device_t, struct cdr_track *);
85 static int acd_flush(device_t);
86 static int acd_read_track_info(device_t, int32_t, struct acd_track_info *);
87 static int acd_get_progress(device_t, int *);
88 static int acd_send_cue(device_t, struct cdr_cuesheet *);
89 static int acd_report_key(device_t, struct dvd_authinfo *);
90 static int acd_send_key(device_t, struct dvd_authinfo *);
91 static int acd_read_structure(device_t, struct dvd_struct *);
92 static int acd_tray(device_t, int);
93 static int acd_blank(device_t, int);
94 static int acd_prevent_allow(device_t, int);
95 static int acd_start_stop(device_t, int);
96 static int acd_pause_resume(device_t, int);
97 static int acd_mode_sense(device_t, int, caddr_t, int);
98 static int acd_mode_select(device_t, caddr_t, int);
99 static int acd_set_speed(device_t, int, int);
100 static void acd_get_cap(device_t);
101 #ifdef ACD_CDR_FORMAT
102 /* not yet ready */
103 static int acd_read_format_caps(device_t, struct cdr_format_capacities *);
104 static int acd_format(device_t, struct cdr_format_params *);
105 #endif /* ACD_CDR_FORMAT */
106 static int acd_test_ready(device_t);
107
108 /* internal vars */
109 static MALLOC_DEFINE(M_ACD, "acd_driver", "ATAPI CD driver buffers");
110
111 static int
112 acd_probe(device_t dev)
113 {
114     struct ata_device *atadev = device_get_softc(dev);
115
116     if ((atadev->param.config & ATA_PROTO_ATAPI) &&
117         (atadev->param.config & ATA_ATAPI_TYPE_MASK) == ATA_ATAPI_TYPE_CDROM)
118         return 0;
119     else
120         return ENXIO;
121 }
122
123 static int
124 acd_attach(device_t dev)
125 {
126     struct ata_device *atadev = device_get_softc(dev);
127     struct acd_softc *cdp;
128     cdev_t cdev;
129
130     /* XXX TGEN We're not in interrupt context, so we can M_WAITOK and remove
131        the OOM check. */
132     cdp = kmalloc(sizeof(struct acd_softc), M_ACD, M_INTWAIT | M_ZERO);
133     cdp->block_size = 2048;
134     device_set_ivars(dev, cdp);
135     ATA_SETMODE(device_get_parent(dev), dev);
136     ata_controlcmd(dev, ATA_DEVICE_RESET, 0, 0, 0);
137     acd_get_cap(dev);
138
139     devstat_add_entry(&cdp->stats, "acd", device_get_unit(dev), DEV_BSIZE,
140                       DEVSTAT_NO_ORDERED_TAGS,
141                       DEVSTAT_TYPE_CDROM | DEVSTAT_TYPE_IF_IDE,
142                       DEVSTAT_PRIORITY_CD);
143
144     cdev = disk_create(device_get_unit(dev), &cdp->disk, &acd_ops);
145 #if 0
146     dev_ops_add(&acd_ops, dkunitmask(), dkmakeunit(device_get_unit(dev)));
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(&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     struct acd_softc *cdp = device_get_ivars(dev);
210
211     if (((atadev->unit == ATA_MASTER) && !(ch->devices & ATA_ATAPI_MASTER)) ||
212         ((atadev->unit == ATA_SLAVE) && !(ch->devices & ATA_ATAPI_SLAVE))) {
213         device_set_ivars(dev, NULL);
214         kfree(cdp, M_ACD);
215         return 1;   
216     }
217     ATA_SETMODE(device_get_parent(dev), dev);
218     return 0;
219 }
220
221 static int
222 acd_open(struct dev_open_args *ap)
223 {
224     device_t dev = ap->a_head.a_dev->si_drv1;
225     /* XXX TGEN Sometimes, we're fed a cdev_t which we didn't create. It
226        doesn't have si_drv1 set, leading to evil NULL derefs. I can actually
227        recover our device_t otherwise, but really, this is a bug, so I'll bail
228        out. */
229     if (!dev)
230         return ENXIO;
231     struct ata_device *atadev = device_get_softc(dev);
232     struct acd_softc *cdp = device_get_ivars(dev);
233     struct ata_request *request;
234     int8_t ccb[16] = { ATAPI_TEST_UNIT_READY, 0, 0, 0, 0,
235                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
236     int timeout = 60;
237
238     if (!cdp)
239         return ENXIO;
240     if (!device_is_attached(dev))
241         return EBUSY;
242     if (!(request = ata_alloc_request()))
243         return ENOMEM;
244
245     /* wait if drive is not finished loading the medium */
246     while(timeout--) {
247         bzero(request, sizeof(struct ata_request));
248         request->dev = dev;
249         bcopy(ccb, request->u.atapi.ccb, 16);
250         request->flags = ATA_R_ATAPI;
251         request->timeout = 5;
252         ata_queue_request(request);
253         if (!request->error &&
254             (request->u.atapi.sense.key == 2 ||
255              request->u.atapi.sense.key == 7) &&
256             request->u.atapi.sense.asc == 4 &&
257             request->u.atapi.sense.ascq == 1)
258             tsleep(&timeout, 0, "acdld", hz / 2);
259         else
260             break;
261     }
262     ata_free_request(request);
263
264     if (count_dev(cdp->cdev) == 1) {
265         acd_prevent_allow(dev, 1);
266         cdp->flags |= F_LOCKED;
267         acd_read_toc(dev);
268     }
269     return 0;
270 }
271
272 static int
273 acd_close(struct dev_close_args *ap)
274 {
275     device_t dev = ap->a_head.a_dev->si_drv1;
276     struct acd_softc *cdp = device_get_ivars(dev);
277
278     if (!cdp)
279         return ENXIO;
280
281     if (count_dev(cdp->cdev) == 1) {
282         acd_prevent_allow(dev, 0);
283         cdp->flags &= ~F_LOCKED;
284     }
285     return 0;
286 }
287
288 static int 
289 acd_ioctl(struct dev_ioctl_args *ap)
290 {
291     device_t dev = ap->a_head.a_dev->si_drv1;
292     struct ata_device *atadev = device_get_softc(dev);
293     struct acd_softc *cdp = device_get_ivars(dev);
294     int error = 0, nocopyout = 0;
295
296     if (!cdp)
297         return ENXIO;
298
299     if (atadev->flags & ATA_D_MEDIA_CHANGED) {
300         switch (ap->a_cmd) {
301         case CDIOCRESET:
302             acd_test_ready(dev);
303             break;
304            
305         default:
306             acd_read_toc(dev);
307             acd_prevent_allow(dev, 1);
308             cdp->flags |= F_LOCKED;
309             break;
310         }
311     }
312
313     switch (ap->a_cmd) {
314
315     case CDIOCRESUME:
316         error = acd_pause_resume(dev, 1);
317         break;
318
319     case CDIOCPAUSE:
320         error = acd_pause_resume(dev, 0);
321         break;
322
323     case CDIOCSTART:
324         error = acd_start_stop(dev, 1);
325         break;
326
327     case CDIOCSTOP:
328         error = acd_start_stop(dev, 0);
329         break;
330
331     case CDIOCALLOW:
332         error = acd_prevent_allow(dev, 0);
333         cdp->flags &= ~F_LOCKED;
334         break;
335
336     case CDIOCPREVENT:
337         error = acd_prevent_allow(dev, 1);
338         cdp->flags |= F_LOCKED;
339         break;
340
341     case CDIOCRESET:
342         error = suser_cred(ap->a_cred, 0);
343         if (error)
344             break;
345         error = acd_test_ready(dev);
346         break;
347
348     case CDIOCEJECT:
349         if (count_dev(cdp->cdev) > 1) {
350             error = EBUSY;
351             break;
352         }
353         error = acd_tray(dev, 0);
354         break;
355
356     case CDIOCCLOSE:
357         if (count_dev(cdp->cdev) > 1)
358             break;
359         error = acd_tray(dev, 1);
360         break;
361
362     case CDIOREADTOCHEADER:
363         if (!cdp->toc.hdr.ending_track) {
364             error = EIO;
365             break;
366         }
367         bcopy(&cdp->toc.hdr, ap->a_data, sizeof(cdp->toc.hdr));
368         break;
369
370     case CDIOREADTOCENTRYS:
371         {
372             struct ioc_read_toc_entry *te = (struct ioc_read_toc_entry *)ap->a_data;
373             struct toc *toc = &cdp->toc;
374             int starting_track = te->starting_track;
375             int len;
376
377             if (!toc->hdr.ending_track) {
378                 error = EIO;
379                 break;
380             }
381
382             if (te->data_len < sizeof(toc->tab[0]) || 
383                 (te->data_len % sizeof(toc->tab[0])) != 0 || 
384                 (te->address_format != CD_MSF_FORMAT &&
385                 te->address_format != CD_LBA_FORMAT)) {
386                 error = EINVAL;
387                 break;
388             }
389
390             if (!starting_track)
391                 starting_track = toc->hdr.starting_track;
392             else if (starting_track == 170) 
393                 starting_track = toc->hdr.ending_track + 1;
394             else if (starting_track < toc->hdr.starting_track ||
395                      starting_track > toc->hdr.ending_track + 1) {
396                 error = EINVAL;
397                 break;
398             }
399
400             len = ((toc->hdr.ending_track + 1 - starting_track) + 1) *
401                   sizeof(toc->tab[0]);
402             if (te->data_len < len)
403                 len = te->data_len;
404             if (len > sizeof(toc->tab)) {
405                 error = EINVAL;
406                 break;
407             }
408
409             if (te->address_format == CD_MSF_FORMAT) {
410                 struct cd_toc_entry *entry;
411
412                 /* XXX TGEN Use M_WAITOK, not in intr ctx. */
413                 toc = kmalloc(sizeof(struct toc), M_ACD, M_INTWAIT);
414                 bcopy(&cdp->toc, toc, sizeof(struct toc));
415                 entry = toc->tab + (toc->hdr.ending_track + 1 -
416                         toc->hdr.starting_track) + 1;
417                 while (--entry >= toc->tab) {
418                     lba2msf(ntohl(entry->addr.lba), &entry->addr.msf.minute,
419                             &entry->addr.msf.second, &entry->addr.msf.frame);
420                     entry->addr_type = CD_MSF_FORMAT;
421                 }
422             }
423             error = copyout(toc->tab + starting_track - toc->hdr.starting_track,
424                             te->data, len);
425             if (te->address_format == CD_MSF_FORMAT)
426                 kfree(toc, M_ACD);
427         }
428         break;
429
430     case CDIOREADTOCENTRY:
431         {
432             struct ioc_read_toc_single_entry *te =
433                 (struct ioc_read_toc_single_entry *)ap->a_data;
434             struct toc *toc = &cdp->toc;
435             u_char track = te->track;
436
437             if (!toc->hdr.ending_track) {
438                 error = EIO;
439                 break;
440             }
441
442             if (te->address_format != CD_MSF_FORMAT && 
443                 te->address_format != CD_LBA_FORMAT) {
444                 error = EINVAL;
445                 break;
446             }
447
448             if (!track)
449                 track = toc->hdr.starting_track;
450             else if (track == 170)
451                 track = toc->hdr.ending_track + 1;
452             else if (track < toc->hdr.starting_track ||
453                      track > toc->hdr.ending_track + 1) {
454                 error = EINVAL;
455                 break;
456             }
457
458             if (te->address_format == CD_MSF_FORMAT) {
459                 struct cd_toc_entry *entry;
460
461                 /* XXX TGEN Use M_WAITOK, not in intr ctx. */
462                 toc = kmalloc(sizeof(struct toc), M_ACD, M_INTWAIT);
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     /*
821      * Special track access is via bio_offset (128-255), and direct
822      * raw access via 128, else normal accesses.
823      */
824     track = (bp->bio_offset >> 56) & 127;
825
826     if (track) {
827         if (track > MAXTRK) {
828             bbp->b_flags |= B_ERROR;
829             bbp->b_error = EIO;
830             biodone(bp);
831             return;
832         }
833         blocksize = (cdp->toc.tab[track - 1].control & 4) ? 2048 : 2352;
834         lastlba = ntohl(cdp->toc.tab[track].addr.lba);
835         lba = (bp->bio_offset & 0x00FFFFFFFFFFFFFFULL) / blocksize;
836         lba += ntohl(cdp->toc.tab[track - 1].addr.lba);
837     }
838     else {
839         blocksize = cdp->block_size;
840         lastlba = cdp->disk_size;
841         lba = (bp->bio_offset & 0x00FFFFFFFFFFFFFFULL) / blocksize;
842     }
843
844     count = bbp->b_bcount / blocksize;
845
846     if (bbp->b_cmd == BUF_CMD_READ) {
847         /* if transfer goes beyond range adjust it to be within limits */
848         if (lba + count > lastlba) {
849             /* if we are entirely beyond EOM return EOF */
850             if (lastlba <= lba) {
851                 bbp->b_resid = bbp->b_bcount;
852                 biodone(bp);
853                 return;
854             }
855             count = lastlba - lba;
856         }
857         switch (blocksize) {
858         case 2048:
859             ccb[0] = ATAPI_READ_BIG;
860             break;
861
862         case 2352: 
863             ccb[0] = ATAPI_READ_CD;
864             ccb[9] = 0xf8;
865             break;
866
867         default:
868             ccb[0] = ATAPI_READ_CD;
869             ccb[9] = 0x10;
870         }
871     }
872     else
873         ccb[0] = ATAPI_WRITE_BIG;
874     
875     ccb[1] = 0;
876     ccb[2] = lba>>24;
877     ccb[3] = lba>>16;
878     ccb[4] = lba>>8;
879     ccb[5] = lba;
880     ccb[6] = count>>16;
881     ccb[7] = count>>8;
882     ccb[8] = count;
883
884     if (!(request = ata_alloc_request())) {
885         bbp->b_flags |= B_ERROR;
886         bbp->b_error = ENOMEM;
887         biodone(bp);
888         return;
889     }
890     request->dev = dev;
891     request->bio = bp;
892     bcopy(ccb, request->u.atapi.ccb,
893           (atadev->param.config & ATA_PROTO_MASK) == 
894           ATA_PROTO_ATAPI_12 ? 16 : 12);
895     request->data = bbp->b_data;
896     request->bytecount = count * blocksize;
897     request->transfersize = min(request->bytecount, 65534);
898     request->timeout = (ccb[0] == ATAPI_WRITE_BIG) ? 60 : 30;
899     request->retries = 2;
900     request->callback = acd_done;
901     request->flags = ATA_R_ATAPI;
902     if (atadev->mode >= ATA_DMA)
903         request->flags |= ATA_R_DMA;
904     switch (bbp->b_cmd) {
905     case BUF_CMD_READ:
906         request->flags |= ATA_R_READ;
907         break;
908     case BUF_CMD_WRITE:
909         request->flags |= ATA_R_WRITE;
910         break;
911     default:
912         device_printf(dev, "unknown BUF operation\n");
913         ata_free_request(request);
914         bbp->b_flags |= B_ERROR;
915         bbp->b_error = EIO;
916         biodone(bp);
917         return;
918     }
919     devstat_start_transaction(&cdp->stats);
920     ata_queue_request(request);
921 }
922
923 static void 
924 acd_done(struct ata_request *request)
925 {
926     struct acd_softc *cdp = device_get_ivars(request->dev);
927     struct bio *bp = request->bio;
928     struct buf *bbp = bp->bio_buf;
929     
930     /* finish up transfer */
931     if ((bbp->b_error = request->result))
932         bbp->b_flags |= B_ERROR;
933     bbp->b_resid = bbp->b_bcount - request->donecount;
934     devstat_end_transaction_buf(&cdp->stats, bbp);
935     biodone(bp);
936     ata_free_request(request);
937 }
938
939 static void
940 acd_set_ioparm(device_t dev)
941 {
942     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
943     struct acd_softc *cdp = device_get_ivars(dev);
944     struct disk_info info;
945
946     if (ch->dma)
947         cdp->iomax = min(ch->dma->max_iosize, 65534);
948     else
949         cdp->iomax = min(DFLTPHYS, 65534);
950
951     cdp->cdev->si_iosize_max = (cdp->iomax / cdp->block_size) * cdp->block_size;
952     cdp->cdev->si_bsize_phys = cdp->block_size;
953     bzero(&info, sizeof(info));
954     info.d_media_blksize = cdp->block_size;
955     info.d_media_blocks = (cdp->disk_size == -1) ? 0 : cdp->disk_size;
956     info.d_secpertrack = 100;
957     info.d_nheads = 1;
958     info.d_ncylinders = cdp->disk_size / info.d_secpertrack / info.d_nheads + 1;
959     info.d_secpercyl = info.d_secpertrack * info.d_nheads;
960     info.d_dsflags = DSO_ONESLICE | DSO_COMPATLABEL | DSO_COMPATPARTA |
961                      DSO_RAWEXTENSIONS;
962     disk_setdiskinfo(&cdp->disk, &info);
963
964 }
965
966 static void 
967 lba2msf(u_int32_t lba, u_int8_t *m, u_int8_t *s, u_int8_t *f)
968 {
969     lba += 150;
970     lba &= 0xffffff;
971     *m = lba / (60 * 75);
972     lba %= (60 * 75);
973     *s = lba / 75;
974     *f = lba % 75;
975 }
976
977 static u_int32_t 
978 msf2lba(u_int8_t m, u_int8_t s, u_int8_t f)
979 {
980     return (m * 60 + s) * 75 + f - 150;
981 }
982
983 static void 
984 acd_read_toc(device_t dev)
985 {
986     struct ata_device *atadev = device_get_softc(dev);
987     struct acd_softc *cdp = device_get_ivars(dev);
988     struct acd_tracknode *tracknode;
989     u_int32_t sizes[2];
990     int8_t ccb[16];
991     int track, ntracks, len;
992
993     atadev->flags &= ~ATA_D_MEDIA_CHANGED;
994     bzero(&cdp->toc, sizeof(cdp->toc));
995
996     if (acd_test_ready(dev))
997         return;
998
999     bzero(ccb, sizeof(ccb));
1000     len = sizeof(struct ioc_toc_header) + sizeof(struct cd_toc_entry);
1001     ccb[0] = ATAPI_READ_TOC;
1002     ccb[7] = len>>8;
1003     ccb[8] = len;
1004     if (ata_atapicmd(dev, ccb, (caddr_t)&cdp->toc, len,
1005                      ATA_R_READ | ATA_R_QUIET, 30)) {
1006         bzero(&cdp->toc, sizeof(cdp->toc));
1007         return;
1008     }
1009     ntracks = cdp->toc.hdr.ending_track - cdp->toc.hdr.starting_track + 1;
1010     if (ntracks <= 0 || ntracks > MAXTRK) {
1011         bzero(&cdp->toc, sizeof(cdp->toc));
1012         return;
1013     }
1014
1015     len = sizeof(struct ioc_toc_header)+(ntracks+1)*sizeof(struct cd_toc_entry);
1016     bzero(ccb, sizeof(ccb));
1017     ccb[0] = ATAPI_READ_TOC;
1018     ccb[7] = len>>8;
1019     ccb[8] = len;
1020     if (ata_atapicmd(dev, ccb, (caddr_t)&cdp->toc, len,
1021                      ATA_R_READ | ATA_R_QUIET, 30)) {
1022         bzero(&cdp->toc, sizeof(cdp->toc));
1023         return;
1024     }
1025     cdp->toc.hdr.len = ntohs(cdp->toc.hdr.len);
1026
1027     cdp->block_size = (cdp->toc.tab[0].control & 4) ? 2048 : 2352;
1028     bzero(ccb, sizeof(ccb));
1029     ccb[0] = ATAPI_READ_CAPACITY;
1030     if (ata_atapicmd(dev, ccb, (caddr_t)sizes, sizeof(sizes),
1031                      ATA_R_READ | ATA_R_QUIET, 30)) {
1032         bzero(&cdp->toc, sizeof(cdp->toc));
1033         return;
1034     }
1035     cdp->disk_size = ntohl(sizes[0]) + 1;
1036     acd_set_ioparm(dev);
1037
1038     for (track = 1; track <= ntracks; track ++) {
1039         if (cdp->track[track] != NULL)
1040             continue;
1041 #if 0
1042         tracknode = acd_make_tracknode(dev, track);
1043 #endif
1044         tracknode = NULL;
1045         cdp->track[track] = tracknode;
1046     }
1047     for (; track < MAXTRK; track ++) {
1048         if (cdp->track[track] == NULL)
1049             continue;
1050         acd_destroy_tracknode(dev, track);
1051         cdp->track[track] = NULL;
1052     }
1053
1054 #ifdef ACD_DEBUG
1055     if (cdp->disk_size && cdp->toc.hdr.ending_track) {
1056         device_printf(dev, "(%d sectors (%d bytes)), %d tracks ", 
1057                       cdp->disk_size, cdp->block_size,
1058                       cdp->toc.hdr.ending_track-cdp->toc.hdr.starting_track+1);
1059         if (cdp->toc.tab[0].control & 4)
1060             kprintf("%dMB\n", cdp->disk_size * cdp->block_size / 1048576);
1061         else
1062             kprintf("%d:%d audio\n",
1063                    cdp->disk_size / 75 / 60, cdp->disk_size / 75 % 60);
1064     }
1065 #endif
1066 }
1067
1068 /*
1069  * Makes a new device node for the numbered track and returns a struct
1070  * acd_tracknode pointer to be included in the list of tracks available on the
1071  * medium.
1072  */
1073
1074 #if 0
1075
1076 static struct acd_tracknode *
1077 acd_make_tracknode(device_t dev, int track)
1078 {
1079     struct acd_softc *cdp = device_get_ivars(dev);
1080     struct acd_tracknode *tracknode;
1081     char name[16];
1082
1083     ksprintf(name, "acd%dt%d", device_get_unit(dev), track);
1084     tracknode = kmalloc(sizeof(struct acd_tracknode), M_ACD, M_WAITOK | M_ZERO);
1085     tracknode->cdev = make_dev(&acd_ops, (device_get_unit(dev) << 3) |
1086                               (track << 16), UID_ROOT, GID_OPERATOR, 0644,
1087                               name, NULL);
1088     tracknode->cdev->si_drv1 = cdp->cdev->si_drv1;
1089     reference_dev(tracknode->cdev);
1090     return tracknode;
1091 }
1092
1093 #endif
1094
1095 /*
1096  * Destroys the device node of a numbered track and frees the related struct
1097  * acd_tracknode. It could be done just in acd_read_toc(), but it's nice to
1098  * have a complementary function to acd_make_tracknode().
1099  */
1100 static void
1101 acd_destroy_tracknode(device_t dev, int track)
1102 {
1103     struct acd_softc *cdp = device_get_ivars(dev);
1104     struct acd_tracknode *tracknode;
1105
1106     tracknode = cdp->track[track];
1107     destroy_dev(tracknode->cdev);
1108     kfree(tracknode, M_ACD);
1109 }
1110
1111 static int
1112 acd_play(device_t dev, int start, int end)
1113 {
1114     int8_t ccb[16];
1115
1116     bzero(ccb, sizeof(ccb));
1117     ccb[0] = ATAPI_PLAY_MSF;
1118     lba2msf(start, &ccb[3], &ccb[4], &ccb[5]);
1119     lba2msf(end, &ccb[6], &ccb[7], &ccb[8]);
1120     return ata_atapicmd(dev, ccb, NULL, 0, 0, 10);
1121 }
1122
1123 static int 
1124 acd_setchan(device_t dev, u_int8_t c0, u_int8_t c1, u_int8_t c2, u_int8_t c3)
1125 {
1126     struct acd_softc *cdp = device_get_ivars(dev);
1127     int error;
1128
1129     if ((error = acd_mode_sense(dev, ATAPI_CDROM_AUDIO_PAGE, (caddr_t)&cdp->au, 
1130                                 sizeof(cdp->au))))
1131         return error;
1132     if (cdp->au.page_code != ATAPI_CDROM_AUDIO_PAGE)
1133         return EIO;
1134     cdp->au.data_length = 0;
1135     cdp->au.port[0].channels = c0;
1136     cdp->au.port[1].channels = c1;
1137     cdp->au.port[2].channels = c2;
1138     cdp->au.port[3].channels = c3;
1139     return acd_mode_select(dev, (caddr_t)&cdp->au, sizeof(cdp->au));
1140 }
1141
1142 static int
1143 acd_init_writer(device_t dev, int test_write)
1144 {
1145     int8_t ccb[16];
1146
1147     bzero(ccb, sizeof(ccb));
1148     ccb[0] = ATAPI_REZERO;
1149     ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 60);
1150     ccb[0] = ATAPI_SEND_OPC_INFO;
1151     ccb[1] = 0x01;
1152     ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 30);
1153     return 0;
1154 }
1155
1156 static int
1157 acd_fixate(device_t dev, int multisession)
1158 {
1159     struct acd_softc *cdp = device_get_ivars(dev);
1160     int8_t ccb[16] = { ATAPI_CLOSE_TRACK, 0x01, 0x02, 0, 0, 0, 0, 0, 
1161                        0, 0, 0, 0, 0, 0, 0, 0 };
1162     int timeout = 5*60*2;
1163     int error, dummy;
1164     struct write_param param;
1165
1166     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1167                                 (caddr_t)&param, sizeof(param))))
1168         return error;
1169
1170     param.data_length = 0;
1171     if (multisession)
1172         param.session_type = CDR_SESS_MULTI;
1173     else
1174         param.session_type = CDR_SESS_NONE;
1175
1176     if ((error = acd_mode_select(dev, (caddr_t)&param, param.page_length + 10)))
1177         return error;
1178   
1179     error = ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1180     if (error)
1181         return error;
1182
1183     /* some drives just return ready, wait for the expected fixate time */
1184     if ((error = acd_test_ready(dev)) != EBUSY) {
1185         timeout = timeout / (cdp->cap.cur_write_speed / 177);
1186         tsleep(&error, 0, "acdfix", timeout * hz / 2);
1187         return acd_test_ready(dev);
1188     }
1189
1190     while (timeout-- > 0) {
1191         if ((error = acd_get_progress(dev, &dummy)))
1192             return error;
1193         if ((error = acd_test_ready(dev)) != EBUSY)
1194             return error;
1195         tsleep(&error, 0, "acdcld", hz / 2);
1196     }
1197     return EIO;
1198 }
1199
1200 static int
1201 acd_init_track(device_t dev, struct cdr_track *track)
1202 {
1203     struct acd_softc *cdp = device_get_ivars(dev);
1204     struct write_param param;
1205     int error;
1206
1207     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1208                                 (caddr_t)&param, sizeof(param))))
1209         return error;
1210
1211     param.data_length = 0;
1212     param.page_code = ATAPI_CDROM_WRITE_PARAMETERS_PAGE;
1213     param.page_length = 0x32;
1214     param.test_write = track->test_write ? 1 : 0;
1215     param.write_type = CDR_WTYPE_TRACK;
1216     param.session_type = CDR_SESS_NONE;
1217     param.fp = 0;
1218     param.packet_size = 0;
1219
1220     if (cdp->cap.capabilities & MST_BURNPROOF) 
1221         param.burnproof = 1;
1222
1223     switch (track->datablock_type) {
1224
1225     case CDR_DB_RAW:
1226         if (track->preemp)
1227             param.track_mode = CDR_TMODE_AUDIO_PREEMP;
1228         else
1229             param.track_mode = CDR_TMODE_AUDIO;
1230         cdp->block_size = 2352;
1231         param.datablock_type = CDR_DB_RAW;
1232         param.session_format = CDR_SESS_CDROM;
1233         break;
1234
1235     case CDR_DB_ROM_MODE1:
1236         cdp->block_size = 2048;
1237         param.track_mode = CDR_TMODE_DATA;
1238         param.datablock_type = CDR_DB_ROM_MODE1;
1239         param.session_format = CDR_SESS_CDROM;
1240         break;
1241
1242     case CDR_DB_ROM_MODE2:
1243         cdp->block_size = 2336;
1244         param.track_mode = CDR_TMODE_DATA;
1245         param.datablock_type = CDR_DB_ROM_MODE2;
1246         param.session_format = CDR_SESS_CDROM;
1247         break;
1248
1249     case CDR_DB_XA_MODE1:
1250         cdp->block_size = 2048;
1251         param.track_mode = CDR_TMODE_DATA;
1252         param.datablock_type = CDR_DB_XA_MODE1;
1253         param.session_format = CDR_SESS_CDROM_XA;
1254         break;
1255
1256     case CDR_DB_XA_MODE2_F1:
1257         cdp->block_size = 2056;
1258         param.track_mode = CDR_TMODE_DATA;
1259         param.datablock_type = CDR_DB_XA_MODE2_F1;
1260         param.session_format = CDR_SESS_CDROM_XA;
1261         break;
1262
1263     case CDR_DB_XA_MODE2_F2:
1264         cdp->block_size = 2324;
1265         param.track_mode = CDR_TMODE_DATA;
1266         param.datablock_type = CDR_DB_XA_MODE2_F2;
1267         param.session_format = CDR_SESS_CDROM_XA;
1268         break;
1269
1270     case CDR_DB_XA_MODE2_MIX:
1271         cdp->block_size = 2332;
1272         param.track_mode = CDR_TMODE_DATA;
1273         param.datablock_type = CDR_DB_XA_MODE2_MIX;
1274         param.session_format = CDR_SESS_CDROM_XA;
1275         break;
1276     }
1277     acd_set_ioparm(dev);
1278     return acd_mode_select(dev, (caddr_t)&param, param.page_length + 10);
1279 }
1280
1281 static int
1282 acd_flush(device_t dev)
1283 {
1284     int8_t ccb[16] = { ATAPI_SYNCHRONIZE_CACHE, 0, 0, 0, 0, 0, 0, 0,
1285                        0, 0, 0, 0, 0, 0, 0, 0 };
1286
1287     return ata_atapicmd(dev, ccb, NULL, 0, ATA_R_QUIET, 60);
1288 }
1289
1290 static int
1291 acd_read_track_info(device_t dev, int32_t lba, struct acd_track_info *info)
1292 {
1293     int8_t ccb[16] = { ATAPI_READ_TRACK_INFO, 1,
1294                        lba>>24, lba>>16, lba>>8, lba, 0,
1295                        sizeof(*info)>>8, sizeof(*info),
1296                        0, 0, 0, 0, 0, 0, 0 };
1297     int error;
1298
1299     if ((error = ata_atapicmd(dev, ccb, (caddr_t)info, sizeof(*info),
1300                               ATA_R_READ, 30)))
1301         return error;
1302     info->track_start_addr = ntohl(info->track_start_addr);
1303     info->next_writeable_addr = ntohl(info->next_writeable_addr);
1304     info->free_blocks = ntohl(info->free_blocks);
1305     info->fixed_packet_size = ntohl(info->fixed_packet_size);
1306     info->track_length = ntohl(info->track_length);
1307     return 0;
1308 }
1309
1310 static int
1311 acd_get_progress(device_t dev, int *finished)
1312 {
1313     int8_t ccb[16] = { ATAPI_READ_CAPACITY, 0, 0, 0, 0, 0, 0, 0,
1314                        0, 0, 0, 0, 0, 0, 0, 0 };
1315     struct ata_request *request;
1316     int8_t dummy[8];
1317
1318     if (!(request = ata_alloc_request()))
1319         return ENOMEM;
1320
1321     request->dev = dev;
1322     bcopy(ccb, request->u.atapi.ccb, 16);
1323     request->data = dummy;
1324     request->bytecount = sizeof(dummy);
1325     request->transfersize = min(request->bytecount, 65534);
1326     request->flags = ATA_R_ATAPI | ATA_R_READ;
1327     request->timeout = 30;
1328     ata_queue_request(request);
1329     if (!request->error && request->u.atapi.sense.error & ATA_SENSE_VALID)
1330         *finished = ((request->u.atapi.sense.specific2 |
1331                      (request->u.atapi.sense.specific1 << 8)) * 100) / 65535;
1332     else
1333         *finished = 0;
1334     ata_free_request(request);
1335     return 0;
1336 }
1337
1338 static int
1339 acd_send_cue(device_t dev, struct cdr_cuesheet *cuesheet)
1340 {
1341     struct acd_softc *cdp = device_get_ivars(dev);
1342     struct write_param param;
1343     int8_t ccb[16] = { ATAPI_SEND_CUE_SHEET, 0, 0, 0, 0, 0, 
1344                        cuesheet->len>>16, cuesheet->len>>8, cuesheet->len,
1345                        0, 0, 0, 0, 0, 0, 0 };
1346     int8_t *buffer;
1347     int32_t error;
1348
1349     if ((error = acd_mode_sense(dev, ATAPI_CDROM_WRITE_PARAMETERS_PAGE,
1350                                 (caddr_t)&param, sizeof(param))))
1351         return error;
1352
1353     param.data_length = 0;
1354     param.page_code = ATAPI_CDROM_WRITE_PARAMETERS_PAGE;
1355     param.page_length = 0x32;
1356     param.test_write = cuesheet->test_write ? 1 : 0;
1357     param.write_type = CDR_WTYPE_SESSION;
1358     param.session_type = cuesheet->session_type;
1359     param.fp = 0;
1360     param.packet_size = 0;
1361     param.track_mode = CDR_TMODE_AUDIO;
1362     param.datablock_type = CDR_DB_RAW;
1363     param.session_format = cuesheet->session_format;
1364     if (cdp->cap.capabilities & MST_BURNPROOF) 
1365         param.burnproof = 1;
1366
1367     if ((error = acd_mode_select(dev, (caddr_t)&param, param.page_length + 10)))
1368         return error;
1369
1370     if (!(buffer = kmalloc(cuesheet->len, M_ACD, M_WAITOK | M_NULLOK)))
1371         return ENOMEM;
1372
1373     if (!(error = copyin(cuesheet->entries, buffer, cuesheet->len)))
1374         error = ata_atapicmd(dev, ccb, buffer, cuesheet->len, 0, 30);
1375     kfree(buffer, M_ACD);
1376     return error;
1377 }
1378
1379 static int
1380 acd_report_key(device_t dev, struct dvd_authinfo *ai)
1381 {
1382     struct dvd_miscauth *d = NULL;
1383     u_int32_t lba = 0;
1384     int16_t length;
1385     int8_t ccb[16];
1386     int error;
1387
1388     switch (ai->format) {
1389     case DVD_REPORT_AGID:
1390     case DVD_REPORT_ASF:
1391     case DVD_REPORT_RPC:
1392         length = 8;
1393         break;
1394     case DVD_REPORT_KEY1:
1395         length = 12;
1396         break;
1397     case DVD_REPORT_TITLE_KEY:
1398         length = 12;
1399         lba = ai->lba;
1400         break;
1401     case DVD_REPORT_CHALLENGE:
1402         length = 16;
1403         break;
1404     case DVD_INVALIDATE_AGID:
1405         length = 0;
1406         break;
1407     default:
1408         return EINVAL;
1409     }
1410
1411     bzero(ccb, sizeof(ccb));
1412     ccb[0] = ATAPI_REPORT_KEY;
1413     ccb[2] = (lba >> 24) & 0xff;
1414     ccb[3] = (lba >> 16) & 0xff;
1415     ccb[4] = (lba >> 8) & 0xff;
1416     ccb[5] = lba & 0xff;
1417     ccb[8] = (length >> 8) & 0xff;
1418     ccb[9] = length & 0xff;
1419     ccb[10] = (ai->agid << 6) | ai->format;
1420
1421     if (length) {
1422         d = kmalloc(length, M_ACD, M_WAITOK | M_ZERO);
1423         d->length = htons(length - 2);
1424     }
1425
1426     error = ata_atapicmd(dev, ccb, (caddr_t)d, length,
1427                          ai->format == DVD_INVALIDATE_AGID ? 0 : ATA_R_READ,10);
1428     if (error) {
1429         if (length)
1430             kfree(d, M_ACD);
1431         return error;
1432     }
1433
1434     switch (ai->format) {
1435     case DVD_REPORT_AGID:
1436         ai->agid = d->data[3] >> 6;
1437         break;
1438     
1439     case DVD_REPORT_CHALLENGE:
1440         bcopy(&d->data[0], &ai->keychal[0], 10);
1441         break;
1442     
1443     case DVD_REPORT_KEY1:
1444         bcopy(&d->data[0], &ai->keychal[0], 5);
1445         break;
1446     
1447     case DVD_REPORT_TITLE_KEY:
1448         ai->cpm = (d->data[0] >> 7);
1449         ai->cp_sec = (d->data[0] >> 6) & 0x1;
1450         ai->cgms = (d->data[0] >> 4) & 0x3;
1451         bcopy(&d->data[1], &ai->keychal[0], 5);
1452         break;
1453     
1454     case DVD_REPORT_ASF:
1455         ai->asf = d->data[3] & 1;
1456         break;
1457     
1458     case DVD_REPORT_RPC:
1459         ai->reg_type = (d->data[0] >> 6);
1460         ai->vend_rsts = (d->data[0] >> 3) & 0x7;
1461         ai->user_rsts = d->data[0] & 0x7;
1462         ai->region = d->data[1];
1463         ai->rpc_scheme = d->data[2];
1464         break;
1465     
1466     case DVD_INVALIDATE_AGID:
1467         break;
1468
1469     default:
1470         error = EINVAL;
1471     }
1472     if (length)
1473         kfree(d, M_ACD);
1474     return error;
1475 }
1476
1477 static int
1478 acd_send_key(device_t dev, struct dvd_authinfo *ai)
1479 {
1480     struct dvd_miscauth *d;
1481     int16_t length;
1482     int8_t ccb[16];
1483     int error;
1484
1485     switch (ai->format) {
1486     case DVD_SEND_CHALLENGE:
1487         length = 16;
1488         d = kmalloc(length, M_ACD, M_WAITOK | M_ZERO);
1489         bcopy(ai->keychal, &d->data[0], 10);
1490         break;
1491
1492     case DVD_SEND_KEY2:
1493         length = 12;
1494         d = kmalloc(length, M_ACD, M_WAITOK | M_ZERO);
1495         bcopy(&ai->keychal[0], &d->data[0], 5);
1496         break;
1497     
1498     case DVD_SEND_RPC:
1499         length = 8;
1500         d = kmalloc(length, M_ACD, M_WAITOK | M_ZERO);
1501         d->data[0] = ai->region;
1502         break;
1503
1504     default:
1505         return EINVAL;
1506     }
1507
1508     bzero(ccb, sizeof(ccb));
1509     ccb[0] = ATAPI_SEND_KEY;
1510     ccb[8] = (length >> 8) & 0xff;
1511     ccb[9] = length & 0xff;
1512     ccb[10] = (ai->agid << 6) | ai->format;
1513     d->length = htons(length - 2);
1514     error = ata_atapicmd(dev, ccb, (caddr_t)d, length, 0, 10);
1515     kfree(d, M_ACD);
1516     return error;
1517 }
1518
1519 static int
1520 acd_read_structure(device_t dev, struct dvd_struct *s)
1521 {
1522     struct dvd_miscauth *d;
1523     u_int16_t length;
1524     int8_t ccb[16];
1525     int error = 0;
1526
1527     switch(s->format) {
1528     case DVD_STRUCT_PHYSICAL:
1529         length = 21;
1530         break;
1531
1532     case DVD_STRUCT_COPYRIGHT:
1533         length = 8;
1534         break;
1535
1536     case DVD_STRUCT_DISCKEY:
1537         length = 2052;
1538         break;
1539
1540     case DVD_STRUCT_BCA:
1541         length = 192;
1542         break;
1543
1544     case DVD_STRUCT_MANUFACT:
1545         length = 2052;
1546         break;
1547
1548     case DVD_STRUCT_DDS:
1549     case DVD_STRUCT_PRERECORDED:
1550     case DVD_STRUCT_UNIQUEID:
1551     case DVD_STRUCT_LIST:
1552     case DVD_STRUCT_CMI:
1553     case DVD_STRUCT_RMD_LAST:
1554     case DVD_STRUCT_RMD_RMA:
1555     case DVD_STRUCT_DCB:
1556         return ENOSYS;
1557
1558     default:
1559         return EINVAL;
1560     }
1561
1562     d = kmalloc(length, M_ACD, M_WAITOK | M_ZERO);
1563     d->length = htons(length - 2);
1564         
1565     bzero(ccb, sizeof(ccb));
1566     ccb[0] = ATAPI_READ_STRUCTURE;
1567     ccb[6] = s->layer_num;
1568     ccb[7] = s->format;
1569     ccb[8] = (length >> 8) & 0xff;
1570     ccb[9] = length & 0xff;
1571     ccb[10] = s->agid << 6;
1572     error = ata_atapicmd(dev, ccb, (caddr_t)d, length, ATA_R_READ, 30);
1573     if (error) {
1574         kfree(d, M_ACD);
1575         return error;
1576     }
1577
1578     switch (s->format) {
1579     case DVD_STRUCT_PHYSICAL: {
1580         struct dvd_layer *layer = (struct dvd_layer *)&s->data[0];
1581
1582         layer->book_type = d->data[0] >> 4;
1583         layer->book_version = d->data[0] & 0xf;
1584         layer->disc_size = d->data[1] >> 4;
1585         layer->max_rate = d->data[1] & 0xf;
1586         layer->nlayers = (d->data[2] >> 5) & 3;
1587         layer->track_path = (d->data[2] >> 4) & 1;
1588         layer->layer_type = d->data[2] & 0xf;
1589         layer->linear_density = d->data[3] >> 4;
1590         layer->track_density = d->data[3] & 0xf;
1591         layer->start_sector = d->data[5] << 16 | d->data[6] << 8 | d->data[7];
1592         layer->end_sector = d->data[9] << 16 | d->data[10] << 8 | d->data[11];
1593         layer->end_sector_l0 = d->data[13] << 16 | d->data[14] << 8|d->data[15];
1594         layer->bca = d->data[16] >> 7;
1595         break;
1596     }
1597
1598     case DVD_STRUCT_COPYRIGHT:
1599         s->cpst = d->data[0];
1600         s->rmi = d->data[1];
1601         break;
1602
1603     case DVD_STRUCT_DISCKEY:
1604         bcopy(&d->data[0], &s->data[0], 2048);
1605         break;
1606
1607     case DVD_STRUCT_BCA:
1608         s->length = ntohs(d->length);
1609         bcopy(&d->data[0], &s->data[0], s->length);
1610         break;
1611
1612     case DVD_STRUCT_MANUFACT:
1613         s->length = ntohs(d->length);
1614         bcopy(&d->data[0], &s->data[0], s->length);
1615         break;
1616                 
1617     default:
1618         error = EINVAL;
1619     }
1620     kfree(d, M_ACD);
1621     return error;
1622 }
1623
1624 static int 
1625 acd_tray(device_t dev, int close)
1626 {
1627     struct ata_device *atadev = device_get_softc(dev);
1628     struct acd_softc *cdp = device_get_ivars(dev);
1629     int error = ENODEV;
1630
1631     if (cdp->cap.mechanism & MST_EJECT) {
1632         if (close) {
1633             if (!(error = acd_start_stop(dev, 3))) {
1634                 acd_read_toc(dev);
1635                 acd_prevent_allow(dev, 1);
1636                 cdp->flags |= F_LOCKED;
1637             }
1638         }
1639         else {
1640             acd_start_stop(dev, 0);
1641             acd_prevent_allow(dev, 0);
1642             cdp->flags &= ~F_LOCKED;
1643             atadev->flags |= ATA_D_MEDIA_CHANGED;
1644             error = acd_start_stop(dev, 2);
1645         }
1646     }
1647     return error;
1648 }
1649
1650 static int
1651 acd_blank(device_t dev, int blanktype)
1652 {
1653     struct ata_device *atadev = device_get_softc(dev);
1654     int8_t ccb[16] = { ATAPI_BLANK, 0x10 | (blanktype & 0x7), 0, 0, 0, 0, 0, 0, 
1655                        0, 0, 0, 0, 0, 0, 0, 0 };
1656
1657     atadev->flags |= ATA_D_MEDIA_CHANGED;
1658     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1659 }
1660
1661 static int
1662 acd_prevent_allow(device_t dev, int lock)
1663 {
1664     int8_t ccb[16] = { ATAPI_PREVENT_ALLOW, 0, 0, 0, lock,
1665                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1666
1667     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1668 }
1669
1670 static int
1671 acd_start_stop(device_t dev, int start)
1672 {
1673     int8_t ccb[16] = { ATAPI_START_STOP, 0, 0, 0, start,
1674                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1675
1676     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1677 }
1678
1679 static int
1680 acd_pause_resume(device_t dev, int pause)
1681 {
1682     int8_t ccb[16] = { ATAPI_PAUSE, 0, 0, 0, 0, 0, 0, 0, pause,
1683                        0, 0, 0, 0, 0, 0, 0 };
1684
1685     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1686 }
1687
1688 static int
1689 acd_mode_sense(device_t dev, int page, caddr_t pagebuf, int pagesize)
1690 {
1691     int8_t ccb[16] = { ATAPI_MODE_SENSE_BIG, 0, page, 0, 0, 0, 0,
1692                        pagesize>>8, pagesize, 0, 0, 0, 0, 0, 0, 0 };
1693     int error;
1694
1695     error = ata_atapicmd(dev, ccb, pagebuf, pagesize, ATA_R_READ, 10);
1696     return error;
1697 }
1698
1699 static int
1700 acd_mode_select(device_t dev, caddr_t pagebuf, int pagesize)
1701 {
1702     int8_t ccb[16] = { ATAPI_MODE_SELECT_BIG, 0x10, 0, 0, 0, 0, 0,
1703                      pagesize>>8, pagesize, 0, 0, 0, 0, 0, 0, 0 };
1704
1705     return ata_atapicmd(dev, ccb, pagebuf, pagesize, 0, 30);
1706 }
1707
1708 static int
1709 acd_set_speed(device_t dev, int rdspeed, int wrspeed)
1710 {
1711     int8_t ccb[16] = { ATAPI_SET_SPEED, 0, rdspeed >> 8, rdspeed, 
1712                        wrspeed >> 8, wrspeed, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1713     int error;
1714
1715     error = ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1716     if (!error)
1717         acd_get_cap(dev);
1718     return error;
1719 }
1720
1721 static void
1722 acd_get_cap(device_t dev)
1723 {
1724     struct acd_softc *cdp = device_get_ivars(dev);
1725     int count;
1726
1727     /* get drive capabilities, some bugridden drives needs this repeated */
1728     for (count = 0 ; count < 5 ; count++) {
1729         if (!acd_mode_sense(dev, ATAPI_CDROM_CAP_PAGE,
1730                             (caddr_t)&cdp->cap, sizeof(cdp->cap)) &&
1731                             cdp->cap.page_code == ATAPI_CDROM_CAP_PAGE) {
1732             cdp->cap.max_read_speed = ntohs(cdp->cap.max_read_speed);
1733             cdp->cap.cur_read_speed = ntohs(cdp->cap.cur_read_speed);
1734             cdp->cap.max_write_speed = ntohs(cdp->cap.max_write_speed);
1735             cdp->cap.cur_write_speed = max(ntohs(cdp->cap.cur_write_speed),177);
1736             cdp->cap.max_vol_levels = ntohs(cdp->cap.max_vol_levels);
1737             cdp->cap.buf_size = ntohs(cdp->cap.buf_size);
1738         }
1739     }
1740 }
1741
1742 #ifdef ACD_CDR_FORMAT
1743 static int
1744 acd_read_format_caps(device_t dev, struct cdr_format_capacities *caps)
1745 {
1746     int8_t ccb[16] = { ATAPI_READ_FORMAT_CAPACITIES, 0, 0, 0, 0, 0, 0,
1747                        (sizeof(struct cdr_format_capacities) >> 8) & 0xff,
1748                        sizeof(struct cdr_format_capacities) & 0xff, 
1749                        0, 0, 0, 0, 0, 0, 0 };
1750     
1751     return ata_atapicmd(dev, ccb, (caddr_t)caps,
1752                         sizeof(struct cdr_format_capacities), ATA_R_READ, 30);
1753 }
1754
1755 static int
1756 acd_format(device_t dev, struct cdr_format_params* params)
1757 {
1758     int8_t ccb[16] = { ATAPI_FORMAT, 0x11, 0, 0, 0, 0, 0, 0, 0, 0, 
1759                        0, 0, 0, 0, 0, 0 };
1760     int error;
1761
1762     error = ata_atapicmd(dev, ccb, (u_int8_t *)params, 
1763                          sizeof(struct cdr_format_params), 0, 30);
1764     return error;
1765 }
1766 #endif /* ACD_CDR_FORMAT */
1767
1768 static int
1769 acd_test_ready(device_t dev)
1770 {
1771     int8_t ccb[16] = { ATAPI_TEST_UNIT_READY, 0, 0, 0, 0,
1772                        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1773
1774     return ata_atapicmd(dev, ccb, NULL, 0, 0, 30);
1775 }
1776
1777 static void 
1778 acd_describe(device_t dev)
1779 {
1780     struct ata_channel *ch = device_get_softc(device_get_parent(dev));
1781     struct ata_device *atadev = device_get_softc(dev);
1782     struct acd_softc *cdp = device_get_ivars(dev);
1783     int comma = 0;
1784     char *mechanism;
1785
1786     if (bootverbose) {
1787         device_printf(dev, "<%.40s/%.8s> %s drive at ata%d as %s\n",
1788                       atadev->param.model, atadev->param.revision,
1789                       (cdp->cap.media & MST_WRITE_DVDR) ? "DVDR" : 
1790                        (cdp->cap.media & MST_WRITE_DVDRAM) ? "DVDRAM" : 
1791                         (cdp->cap.media & MST_WRITE_CDRW) ? "CDRW" :
1792                          (cdp->cap.media & MST_WRITE_CDR) ? "CDR" : 
1793                           (cdp->cap.media & MST_READ_DVDROM) ? "DVDROM":"CDROM",
1794                       device_get_unit(ch->dev),
1795                       (atadev->unit == ATA_MASTER) ? "master" : "slave");
1796
1797         device_printf(dev, "%s", "");
1798         if (cdp->cap.cur_read_speed) {
1799             kprintf("read %dKB/s", cdp->cap.cur_read_speed * 1000 / 1024);
1800             if (cdp->cap.max_read_speed) 
1801                 kprintf(" (%dKB/s)", cdp->cap.max_read_speed * 1000 / 1024);
1802             if ((cdp->cap.cur_write_speed) &&
1803                 (cdp->cap.media & (MST_WRITE_CDR | MST_WRITE_CDRW |
1804                                    MST_WRITE_DVDR | MST_WRITE_DVDRAM))) {
1805                 kprintf(" write %dKB/s", cdp->cap.cur_write_speed * 1000 / 1024);
1806                 if (cdp->cap.max_write_speed)
1807                     kprintf(" (%dKB/s)", cdp->cap.max_write_speed * 1000 / 1024);
1808             }
1809             comma = 1;
1810         }
1811         if (cdp->cap.buf_size) {
1812             kprintf("%s %dKB buffer", comma ? "," : "", cdp->cap.buf_size);
1813             comma = 1;
1814         }
1815         kprintf("%s %s\n", comma ? "," : "", ata_mode2str(atadev->mode));
1816
1817         device_printf(dev, "Reads:");
1818         comma = 0;
1819         if (cdp->cap.media & MST_READ_CDR) {
1820             kprintf(" CDR"); comma = 1;
1821         }
1822         if (cdp->cap.media & MST_READ_CDRW) {
1823             kprintf("%s CDRW", comma ? "," : ""); comma = 1;
1824         }
1825         if (cdp->cap.capabilities & MST_READ_CDDA) {
1826             if (cdp->cap.capabilities & MST_CDDA_STREAM)
1827                 kprintf("%s CDDA stream", comma ? "," : "");
1828             else
1829                 kprintf("%s CDDA", comma ? "," : "");
1830             comma = 1;
1831         }
1832         if (cdp->cap.media & MST_READ_DVDROM) {
1833             kprintf("%s DVDROM", comma ? "," : ""); comma = 1;
1834         }
1835         if (cdp->cap.media & MST_READ_DVDR) {
1836             kprintf("%s DVDR", comma ? "," : ""); comma = 1;
1837         }
1838         if (cdp->cap.media & MST_READ_DVDRAM) {
1839             kprintf("%s DVDRAM", comma ? "," : ""); comma = 1;
1840         }
1841         if (cdp->cap.media & MST_READ_PACKET)
1842             kprintf("%s packet", comma ? "," : "");
1843
1844         kprintf("\n");
1845         device_printf(dev, "Writes:");
1846         if (cdp->cap.media & (MST_WRITE_CDR | MST_WRITE_CDRW |
1847                               MST_WRITE_DVDR | MST_WRITE_DVDRAM)) {
1848             comma = 0;
1849             if (cdp->cap.media & MST_WRITE_CDR) {
1850                 kprintf(" CDR" ); comma = 1;
1851             }
1852             if (cdp->cap.media & MST_WRITE_CDRW) {
1853                 kprintf("%s CDRW", comma ? "," : ""); comma = 1;
1854             }
1855             if (cdp->cap.media & MST_WRITE_DVDR) {
1856                 kprintf("%s DVDR", comma ? "," : ""); comma = 1;
1857             }
1858             if (cdp->cap.media & MST_WRITE_DVDRAM) {
1859                 kprintf("%s DVDRAM", comma ? "," : ""); comma = 1; 
1860             }
1861             if (cdp->cap.media & MST_WRITE_TEST) {
1862                 kprintf("%s test write", comma ? "," : ""); comma = 1;
1863             }
1864             if (cdp->cap.capabilities & MST_BURNPROOF)
1865                 kprintf("%s burnproof", comma ? "," : "");
1866         }
1867         kprintf("\n");
1868         if (cdp->cap.capabilities & MST_AUDIO_PLAY) {
1869             device_printf(dev, "Audio: ");
1870             if (cdp->cap.capabilities & MST_AUDIO_PLAY)
1871                 kprintf("play");
1872             if (cdp->cap.max_vol_levels)
1873                 kprintf(", %d volume levels", cdp->cap.max_vol_levels);
1874             kprintf("\n");
1875         }
1876         device_printf(dev, "Mechanism: ");
1877         switch (cdp->cap.mechanism & MST_MECH_MASK) {
1878         case MST_MECH_CADDY:
1879             mechanism = "caddy"; break;
1880         case MST_MECH_TRAY:
1881             mechanism = "tray"; break;
1882         case MST_MECH_POPUP:
1883             mechanism = "popup"; break;
1884         case MST_MECH_CHANGER:
1885             mechanism = "changer"; break;
1886         case MST_MECH_CARTRIDGE:
1887             mechanism = "cartridge"; break;
1888         default:
1889             mechanism = 0; break;
1890         }
1891         if (mechanism)
1892             kprintf("%s%s", (cdp->cap.mechanism & MST_EJECT) ?
1893                    "ejectable " : "", mechanism);
1894         else if (cdp->cap.mechanism & MST_EJECT)
1895             kprintf("ejectable");
1896
1897         if (cdp->cap.mechanism & MST_LOCKABLE)
1898             kprintf((cdp->cap.mechanism & MST_LOCKED) ? ", locked":", unlocked");
1899         if (cdp->cap.mechanism & MST_PREVENT)
1900             kprintf(", lock protected");
1901         kprintf("\n");
1902
1903         if ((cdp->cap.mechanism & MST_MECH_MASK) != MST_MECH_CHANGER) {
1904             device_printf(dev, "Medium: ");
1905             switch (cdp->cap.medium_type & MST_TYPE_MASK_HIGH) {
1906             case MST_CDROM:
1907                 kprintf("CD-ROM "); break;
1908             case MST_CDR:
1909                 kprintf("CD-R "); break;
1910             case MST_CDRW:
1911                 kprintf("CD-RW "); break;
1912             case MST_DOOR_OPEN:
1913                 kprintf("door open"); break;
1914             case MST_NO_DISC:
1915                 kprintf("no/blank disc"); break;
1916             case MST_FMT_ERROR:
1917                 kprintf("medium format error"); break;
1918             }
1919             if ((cdp->cap.medium_type & MST_TYPE_MASK_HIGH)<MST_TYPE_MASK_HIGH){
1920                 switch (cdp->cap.medium_type & MST_TYPE_MASK_LOW) {
1921                 case MST_DATA_120:
1922                     kprintf("120mm data disc"); break;
1923                 case MST_AUDIO_120:
1924                     kprintf("120mm audio disc"); break;
1925                 case MST_COMB_120:
1926                     kprintf("120mm data/audio disc"); break;
1927                 case MST_PHOTO_120:
1928                     kprintf("120mm photo disc"); break;
1929                 case MST_DATA_80:
1930                     kprintf("80mm data disc"); break;
1931                 case MST_AUDIO_80:
1932                     kprintf("80mm audio disc"); break;
1933                 case MST_COMB_80:
1934                     kprintf("80mm data/audio disc"); break;
1935                 case MST_PHOTO_80:
1936                     kprintf("80mm photo disc"); break;
1937                 case MST_FMT_NONE:
1938                     switch (cdp->cap.medium_type & MST_TYPE_MASK_HIGH) {
1939                     case MST_CDROM:
1940                         kprintf("unknown"); break;
1941                     case MST_CDR:
1942                     case MST_CDRW:
1943                         kprintf("blank"); break;
1944                     }
1945                     break;
1946                 default:
1947                     kprintf("unknown (0x%x)", cdp->cap.medium_type); break;
1948                 }
1949             }
1950             kprintf("\n");
1951         }
1952     }
1953     else {
1954         device_printf(dev, "%s ",
1955                       (cdp->cap.media & MST_WRITE_DVDR) ? "DVDR" : 
1956                        (cdp->cap.media & MST_WRITE_DVDRAM) ? "DVDRAM" : 
1957                         (cdp->cap.media & MST_WRITE_CDRW) ? "CDRW" :
1958                          (cdp->cap.media & MST_WRITE_CDR) ? "CDR" : 
1959                           (cdp->cap.media & MST_READ_DVDROM) ? "DVDROM" :
1960                           "CDROM");
1961         kprintf("<%.40s/%.8s> at ata%d-%s %s\n",
1962                atadev->param.model, atadev->param.revision,
1963                device_get_unit(ch->dev),
1964                (atadev->unit == ATA_MASTER) ? "master" : "slave",
1965                ata_mode2str(atadev->mode) );
1966     }
1967 }
1968
1969 static device_method_t acd_methods[] = {
1970     /* device interface */
1971     DEVMETHOD(device_probe,     acd_probe),
1972     DEVMETHOD(device_attach,    acd_attach),
1973     DEVMETHOD(device_detach,    acd_detach),
1974     DEVMETHOD(device_shutdown,  acd_shutdown),
1975     
1976     /* ATA methods */
1977     DEVMETHOD(ata_reinit,       acd_reinit),
1978     
1979     { 0, 0 }
1980 };
1981     
1982 static driver_t acd_driver = {
1983     "acd",
1984     acd_methods,
1985     0,
1986 };
1987
1988 static devclass_t acd_devclass;
1989
1990 DRIVER_MODULE(acd, ata, acd_driver, acd_devclass, NULL, NULL);
1991 MODULE_VERSION(acd, 1);
1992 MODULE_DEPEND(acd, ata, 1, 1, 1);