?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
winemac: Handle dummy_surface in get_mac_surface.
[wine.git] / dlls / mcicda / mcicda.c
blobe23ba5a2d6b430fdd6f943ef67b93ef44ef347a7
1 /*
2 * MCI driver for audio CD (MCICDA)
3 *
4 * Copyright 1994 Martin Ayotte
5 * Copyright 1998-99 Eric Pouech
6 * Copyright 2000 Andreas Mohr
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 */
22
23 #include <stdarg.h>
24 #include <stdio.h>
25 #include <string.h>
26
27 #define WIN32_NO_STATUS
28 #include "windef.h"
29 #include "winbase.h"
30 #include "wingdi.h"
31 #include "winuser.h"
32 #include "wownt32.h"
33 #include "mmddk.h"
34 #include "winioctl.h"
35 #include "ntddcdrm.h"
36 #include "winternl.h"
37 #include "wine/debug.h"
38 #include "dsound.h"
39
40 WINE_DEFAULT_DEBUG_CHANNEL(mcicda);
41
42 #define CDFRAMES_PERSEC 75
43 #define CDFRAMES_PERMIN (CDFRAMES_PERSEC * 60)
44 #define FRAME_OF_ADDR(a) ((a)[1] * CDFRAMES_PERMIN + (a)[2] * CDFRAMES_PERSEC + (a)[3])
45 #define FRAME_OF_TOC(toc, idx) FRAME_OF_ADDR((toc).TrackData[idx - (toc).FirstTrack].Address)
46
47 /* Defined by red-book standard; do not change! */
48 #define RAW_SECTOR_SIZE (2352)
49
50 /* Must be >= RAW_SECTOR_SIZE */
51 #define CDDA_FRAG_SIZE (32768)
52 /* Must be >= 2 */
53 #define CDDA_FRAG_COUNT (3)
54
55 typedef struct {
56 UINT wDevID;
57 int nUseCount; /* Incremented for each shared open */
58 BOOL fShareable; /* TRUE if first open was shareable */
59 MCIDEVICEID wNotifyDeviceID; /* MCI device ID with a pending notification */
60 HANDLE hCallback; /* Callback handle for pending notification */
61 DWORD dwTimeFormat;
62 HANDLE handle;
63
64 /* The following are used for digital playback only */
65 HANDLE hThread;
66 HANDLE stopEvent;
67 DWORD start, end;
68
69 IDirectSound *dsObj;
70 IDirectSoundBuffer *dsBuf;
71
72 CRITICAL_SECTION cs;
73 } WINE_MCICDAUDIO;
74
75 /*-----------------------------------------------------------------------*/
76
77 typedef HRESULT(WINAPI*LPDIRECTSOUNDCREATE)(LPCGUID,LPDIRECTSOUND*,LPUNKNOWN);
78 static LPDIRECTSOUNDCREATE pDirectSoundCreate;
79
80 static BOOL device_io(HANDLE dev, DWORD code, void *inbuffer, DWORD insize, void *outbuffer, DWORD outsize, DWORD *retsize, OVERLAPPED *overlapped)
81 {
82 const char *str;
83 BOOL ret = DeviceIoControl(dev, code, inbuffer, insize, outbuffer, outsize, retsize, overlapped);
84
85 #define XX(x) case (x): str = #x; break
86 switch (code)
87 {
88 XX(IOCTL_CDROM_RAW_READ);
89 XX(IOCTL_CDROM_READ_TOC);
90 XX(IOCTL_CDROM_READ_Q_CHANNEL);
91 XX(IOCTL_CDROM_SEEK_AUDIO_MSF);
92 XX(IOCTL_CDROM_PLAY_AUDIO_MSF);
93 XX(IOCTL_CDROM_STOP_AUDIO);
94 XX(IOCTL_CDROM_PAUSE_AUDIO);
95 XX(IOCTL_CDROM_RESUME_AUDIO);
96 XX(IOCTL_STORAGE_EJECT_MEDIA);
97 XX(IOCTL_STORAGE_LOAD_MEDIA);
98 default: str = wine_dbg_sprintf("UNKNOWN (0x%x)", code);
99 };
100 #undef XX
101 TRACE("Device %p, Code %s -> Return %d, Bytes %u\n", dev, str, ret, *retsize);
102 return ret;
103 }
104
105 static DWORD CALLBACK MCICDA_playLoop(void *ptr)
106 {
107 WINE_MCICDAUDIO *wmcda = (WINE_MCICDAUDIO*)ptr;
108 DWORD lastPos, curPos, endPos, br;
109 void *cdData;
110 DWORD lockLen, fragLen;
111 DSBCAPS caps;
112 RAW_READ_INFO rdInfo;
113 HRESULT hr = DS_OK;
114
115 memset(&caps, 0, sizeof(caps));
116 caps.dwSize = sizeof(caps);
117 hr = IDirectSoundBuffer_GetCaps(wmcda->dsBuf, &caps);
118
119 fragLen = caps.dwBufferBytes/CDDA_FRAG_COUNT;
120 curPos = lastPos = 0;
121 endPos = ~0u;
122 while (SUCCEEDED(hr) && endPos != lastPos &&
123 WaitForSingleObject(wmcda->stopEvent, 0) != WAIT_OBJECT_0) {
124 hr = IDirectSoundBuffer_GetCurrentPosition(wmcda->dsBuf, &curPos, NULL);
125 if ((curPos-lastPos+caps.dwBufferBytes)%caps.dwBufferBytes < fragLen) {
126 Sleep(1);
127 continue;
128 }
129
130 EnterCriticalSection(&wmcda->cs);
131 rdInfo.DiskOffset.QuadPart = wmcda->start<<11;
132 rdInfo.SectorCount = min(fragLen/RAW_SECTOR_SIZE, wmcda->end-wmcda->start);
133 rdInfo.TrackMode = CDDA;
134
135 hr = IDirectSoundBuffer_Lock(wmcda->dsBuf, lastPos, fragLen, &cdData, &lockLen, NULL, NULL, 0);
136 if (hr == DSERR_BUFFERLOST) {
137 if(FAILED(IDirectSoundBuffer_Restore(wmcda->dsBuf)) ||
138 FAILED(IDirectSoundBuffer_Play(wmcda->dsBuf, 0, 0, DSBPLAY_LOOPING))) {
139 LeaveCriticalSection(&wmcda->cs);
140 break;
141 }
142 hr = IDirectSoundBuffer_Lock(wmcda->dsBuf, lastPos, fragLen, &cdData, &lockLen, NULL, NULL, 0);
143 }
144
145 if (SUCCEEDED(hr)) {
146 if (rdInfo.SectorCount > 0) {
147 if (!device_io(wmcda->handle, IOCTL_CDROM_RAW_READ, &rdInfo, sizeof(rdInfo), cdData, lockLen, &br, NULL))
148 WARN("CD read failed at sector %d: 0x%x\n", wmcda->start, GetLastError());
149 }
150 if (rdInfo.SectorCount*RAW_SECTOR_SIZE < lockLen) {
151 if(endPos == ~0u) endPos = lastPos;
152 memset((BYTE*)cdData + rdInfo.SectorCount*RAW_SECTOR_SIZE, 0,
153 lockLen - rdInfo.SectorCount*RAW_SECTOR_SIZE);
154 }
155 hr = IDirectSoundBuffer_Unlock(wmcda->dsBuf, cdData, lockLen, NULL, 0);
156 }
157
158 lastPos += fragLen;
159 lastPos %= caps.dwBufferBytes;
160 wmcda->start += rdInfo.SectorCount;
161
162 LeaveCriticalSection(&wmcda->cs);
163 }
164 IDirectSoundBuffer_Stop(wmcda->dsBuf);
165 SetEvent(wmcda->stopEvent);
166
167 /* A design bug in native: the independent CD player called by the
168 * MCI has no means to signal end of playing, therefore the MCI
169 * notification is left hanging. MCI_NOTIFY_SUPERSEDED will be
170 * signaled by the next command that has MCI_NOTIFY set (or
171 * MCI_NOTIFY_ABORTED for MCI_PLAY). */
172
173 return 0;
174 }
175
176
177
178 /**************************************************************************
179 * MCICDA_drvOpen [internal]
180 */
181 static DWORD MCICDA_drvOpen(LPCWSTR str, LPMCI_OPEN_DRIVER_PARMSW modp)
182 {
183 static HMODULE dsHandle;
184 WINE_MCICDAUDIO* wmcda;
185
186 if (!modp) return 0xFFFFFFFF;
187 /* FIXME: MCIERR_CANNOT_LOAD_DRIVER if there's no drive of type CD-ROM */
188
189 wmcda = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINE_MCICDAUDIO));
190
191 if (!wmcda)
192 return 0;
193
194 if (!dsHandle) {
195 dsHandle = LoadLibraryA("dsound.dll");
196 if(dsHandle)
197 pDirectSoundCreate = (LPDIRECTSOUNDCREATE)GetProcAddress(dsHandle, "DirectSoundCreate");
198 }
199
200 wmcda->wDevID = modp->wDeviceID;
201 mciSetDriverData(wmcda->wDevID, (DWORD_PTR)wmcda);
202 modp->wCustomCommandTable = MCI_NO_COMMAND_TABLE;
203 modp->wType = MCI_DEVTYPE_CD_AUDIO;
204 InitializeCriticalSection(&wmcda->cs);
205 wmcda->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": WINE_MCICDAUDIO.cs");
206 return modp->wDeviceID;
207 }
208
209 /**************************************************************************
210 * MCICDA_drvClose [internal]
211 */
212 static DWORD MCICDA_drvClose(DWORD dwDevID)
213 {
214 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(dwDevID);
215
216 if (wmcda) {
217 wmcda->cs.DebugInfo->Spare[0] = 0;
218 DeleteCriticalSection(&wmcda->cs);
219 HeapFree(GetProcessHeap(), 0, wmcda);
220 mciSetDriverData(dwDevID, 0);
221 }
222 return (dwDevID == 0xFFFFFFFF) ? 1 : 0;
223 }
224
225 /**************************************************************************
226 * MCICDA_GetOpenDrv [internal]
227 */
228 static WINE_MCICDAUDIO* MCICDA_GetOpenDrv(UINT wDevID)
229 {
230 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(wDevID);
231
232 if (wmcda == NULL || wmcda->nUseCount == 0) {
233 WARN("Invalid wDevID=%u\n", wDevID);
234 return 0;
235 }
236 return wmcda;
237 }
238
239 /**************************************************************************
240 * MCICDA_mciNotify [internal]
241 *
242 * Notifications in MCI work like a 1-element queue.
243 * Each new notification request supersedes the previous one.
244 */
245 static void MCICDA_Notify(DWORD_PTR hWndCallBack, WINE_MCICDAUDIO* wmcda, UINT wStatus)
246 {
247 MCIDEVICEID wDevID = wmcda->wNotifyDeviceID;
248 HANDLE old = InterlockedExchangePointer(&wmcda->hCallback, NULL);
249 if (old) mciDriverNotify(old, wDevID, MCI_NOTIFY_SUPERSEDED);
250 mciDriverNotify(HWND_32(LOWORD(hWndCallBack)), wDevID, wStatus);
251 }
252
253 /**************************************************************************
254 * MCICDA_ReadTOC [internal]
255 */
256 static BOOL MCICDA_ReadTOC(WINE_MCICDAUDIO* wmcda, CDROM_TOC *toc, DWORD *br)
257 {
258 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0, toc, sizeof(*toc), br, NULL)) {
259 WARN("error reading TOC !\n");
260 return FALSE;
261 }
262 return TRUE;
263 }
264
265 /**************************************************************************
266 * MCICDA_GetStatus [internal]
267 */
268 static DWORD MCICDA_GetStatus(WINE_MCICDAUDIO* wmcda)
269 {
270 CDROM_SUB_Q_DATA_FORMAT fmt;
271 SUB_Q_CHANNEL_DATA data;
272 DWORD br;
273 DWORD mode = MCI_MODE_NOT_READY;
274
275 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
276 if(wmcda->hThread != 0) {
277 DWORD status;
278 HRESULT hr;
279
280 hr = IDirectSoundBuffer_GetStatus(wmcda->dsBuf, &status);
281 if(SUCCEEDED(hr)) {
282 if(!(status&DSBSTATUS_PLAYING)) {
283 if(WaitForSingleObject(wmcda->stopEvent, 0) == WAIT_OBJECT_0)
284 mode = MCI_MODE_STOP;
285 else
286 mode = MCI_MODE_PAUSE;
287 }
288 else
289 mode = MCI_MODE_PLAY;
290 }
291 }
292 else if (!device_io(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
293 &data, sizeof(data), &br, NULL)) {
294 if (GetLastError() == ERROR_NOT_READY) mode = MCI_MODE_OPEN;
295 } else {
296 switch (data.CurrentPosition.Header.AudioStatus)
297 {
298 case AUDIO_STATUS_IN_PROGRESS: mode = MCI_MODE_PLAY; break;
299 case AUDIO_STATUS_PAUSED: mode = MCI_MODE_PAUSE; break;
300 case AUDIO_STATUS_NO_STATUS:
301 case AUDIO_STATUS_PLAY_COMPLETE: mode = MCI_MODE_STOP; break;
302 case AUDIO_STATUS_PLAY_ERROR:
303 case AUDIO_STATUS_NOT_SUPPORTED:
304 default:
305 break;
306 }
307 }
308 return mode;
309 }
310
311 /**************************************************************************
312 * MCICDA_GetError [internal]
313 */
314 static int MCICDA_GetError(WINE_MCICDAUDIO* wmcda)
315 {
316 switch (GetLastError())
317 {
318 case ERROR_NOT_READY: return MCIERR_DEVICE_NOT_READY;
319 case ERROR_NOT_SUPPORTED:
320 case ERROR_IO_DEVICE: return MCIERR_HARDWARE;
321 default:
322 FIXME("Unknown mode %u\n", GetLastError());
323 }
324 return MCIERR_DRIVER_INTERNAL;
325 }
326
327 /**************************************************************************
328 * MCICDA_CalcFrame [internal]
329 */
330 static DWORD MCICDA_CalcFrame(WINE_MCICDAUDIO* wmcda, DWORD dwTime)
331 {
332 DWORD dwFrame = 0;
333 UINT wTrack;
334 CDROM_TOC toc;
335 DWORD br;
336 BYTE* addr;
337
338 TRACE("(%p, %08X, %u);\n", wmcda, wmcda->dwTimeFormat, dwTime);
339
340 switch (wmcda->dwTimeFormat) {
341 case MCI_FORMAT_MILLISECONDS:
342 dwFrame = ((dwTime - 1) * CDFRAMES_PERSEC + 500) / 1000;
343 TRACE("MILLISECONDS %u\n", dwFrame);
344 break;
345 case MCI_FORMAT_MSF:
346 TRACE("MSF %02u:%02u:%02u\n",
347 MCI_MSF_MINUTE(dwTime), MCI_MSF_SECOND(dwTime), MCI_MSF_FRAME(dwTime));
348 dwFrame += CDFRAMES_PERMIN * MCI_MSF_MINUTE(dwTime);
349 dwFrame += CDFRAMES_PERSEC * MCI_MSF_SECOND(dwTime);
350 dwFrame += MCI_MSF_FRAME(dwTime);
351 break;
352 case MCI_FORMAT_TMSF:
353 default: /* unknown format ! force TMSF ! ... */
354 wTrack = MCI_TMSF_TRACK(dwTime);
355 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
356 &toc, sizeof(toc), &br, NULL))
357 return 0;
358 if (wTrack < toc.FirstTrack || wTrack > toc.LastTrack)
359 return 0;
360 TRACE("MSF %02u-%02u:%02u:%02u\n",
361 MCI_TMSF_TRACK(dwTime), MCI_TMSF_MINUTE(dwTime),
362 MCI_TMSF_SECOND(dwTime), MCI_TMSF_FRAME(dwTime));
363 addr = toc.TrackData[wTrack - toc.FirstTrack].Address;
364 TRACE("TMSF trackpos[%u]=%d:%d:%d\n",
365 wTrack, addr[1], addr[2], addr[3]);
366 dwFrame = CDFRAMES_PERMIN * (addr[1] + MCI_TMSF_MINUTE(dwTime)) +
367 CDFRAMES_PERSEC * (addr[2] + MCI_TMSF_SECOND(dwTime)) +
368 addr[3] + MCI_TMSF_FRAME(dwTime);
369 break;
370 }
371 return dwFrame;
372 }
373
374 /**************************************************************************
375 * MCICDA_CalcTime [internal]
376 */
377 static DWORD MCICDA_CalcTime(WINE_MCICDAUDIO* wmcda, DWORD tf, DWORD dwFrame, LPDWORD lpRet)
378 {
379 DWORD dwTime = 0;
380 UINT wTrack;
381 UINT wMinutes;
382 UINT wSeconds;
383 UINT wFrames;
384 CDROM_TOC toc;
385 DWORD br;
386
387 TRACE("(%p, %08X, %u);\n", wmcda, tf, dwFrame);
388
389 switch (tf) {
390 case MCI_FORMAT_MILLISECONDS:
391 dwTime = (dwFrame * 1000) / CDFRAMES_PERSEC + 1;
392 TRACE("MILLISECONDS %u\n", dwTime);
393 *lpRet = 0;
394 break;
395 case MCI_FORMAT_MSF:
396 wMinutes = dwFrame / CDFRAMES_PERMIN;
397 wSeconds = (dwFrame - CDFRAMES_PERMIN * wMinutes) / CDFRAMES_PERSEC;
398 wFrames = dwFrame - CDFRAMES_PERMIN * wMinutes - CDFRAMES_PERSEC * wSeconds;
399 dwTime = MCI_MAKE_MSF(wMinutes, wSeconds, wFrames);
400 TRACE("MSF %02u:%02u:%02u -> dwTime=%u\n",
401 wMinutes, wSeconds, wFrames, dwTime);
402 *lpRet = MCI_COLONIZED3_RETURN;
403 break;
404 case MCI_FORMAT_TMSF:
405 default: /* unknown format ! force TMSF ! ... */
406 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
407 &toc, sizeof(toc), &br, NULL))
408 return 0;
409 if (dwFrame < FRAME_OF_TOC(toc, toc.FirstTrack) ||
410 dwFrame > FRAME_OF_TOC(toc, toc.LastTrack + 1)) {
411 ERR("Out of range value %u [%u,%u]\n",
412 dwFrame, FRAME_OF_TOC(toc, toc.FirstTrack),
413 FRAME_OF_TOC(toc, toc.LastTrack + 1));
414 *lpRet = 0;
415 return 0;
416 }
417 for (wTrack = toc.FirstTrack; wTrack <= toc.LastTrack; wTrack++) {
418 if (FRAME_OF_TOC(toc, wTrack) > dwFrame)
419 break;
420 }
421 wTrack--;
422 dwFrame -= FRAME_OF_TOC(toc, wTrack);
423 wMinutes = dwFrame / CDFRAMES_PERMIN;
424 wSeconds = (dwFrame - CDFRAMES_PERMIN * wMinutes) / CDFRAMES_PERSEC;
425 wFrames = dwFrame - CDFRAMES_PERMIN * wMinutes - CDFRAMES_PERSEC * wSeconds;
426 dwTime = MCI_MAKE_TMSF(wTrack, wMinutes, wSeconds, wFrames);
427 TRACE("%02u-%02u:%02u:%02u\n", wTrack, wMinutes, wSeconds, wFrames);
428 *lpRet = MCI_COLONIZED4_RETURN;
429 break;
430 }
431 return dwTime;
432 }
433
434 static DWORD MCICDA_Stop(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms);
435
436 /**************************************************************************
437 * MCICDA_Open [internal]
438 */
439 static DWORD MCICDA_Open(UINT wDevID, DWORD dwFlags, LPMCI_OPEN_PARMSW lpOpenParms)
440 {
441 MCIDEVICEID dwDeviceID;
442 DWORD ret;
443 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(wDevID);
444 WCHAR root[7], drive = 0;
445
446 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpOpenParms);
447
448 if (lpOpenParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
449 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
450
451 dwDeviceID = lpOpenParms->wDeviceID;
452
453 if (wmcda->nUseCount > 0) {
454 /* The driver is already open on this channel */
455 /* If the driver was opened shareable before and this open specifies */
456 /* shareable then increment the use count */
457 if (wmcda->fShareable && (dwFlags & MCI_OPEN_SHAREABLE))
458 ++wmcda->nUseCount;
459 else
460 return MCIERR_MUST_USE_SHAREABLE;
461 } else {
462 wmcda->nUseCount = 1;
463 wmcda->fShareable = dwFlags & MCI_OPEN_SHAREABLE;
464 }
465 if (dwFlags & MCI_OPEN_ELEMENT) {
466 if (dwFlags & MCI_OPEN_ELEMENT_ID) {
467 WARN("MCI_OPEN_ELEMENT_ID %p! Abort\n", lpOpenParms->lpstrElementName);
468 ret = MCIERR_FLAGS_NOT_COMPATIBLE;
469 goto the_error;
470 }
471 TRACE("MCI_OPEN_ELEMENT element name: %s\n", debugstr_w(lpOpenParms->lpstrElementName));
472 /* Only the first letter counts since w2k
473 * Win9x-NT accept only d: and w98SE accepts d:\foobar as well.
474 * Play d:\Track03.cda plays from the first track, not #3. */
475 if (!isalpha(lpOpenParms->lpstrElementName[0]))
476 {
477 ret = MCIERR_INVALID_FILE;
478 goto the_error;
479 }
480 drive = toupper(lpOpenParms->lpstrElementName[0]);
481 root[0] = drive; root[1] = ':'; root[2] = '\\'; root[3] = '\0';
482 if (GetDriveTypeW(root) != DRIVE_CDROM)
483 {
484 ret = MCIERR_INVALID_FILE;
485 goto the_error;
486 }
487 }
488 else
489 {
490 root[0] = 'A'; root[1] = ':'; root[2] = '\\'; root[3] = '\0';
491 for ( ; root[0] <= 'Z'; root[0]++)
492 {
493 if (GetDriveTypeW(root) == DRIVE_CDROM)
494 {
495 drive = root[0];
496 break;
497 }
498 }
499 if (!drive)
500 {
501 ret = MCIERR_CANNOT_LOAD_DRIVER; /* drvOpen should return this */
502 goto the_error;
503 }
504 }
505
506 wmcda->wNotifyDeviceID = dwDeviceID;
507 wmcda->dwTimeFormat = MCI_FORMAT_MSF;
508
509 /* now, open the handle */
510 root[0] = root[1] = '\\'; root[2] = '.'; root[3] = '\\'; root[4] = drive; root[5] = ':'; root[6] = '\0';
511 wmcda->handle = CreateFileW(root, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
512 if (wmcda->handle == INVALID_HANDLE_VALUE)
513 {
514 ret = MCIERR_MUST_USE_SHAREABLE;
515 goto the_error;
516 }
517
518 if (dwFlags & MCI_NOTIFY) {
519 mciDriverNotify(HWND_32(LOWORD(lpOpenParms->dwCallback)),
520 dwDeviceID, MCI_NOTIFY_SUCCESSFUL);
521 }
522 return 0;
523
524 the_error:
525 --wmcda->nUseCount;
526 return ret;
527 }
528
529 /**************************************************************************
530 * MCICDA_Close [internal]
531 */
532 static DWORD MCICDA_Close(UINT wDevID, DWORD dwParam, LPMCI_GENERIC_PARMS lpParms)
533 {
534 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
535
536 TRACE("(%04X, %08X, %p);\n", wDevID, dwParam, lpParms);
537
538 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
539
540 MCICDA_Stop(wDevID, MCI_WAIT, NULL);
541
542 if (--wmcda->nUseCount == 0) {
543 CloseHandle(wmcda->handle);
544 }
545 if ((dwParam & MCI_NOTIFY) && lpParms)
546 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
547 return 0;
548 }
549
550 /**************************************************************************
551 * MCICDA_GetDevCaps [internal]
552 */
553 static DWORD MCICDA_GetDevCaps(UINT wDevID, DWORD dwFlags,
554 LPMCI_GETDEVCAPS_PARMS lpParms)
555 {
556 WINE_MCICDAUDIO* wmcda = (WINE_MCICDAUDIO*)mciGetDriverData(wDevID);
557 DWORD ret = 0;
558
559 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
560
561 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
562 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
563
564 if (dwFlags & MCI_GETDEVCAPS_ITEM) {
565 TRACE("MCI_GETDEVCAPS_ITEM dwItem=%08X;\n", lpParms->dwItem);
566
567 switch (lpParms->dwItem) {
568 case MCI_GETDEVCAPS_CAN_RECORD:
569 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
570 ret = MCI_RESOURCE_RETURNED;
571 break;
572 case MCI_GETDEVCAPS_HAS_AUDIO:
573 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
574 ret = MCI_RESOURCE_RETURNED;
575 break;
576 case MCI_GETDEVCAPS_HAS_VIDEO:
577 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
578 ret = MCI_RESOURCE_RETURNED;
579 break;
580 case MCI_GETDEVCAPS_DEVICE_TYPE:
581 lpParms->dwReturn = MAKEMCIRESOURCE(MCI_DEVTYPE_CD_AUDIO, MCI_DEVTYPE_CD_AUDIO);
582 ret = MCI_RESOURCE_RETURNED;
583 break;
584 case MCI_GETDEVCAPS_USES_FILES:
585 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
586 ret = MCI_RESOURCE_RETURNED;
587 break;
588 case MCI_GETDEVCAPS_COMPOUND_DEVICE:
589 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
590 ret = MCI_RESOURCE_RETURNED;
591 break;
592 case MCI_GETDEVCAPS_CAN_EJECT:
593 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
594 ret = MCI_RESOURCE_RETURNED;
595 break;
596 case MCI_GETDEVCAPS_CAN_PLAY:
597 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
598 ret = MCI_RESOURCE_RETURNED;
599 break;
600 case MCI_GETDEVCAPS_CAN_SAVE:
601 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
602 ret = MCI_RESOURCE_RETURNED;
603 break;
604 default:
605 WARN("Unsupported %x devCaps item\n", lpParms->dwItem);
606 return MCIERR_UNSUPPORTED_FUNCTION;
607 }
608 } else {
609 TRACE("No GetDevCaps-Item !\n");
610 return MCIERR_MISSING_PARAMETER;
611 }
612 TRACE("lpParms->dwReturn=%08X;\n", lpParms->dwReturn);
613 if (dwFlags & MCI_NOTIFY) {
614 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
615 }
616 return ret;
617 }
618
619 static DWORD CDROM_Audio_GetSerial(CDROM_TOC* toc)
620 {
621 DWORD serial = 0;
622 int i;
623 WORD wMagic;
624 DWORD dwStart, dwEnd;
625
626 /*
627 * wMagic collects the wFrames from track 1
628 * dwStart, dwEnd collect the beginning and end of the disc respectively, in
629 * frames.
630 * There it is collected for correcting the serial when there are less than
631 * 3 tracks.
632 */
633 wMagic = toc->TrackData[0].Address[3];
634 dwStart = FRAME_OF_TOC(*toc, toc->FirstTrack);
635
636 for (i = 0; i <= toc->LastTrack - toc->FirstTrack; i++) {
637 serial += (toc->TrackData[i].Address[1] << 16) |
638 (toc->TrackData[i].Address[2] << 8) | toc->TrackData[i].Address[3];
639 }
640 dwEnd = FRAME_OF_TOC(*toc, toc->LastTrack + 1);
641
642 if (toc->LastTrack - toc->FirstTrack + 1 < 3)
643 serial += wMagic + (dwEnd - dwStart);
644
645 return serial;
646 }
647
648
649 /**************************************************************************
650 * MCICDA_Info [internal]
651 */
652 static DWORD MCICDA_Info(UINT wDevID, DWORD dwFlags, LPMCI_INFO_PARMSW lpParms)
653 {
654 LPCWSTR str = NULL;
655 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
656 DWORD ret = 0;
657 WCHAR buffer[16];
658
659 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
660
661 if (lpParms == NULL || lpParms->lpstrReturn == NULL)
662 return MCIERR_NULL_PARAMETER_BLOCK;
663 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
664
665 TRACE("buf=%p, len=%u\n", lpParms->lpstrReturn, lpParms->dwRetSize);
666
667 if (dwFlags & MCI_INFO_PRODUCT) {
668 static const WCHAR wszAudioCd[] = {'W','i','n','e','\'','s',' ','a','u','d','i','o',' ','C','D',0};
669 str = wszAudioCd;
670 } else if (dwFlags & MCI_INFO_MEDIA_UPC) {
671 ret = MCIERR_NO_IDENTITY;
672 } else if (dwFlags & MCI_INFO_MEDIA_IDENTITY) {
673 DWORD res = 0;
674 CDROM_TOC toc;
675 DWORD br;
676 static const WCHAR wszLu[] = {'%','l','u',0};
677
678 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_TOC, NULL, 0,
679 &toc, sizeof(toc), &br, NULL)) {
680 return MCICDA_GetError(wmcda);
681 }
682
683 res = CDROM_Audio_GetSerial(&toc);
684 swprintf(buffer, ARRAY_SIZE(buffer), wszLu, res);
685 str = buffer;
686 } else {
687 WARN("Don't know this info command (%u)\n", dwFlags);
688 ret = MCIERR_MISSING_PARAMETER;
689 }
690 if (!ret) {
691 TRACE("=> %s\n", debugstr_w(str));
692 if (lpParms->dwRetSize) {
693 /* FIXME? Since NT, mciwave, mciseq and mcicda set dwRetSize
694 * to the number of characters written, excluding \0. */
695 lstrcpynW(lpParms->lpstrReturn, str, lpParms->dwRetSize);
696 } else ret = MCIERR_PARAM_OVERFLOW;
697 }
698 if (MMSYSERR_NOERROR==ret && (dwFlags & MCI_NOTIFY))
699 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
700 return ret;
701 }
702
703 /**************************************************************************
704 * MCICDA_Status [internal]
705 */
706 static DWORD MCICDA_Status(UINT wDevID, DWORD dwFlags, LPMCI_STATUS_PARMS lpParms)
707 {
708 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
709 DWORD ret = 0;
710 CDROM_SUB_Q_DATA_FORMAT fmt;
711 SUB_Q_CHANNEL_DATA data;
712 CDROM_TOC toc;
713 DWORD br;
714
715 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
716
717 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
718 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
719
720 if (dwFlags & MCI_STATUS_ITEM) {
721 TRACE("dwItem = %x\n", lpParms->dwItem);
722 switch (lpParms->dwItem) {
723 case MCI_STATUS_CURRENT_TRACK:
724 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
725 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
726 &data, sizeof(data), &br, NULL))
727 {
728 return MCICDA_GetError(wmcda);
729 /* alt. data.CurrentPosition.TrackNumber = 1; -- what native yields */
730 }
731 lpParms->dwReturn = data.CurrentPosition.TrackNumber;
732 TRACE("CURRENT_TRACK=%lu\n", lpParms->dwReturn);
733 break;
734 case MCI_STATUS_LENGTH:
735 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
736 return MCICDA_GetError(wmcda);
737
738 if (dwFlags & MCI_TRACK) {
739 TRACE("MCI_TRACK #%u LENGTH=??? !\n", lpParms->dwTrack);
740 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
741 return MCIERR_OUTOFRANGE;
742 lpParms->dwReturn = FRAME_OF_TOC(toc, lpParms->dwTrack + 1) -
743 FRAME_OF_TOC(toc, lpParms->dwTrack);
744 /* Windows returns one frame less than the total track length for the
745 last track on the CD. See CDDB HOWTO. Verified on Win95OSR2. */
746 if (lpParms->dwTrack == toc.LastTrack)
747 lpParms->dwReturn--;
748 } else {
749 /* Sum of the lengths of all of the tracks. Inherits the
750 'off by one frame' behavior from the length of the last track.
751 See above comment. */
752 lpParms->dwReturn = FRAME_OF_TOC(toc, toc.LastTrack + 1) -
753 FRAME_OF_TOC(toc, toc.FirstTrack) - 1;
754 }
755 lpParms->dwReturn = MCICDA_CalcTime(wmcda,
756 (wmcda->dwTimeFormat == MCI_FORMAT_TMSF)
757 ? MCI_FORMAT_MSF : wmcda->dwTimeFormat,
758 lpParms->dwReturn,
759 &ret);
760 TRACE("LENGTH=%lu\n", lpParms->dwReturn);
761 break;
762 case MCI_STATUS_MODE:
763 lpParms->dwReturn = MCICDA_GetStatus(wmcda);
764 TRACE("MCI_STATUS_MODE=%08lX\n", lpParms->dwReturn);
765 lpParms->dwReturn = MAKEMCIRESOURCE(lpParms->dwReturn, lpParms->dwReturn);
766 ret = MCI_RESOURCE_RETURNED;
767 break;
768 case MCI_STATUS_MEDIA_PRESENT:
769 lpParms->dwReturn = (MCICDA_GetStatus(wmcda) == MCI_MODE_OPEN) ?
770 MAKEMCIRESOURCE(FALSE, MCI_FALSE) : MAKEMCIRESOURCE(TRUE, MCI_TRUE);
771 TRACE("MCI_STATUS_MEDIA_PRESENT =%c!\n", LOWORD(lpParms->dwReturn) ? 'Y' : 'N');
772 ret = MCI_RESOURCE_RETURNED;
773 break;
774 case MCI_STATUS_NUMBER_OF_TRACKS:
775 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
776 return MCICDA_GetError(wmcda);
777
778 lpParms->dwReturn = toc.LastTrack - toc.FirstTrack + 1;
779 TRACE("MCI_STATUS_NUMBER_OF_TRACKS = %lu\n", lpParms->dwReturn);
780 if (lpParms->dwReturn == (WORD)-1)
781 return MCICDA_GetError(wmcda);
782 break;
783 case MCI_STATUS_POSITION:
784 switch (dwFlags & (MCI_STATUS_START | MCI_TRACK)) {
785 case MCI_STATUS_START:
786 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
787 return MCICDA_GetError(wmcda);
788
789 lpParms->dwReturn = FRAME_OF_TOC(toc, toc.FirstTrack);
790 TRACE("get MCI_STATUS_START !\n");
791 break;
792 case MCI_TRACK:
793 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
794 return MCICDA_GetError(wmcda);
795
796 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
797 return MCIERR_OUTOFRANGE;
798 lpParms->dwReturn = FRAME_OF_TOC(toc, lpParms->dwTrack);
799 TRACE("get MCI_TRACK #%u !\n", lpParms->dwTrack);
800 break;
801 case 0:
802 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
803 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
804 &data, sizeof(data), &br, NULL)) {
805 return MCICDA_GetError(wmcda);
806 }
807 lpParms->dwReturn = FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress);
808 break;
809 default:
810 return MCIERR_FLAGS_NOT_COMPATIBLE;
811 }
812 lpParms->dwReturn = MCICDA_CalcTime(wmcda, wmcda->dwTimeFormat, lpParms->dwReturn, &ret);
813 TRACE("MCI_STATUS_POSITION=%08lX\n", lpParms->dwReturn);
814 break;
815 case MCI_STATUS_READY:
816 TRACE("MCI_STATUS_READY !\n");
817 switch (MCICDA_GetStatus(wmcda))
818 {
819 case MCI_MODE_NOT_READY:
820 case MCI_MODE_OPEN:
821 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
822 break;
823 default:
824 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
825 break;
826 }
827 TRACE("MCI_STATUS_READY=%u!\n", LOWORD(lpParms->dwReturn));
828 ret = MCI_RESOURCE_RETURNED;
829 break;
830 case MCI_STATUS_TIME_FORMAT:
831 lpParms->dwReturn = MAKEMCIRESOURCE(wmcda->dwTimeFormat, MCI_FORMAT_RETURN_BASE + wmcda->dwTimeFormat);
832 TRACE("MCI_STATUS_TIME_FORMAT=%08x!\n", LOWORD(lpParms->dwReturn));
833 ret = MCI_RESOURCE_RETURNED;
834 break;
835 case 4001: /* FIXME: for bogus FullCD */
836 case MCI_CDA_STATUS_TYPE_TRACK:
837 if (!(dwFlags & MCI_TRACK))
838 ret = MCIERR_MISSING_PARAMETER;
839 else {
840 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
841 return MCICDA_GetError(wmcda);
842
843 if (lpParms->dwTrack < toc.FirstTrack || lpParms->dwTrack > toc.LastTrack)
844 ret = MCIERR_OUTOFRANGE;
845 else
846 lpParms->dwReturn = (toc.TrackData[lpParms->dwTrack - toc.FirstTrack].Control & 0x04) ?
847 MCI_CDA_TRACK_OTHER : MCI_CDA_TRACK_AUDIO;
848 /* FIXME: MAKEMCIRESOURCE "audio" | "other", localised */
849 }
850 TRACE("MCI_CDA_STATUS_TYPE_TRACK[%d]=%ld\n", lpParms->dwTrack, lpParms->dwReturn);
851 break;
852 default:
853 FIXME("unknown command %08X !\n", lpParms->dwItem);
854 return MCIERR_UNSUPPORTED_FUNCTION;
855 }
856 } else return MCIERR_MISSING_PARAMETER;
857 if ((dwFlags & MCI_NOTIFY) && HRESULT_CODE(ret)==0)
858 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
859 return ret;
860 }
861
862 /**************************************************************************
863 * MCICDA_SkipDataTracks [internal]
864 */
865 static DWORD MCICDA_SkipDataTracks(WINE_MCICDAUDIO* wmcda,DWORD *frame)
866 {
867 int i;
868 DWORD br;
869 CDROM_TOC toc;
870 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
871 return MCICDA_GetError(wmcda);
872
873 if (*frame < FRAME_OF_TOC(toc,toc.FirstTrack) ||
874 *frame >= FRAME_OF_TOC(toc,toc.LastTrack+1)) /* lead-out */
875 return MCIERR_OUTOFRANGE;
876 for(i=toc.LastTrack+1;i>toc.FirstTrack;i--)
877 if ( FRAME_OF_TOC(toc, i) <= *frame ) break;
878 /* i points to last track whose start address is not greater than frame.
879 * Now skip non-audio tracks */
880 for(;i<=toc.LastTrack;i++)
881 if ( ! (toc.TrackData[i-toc.FirstTrack].Control & 4) )
882 break;
883 /* The frame will be an address in the next audio track or
884 * address of lead-out. */
885 if ( FRAME_OF_TOC(toc, i) > *frame )
886 *frame = FRAME_OF_TOC(toc, i);
887 /* Lead-out is an invalid seek position (on Linux as well). */
888 if (*frame == FRAME_OF_TOC(toc,toc.LastTrack+1))
889 (*frame)--;
890 return 0;
891 }
892
893 /**************************************************************************
894 * MCICDA_Play [internal]
895 */
896 static DWORD MCICDA_Play(UINT wDevID, DWORD dwFlags, LPMCI_PLAY_PARMS lpParms)
897 {
898 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
899 DWORD ret = 0, start, end;
900 HANDLE oldcb;
901 DWORD br;
902 CDROM_PLAY_AUDIO_MSF play;
903 CDROM_SUB_Q_DATA_FORMAT fmt;
904 SUB_Q_CHANNEL_DATA data;
905 CDROM_TOC toc;
906
907 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
908
909 if (lpParms == NULL)
910 return MCIERR_NULL_PARAMETER_BLOCK;
911
912 if (wmcda == NULL)
913 return MCIERR_INVALID_DEVICE_ID;
914
915 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
916 return MCICDA_GetError(wmcda);
917
918 if (dwFlags & MCI_FROM) {
919 start = MCICDA_CalcFrame(wmcda, lpParms->dwFrom);
920 if ( (ret=MCICDA_SkipDataTracks(wmcda, &start)) )
921 return ret;
922 TRACE("MCI_FROM=%08X -> %u\n", lpParms->dwFrom, start);
923 } else {
924 fmt.Format = IOCTL_CDROM_CURRENT_POSITION;
925 if (!device_io(wmcda->handle, IOCTL_CDROM_READ_Q_CHANNEL, &fmt, sizeof(fmt),
926 &data, sizeof(data), &br, NULL)) {
927 return MCICDA_GetError(wmcda);
928 }
929 start = FRAME_OF_ADDR(data.CurrentPosition.AbsoluteAddress);
930 if ( (ret=MCICDA_SkipDataTracks(wmcda, &start)) )
931 return ret;
932 }
933 if (dwFlags & MCI_TO) {
934 end = MCICDA_CalcFrame(wmcda, lpParms->dwTo);
935 if ( (ret=MCICDA_SkipDataTracks(wmcda, &end)) )
936 return ret;
937 TRACE("MCI_TO=%08X -> %u\n", lpParms->dwTo, end);
938 } else {
939 end = FRAME_OF_TOC(toc, toc.LastTrack + 1) - 1;
940 }
941 if (end < start) return MCIERR_OUTOFRANGE;
942 TRACE("Playing from %u to %u\n", start, end);
943
944 oldcb = InterlockedExchangePointer(&wmcda->hCallback,
945 (dwFlags & MCI_NOTIFY) ? HWND_32(LOWORD(lpParms->dwCallback)) : NULL);
946 if (oldcb) mciDriverNotify(oldcb, wmcda->wNotifyDeviceID, MCI_NOTIFY_ABORTED);
947
948 if (start == end || start == FRAME_OF_TOC(toc,toc.LastTrack+1)-1) {
949 if (dwFlags & MCI_NOTIFY) {
950 oldcb = InterlockedExchangePointer(&wmcda->hCallback, NULL);
951 if (oldcb) mciDriverNotify(oldcb, wDevID, MCI_NOTIFY_SUCCESSFUL);
952 }
953 return MMSYSERR_NOERROR;
954 }
955
956 if (wmcda->hThread != 0) {
957 SetEvent(wmcda->stopEvent);
958 WaitForSingleObject(wmcda->hThread, INFINITE);
959
960 CloseHandle(wmcda->hThread);
961 wmcda->hThread = 0;
962 CloseHandle(wmcda->stopEvent);
963 wmcda->stopEvent = 0;
964
965 IDirectSoundBuffer_Stop(wmcda->dsBuf);
966 IDirectSoundBuffer_Release(wmcda->dsBuf);
967 wmcda->dsBuf = NULL;
968 IDirectSound_Release(wmcda->dsObj);
969 wmcda->dsObj = NULL;
970 }
971
972 if (pDirectSoundCreate) {
973 WAVEFORMATEX format;
974 DSBUFFERDESC desc;
975 DWORD lockLen;
976 void *cdData;
977 HRESULT hr;
978
979 hr = pDirectSoundCreate(NULL, &wmcda->dsObj, NULL);
980 if (SUCCEEDED(hr)) {
981 IDirectSound_SetCooperativeLevel(wmcda->dsObj, GetDesktopWindow(), DSSCL_PRIORITY);
982
983 /* The "raw" frame is relative to the start of the first track */
984 wmcda->start = start - FRAME_OF_TOC(toc, toc.FirstTrack);
985 wmcda->end = end - FRAME_OF_TOC(toc, toc.FirstTrack);
986
987 memset(&format, 0, sizeof(format));
988 format.wFormatTag = WAVE_FORMAT_PCM;
989 format.nChannels = 2;
990 format.nSamplesPerSec = 44100;
991 format.wBitsPerSample = 16;
992 format.nBlockAlign = format.nChannels * format.wBitsPerSample / 8;
993 format.nAvgBytesPerSec = format.nSamplesPerSec * format.nBlockAlign;
994 format.cbSize = 0;
995
996 memset(&desc, 0, sizeof(desc));
997 desc.dwSize = sizeof(desc);
998 desc.dwFlags = DSBCAPS_GETCURRENTPOSITION2 | DSBCAPS_GLOBALFOCUS;
999 desc.dwBufferBytes = (CDDA_FRAG_SIZE - (CDDA_FRAG_SIZE%RAW_SECTOR_SIZE)) * CDDA_FRAG_COUNT;
1000 desc.lpwfxFormat = &format;
1001
1002 hr = IDirectSound_CreateSoundBuffer(wmcda->dsObj, &desc, &wmcda->dsBuf, NULL);
1003 }
1004 if (SUCCEEDED(hr)) {
1005 hr = IDirectSoundBuffer_Lock(wmcda->dsBuf, 0, 0, &cdData, &lockLen,
1006 NULL, NULL, DSBLOCK_ENTIREBUFFER);
1007 }
1008 if (SUCCEEDED(hr)) {
1009 RAW_READ_INFO rdInfo;
1010 int readok;
1011
1012 rdInfo.DiskOffset.QuadPart = wmcda->start<<11;
1013 rdInfo.SectorCount = min(desc.dwBufferBytes/RAW_SECTOR_SIZE,
1014 wmcda->end-wmcda->start);
1015 rdInfo.TrackMode = CDDA;
1016
1017 readok = device_io(wmcda->handle, IOCTL_CDROM_RAW_READ,
1018 &rdInfo, sizeof(rdInfo), cdData, lockLen,
1019 &br, NULL);
1020 IDirectSoundBuffer_Unlock(wmcda->dsBuf, cdData, lockLen, NULL, 0);
1021
1022 if (readok) {
1023 wmcda->start += rdInfo.SectorCount;
1024 wmcda->stopEvent = CreateEventA(NULL, TRUE, FALSE, NULL);
1025 }
1026 if (wmcda->stopEvent != 0)
1027 wmcda->hThread = CreateThread(NULL, 0, MCICDA_playLoop, wmcda, 0, &br);
1028 if (wmcda->hThread != 0) {
1029 hr = IDirectSoundBuffer_Play(wmcda->dsBuf, 0, 0, DSBPLAY_LOOPING);
1030 if (SUCCEEDED(hr)) {
1031 /* FIXME: implement MCI_WAIT and send notification only in that case */
1032 if (0) {
1033 oldcb = InterlockedExchangePointer(&wmcda->hCallback, NULL);
1034 if (oldcb) mciDriverNotify(oldcb, wmcda->wNotifyDeviceID,
1035 FAILED(hr) ? MCI_NOTIFY_FAILURE : MCI_NOTIFY_SUCCESSFUL);
1036 }
1037 return ret;
1038 }
1039
1040 SetEvent(wmcda->stopEvent);
1041 WaitForSingleObject(wmcda->hThread, INFINITE);
1042 CloseHandle(wmcda->hThread);
1043 wmcda->hThread = 0;
1044 }
1045 }
1046
1047 if (wmcda->stopEvent != 0) {
1048 CloseHandle(wmcda->stopEvent);
1049 wmcda->stopEvent = 0;
1050 }
1051 if (wmcda->dsBuf) {
1052 IDirectSoundBuffer_Release(wmcda->dsBuf);
1053 wmcda->dsBuf = NULL;
1054 }
1055 if (wmcda->dsObj) {
1056 IDirectSound_Release(wmcda->dsObj);
1057 wmcda->dsObj = NULL;
1058 }
1059 }
1060
1061 play.StartingM = start / CDFRAMES_PERMIN;
1062 play.StartingS = (start / CDFRAMES_PERSEC) % 60;
1063 play.StartingF = start % CDFRAMES_PERSEC;
1064 play.EndingM = end / CDFRAMES_PERMIN;
1065 play.EndingS = (end / CDFRAMES_PERSEC) % 60;
1066 play.EndingF = end % CDFRAMES_PERSEC;
1067 if (!device_io(wmcda->handle, IOCTL_CDROM_PLAY_AUDIO_MSF, &play, sizeof(play),
1068 NULL, 0, &br, NULL)) {
1069 wmcda->hCallback = NULL;
1070 ret = MCIERR_HARDWARE;
1071 }
1072 /* The independent CD player has no means to signal MCI_NOTIFY when it's done.
1073 * Native sends a notification with MCI_WAIT only. */
1074 return ret;
1075 }
1076
1077 /**************************************************************************
1078 * MCICDA_Stop [internal]
1079 */
1080 static DWORD MCICDA_Stop(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
1081 {
1082 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1083 HANDLE oldcb;
1084 DWORD br;
1085
1086 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1087
1088 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1089
1090 oldcb = InterlockedExchangePointer(&wmcda->hCallback, NULL);
1091 if (oldcb) mciDriverNotify(oldcb, wmcda->wNotifyDeviceID, MCI_NOTIFY_ABORTED);
1092
1093 if (wmcda->hThread != 0) {
1094 SetEvent(wmcda->stopEvent);
1095 WaitForSingleObject(wmcda->hThread, INFINITE);
1096
1097 CloseHandle(wmcda->hThread);
1098 wmcda->hThread = 0;
1099 CloseHandle(wmcda->stopEvent);
1100 wmcda->stopEvent = 0;
1101
1102 IDirectSoundBuffer_Release(wmcda->dsBuf);
1103 wmcda->dsBuf = NULL;
1104 IDirectSound_Release(wmcda->dsObj);
1105 wmcda->dsObj = NULL;
1106 }
1107 else if (!device_io(wmcda->handle, IOCTL_CDROM_STOP_AUDIO, NULL, 0, NULL, 0, &br, NULL))
1108 return MCIERR_HARDWARE;
1109
1110 if ((dwFlags & MCI_NOTIFY) && lpParms)
1111 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
1112 return 0;
1113 }
1114
1115 /**************************************************************************
1116 * MCICDA_Pause [internal]
1117 */
1118 static DWORD MCICDA_Pause(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
1119 {
1120 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1121 HANDLE oldcb;
1122 DWORD br;
1123
1124 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1125
1126 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1127
1128 oldcb = InterlockedExchangePointer(&wmcda->hCallback, NULL);
1129 if (oldcb) mciDriverNotify(oldcb, wmcda->wNotifyDeviceID, MCI_NOTIFY_ABORTED);
1130
1131 if (wmcda->hThread != 0) {
1132 /* Don't bother calling stop if the playLoop thread has already stopped */
1133 if(WaitForSingleObject(wmcda->stopEvent, 0) != WAIT_OBJECT_0 &&
1134 FAILED(IDirectSoundBuffer_Stop(wmcda->dsBuf)))
1135 return MCIERR_HARDWARE;
1136 }
1137 else if (!device_io(wmcda->handle, IOCTL_CDROM_PAUSE_AUDIO, NULL, 0, NULL, 0, &br, NULL))
1138 return MCIERR_HARDWARE;
1139
1140 if ((dwFlags & MCI_NOTIFY) && lpParms)
1141 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
1142 return 0;
1143 }
1144
1145 /**************************************************************************
1146 * MCICDA_Resume [internal]
1147 */
1148 static DWORD MCICDA_Resume(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
1149 {
1150 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1151 DWORD br;
1152
1153 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1154
1155 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1156
1157 if (wmcda->hThread != 0) {
1158 /* Don't restart if the playLoop thread has already stopped */
1159 if(WaitForSingleObject(wmcda->stopEvent, 0) != WAIT_OBJECT_0 &&
1160 FAILED(IDirectSoundBuffer_Play(wmcda->dsBuf, 0, 0, DSBPLAY_LOOPING)))
1161 return MCIERR_HARDWARE;
1162 }
1163 else if (!device_io(wmcda->handle, IOCTL_CDROM_RESUME_AUDIO, NULL, 0, NULL, 0, &br, NULL))
1164 return MCIERR_HARDWARE;
1165
1166 if ((dwFlags & MCI_NOTIFY) && lpParms)
1167 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
1168 return 0;
1169 }
1170
1171 /**************************************************************************
1172 * MCICDA_Seek [internal]
1173 */
1174 static DWORD MCICDA_Seek(UINT wDevID, DWORD dwFlags, LPMCI_SEEK_PARMS lpParms)
1175 {
1176 DWORD at;
1177 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1178 CDROM_SEEK_AUDIO_MSF seek;
1179 DWORD br, position, ret;
1180 CDROM_TOC toc;
1181
1182 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1183
1184 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1185 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1186
1187 position = dwFlags & (MCI_SEEK_TO_START|MCI_SEEK_TO_END|MCI_TO);
1188 if (!position) return MCIERR_MISSING_PARAMETER;
1189 if (position&(position-1)) return MCIERR_FLAGS_NOT_COMPATIBLE;
1190
1191 /* Stop sends MCI_NOTIFY_ABORTED when needed.
1192 * Tests show that native first sends ABORTED and reads the TOC,
1193 * then only checks the position flags, then stops and seeks. */
1194 MCICDA_Stop(wDevID, MCI_WAIT, 0);
1195
1196 if (!MCICDA_ReadTOC(wmcda, &toc, &br))
1197 return MCICDA_GetError(wmcda);
1198
1199 switch (position) {
1200 case MCI_SEEK_TO_START:
1201 TRACE("Seeking to start\n");
1202 at = FRAME_OF_TOC(toc,toc.FirstTrack);
1203 if ( (ret=MCICDA_SkipDataTracks(wmcda, &at)) )
1204 return ret;
1205 break;
1206 case MCI_SEEK_TO_END:
1207 TRACE("Seeking to end\n");
1208 /* End is prior to lead-out
1209 * yet Win9X seeks to even one frame less than that. */
1210 at = FRAME_OF_TOC(toc, toc.LastTrack + 1) - 1;
1211 if ( (ret=MCICDA_SkipDataTracks(wmcda, &at)) )
1212 return ret;
1213 break;
1214 case MCI_TO:
1215 TRACE("Seeking to %u\n", lpParms->dwTo);
1216 at = MCICDA_CalcFrame(wmcda, lpParms->dwTo);
1217 if ( (ret=MCICDA_SkipDataTracks(wmcda, &at)) )
1218 return ret;
1219 break;
1220 default:
1221 return MCIERR_FLAGS_NOT_COMPATIBLE;
1222 }
1223
1224 {
1225 seek.M = at / CDFRAMES_PERMIN;
1226 seek.S = (at / CDFRAMES_PERSEC) % 60;
1227 seek.F = at % CDFRAMES_PERSEC;
1228 if (!device_io(wmcda->handle, IOCTL_CDROM_SEEK_AUDIO_MSF, &seek, sizeof(seek),
1229 NULL, 0, &br, NULL))
1230 return MCIERR_HARDWARE;
1231 }
1232
1233 if (dwFlags & MCI_NOTIFY)
1234 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
1235 return 0;
1236 }
1237
1238 /**************************************************************************
1239 * MCICDA_SetDoor [internal]
1240 */
1241 static DWORD MCICDA_SetDoor(UINT wDevID, BOOL open)
1242 {
1243 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1244 DWORD br;
1245
1246 TRACE("(%04x, %s) !\n", wDevID, (open) ? "OPEN" : "CLOSE");
1247
1248 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1249
1250 if (!device_io(wmcda->handle,
1251 (open) ? IOCTL_STORAGE_EJECT_MEDIA : IOCTL_STORAGE_LOAD_MEDIA,
1252 NULL, 0, NULL, 0, &br, NULL))
1253 return MCIERR_HARDWARE;
1254
1255 return 0;
1256 }
1257
1258 /**************************************************************************
1259 * MCICDA_Set [internal]
1260 */
1261 static DWORD MCICDA_Set(UINT wDevID, DWORD dwFlags, LPMCI_SET_PARMS lpParms)
1262 {
1263 WINE_MCICDAUDIO* wmcda = MCICDA_GetOpenDrv(wDevID);
1264
1265 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1266
1267 if (wmcda == NULL) return MCIERR_INVALID_DEVICE_ID;
1268
1269 if (dwFlags & MCI_SET_DOOR_OPEN) {
1270 MCICDA_SetDoor(wDevID, TRUE);
1271 }
1272 if (dwFlags & MCI_SET_DOOR_CLOSED) {
1273 MCICDA_SetDoor(wDevID, FALSE);
1274 }
1275
1276 /* only functions which require valid lpParms below this line ! */
1277 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1278 /*
1279 TRACE("dwTimeFormat=%08lX\n", lpParms->dwTimeFormat);
1280 */
1281 if (dwFlags & MCI_SET_TIME_FORMAT) {
1282 switch (lpParms->dwTimeFormat) {
1283 case MCI_FORMAT_MILLISECONDS:
1284 TRACE("MCI_FORMAT_MILLISECONDS !\n");
1285 break;
1286 case MCI_FORMAT_MSF:
1287 TRACE("MCI_FORMAT_MSF !\n");
1288 break;
1289 case MCI_FORMAT_TMSF:
1290 TRACE("MCI_FORMAT_TMSF !\n");
1291 break;
1292 default:
1293 return MCIERR_BAD_TIME_FORMAT;
1294 }
1295 wmcda->dwTimeFormat = lpParms->dwTimeFormat;
1296 }
1297 if (dwFlags & MCI_SET_AUDIO) /* one xp machine ignored it */
1298 TRACE("SET_AUDIO %X %x\n", dwFlags, lpParms->dwAudio);
1299
1300 if (dwFlags & MCI_NOTIFY)
1301 MCICDA_Notify(lpParms->dwCallback, wmcda, MCI_NOTIFY_SUCCESSFUL);
1302 return 0;
1303 }
1304
1305 /**************************************************************************
1306 * DriverProc (MCICDA.@)
1307 */
1308 LRESULT CALLBACK MCICDA_DriverProc(DWORD_PTR dwDevID, HDRVR hDriv, UINT wMsg,
1309 LPARAM dwParam1, LPARAM dwParam2)
1310 {
1311 switch(wMsg) {
1312 case DRV_LOAD: return 1;
1313 case DRV_FREE: return 1;
1314 case DRV_OPEN: return MCICDA_drvOpen((LPCWSTR)dwParam1, (LPMCI_OPEN_DRIVER_PARMSW)dwParam2);
1315 case DRV_CLOSE: return MCICDA_drvClose(dwDevID);
1316 case DRV_ENABLE: return 1;
1317 case DRV_DISABLE: return 1;
1318 case DRV_QUERYCONFIGURE: return 1;
1319 case DRV_CONFIGURE: MessageBoxA(0, "MCI audio CD driver !", "Wine Driver", MB_OK); return 1;
1320 case DRV_INSTALL: return DRVCNF_RESTART;
1321 case DRV_REMOVE: return DRVCNF_RESTART;
1322 }
1323
1324 if (dwDevID == 0xFFFFFFFF) return MCIERR_UNSUPPORTED_FUNCTION;
1325
1326 switch (wMsg) {
1327 case MCI_OPEN_DRIVER: return MCICDA_Open(dwDevID, dwParam1, (LPMCI_OPEN_PARMSW)dwParam2);
1328 case MCI_CLOSE_DRIVER: return MCICDA_Close(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
1329 case MCI_GETDEVCAPS: return MCICDA_GetDevCaps(dwDevID, dwParam1, (LPMCI_GETDEVCAPS_PARMS)dwParam2);
1330 case MCI_INFO: return MCICDA_Info(dwDevID, dwParam1, (LPMCI_INFO_PARMSW)dwParam2);
1331 case MCI_STATUS: return MCICDA_Status(dwDevID, dwParam1, (LPMCI_STATUS_PARMS)dwParam2);
1332 case MCI_SET: return MCICDA_Set(dwDevID, dwParam1, (LPMCI_SET_PARMS)dwParam2);
1333 case MCI_PLAY: return MCICDA_Play(dwDevID, dwParam1, (LPMCI_PLAY_PARMS)dwParam2);
1334 case MCI_STOP: return MCICDA_Stop(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
1335 case MCI_PAUSE: return MCICDA_Pause(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
1336 case MCI_RESUME: return MCICDA_Resume(dwDevID, dwParam1, (LPMCI_GENERIC_PARMS)dwParam2);
1337 case MCI_SEEK: return MCICDA_Seek(dwDevID, dwParam1, (LPMCI_SEEK_PARMS)dwParam2);
1338 /* commands that should report an error as they are not supported in
1339 * the native version */
1340 case MCI_RECORD:
1341 case MCI_LOAD:
1342 case MCI_SAVE:
1343 return MCIERR_UNSUPPORTED_FUNCTION;
1344 case MCI_BREAK:
1345 case MCI_FREEZE:
1346 case MCI_PUT:
1347 case MCI_REALIZE:
1348 case MCI_UNFREEZE:
1349 case MCI_UPDATE:
1350 case MCI_WHERE:
1351 case MCI_STEP:
1352 case MCI_SPIN:
1353 case MCI_ESCAPE:
1354 case MCI_COPY:
1355 case MCI_CUT:
1356 case MCI_DELETE:
1357 case MCI_PASTE:
1358 case MCI_WINDOW:
1359 TRACE("Unsupported command [0x%x]\n", wMsg);
1360 break;
1361 case MCI_OPEN:
1362 case MCI_CLOSE:
1363 ERR("Shouldn't receive a MCI_OPEN or CLOSE message\n");
1364 break;
1365 default:
1366 TRACE("Sending msg [0x%x] to default driver proc\n", wMsg);
1367 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1368 }
1369 return MCIERR_UNRECOGNIZED_COMMAND;
1370 }
1371
1372 /*-----------------------------------------------------------------------*/
Windows API implementation