1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
3 * MCI driver for audio CD (MCICDA)
5 * Copyright 1994 Martin Ayotte
6 * Copyright 1998-99 Eric Pouech
7 * Copyright 2000 Andreas Mohr
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
36 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(mcicda);
40 #define CDFRAMES_PERSEC 75
41 #define CDFRAMES_PERMIN (CDFRAMES_PERSEC * 60)
42 #define FRAME_OF_ADDR(a) ((a)[1] * CDFRAMES_PERMIN + (a)[2] * CDFRAMES_PERSEC + (a)[3])
43 #define FRAME_OF_TOC(toc, idx) FRAME_OF_ADDR((toc).TrackData[idx - (toc).FirstTrack].Address)
47 int nUseCount; /* Incremented for each shared open */
48 BOOL fShareable; /* TRUE if first open was shareable */
49 WORD wNotifyDeviceID; /* MCI device ID with a pending notification */
50 HANDLE hCallback; /* Callback handle for pending notification */
55 /*-----------------------------------------------------------------------*/
57 /**************************************************************************
58 * MCICDA_drvOpen [internal]
60 static DWORD MCICDA_drvOpen(LPSTR str, LPMCI_OPEN_DRIVER_PARMSA modp)
62 WINE_MCICDAUDIO* wmcda = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINE_MCICDAUDIO));
67 wmcda->wDevID = modp->wDeviceID;
68 mciSetDriverData(wmcda->wDevID, (DWORD)wmcda);
69 modp->wCustomCommandTable = MCI_NO_COMMAND_TABLE;
70 modp->wType = MCI_DEVTYPE_CD_AUDIO;
71 return modp->wDeviceID;
74 /**************************************************************************
75 * MCICDA_drvClose [internal]
77 static DWORD MCICDA_drvClose(DWORD dwDevID)
79 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(dwDevID);
82 HeapFree(GetProcessHeap(), 0, wmcda);
83 mciSetDriverData(dwDevID, 0);
88 /**************************************************************************
89 * MCICDA_GetOpenDrv [internal]
91 static WINE_MCICDAUDIO* MCICDA_GetOpenDrv(UINT wDevID)
93 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(wDevID);
95 if (wmcda == NULL || wmcda->nUseCount == 0) {
96 WARN("Invalid wDevID=%u\n", wDevID);
102 /**************************************************************************
103 * MCICDA_GetStatus [internal]
105 static DWORD MCICDA_GetStatus(WINE_MCICDAUDIO* wmcda)
107 CDROM_SUB_Q_DATA_FORMAT fmt;
108 SUB_Q_CHANNEL_DATA data;
110 DWORD mode = MCI_MODE_NOT_READY;
112 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
113 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
114 &data, sizeof(data), &br, NULL)) {
115 if (GetLastError() == STATUS_NO_MEDIA_IN_DEVICE) mode = MCI_MODE_OPEN;
117 switch (data.CurrentPosition.Header.AudioStatus)
119 case AUDIO_STATUS_IN_PROGRESS: mode = MCI_MODE_PLAY; break;
120 case AUDIO_STATUS_PAUSED: mode = MCI_MODE_PAUSE; break;
121 case AUDIO_STATUS_PLAY_COMPLETE: mode = MCI_MODE_STOP; break;
122 case AUDIO_STATUS_PLAY_ERROR:
123 case AUDIO_STATUS_NOT_SUPPORTED:
124 case AUDIO_STATUS_NO_STATUS:
132 /**************************************************************************
133 * MCICDA_GetError [internal]
135 static int MCICDA_GetError(WINE_MCICDAUDIO* wmcda)
137 switch (GetLastError())
139 case STATUS_NO_MEDIA_IN_DEVICE: return MCIERR_DEVICE_NOT_READY;
140 case STATUS_IO_DEVICE_ERROR: return MCIERR_HARDWARE;
142 FIXME("Unknown mode %lx\n", GetLastError());
144 return MCIERR_DRIVER_INTERNAL;
147 /**************************************************************************
148 * MCICDA_CalcFrame [internal]
150 static DWORD MCICDA_CalcFrame(WINE_MCICDAUDIO* wmcda, DWORD dwTime)
158 TRACE("(%p, %08lX, %lu);\n", wmcda, wmcda->dwTimeFormat, dwTime);
160 switch (wmcda->dwTimeFormat) {
161 case MCI_FORMAT_MILLISECONDS:
162 dwFrame = ((dwTime - 1) * CDFRAMES_PERSEC + 500) / 1000;
163 TRACE("MILLISECONDS %lu\n", dwFrame);
166 TRACE("MSF %02u:%02u:%02u\n",
167 MCI_MSF_MINUTE(dwTime), MCI_MSF_SECOND(dwTime), MCI_MSF_FRAME(dwTime));
168 dwFrame += CDFRAMES_PERMIN * MCI_MSF_MINUTE(dwTime);
169 dwFrame += CDFRAMES_PERSEC * MCI_MSF_SECOND(dwTime);
170 dwFrame += MCI_MSF_FRAME(dwTime);
172 case MCI_FORMAT_TMSF:
173 default: /* unknown format ! force TMSF ! ... */
174 wTrack = MCI_TMSF_TRACK(dwTime);
175 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
176 &toc, sizeof(toc), &br, NULL))
178 if (wTrack < toc.FirstTrack || wTrack > toc.LastTrack)
180 TRACE("MSF %02u-%02u:%02u:%02u\n",
181 MCI_TMSF_TRACK(dwTime), MCI_TMSF_MINUTE(dwTime),
182 MCI_TMSF_SECOND(dwTime), MCI_TMSF_FRAME(dwTime));
183 addr = toc.TrackData[wTrack - toc.FirstTrack].Address;
184 TRACE("TMSF trackpos[%u]=%d:%d:%d\n",
185 wTrack, addr[0], addr[1], addr[2]);
186 dwFrame = CDFRAMES_PERMIN * (addr[0] + MCI_TMSF_MINUTE(dwTime)) +
187 CDFRAMES_PERSEC * (addr[1] + MCI_TMSF_SECOND(dwTime)) +
188 addr[2] + MCI_TMSF_FRAME(dwTime);
194 /**************************************************************************
195 * MCICDA_CalcTime [internal]
197 static DWORD MCICDA_CalcTime(WINE_MCICDAUDIO* wmcda, DWORD tf, DWORD dwFrame, LPDWORD lpRet)
207 TRACE("(%p, %08lX, %lu);\n", wmcda, tf, dwFrame);
210 case MCI_FORMAT_MILLISECONDS:
211 dwTime = (dwFrame * 1000) / CDFRAMES_PERSEC + 1;
212 TRACE("MILLISECONDS %lu\n", dwTime);
216 wMinutes = dwFrame / CDFRAMES_PERMIN;
217 wSeconds = (dwFrame - CDFRAMES_PERMIN * wMinutes) / CDFRAMES_PERSEC;
218 wFrames = dwFrame - CDFRAMES_PERMIN * wMinutes - CDFRAMES_PERSEC * wSeconds;
219 dwTime = MCI_MAKE_MSF(wMinutes, wSeconds, wFrames);
220 TRACE("MSF %02u:%02u:%02u -> dwTime=%lu\n",
221 wMinutes, wSeconds, wFrames, dwTime);
222 *lpRet = MCI_COLONIZED3_RETURN;
224 case MCI_FORMAT_TMSF:
225 default: /* unknown format ! force TMSF ! ... */
226 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
227 &toc, sizeof(toc), &br, NULL))
229 if (dwFrame < FRAME_OF_TOC(toc, toc.FirstTrack) ||
230 dwFrame > FRAME_OF_TOC(toc, toc.LastTrack + 1)) {
231 ERR("Out of range value %lu [%u,%u]\n",
232 dwFrame, FRAME_OF_TOC(toc, toc.FirstTrack),
233 FRAME_OF_TOC(toc, toc.LastTrack + 1));
237 for (wTrack = toc.FirstTrack; wTrack <= toc.LastTrack; wTrack++) {
238 if (FRAME_OF_TOC(toc, wTrack) > dwFrame)
242 dwFrame -= FRAME_OF_TOC(toc, wTrack);
243 wMinutes = dwFrame / CDFRAMES_PERMIN;
244 wSeconds = (dwFrame - CDFRAMES_PERMIN * wMinutes) / CDFRAMES_PERSEC;
245 wFrames = dwFrame - CDFRAMES_PERMIN * wMinutes - CDFRAMES_PERSEC * wSeconds;
246 dwTime = MCI_MAKE_TMSF(wTrack, wMinutes, wSeconds, wFrames);
247 TRACE("%02u-%02u:%02u:%02u\n", wTrack, wMinutes, wSeconds, wFrames);
248 *lpRet = MCI_COLONIZED4_RETURN;
254 static DWORD MCICDA_Seek(UINT wDevID, DWORD dwFlags, LPMCI_SEEK_PARMS lpParms);
255 static DWORD MCICDA_Stop(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms);
257 /**************************************************************************
258 * MCICDA_Open [internal]
260 static DWORD MCICDA_Open(UINT wDevID, DWORD dwFlags, LPMCI_OPEN_PARMSA lpOpenParms)
263 DWORD ret = MCIERR_HARDWARE;
264 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(wDevID);
269 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpOpenParms);
271 if (lpOpenParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
272 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
274 dwDeviceID = lpOpenParms->wDeviceID;
276 if (wmcda->nUseCount > 0) {
277 /* The driver is already open on this channel */
278 /* If the driver was opened shareable before and this open specifies */
279 /* shareable then increment the use count */
280 if (wmcda->fShareable && (dwFlags & MCI_OPEN_SHAREABLE))
283 return MCIERR_MUST_USE_SHAREABLE;
285 wmcda->nUseCount = 1;
286 wmcda->fShareable = dwFlags & MCI_OPEN_SHAREABLE;
288 if (dwFlags & MCI_OPEN_ELEMENT) {
289 if (dwFlags & MCI_OPEN_ELEMENT_ID) {
290 WARN("MCI_OPEN_ELEMENT_ID %8lx ! Abort\n", (DWORD)lpOpenParms->lpstrElementName);
291 return MCIERR_NO_ELEMENT_ALLOWED;
293 if (!isalpha(lpOpenParms->lpstrElementName[0]) || lpOpenParms->lpstrElementName[1] != ':' ||
294 lpOpenParms->lpstrElementName[2])
296 WARN("MCI_OPEN_ELEMENT unsupported format: %s\n", lpOpenParms->lpstrElementName);
297 ret = MCIERR_NO_ELEMENT_ALLOWED;
300 drive = toupper(lpOpenParms->lpstrElementName[0]);
301 strcpy(root, "A:\\");
303 if (GetDriveTypeA(root) != DRIVE_CDROM)
305 ret = MCIERR_INVALID_DEVICE_NAME;
311 /* drive letter isn't passed... get the dwDeviceID'th cdrom in the system */
312 strcpy(root, "A:\\");
313 for (count = 0; root[0] <= 'Z'; root[0]++)
315 if (GetDriveTypeA(root) == DRIVE_CDROM && ++count >= dwDeviceID)
323 ret = MCIERR_INVALID_DEVICE_ID;
328 wmcda->wNotifyDeviceID = dwDeviceID;
329 wmcda->dwTimeFormat = MCI_FORMAT_MSF;
331 /* now, open the handle */
332 strcpy(root, "\\\\.\\A:");
334 wmcda->handle = CreateFileA(root, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
335 if (wmcda->handle != INVALID_HANDLE_VALUE)
343 /**************************************************************************
344 * MCICDA_Close [internal]
346 static DWORD MCICDA_Close(UINT wDevID, DWORD dwParam, LPMCI_GENERIC_PARMS lpParms)
348 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
350 TRACE("(%04X, %08lX, %p);\n", wDevID, dwParam, lpParms);
352 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
354 if (--wmcda->nUseCount == 0) {
355 CloseHandle(wmcda->handle);
360 /**************************************************************************
361 * MCICDA_GetDevCaps [internal]
363 static DWORD MCICDA_GetDevCaps(UINT wDevID, DWORD dwFlags,
364 LPMCI_GETDEVCAPS_PARMS lpParms)
368 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
370 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
372 if (dwFlags & MCI_GETDEVCAPS_ITEM) {
373 TRACE("MCI_GETDEVCAPS_ITEM dwItem=%08lX;\n", lpParms->dwItem);
375 switch (lpParms->dwItem) {
376 case MCI_GETDEVCAPS_CAN_RECORD:
377 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
378 ret = MCI_RESOURCE_RETURNED;
380 case MCI_GETDEVCAPS_HAS_AUDIO:
381 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
382 ret = MCI_RESOURCE_RETURNED;
384 case MCI_GETDEVCAPS_HAS_VIDEO:
385 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
386 ret = MCI_RESOURCE_RETURNED;
388 case MCI_GETDEVCAPS_DEVICE_TYPE:
389 lpParms->dwReturn = MAKEMCIRESOURCE(MCI_DEVTYPE_CD_AUDIO, MCI_DEVTYPE_CD_AUDIO);
390 ret = MCI_RESOURCE_RETURNED;
392 case MCI_GETDEVCAPS_USES_FILES:
393 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
394 ret = MCI_RESOURCE_RETURNED;
396 case MCI_GETDEVCAPS_COMPOUND_DEVICE:
397 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
398 ret = MCI_RESOURCE_RETURNED;
400 case MCI_GETDEVCAPS_CAN_EJECT:
401 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
402 ret = MCI_RESOURCE_RETURNED;
404 case MCI_GETDEVCAPS_CAN_PLAY:
405 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
406 ret = MCI_RESOURCE_RETURNED;
408 case MCI_GETDEVCAPS_CAN_SAVE:
409 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
410 ret = MCI_RESOURCE_RETURNED;
413 ERR("Unsupported %lx devCaps item\n", lpParms->dwItem);
414 return MCIERR_UNRECOGNIZED_COMMAND;
417 TRACE("No GetDevCaps-Item !\n");
418 return MCIERR_UNRECOGNIZED_COMMAND;
420 TRACE("lpParms->dwReturn=%08lX;\n", lpParms->dwReturn);
424 static DWORD CDROM_Audio_GetSerial(CDROM_TOC* toc)
426 unsigned long serial = 0;
429 DWORD dwStart, dwEnd;
432 * wMagic collects the wFrames from track 1
433 * dwStart, dwEnd collect the beginning and end of the disc respectively, in
435 * There it is collected for correcting the serial when there are less than
438 wMagic = toc->TrackData[0].Address[3];
439 dwStart = FRAME_OF_TOC(*toc, toc->FirstTrack);
441 for (i = 0; i <= toc->LastTrack - toc->FirstTrack; i++) {
442 serial += (toc->TrackData[i].Address[1] << 16) |
443 (toc->TrackData[i].Address[2] << 8) | toc->TrackData[i].Address[3];
445 dwEnd = FRAME_OF_TOC(*toc, toc->LastTrack + 1);
447 if (toc->LastTrack - toc->FirstTrack + 1 < 3)
448 serial += wMagic + (dwEnd - dwStart);
454 /**************************************************************************
455 * MCICDA_Info [internal]
457 static DWORD MCICDA_Info(UINT wDevID, DWORD dwFlags, LPMCI_INFO_PARMSA lpParms)
460 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
464 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
466 if (lpParms == NULL || lpParms->lpstrReturn == NULL)
467 return MCIERR_NULL_PARAMETER_BLOCK;
468 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
470 TRACE("buf=%p, len=%lu\n", lpParms->lpstrReturn, lpParms->dwRetSize);
472 if (dwFlags & MCI_INFO_PRODUCT) {
473 str = "Wine's audio CD";
474 } else if (dwFlags & MCI_INFO_MEDIA_UPC) {
475 ret = MCIERR_NO_IDENTITY;
476 } else if (dwFlags & MCI_INFO_MEDIA_IDENTITY) {
481 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
482 &toc, sizeof(toc), &br, NULL)) {
483 return MCICDA_GetError(wmcda);
486 res = CDROM_Audio_GetSerial(&toc);
487 sprintf(buffer, "%lu", res);
490 WARN("Don't know this info command (%lu)\n", dwFlags);
491 ret = MCIERR_UNRECOGNIZED_COMMAND;
494 if (lpParms->dwRetSize <= strlen(str)) {
495 lstrcpynA(lpParms->lpstrReturn, str, lpParms->dwRetSize - 1);
496 ret = MCIERR_PARAM_OVERFLOW;
498 strcpy(lpParms->lpstrReturn, str);
501 *lpParms->lpstrReturn = 0;
503 TRACE("=> %s (%ld)\n", lpParms->lpstrReturn, ret);
507 /**************************************************************************
508 * MCICDA_Status [internal]
510 static DWORD MCICDA_Status(UINT wDevID, DWORD dwFlags, LPMCI_STATUS_PARMS lpParms)
512 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
515 CDROM_SUB_Q_DATA_FORMAT fmt;
516 SUB_Q_CHANNEL_DATA data;
520 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
522 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
523 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
525 if (dwFlags & MCI_NOTIFY) {
526 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
527 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
528 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
530 if (dwFlags & MCI_STATUS_ITEM) {
531 TRACE("dwItem = %lx\n", lpParms->dwItem);
532 switch (lpParms->dwItem) {
533 case MCI_STATUS_CURRENT_TRACK:
534 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
535 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
536 &data, sizeof(data), &br, NULL))
538 return MCICDA_GetError(wmcda);
540 lpParms->dwReturn = data.CurrentPosition.TrackNumber;
541 TRACE("CURRENT_TRACK=%lu!\n", lpParms->dwReturn);
543 case MCI_STATUS_LENGTH:
544 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
545 &toc, sizeof(toc), &br, NULL)) {
546 WARN("error reading TOC !\n");
547 return MCICDA_GetError(wmcda);
549 if (dwFlags & MCI_TRACK) {
550 TRACE("MCI_TRACK #%lu LENGTH=??? !\n", lpParms->dwTrack);
551 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
552 return MCIERR_OUTOFRANGE;
553 idx = lpParms->dwTrack - toc.FirstTrack;
554 lpParms->dwReturn = FRAME_OF_TOC(toc, lpParms->dwTrack + 1) -
555 FRAME_OF_TOC(toc, lpParms->dwTrack);
556 /* Windows returns one frame less than the total track length for the
557 last track on the CD. See CDDB HOWTO. Verified on Win95OSR2. */
558 if (lpParms->dwTrack == toc.LastTrack)
561 /* Sum of the lengths of all of the tracks. Inherits the
562 'off by one frame' behavior from the length of the last track.
563 See above comment. */
564 lpParms->dwReturn = FRAME_OF_TOC(toc, toc.LastTrack + 1) -
565 FRAME_OF_TOC(toc, toc.FirstTrack) - 1;
567 lpParms->dwReturn = MCICDA_CalcTime(wmcda,
568 (wmcda->dwTimeFormat == MCI_FORMAT_TMSF)
569 ? MCI_FORMAT_MSF : wmcda->dwTimeFormat,
572 TRACE("LENGTH=%lu !\n", lpParms->dwReturn);
574 case MCI_STATUS_MODE:
575 lpParms->dwReturn = MCICDA_GetStatus(wmcda);
576 TRACE("MCI_STATUS_MODE=%08lX !\n", lpParms->dwReturn);
577 lpParms->dwReturn = MAKEMCIRESOURCE(lpParms->dwReturn, lpParms->dwReturn);
578 ret = MCI_RESOURCE_RETURNED;
580 case MCI_STATUS_MEDIA_PRESENT:
581 lpParms->dwReturn = (MCICDA_GetStatus(wmcda) == MCI_MODE_OPEN) ?
582 MAKEMCIRESOURCE(FALSE, MCI_FALSE) : MAKEMCIRESOURCE(TRUE, MCI_TRUE);
583 TRACE("MCI_STATUS_MEDIA_PRESENT =%c!\n", LOWORD(lpParms->dwReturn) ? 'Y' : 'N');
584 ret = MCI_RESOURCE_RETURNED;
586 case MCI_STATUS_NUMBER_OF_TRACKS:
587 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
588 &toc, sizeof(toc), &br, NULL)) {
589 WARN("error reading TOC !\n");
590 return MCICDA_GetError(wmcda);
592 lpParms->dwReturn = toc.LastTrack - toc.FirstTrack + 1;
593 TRACE("MCI_STATUS_NUMBER_OF_TRACKS = %lu !\n", lpParms->dwReturn);
594 if (lpParms->dwReturn == (WORD)-1)
595 return MCICDA_GetError(wmcda);
597 case MCI_STATUS_POSITION:
598 if (dwFlags & MCI_STATUS_START) {
599 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
600 &toc, sizeof(toc), &br, NULL)) {
601 WARN("error reading TOC !\n");
602 return MCICDA_GetError(wmcda);
604 lpParms->dwReturn = FRAME_OF_TOC(toc, toc.FirstTrack);
605 TRACE("get MCI_STATUS_START !\n");
606 } else if (dwFlags & MCI_TRACK) {
607 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
608 &toc, sizeof(toc), &br, NULL)) {
609 WARN("error reading TOC !\n");
610 return MCICDA_GetError(wmcda);
612 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
613 return MCIERR_OUTOFRANGE;
614 lpParms->dwReturn = FRAME_OF_TOC(toc, lpParms->dwTrack);
615 TRACE("get MCI_TRACK #%lu !\n", lpParms->dwTrack);
617 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
618 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
619 &data, sizeof(data), &br, NULL)) {
620 return MCICDA_GetError(wmcda);
622 lpParms->dwReturn = FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress);
624 lpParms->dwReturn = MCICDA_CalcTime(wmcda, wmcda->dwTimeFormat, lpParms->dwReturn, &ret);
625 TRACE("MCI_STATUS_POSITION=%08lX !\n", lpParms->dwReturn);
627 case MCI_STATUS_READY:
628 TRACE("MCI_STATUS_READY !\n");
629 switch (MCICDA_GetStatus(wmcda))
631 case MCI_MODE_NOT_READY:
633 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
636 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
639 TRACE("MCI_STATUS_READY=%u!\n", LOWORD(lpParms->dwReturn));
640 ret = MCI_RESOURCE_RETURNED;
642 case MCI_STATUS_TIME_FORMAT:
643 lpParms->dwReturn = MAKEMCIRESOURCE(wmcda->dwTimeFormat, wmcda->dwTimeFormat);
644 TRACE("MCI_STATUS_TIME_FORMAT=%08x!\n", LOWORD(lpParms->dwReturn));
645 ret = MCI_RESOURCE_RETURNED;
647 case 4001: /* FIXME: for bogus FullCD */
648 case MCI_CDA_STATUS_TYPE_TRACK:
649 if (!(dwFlags & MCI_TRACK))
650 ret = MCIERR_MISSING_PARAMETER;
652 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
653 &toc, sizeof(toc), &br, NULL)) {
654 WARN("error reading TOC !\n");
655 return MCICDA_GetError(wmcda);
657 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
658 ret = MCIERR_OUTOFRANGE;
660 lpParms->dwReturn = (toc.TrackData[lpParms->dwTrack - toc.FirstTrack].Control & 0x04) ?
661 MCI_CDA_TRACK_OTHER : MCI_CDA_TRACK_AUDIO;
663 TRACE("MCI_CDA_STATUS_TYPE_TRACK[%ld]=%08lx\n", lpParms->dwTrack, lpParms->dwReturn);
666 FIXME("unknown command %08lX !\n", lpParms->dwItem);
667 return MCIERR_UNRECOGNIZED_COMMAND;
670 WARN("not MCI_STATUS_ITEM !\n");
675 /**************************************************************************
676 * MCICDA_Play [internal]
678 static DWORD MCICDA_Play(UINT wDevID, DWORD dwFlags, LPMCI_PLAY_PARMS lpParms)
680 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
681 DWORD ret = 0, start, end;
684 CDROM_PLAY_AUDIO_MSF play;
685 CDROM_SUB_Q_DATA_FORMAT fmt;
686 SUB_Q_CHANNEL_DATA data;
688 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
691 return MCIERR_NULL_PARAMETER_BLOCK;
694 return MCIERR_INVALID_DEVICE_ID;
696 if (dwFlags & MCI_FROM) {
697 start = MCICDA_CalcFrame(wmcda, lpParms->dwFrom);
698 TRACE("MCI_FROM=%08lX -> %lu \n", lpParms->dwFrom, start);
700 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
701 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
702 &data, sizeof(data), &br, NULL)) {
703 return MCICDA_GetError(wmcda);
705 start = FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress);
707 if (dwFlags & MCI_TO) {
708 end = MCICDA_CalcFrame(wmcda, lpParms->dwTo);
709 TRACE("MCI_TO=%08lX -> %lu \n", lpParms->dwTo, end);
711 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
712 &toc, sizeof(toc), &br, NULL)) {
713 WARN("error reading TOC !\n");
714 return MCICDA_GetError(wmcda);
716 end = FRAME_OF_TOC(toc, toc.LastTrack + 1) - 1;
718 TRACE("Playing from %lu to %lu\n", start, end);
719 play.StartingM = start / CDFRAMES_PERMIN;
720 play.StartingS = (start / CDFRAMES_PERSEC) % 60;
721 play.StartingF = start % CDFRAMES_PERSEC;
722 play.EndingM = end / CDFRAMES_PERMIN;
723 play.EndingS = (end / CDFRAMES_PERSEC) % 60;
724 play.EndingF = end % CDFRAMES_PERSEC;
725 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_PLAY_AUDIO_MSF, &play, sizeof(play),
726 NULL, 0, &br, NULL)) {
727 ret = MCIERR_HARDWARE;
728 } else if (dwFlags & MCI_NOTIFY) {
729 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
731 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
732 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
738 /**************************************************************************
739 * MCICDA_Stop [internal]
741 static DWORD MCICDA_Stop(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
743 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
746 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
748 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
750 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_STOP_AUDIO, NULL, 0, NULL, 0, &br, NULL))
751 return MCIERR_HARDWARE;
753 if (lpParms && (dwFlags & MCI_NOTIFY)) {
754 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
755 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
756 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
761 /**************************************************************************
762 * MCICDA_Pause [internal]
764 static DWORD MCICDA_Pause(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
766 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
769 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
771 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
773 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_PAUSE_AUDIO, NULL, 0, NULL, 0, &br, NULL))
774 return MCIERR_HARDWARE;
776 if (lpParms && (dwFlags & MCI_NOTIFY)) {
777 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
778 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
779 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
784 /**************************************************************************
785 * MCICDA_Resume [internal]
787 static DWORD MCICDA_Resume(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
789 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
792 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
794 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
796 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_RESUME_AUDIO, NULL, 0, NULL, 0, &br, NULL))
797 return MCIERR_HARDWARE;
799 if (lpParms && (dwFlags & MCI_NOTIFY)) {
800 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
801 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
802 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
807 /**************************************************************************
808 * MCICDA_Seek [internal]
810 static DWORD MCICDA_Seek(UINT wDevID, DWORD dwFlags, LPMCI_SEEK_PARMS lpParms)
813 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
814 CDROM_SEEK_AUDIO_MSF seek;
818 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
820 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
821 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
823 switch (dwFlags & ~(MCI_NOTIFY|MCI_WAIT)) {
824 case MCI_SEEK_TO_START:
825 TRACE("Seeking to start\n");
826 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
827 &toc, sizeof(toc), &br, NULL)) {
828 WARN("error reading TOC !\n");
829 return MCICDA_GetError(wmcda);
831 at = FRAME_OF_TOC(toc, toc.FirstTrack);
833 case MCI_SEEK_TO_END:
834 TRACE("Seeking to end\n");
835 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
836 &toc, sizeof(toc), &br, NULL)) {
837 WARN("error reading TOC !\n");
838 return MCICDA_GetError(wmcda);
840 at = FRAME_OF_TOC(toc, toc.LastTrack + 1) - 1;
843 TRACE("Seeking to %lu\n", lpParms->dwTo);
847 TRACE("Unknown seek action %08lX\n",
848 (dwFlags & ~(MCI_NOTIFY|MCI_WAIT)));
849 return MCIERR_UNSUPPORTED_FUNCTION;
851 seek.M = at / CDFRAMES_PERMIN;
852 seek.S = (at / CDFRAMES_PERSEC) % 60;
853 seek.F = at % CDFRAMES_PERSEC;
854 if (!DeviceIoControl(wmcda->handle, IOCTL_CDROM_SEEK_AUDIO_MSF, &seek, sizeof(seek),
856 return MCIERR_HARDWARE;
858 if (dwFlags & MCI_NOTIFY) {
859 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n", lpParms->dwCallback);
860 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
861 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
866 /**************************************************************************
867 * MCICDA_SetDoor [internal]
869 static DWORD MCICDA_SetDoor(UINT wDevID, BOOL open)
871 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
874 TRACE("(%04x, %s) !\n", wDevID, (open) ? "OPEN" : "CLOSE");
876 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
878 if (!DeviceIoControl(wmcda->handle,
879 (open) ? IOCTL_STORAGE_EJECT_MEDIA : IOCTL_STORAGE_LOAD_MEDIA,
880 NULL, 0, NULL, 0, &br, NULL))
881 return MCIERR_HARDWARE;
886 /**************************************************************************
887 * MCICDA_Set [internal]
889 static DWORD MCICDA_Set(UINT wDevID, DWORD dwFlags, LPMCI_SET_PARMS lpParms)
891 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
893 TRACE("(%04X, %08lX, %p);\n", wDevID, dwFlags, lpParms);
895 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
897 if (dwFlags & MCI_SET_DOOR_OPEN) {
898 MCICDA_SetDoor(wDevID, TRUE);
900 if (dwFlags & MCI_SET_DOOR_CLOSED) {
901 MCICDA_SetDoor(wDevID, FALSE);
904 /* only functions which require valid lpParms below this line ! */
905 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
907 TRACE("dwTimeFormat=%08lX\n", lpParms->dwTimeFormat);
908 TRACE("dwAudio=%08lX\n", lpParms->dwAudio);
910 if (dwFlags & MCI_SET_TIME_FORMAT) {
911 switch (lpParms->dwTimeFormat) {
912 case MCI_FORMAT_MILLISECONDS:
913 TRACE("MCI_FORMAT_MILLISECONDS !\n");
916 TRACE("MCI_FORMAT_MSF !\n");
918 case MCI_FORMAT_TMSF:
919 TRACE("MCI_FORMAT_TMSF !\n");
922 WARN("bad time format !\n");
923 return MCIERR_BAD_TIME_FORMAT;
925 wmcda->dwTimeFormat = lpParms->dwTimeFormat;
927 if (dwFlags & MCI_SET_VIDEO) return MCIERR_UNSUPPORTED_FUNCTION;
928 if (dwFlags & MCI_SET_ON) return MCIERR_UNSUPPORTED_FUNCTION;
929 if (dwFlags & MCI_SET_OFF) return MCIERR_UNSUPPORTED_FUNCTION;
930 if (dwFlags & MCI_NOTIFY) {
931 TRACE("MCI_NOTIFY_SUCCESSFUL %08lX !\n",
932 lpParms->dwCallback);
933 mciDriverNotify((HWND)LOWORD(lpParms->dwCallback),
934 wmcda->wNotifyDeviceID, MCI_NOTIFY_SUCCESSFUL);
939 /**************************************************************************
940 * DriverProc (MCICDA.@)
942 LONG CALLBACK MCICDA_DriverProc(DWORD dwDevID, HDRVR hDriv, DWORD wMsg,
943 DWORD dwParam1, DWORD dwParam2)
946 case DRV_LOAD: return 1;
947 case DRV_FREE: return 1;
948 case DRV_OPEN: return MCICDA_drvOpen((LPSTR)dwParam1, (LPMCI_OPEN_DRIVER_PARMSA)dwParam2);
949 case DRV_CLOSE: return MCICDA_drvClose(dwDevID);
950 case DRV_ENABLE: return 1;
951 case DRV_DISABLE: return 1;
952 case DRV_QUERYCONFIGURE: return 1;
953 case DRV_CONFIGURE: MessageBoxA(0, "MCI audio CD driver !", "Wine Driver", MB_OK); return 1;
954 case DRV_INSTALL: return DRVCNF_RESTART;
955 case DRV_REMOVE: return DRVCNF_RESTART;
957 case MCI_OPEN_DRIVER: return MCICDA_Open(dwDevID, dwParam1, (LPMCI_OPEN_PARMSA)dwParam2);
958 case MCI_CLOSE_DRIVER: return MCICDA_Close(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
959 case MCI_GETDEVCAPS: return MCICDA_GetDevCaps(dwDevID, dwParam1, (LPMCI_GETDEVCAPS_PARMS)dwParam2);
960 case MCI_INFO: return MCICDA_Info(dwDevID, dwParam1, (LPMCI_INFO_PARMSA)dwParam2);
961 case MCI_STATUS: return MCICDA_Status(dwDevID, dwParam1, (LPMCI_STATUS_PARMS)dwParam2);
962 case MCI_SET: return MCICDA_Set(dwDevID, dwParam1, (LPMCI_SET_PARMS)dwParam2);
963 case MCI_PLAY: return MCICDA_Play(dwDevID, dwParam1, (LPMCI_PLAY_PARMS)dwParam2);
964 case MCI_STOP: return MCICDA_Stop(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
965 case MCI_PAUSE: return MCICDA_Pause(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
966 case MCI_RESUME: return MCICDA_Resume(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
967 case MCI_SEEK: return MCICDA_Seek(dwDevID, dwParam1, (LPMCI_SEEK_PARMS)dwParam2);
968 /* FIXME: I wonder if those two next items are really called ? */
969 case MCI_SET_DOOR_OPEN: FIXME("MCI_SET_DOOR_OPEN called. Please report this.\n");
970 return MCICDA_SetDoor(dwDevID, TRUE);
971 case MCI_SET_DOOR_CLOSED: FIXME("MCI_SET_DOOR_CLOSED called. Please report this.\n");
972 return MCICDA_SetDoor(dwDevID, FALSE);
973 /* commands that should be supported */
989 FIXME("Unsupported yet command [%lu]\n", wMsg);
991 /* commands that should report an error */
993 TRACE("Unsupported command [%lu]\n", wMsg);
997 ERR("Shouldn't receive a MCI_OPEN or CLOSE message\n");
1000 TRACE("Sending msg [%lu] to default driver proc\n", wMsg);
1001 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1003 return MCIERR_UNRECOGNIZED_COMMAND;
1006 /*-----------------------------------------------------------------------*/