?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
winemaker: Canonicalize directory name if used as target name.
[wine/hacks.git] / dlls / mciwave / mciwave.c
blobc533e8577978a102e7c21468bfb6a89180bfe729
1 /*
2 * Sample Wine Driver for MCI wave forms
3 *
4 * Copyright 1994 Martin Ayotte
5 * 1999,2000,2005 Eric Pouech
6 * 2000 Francois Jacques
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
25 #include "windef.h"
26 #include "winbase.h"
27 #include "wingdi.h"
28 #include "winuser.h"
29 #include "mmddk.h"
30 #include "wownt32.h"
31 #include "digitalv.h"
32 #include "wine/debug.h"
33 #include "wine/unicode.h"
34
35 WINE_DEFAULT_DEBUG_CHANNEL(mciwave);
36
37 typedef struct {
38 UINT wDevID;
39 HANDLE hWave;
40 int nUseCount; /* Incremented for each shared open */
41 BOOL fShareable; /* TRUE if first open was shareable */
42 HMMIO hFile; /* mmio file handle open as Element */
43 MCI_WAVE_OPEN_PARMSW openParms;
44 WAVEFORMATEX wfxRef;
45 LPWAVEFORMATEX lpWaveFormat;
46 BOOL fInput; /* FALSE = Output, TRUE = Input */
47 volatile WORD dwStatus; /* one from MCI_MODE_xxxx */
48 DWORD dwMciTimeFormat;/* One of the supported MCI_FORMAT_xxxx */
49 DWORD dwPosition; /* position in bytes in chunk */
50 HANDLE hEvent; /* for synchronization */
51 LONG dwEventCount; /* for synchronization */
52 MMCKINFO ckMainRIFF; /* main RIFF chunk */
53 MMCKINFO ckWaveData; /* data chunk */
54 } WINE_MCIWAVE;
55
56 /* ===================================================================
57 * ===================================================================
58 * FIXME: should be using the new mmThreadXXXX functions from WINMM
59 * instead of those
60 * it would require to add a wine internal flag to mmThreadCreate
61 * in order to pass a 32 bit function instead of a 16 bit one
62 * ===================================================================
63 * =================================================================== */
64
65 struct SCA {
66 UINT wDevID;
67 UINT wMsg;
68 DWORD_PTR dwParam1;
69 DWORD_PTR dwParam2;
70 };
71
72 /**************************************************************************
73 * MCI_SCAStarter [internal]
74 */
75 static DWORD CALLBACK MCI_SCAStarter(LPVOID arg)
76 {
77 struct SCA* sca = (struct SCA*)arg;
78 DWORD ret;
79
80 TRACE("In thread before async command (%08x,%u,%08lx,%08lx)\n",
81 sca->wDevID, sca->wMsg, sca->dwParam1, sca->dwParam2);
82 ret = mciSendCommandA(sca->wDevID, sca->wMsg, sca->dwParam1 | MCI_WAIT, sca->dwParam2);
83 TRACE("In thread after async command (%08x,%u,%08lx,%08lx)\n",
84 sca->wDevID, sca->wMsg, sca->dwParam1, sca->dwParam2);
85 HeapFree(GetProcessHeap(), 0, sca);
86 ExitThread(ret);
87 WARN("Should not happen ? what's wrong\n");
88 /* should not go after this point */
89 return ret;
90 }
91
92 /**************************************************************************
93 * MCI_SendCommandAsync [internal]
94 */
95 static DWORD MCI_SendCommandAsync(UINT wDevID, UINT wMsg, DWORD_PTR dwParam1,
96 DWORD_PTR dwParam2, UINT size)
97 {
98 HANDLE handle;
99 struct SCA* sca = HeapAlloc(GetProcessHeap(), 0, sizeof(struct SCA) + size);
100
101 if (sca == 0)
102 return MCIERR_OUT_OF_MEMORY;
103
104 sca->wDevID = wDevID;
105 sca->wMsg = wMsg;
106 sca->dwParam1 = dwParam1;
107
108 if (size && dwParam2) {
109 sca->dwParam2 = (DWORD_PTR)sca + sizeof(struct SCA);
110 /* copy structure passed by program in dwParam2 to be sure
111 * we can still use it whatever the program does
112 */
113 memcpy((LPVOID)sca->dwParam2, (LPVOID)dwParam2, size);
114 } else {
115 sca->dwParam2 = dwParam2;
116 }
117
118 if ((handle = CreateThread(NULL, 0, MCI_SCAStarter, sca, 0, NULL)) == 0) {
119 WARN("Couldn't allocate thread for async command handling, sending synchronously\n");
120 return MCI_SCAStarter(&sca);
121 }
122 SetThreadPriority(handle, THREAD_PRIORITY_TIME_CRITICAL);
123 CloseHandle(handle);
124 return 0;
125 }
126
127 /*======================================================================*
128 * MCI WAVE implementation *
129 *======================================================================*/
130
131 static DWORD WAVE_mciResume(UINT wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms);
132
133 /**************************************************************************
134 * MCIWAVE_drvOpen [internal]
135 */
136 static LRESULT WAVE_drvOpen(LPCWSTR str, LPMCI_OPEN_DRIVER_PARMSW modp)
137 {
138 WINE_MCIWAVE* wmw;
139
140 if (modp == NULL) return 0xFFFFFFFF;
141
142 wmw = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINE_MCIWAVE));
143
144 if (!wmw)
145 return 0;
146
147 wmw->wDevID = modp->wDeviceID;
148 mciSetDriverData(wmw->wDevID, (DWORD_PTR)wmw);
149 modp->wCustomCommandTable = MCI_NO_COMMAND_TABLE;
150 modp->wType = MCI_DEVTYPE_WAVEFORM_AUDIO;
151
152 wmw->wfxRef.wFormatTag = WAVE_FORMAT_PCM;
153 wmw->wfxRef.nChannels = 1; /* MONO */
154 wmw->wfxRef.nSamplesPerSec = 11025;
155 wmw->wfxRef.nAvgBytesPerSec = 11025;
156 wmw->wfxRef.nBlockAlign = 1;
157 wmw->wfxRef.wBitsPerSample = 8;
158 wmw->wfxRef.cbSize = 0; /* don't care */
159
160 return modp->wDeviceID;
161 }
162
163 /**************************************************************************
164 * MCIWAVE_drvClose [internal]
165 */
166 static LRESULT WAVE_drvClose(MCIDEVICEID dwDevID)
167 {
168 WINE_MCIWAVE* wmw = (WINE_MCIWAVE*)mciGetDriverData(dwDevID);
169
170 if (wmw) {
171 HeapFree(GetProcessHeap(), 0, wmw);
172 mciSetDriverData(dwDevID, 0);
173 return 1;
174 }
175 return (dwDevID == 0xFFFFFFFF) ? 1 : 0;
176 }
177
178 /**************************************************************************
179 * WAVE_mciGetOpenDev [internal]
180 */
181 static WINE_MCIWAVE *WAVE_mciGetOpenDev(MCIDEVICEID wDevID)
182 {
183 WINE_MCIWAVE* wmw = (WINE_MCIWAVE*)mciGetDriverData(wDevID);
184
185 if (wmw == NULL || wmw->nUseCount == 0) {
186 WARN("Invalid wDevID=%u\n", wDevID);
187 return 0;
188 }
189 return wmw;
190 }
191
192 /**************************************************************************
193 * WAVE_ConvertByteToTimeFormat [internal]
194 */
195 static DWORD WAVE_ConvertByteToTimeFormat(WINE_MCIWAVE* wmw, DWORD val, LPDWORD lpRet)
196 {
197 DWORD ret = 0;
198
199 switch (wmw->dwMciTimeFormat) {
200 case MCI_FORMAT_MILLISECONDS:
201 ret = MulDiv(val,1000,wmw->lpWaveFormat->nAvgBytesPerSec);
202 break;
203 case MCI_FORMAT_BYTES:
204 ret = val;
205 break;
206 case MCI_FORMAT_SAMPLES: /* FIXME: is this correct ? */
207 ret = (val * 8) / (wmw->lpWaveFormat->wBitsPerSample ? wmw->lpWaveFormat->wBitsPerSample : 1);
208 break;
209 default:
210 WARN("Bad time format %u!\n", wmw->dwMciTimeFormat);
211 }
212 TRACE("val=%u=0x%08x [tf=%u] => ret=%u\n", val, val, wmw->dwMciTimeFormat, ret);
213 *lpRet = 0;
214 return ret;
215 }
216
217 /**************************************************************************
218 * WAVE_ConvertTimeFormatToByte [internal]
219 */
220 static DWORD WAVE_ConvertTimeFormatToByte(WINE_MCIWAVE* wmw, DWORD val)
221 {
222 DWORD ret = 0;
223
224 switch (wmw->dwMciTimeFormat) {
225 case MCI_FORMAT_MILLISECONDS:
226 ret = (val * wmw->lpWaveFormat->nAvgBytesPerSec) / 1000;
227 break;
228 case MCI_FORMAT_BYTES:
229 ret = val;
230 break;
231 case MCI_FORMAT_SAMPLES: /* FIXME: is this correct ? */
232 ret = (val * wmw->lpWaveFormat->wBitsPerSample) / 8;
233 break;
234 default:
235 WARN("Bad time format %u!\n", wmw->dwMciTimeFormat);
236 }
237 TRACE("val=%u=0x%08x [tf=%u] => ret=%u\n", val, val, wmw->dwMciTimeFormat, ret);
238 return ret;
239 }
240
241 /**************************************************************************
242 * WAVE_mciReadFmt [internal]
243 */
244 static DWORD WAVE_mciReadFmt(WINE_MCIWAVE* wmw, const MMCKINFO* pckMainRIFF)
245 {
246 MMCKINFO mmckInfo;
247 long r;
248
249 mmckInfo.ckid = mmioFOURCC('f', 'm', 't', ' ');
250 if (mmioDescend(wmw->hFile, &mmckInfo, pckMainRIFF, MMIO_FINDCHUNK) != 0)
251 return MCIERR_INVALID_FILE;
252 TRACE("Chunk Found ckid=%.4s fccType=%.4s cksize=%08X\n",
253 (LPSTR)&mmckInfo.ckid, (LPSTR)&mmckInfo.fccType, mmckInfo.cksize);
254
255 wmw->lpWaveFormat = HeapAlloc(GetProcessHeap(), 0, mmckInfo.cksize);
256 if (!wmw->lpWaveFormat) return MMSYSERR_NOMEM;
257 r = mmioRead(wmw->hFile, (HPSTR)wmw->lpWaveFormat, mmckInfo.cksize);
258 if (r < sizeof(WAVEFORMAT))
259 return MCIERR_INVALID_FILE;
260
261 TRACE("wFormatTag=%04X !\n", wmw->lpWaveFormat->wFormatTag);
262 TRACE("nChannels=%d\n", wmw->lpWaveFormat->nChannels);
263 TRACE("nSamplesPerSec=%d\n", wmw->lpWaveFormat->nSamplesPerSec);
264 TRACE("nAvgBytesPerSec=%d\n", wmw->lpWaveFormat->nAvgBytesPerSec);
265 TRACE("nBlockAlign=%d\n", wmw->lpWaveFormat->nBlockAlign);
266 TRACE("wBitsPerSample=%u !\n", wmw->lpWaveFormat->wBitsPerSample);
267 if (r >= (long)sizeof(WAVEFORMATEX))
268 TRACE("cbSize=%u !\n", wmw->lpWaveFormat->cbSize);
269
270 mmioAscend(wmw->hFile, &mmckInfo, 0);
271 wmw->ckWaveData.ckid = mmioFOURCC('d', 'a', 't', 'a');
272 if (mmioDescend(wmw->hFile, &wmw->ckWaveData, pckMainRIFF, MMIO_FINDCHUNK) != 0) {
273 TRACE("can't find data chunk\n");
274 return MCIERR_INVALID_FILE;
275 }
276 TRACE("Chunk Found ckid=%.4s fccType=%.4s cksize=%08X\n",
277 (LPSTR)&wmw->ckWaveData.ckid, (LPSTR)&wmw->ckWaveData.fccType, wmw->ckWaveData.cksize);
278 TRACE("nChannels=%d nSamplesPerSec=%d\n",
279 wmw->lpWaveFormat->nChannels, wmw->lpWaveFormat->nSamplesPerSec);
280
281 return 0;
282 }
283
284 /**************************************************************************
285 * WAVE_mciDefaultFmt [internal]
286 */
287 static DWORD WAVE_mciDefaultFmt(WINE_MCIWAVE* wmw)
288 {
289 wmw->lpWaveFormat = HeapAlloc(GetProcessHeap(), 0, sizeof(*wmw->lpWaveFormat));
290 if (!wmw->lpWaveFormat) return MMSYSERR_NOMEM;
291
292 wmw->lpWaveFormat->wFormatTag = WAVE_FORMAT_PCM;
293 wmw->lpWaveFormat->nChannels = 1;
294 wmw->lpWaveFormat->nSamplesPerSec = 44000;
295 wmw->lpWaveFormat->nAvgBytesPerSec = 44000;
296 wmw->lpWaveFormat->nBlockAlign = 1;
297 wmw->lpWaveFormat->wBitsPerSample = 8;
298
299 return 0;
300 }
301
302 /**************************************************************************
303 * WAVE_mciCreateRIFFSkeleton [internal]
304 */
305 static DWORD WAVE_mciCreateRIFFSkeleton(WINE_MCIWAVE* wmw)
306 {
307 MMCKINFO ckWaveFormat;
308 LPMMCKINFO lpckRIFF = &(wmw->ckMainRIFF);
309 LPMMCKINFO lpckWaveData = &(wmw->ckWaveData);
310
311 lpckRIFF->ckid = FOURCC_RIFF;
312 lpckRIFF->fccType = mmioFOURCC('W', 'A', 'V', 'E');
313 lpckRIFF->cksize = 0;
314
315 if (MMSYSERR_NOERROR != mmioCreateChunk(wmw->hFile, lpckRIFF, MMIO_CREATERIFF))
316 goto err;
317
318 ckWaveFormat.fccType = 0;
319 ckWaveFormat.ckid = mmioFOURCC('f', 'm', 't', ' ');
320 ckWaveFormat.cksize = sizeof(PCMWAVEFORMAT);
321
322 if (!wmw->lpWaveFormat)
323 {
324 wmw->lpWaveFormat = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*wmw->lpWaveFormat));
325 if (!wmw->lpWaveFormat) return MMSYSERR_NOMEM;
326 *wmw->lpWaveFormat = wmw->wfxRef;
327 }
328
329 /* we can only record PCM files... there is no way in the MCI API to specify
330 * the necessary data to initialize the extra bytes of the WAVEFORMATEX
331 * structure
332 */
333 if (wmw->lpWaveFormat->wFormatTag != WAVE_FORMAT_PCM)
334 goto err;
335
336 if (MMSYSERR_NOERROR != mmioCreateChunk(wmw->hFile, &ckWaveFormat, 0))
337 goto err;
338
339 if (-1 == mmioWrite(wmw->hFile, (HPCSTR)wmw->lpWaveFormat, sizeof(PCMWAVEFORMAT)))
340 goto err;
341
342 if (MMSYSERR_NOERROR != mmioAscend(wmw->hFile, &ckWaveFormat, 0))
343 goto err;
344
345 lpckWaveData->cksize = 0;
346 lpckWaveData->fccType = 0;
347 lpckWaveData->ckid = mmioFOURCC('d', 'a', 't', 'a');
348
349 /* create data chunk */
350 if (MMSYSERR_NOERROR != mmioCreateChunk(wmw->hFile, lpckWaveData, 0))
351 goto err;
352
353 return 0;
354
355 err:
356 HeapFree(GetProcessHeap(), 0, wmw->lpWaveFormat);
357 wmw->lpWaveFormat = NULL;
358 return MCIERR_INVALID_FILE;
359 }
360
361 static DWORD create_tmp_file(HMMIO* hFile, LPWSTR* pszTmpFileName)
362 {
363 WCHAR szTmpPath[MAX_PATH];
364 WCHAR szPrefix[4];
365 DWORD dwRet = MMSYSERR_NOERROR;
366
367 szPrefix[0] = 'M';
368 szPrefix[1] = 'C';
369 szPrefix[2] = 'I';
370 szPrefix[3] = '\0';
371
372 if (!GetTempPathW(sizeof(szTmpPath)/sizeof(szTmpPath[0]), szTmpPath)) {
373 WARN("can't retrieve temp path!\n");
374 return MCIERR_FILE_NOT_FOUND;
375 }
376
377 *pszTmpFileName = HeapAlloc(GetProcessHeap(),
378 HEAP_ZERO_MEMORY,
379 MAX_PATH * sizeof(WCHAR));
380 if (!GetTempFileNameW(szTmpPath, szPrefix, 0, *pszTmpFileName)) {
381 WARN("can't retrieve temp file name!\n");
382 HeapFree(GetProcessHeap(), 0, *pszTmpFileName);
383 return MCIERR_FILE_NOT_FOUND;
384 }
385
386 TRACE("%s!\n", debugstr_w(*pszTmpFileName));
387
388 if (*pszTmpFileName && (strlenW(*pszTmpFileName) > 0)) {
389
390 *hFile = mmioOpenW(*pszTmpFileName, NULL,
391 MMIO_ALLOCBUF | MMIO_READWRITE | MMIO_CREATE);
392
393 if (*hFile == 0) {
394 WARN("can't create file=%s!\n", debugstr_w(*pszTmpFileName));
395 /* temporary file could not be created. clean filename. */
396 HeapFree(GetProcessHeap(), 0, *pszTmpFileName);
397 dwRet = MCIERR_FILE_NOT_FOUND;
398 }
399 }
400 return dwRet;
401 }
402
403 static LRESULT WAVE_mciOpenFile(WINE_MCIWAVE* wmw, const WCHAR* filename)
404 {
405 LRESULT dwRet = MMSYSERR_NOERROR;
406 WCHAR* fn;
407
408 fn = HeapAlloc(GetProcessHeap(), 0, (lstrlenW(filename) + 1) * sizeof(WCHAR));
409 if (!fn) return MCIERR_OUT_OF_MEMORY;
410 strcpyW(fn, filename);
411 HeapFree(GetProcessHeap(), 0, (void*)wmw->openParms.lpstrElementName);
412 wmw->openParms.lpstrElementName = fn;
413
414 if (strlenW(filename) > 0) {
415 /* FIXME : what should be done if wmw->hFile is already != 0, or the driver is playin' */
416 TRACE("MCI_OPEN_ELEMENT %s!\n", debugstr_w(filename));
417
418 wmw->hFile = mmioOpenW((LPWSTR)filename, NULL,
419 MMIO_ALLOCBUF | MMIO_DENYWRITE | MMIO_READ);
420
421 if (wmw->hFile == 0) {
422 WARN("can't find file=%s!\n", debugstr_w(filename));
423 dwRet = MCIERR_FILE_NOT_FOUND;
424 }
425 else
426 {
427 LPMMCKINFO lpckMainRIFF = &wmw->ckMainRIFF;
428
429 /* make sure we're are the beginning of the file */
430 mmioSeek(wmw->hFile, 0, SEEK_SET);
431
432 /* first reading of this file. read the waveformat chunk */
433 if (mmioDescend(wmw->hFile, lpckMainRIFF, NULL, 0) != 0) {
434 dwRet = MCIERR_INVALID_FILE;
435 } else {
436 TRACE("ParentChunk ckid=%.4s fccType=%.4s cksize=%08X\n",
437 (LPSTR)&(lpckMainRIFF->ckid),
438 (LPSTR) &(lpckMainRIFF->fccType),
439 (lpckMainRIFF->cksize));
440
441 if ((lpckMainRIFF->ckid != FOURCC_RIFF) ||
442 lpckMainRIFF->fccType != mmioFOURCC('W', 'A', 'V', 'E')) {
443 dwRet = MCIERR_INVALID_FILE;
444 } else {
445 dwRet = WAVE_mciReadFmt(wmw, lpckMainRIFF);
446 }
447 }
448 }
449 }
450 return dwRet;
451 }
452
453 /**************************************************************************
454 * WAVE_mciOpen [internal]
455 */
456 static LRESULT WAVE_mciOpen(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_WAVE_OPEN_PARMSW lpOpenParms)
457 {
458 DWORD dwRet = 0;
459 WINE_MCIWAVE* wmw = (WINE_MCIWAVE*)mciGetDriverData(wDevID);
460
461 TRACE("(%04X, %08X, %p)\n", wDevID, dwFlags, lpOpenParms);
462 if (lpOpenParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
463 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
464
465 if (dwFlags & MCI_OPEN_SHAREABLE)
466 return MCIERR_HARDWARE;
467
468 if (wmw->nUseCount > 0) {
469 /* The driver is already opened on this channel
470 * Wave driver cannot be shared
471 */
472 return MCIERR_DEVICE_OPEN;
473 }
474
475 wmw->nUseCount++;
476
477 wmw->fInput = FALSE;
478 wmw->hWave = 0;
479 wmw->dwStatus = MCI_MODE_NOT_READY;
480 wmw->hFile = 0;
481 memcpy(&wmw->openParms, lpOpenParms, sizeof(MCI_WAVE_OPEN_PARMSA));
482 /* will be set by WAVE_mciOpenFile */
483 wmw->openParms.lpstrElementName = NULL;
484
485 TRACE("wDevID=%04X (lpParams->wDeviceID=%08X)\n", wDevID, lpOpenParms->wDeviceID);
486
487 if (dwFlags & MCI_OPEN_ELEMENT) {
488 if (dwFlags & MCI_OPEN_ELEMENT_ID) {
489 /* could it be that (DWORD)lpOpenParms->lpstrElementName
490 * contains the hFile value ?
491 */
492 dwRet = MCIERR_UNRECOGNIZED_COMMAND;
493 } else {
494 dwRet = WAVE_mciOpenFile(wmw, lpOpenParms->lpstrElementName);
495 }
496 }
497
498 TRACE("hFile=%p\n", wmw->hFile);
499
500 if (dwRet == 0 && !wmw->lpWaveFormat)
501 dwRet = WAVE_mciDefaultFmt(wmw);
502
503 if (dwRet == 0) {
504 if (wmw->lpWaveFormat) {
505 switch (wmw->lpWaveFormat->wFormatTag) {
506 case WAVE_FORMAT_PCM:
507 if (wmw->lpWaveFormat->nAvgBytesPerSec !=
508 wmw->lpWaveFormat->nSamplesPerSec * wmw->lpWaveFormat->nBlockAlign) {
509 WARN("Incorrect nAvgBytesPerSec (%d), setting it to %d\n",
510 wmw->lpWaveFormat->nAvgBytesPerSec,
511 wmw->lpWaveFormat->nSamplesPerSec *
512 wmw->lpWaveFormat->nBlockAlign);
513 wmw->lpWaveFormat->nAvgBytesPerSec =
514 wmw->lpWaveFormat->nSamplesPerSec *
515 wmw->lpWaveFormat->nBlockAlign;
516 }
517 break;
518 }
519 }
520 wmw->dwPosition = 0;
521
522 wmw->dwStatus = MCI_MODE_STOP;
523 } else {
524 wmw->nUseCount--;
525 if (wmw->hFile != 0)
526 mmioClose(wmw->hFile, 0);
527 wmw->hFile = 0;
528 }
529 return dwRet;
530 }
531
532 /**************************************************************************
533 * WAVE_mciCue [internal]
534 */
535 static DWORD WAVE_mciCue(MCIDEVICEID wDevID, LPARAM dwParam, LPMCI_GENERIC_PARMS lpParms)
536 {
537 /*
538 FIXME
539
540 This routine is far from complete. At the moment only a check is done on the
541 MCI_WAVE_INPUT flag. No explicit check on MCI_WAVE_OUTPUT is done since that
542 is the default.
543
544 The flags MCI_NOTIFY (and the callback parameter in lpParms) and MCI_WAIT
545 are ignored
546 */
547
548 DWORD dwRet;
549 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
550
551 FIXME("(%u, %08lX, %p); likely to fail\n", wDevID, dwParam, lpParms);
552
553 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
554
555 /* FIXME */
556 /* always close elements ? */
557 if (wmw->hFile != 0) {
558 mmioClose(wmw->hFile, 0);
559 wmw->hFile = 0;
560 }
561
562 dwRet = MMSYSERR_NOERROR; /* assume success */
563
564 if ((dwParam & MCI_WAVE_INPUT) && !wmw->fInput) {
565 dwRet = waveOutClose(wmw->hWave);
566 if (dwRet != MMSYSERR_NOERROR) return MCIERR_INTERNAL;
567 wmw->fInput = TRUE;
568 } else if (wmw->fInput) {
569 dwRet = waveInClose(wmw->hWave);
570 if (dwRet != MMSYSERR_NOERROR) return MCIERR_INTERNAL;
571 wmw->fInput = FALSE;
572 }
573 wmw->hWave = 0;
574 return (dwRet == MMSYSERR_NOERROR) ? 0 : MCIERR_INTERNAL;
575 }
576
577 /**************************************************************************
578 * WAVE_mciStop [internal]
579 */
580 static DWORD WAVE_mciStop(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
581 {
582 DWORD dwRet = 0;
583 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
584
585 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
586
587 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
588
589 /* wait for playback thread (if any) to exit before processing further */
590 switch (wmw->dwStatus) {
591 case MCI_MODE_PAUSE:
592 case MCI_MODE_PLAY:
593 case MCI_MODE_RECORD:
594 {
595 int oldStat = wmw->dwStatus;
596 wmw->dwStatus = MCI_MODE_NOT_READY;
597 if (oldStat == MCI_MODE_PAUSE)
598 dwRet = (wmw->fInput) ? waveInReset(wmw->hWave) : waveOutReset(wmw->hWave);
599 }
600 while (wmw->dwStatus != MCI_MODE_STOP)
601 Sleep(10);
602 break;
603 }
604
605 wmw->dwPosition = 0;
606
607 /* sanity resets */
608 wmw->dwStatus = MCI_MODE_STOP;
609
610 if ((dwFlags & MCI_NOTIFY) && lpParms) {
611 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
612 wmw->openParms.wDeviceID, MCI_NOTIFY_SUCCESSFUL);
613 }
614
615 return dwRet;
616 }
617
618 /**************************************************************************
619 * WAVE_mciClose [internal]
620 */
621 static DWORD WAVE_mciClose(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
622 {
623 DWORD dwRet = 0;
624 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
625
626 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
627
628 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
629
630 if (wmw->dwStatus != MCI_MODE_STOP) {
631 dwRet = WAVE_mciStop(wDevID, MCI_WAIT, lpParms);
632 }
633
634 wmw->nUseCount--;
635
636 if (wmw->nUseCount == 0) {
637 if (wmw->hFile != 0) {
638 mmioClose(wmw->hFile, 0);
639 wmw->hFile = 0;
640 }
641 }
642
643 HeapFree(GetProcessHeap(), 0, wmw->lpWaveFormat);
644 wmw->lpWaveFormat = NULL;
645 HeapFree(GetProcessHeap(), 0, (void*)wmw->openParms.lpstrElementName);
646 wmw->openParms.lpstrElementName = NULL;
647
648 if ((dwFlags & MCI_NOTIFY) && lpParms) {
649 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
650 wmw->openParms.wDeviceID,
651 (dwRet == 0) ? MCI_NOTIFY_SUCCESSFUL : MCI_NOTIFY_FAILURE);
652 }
653
654 return 0;
655 }
656
657 /**************************************************************************
658 * WAVE_mciPlayCallback [internal]
659 */
660 static void CALLBACK WAVE_mciPlayCallback(HWAVEOUT hwo, UINT uMsg,
661 DWORD_PTR dwInstance,
662 LPARAM dwParam1, LPARAM dwParam2)
663 {
664 WINE_MCIWAVE* wmw = (WINE_MCIWAVE*)dwInstance;
665
666 switch (uMsg) {
667 case WOM_OPEN:
668 case WOM_CLOSE:
669 break;
670 case WOM_DONE:
671 InterlockedIncrement(&wmw->dwEventCount);
672 TRACE("Returning waveHdr=%lx\n", dwParam1);
673 SetEvent(wmw->hEvent);
674 break;
675 default:
676 ERR("Unknown uMsg=%d\n", uMsg);
677 }
678 }
679
680 /******************************************************************
681 * WAVE_mciPlayWaitDone
682 *
683 *
684 */
685 static void WAVE_mciPlayWaitDone(WINE_MCIWAVE* wmw)
686 {
687 for (;;) {
688 ResetEvent(wmw->hEvent);
689 if (InterlockedDecrement(&wmw->dwEventCount) >= 0) {
690 break;
691 }
692 InterlockedIncrement(&wmw->dwEventCount);
693
694 WaitForSingleObject(wmw->hEvent, INFINITE);
695 }
696 }
697
698 /**************************************************************************
699 * WAVE_mciPlay [internal]
700 */
701 static DWORD WAVE_mciPlay(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_PLAY_PARMS lpParms)
702 {
703 DWORD end;
704 LONG bufsize, count, left;
705 DWORD dwRet = 0;
706 LPWAVEHDR waveHdr = NULL;
707 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
708 int whidx;
709
710 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
711
712 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
713 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
714
715 wmw->fInput = FALSE;
716
717 if (wmw->hFile == 0) {
718 WARN("Can't play: no file=%s!\n", debugstr_w(wmw->openParms.lpstrElementName));
719 return MCIERR_FILE_NOT_FOUND;
720 }
721
722 if (wmw->dwStatus == MCI_MODE_PAUSE) {
723 /* FIXME: parameters (start/end) in lpParams may not be used */
724 return WAVE_mciResume(wDevID, dwFlags, (LPMCI_GENERIC_PARMS)lpParms);
725 }
726
727 /** This function will be called again by a thread when async is used.
728 * We have to set MCI_MODE_PLAY before we do this so that the app can spin
729 * on MCI_STATUS, so we have to allow it here if we're not going to start this thread.
730 */
731 if ((wmw->dwStatus != MCI_MODE_STOP) && ((wmw->dwStatus != MCI_MODE_PLAY) && (dwFlags & MCI_WAIT))) {
732 return MCIERR_INTERNAL;
733 }
734
735 wmw->dwStatus = MCI_MODE_PLAY;
736
737 if (!(dwFlags & MCI_WAIT)) {
738 return MCI_SendCommandAsync(wmw->openParms.wDeviceID, MCI_PLAY, dwFlags,
739 (DWORD_PTR)lpParms, sizeof(MCI_PLAY_PARMS));
740 }
741
742 end = 0xFFFFFFFF;
743 if (lpParms && (dwFlags & MCI_FROM)) {
744 wmw->dwPosition = WAVE_ConvertTimeFormatToByte(wmw, lpParms->dwFrom);
745 }
746 if (lpParms && (dwFlags & MCI_TO)) {
747 end = WAVE_ConvertTimeFormatToByte(wmw, lpParms->dwTo);
748 }
749
750 TRACE("Playing from byte=%u to byte=%u\n", wmw->dwPosition, end);
751
752 if (end <= wmw->dwPosition)
753 return TRUE;
754
755
756 #define WAVE_ALIGN_ON_BLOCK(wmw,v) \
757 ((((v) + (wmw)->lpWaveFormat->nBlockAlign - 1) / (wmw)->lpWaveFormat->nBlockAlign) * (wmw)->lpWaveFormat->nBlockAlign)
758
759 wmw->dwPosition = WAVE_ALIGN_ON_BLOCK(wmw, wmw->dwPosition);
760 wmw->ckWaveData.cksize = WAVE_ALIGN_ON_BLOCK(wmw, wmw->ckWaveData.cksize);
761
762 if (dwRet == 0) {
763 if (wmw->lpWaveFormat) {
764 switch (wmw->lpWaveFormat->wFormatTag) {
765 case WAVE_FORMAT_PCM:
766 if (wmw->lpWaveFormat->nAvgBytesPerSec !=
767 wmw->lpWaveFormat->nSamplesPerSec * wmw->lpWaveFormat->nBlockAlign) {
768 WARN("Incorrect nAvgBytesPerSec (%d), setting it to %d\n",
769 wmw->lpWaveFormat->nAvgBytesPerSec,
770 wmw->lpWaveFormat->nSamplesPerSec *
771 wmw->lpWaveFormat->nBlockAlign);
772 wmw->lpWaveFormat->nAvgBytesPerSec =
773 wmw->lpWaveFormat->nSamplesPerSec *
774 wmw->lpWaveFormat->nBlockAlign;
775 }
776 break;
777 }
778 }
779 } else {
780 TRACE("can't retrieve wave format %d\n", dwRet);
781 goto cleanUp;
782 }
783
784
785 /* go back to beginning of chunk plus the requested position */
786 /* FIXME: I'm not sure this is correct, notably because some data linked to
787 * the decompression state machine will not be correctly initialized.
788 * try it this way (other way would be to decompress from 0 up to dwPosition
789 * and to start sending to hWave when dwPosition is reached)
790 */
791 mmioSeek(wmw->hFile, wmw->ckWaveData.dwDataOffset + wmw->dwPosition, SEEK_SET); /* >= 0 */
792
793 /* By default the device will be opened for output, the MCI_CUE function is there to
794 * change from output to input and back
795 */
796 /* FIXME: how to choose between several output channels ? here mapper is forced */
797 dwRet = waveOutOpen((HWAVEOUT *)&wmw->hWave, WAVE_MAPPER, wmw->lpWaveFormat,
798 (DWORD_PTR)WAVE_mciPlayCallback, (DWORD_PTR)wmw, CALLBACK_FUNCTION);
799
800 if (dwRet != 0) {
801 TRACE("Can't open low level audio device %d\n", dwRet);
802 dwRet = MCIERR_DEVICE_OPEN;
803 wmw->hWave = 0;
804 goto cleanUp;
805 }
806
807 /* make it so that 3 buffers per second are needed */
808 bufsize = WAVE_ALIGN_ON_BLOCK(wmw, wmw->lpWaveFormat->nAvgBytesPerSec / 3);
809
810 waveHdr = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(WAVEHDR) + 2 * bufsize);
811 waveHdr[0].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR);
812 waveHdr[1].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR) + bufsize;
813 waveHdr[0].dwUser = waveHdr[1].dwUser = 0L;
814 waveHdr[0].dwLoops = waveHdr[1].dwLoops = 0L;
815 waveHdr[0].dwFlags = waveHdr[1].dwFlags = 0L;
816 waveHdr[0].dwBufferLength = waveHdr[1].dwBufferLength = bufsize;
817 if (waveOutPrepareHeader(wmw->hWave, &waveHdr[0], sizeof(WAVEHDR)) ||
818 waveOutPrepareHeader(wmw->hWave, &waveHdr[1], sizeof(WAVEHDR))) {
819 dwRet = MCIERR_INTERNAL;
820 goto cleanUp;
821 }
822
823 whidx = 0;
824 left = min(wmw->ckWaveData.cksize, end - wmw->dwPosition);
825 wmw->hEvent = CreateEventW(NULL, FALSE, FALSE, NULL);
826 wmw->dwEventCount = 1L; /* for first buffer */
827
828 TRACE("Playing (normalized) from byte=%u for %u bytes\n", wmw->dwPosition, left);
829
830 /* FIXME: this doesn't work if wmw->dwPosition != 0 */
831 while (left > 0 && wmw->dwStatus != MCI_MODE_STOP && wmw->dwStatus != MCI_MODE_NOT_READY) {
832 count = mmioRead(wmw->hFile, waveHdr[whidx].lpData, min(bufsize, left));
833 TRACE("mmioRead bufsize=%d count=%d\n", bufsize, count);
834 if (count < 1)
835 break;
836 /* count is always <= bufsize, so this is correct regarding the
837 * waveOutPrepareHeader function
838 */
839 waveHdr[whidx].dwBufferLength = count;
840 waveHdr[whidx].dwFlags &= ~WHDR_DONE;
841 TRACE("before WODM_WRITE lpWaveHdr=%p dwBufferLength=%u dwBytesRecorded=%u\n",
842 &waveHdr[whidx], waveHdr[whidx].dwBufferLength,
843 waveHdr[whidx].dwBytesRecorded);
844 dwRet = waveOutWrite(wmw->hWave, &waveHdr[whidx], sizeof(WAVEHDR));
845 left -= count;
846 wmw->dwPosition += count;
847 TRACE("after WODM_WRITE dwPosition=%u\n", wmw->dwPosition);
848
849 WAVE_mciPlayWaitDone(wmw);
850 whidx ^= 1;
851 }
852
853 WAVE_mciPlayWaitDone(wmw); /* to balance first buffer */
854
855 /* just to get rid of some race conditions between play, stop and pause */
856 waveOutReset(wmw->hWave);
857
858 waveOutUnprepareHeader(wmw->hWave, &waveHdr[0], sizeof(WAVEHDR));
859 waveOutUnprepareHeader(wmw->hWave, &waveHdr[1], sizeof(WAVEHDR));
860
861 dwRet = 0;
862
863 cleanUp:
864 HeapFree(GetProcessHeap(), 0, waveHdr);
865
866 if (wmw->hWave) {
867 waveOutClose(wmw->hWave);
868 wmw->hWave = 0;
869 }
870 CloseHandle(wmw->hEvent);
871
872 if (lpParms && (dwFlags & MCI_NOTIFY)) {
873 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
874 wmw->openParms.wDeviceID,
875 dwRet ? MCI_NOTIFY_FAILURE : MCI_NOTIFY_SUCCESSFUL);
876 }
877
878 wmw->dwStatus = MCI_MODE_STOP;
879
880 return dwRet;
881 }
882
883 /**************************************************************************
884 * WAVE_mciPlayCallback [internal]
885 */
886 static void CALLBACK WAVE_mciRecordCallback(HWAVEOUT hwo, UINT uMsg,
887 DWORD_PTR dwInstance,
888 LPARAM dwParam1, LPARAM dwParam2)
889 {
890 WINE_MCIWAVE* wmw = (WINE_MCIWAVE*)dwInstance;
891 LPWAVEHDR lpWaveHdr;
892 LONG count = 0;
893
894 switch (uMsg) {
895 case WIM_OPEN:
896 case WIM_CLOSE:
897 break;
898 case WIM_DATA:
899 lpWaveHdr = (LPWAVEHDR) dwParam1;
900
901 InterlockedIncrement(&wmw->dwEventCount);
902
903 count = mmioWrite(wmw->hFile, lpWaveHdr->lpData, lpWaveHdr->dwBytesRecorded);
904
905 lpWaveHdr->dwFlags &= ~WHDR_DONE;
906 if (count > 0)
907 wmw->dwPosition += count;
908 /* else error reporting ?? */
909 if (wmw->dwStatus == MCI_MODE_RECORD)
910 {
911 /* Only queue up another buffer if we are recording. We could receive this
912 message also when waveInReset() is called, since it notifies on all wave
913 buffers that are outstanding. Queueing up more sometimes causes waveInClose
914 to fail. */
915 waveInAddBuffer(wmw->hWave, lpWaveHdr, sizeof(*lpWaveHdr));
916 TRACE("after mmioWrite dwPosition=%u\n", wmw->dwPosition);
917 }
918
919 SetEvent(wmw->hEvent);
920 break;
921 default:
922 ERR("Unknown uMsg=%d\n", uMsg);
923 }
924 }
925
926 /******************************************************************
927 * bWAVE_mciRecordWaitDone
928 *
929 */
930 static void WAVE_mciRecordWaitDone(WINE_MCIWAVE* wmw)
931 {
932 for (;;) {
933 ResetEvent(wmw->hEvent);
934 if (InterlockedDecrement(&wmw->dwEventCount) >= 0) {
935 break;
936 }
937 InterlockedIncrement(&wmw->dwEventCount);
938
939 WaitForSingleObject(wmw->hEvent, INFINITE);
940 }
941 }
942
943 /**************************************************************************
944 * WAVE_mciRecord [internal]
945 */
946 static DWORD WAVE_mciRecord(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_RECORD_PARMS lpParms)
947 {
948 DWORD end;
949 DWORD dwRet = MMSYSERR_NOERROR;
950 LONG bufsize;
951 LPWAVEHDR waveHdr = NULL;
952 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
953
954 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
955
956 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
957 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
958
959 /* FIXME : since there is no way to determine in which mode the device is
960 * open (recording/playback) automatically switch from a mode to another
961 */
962 wmw->fInput = TRUE;
963
964 if (wmw->dwStatus == MCI_MODE_PAUSE) {
965 /* FIXME: parameters (start/end) in lpParams may not be used */
966 return WAVE_mciResume(wDevID, dwFlags, (LPMCI_GENERIC_PARMS)lpParms);
967 }
968
969 /** This function will be called again by a thread when async is used.
970 * We have to set MCI_MODE_PLAY before we do this so that the app can spin
971 * on MCI_STATUS, so we have to allow it here if we're not going to start this thread.
972 */
973 if ((wmw->dwStatus != MCI_MODE_STOP) && ((wmw->dwStatus != MCI_MODE_RECORD) && (dwFlags & MCI_WAIT))) {
974 return MCIERR_INTERNAL;
975 }
976
977 wmw->dwStatus = MCI_MODE_RECORD;
978
979 if (!(dwFlags & MCI_WAIT)) {
980 return MCI_SendCommandAsync(wmw->openParms.wDeviceID, MCI_RECORD, dwFlags,
981 (DWORD_PTR)lpParms, sizeof(MCI_RECORD_PARMS));
982 }
983
984 /* FIXME: we only re-create the RIFF structure from an existing file (if any)
985 * we don't modify the wave part of an existing file (ie. we always erase an
986 * existing content, we don't overwrite)
987 */
988 HeapFree(GetProcessHeap(), 0, (void*)wmw->openParms.lpstrElementName);
989 dwRet = create_tmp_file(&wmw->hFile, (WCHAR**)&wmw->openParms.lpstrElementName);
990 if (dwRet != 0) return dwRet;
991
992 /* new RIFF file */
993 dwRet = WAVE_mciCreateRIFFSkeleton(wmw);
994 if (dwRet != 0) return dwRet; /* FIXME: we leak resources */
995
996 end = 0xFFFFFFFF;
997 if (lpParms && (dwFlags & MCI_FROM)) {
998 wmw->dwPosition = WAVE_ConvertTimeFormatToByte(wmw, lpParms->dwFrom);
999 }
1000
1001 if (lpParms && (dwFlags & MCI_TO)) {
1002 end = WAVE_ConvertTimeFormatToByte(wmw, lpParms->dwTo);
1003 }
1004
1005 TRACE("Recording from byte=%u to byte=%u\n", wmw->dwPosition, end);
1006
1007 if (end <= wmw->dwPosition)
1008 {
1009 return TRUE;
1010 }
1011
1012 #define WAVE_ALIGN_ON_BLOCK(wmw,v) \
1013 ((((v) + (wmw)->lpWaveFormat->nBlockAlign - 1) / (wmw)->lpWaveFormat->nBlockAlign) * (wmw)->lpWaveFormat->nBlockAlign)
1014
1015 wmw->dwPosition = WAVE_ALIGN_ON_BLOCK(wmw, wmw->dwPosition);
1016 wmw->ckWaveData.cksize = WAVE_ALIGN_ON_BLOCK(wmw, wmw->ckWaveData.cksize);
1017
1018 /* Go back to the beginning of the chunk plus the requested position */
1019 /* FIXME: I'm not sure this is correct, notably because some data linked to
1020 * the decompression state machine will not be correctly initialized.
1021 * Try it this way (other way would be to decompress from 0 up to dwPosition
1022 * and to start sending to hWave when dwPosition is reached).
1023 */
1024 mmioSeek(wmw->hFile, wmw->ckWaveData.dwDataOffset + wmw->dwPosition, SEEK_SET); /* >= 0 */
1025
1026 /* By default the device will be opened for output, the MCI_CUE function is there to
1027 * change from output to input and back
1028 */
1029 /* FIXME: how to choose between several output channels ? here mapper is forced */
1030 dwRet = waveInOpen((HWAVEIN*)&wmw->hWave, WAVE_MAPPER, wmw->lpWaveFormat,
1031 (DWORD_PTR)WAVE_mciRecordCallback, (DWORD_PTR)wmw, CALLBACK_FUNCTION);
1032
1033 if (dwRet != MMSYSERR_NOERROR) {
1034 TRACE("Can't open low level audio device %d\n", dwRet);
1035 dwRet = MCIERR_DEVICE_OPEN;
1036 wmw->hWave = 0;
1037 goto cleanUp;
1038 }
1039
1040 /* make it so that 3 buffers per second are needed */
1041 bufsize = WAVE_ALIGN_ON_BLOCK(wmw, wmw->lpWaveFormat->nAvgBytesPerSec / 3);
1042
1043 waveHdr = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(WAVEHDR) + 2 * bufsize);
1044 waveHdr[0].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR);
1045 waveHdr[1].lpData = (char*)waveHdr + 2 * sizeof(WAVEHDR) + bufsize;
1046 waveHdr[0].dwUser = waveHdr[1].dwUser = 0L;
1047 waveHdr[0].dwLoops = waveHdr[1].dwLoops = 0L;
1048 waveHdr[0].dwFlags = waveHdr[1].dwFlags = 0L;
1049 waveHdr[0].dwBufferLength = waveHdr[1].dwBufferLength = bufsize;
1050
1051 if (waveInPrepareHeader(wmw->hWave, &waveHdr[0], sizeof(WAVEHDR)) ||
1052 waveInPrepareHeader(wmw->hWave, &waveHdr[1], sizeof(WAVEHDR))) {
1053 dwRet = MCIERR_INTERNAL;
1054 goto cleanUp;
1055 }
1056
1057 if (waveInAddBuffer(wmw->hWave, &waveHdr[0], sizeof(WAVEHDR)) ||
1058 waveInAddBuffer(wmw->hWave, &waveHdr[1], sizeof(WAVEHDR))) {
1059 dwRet = MCIERR_INTERNAL;
1060 goto cleanUp;
1061 }
1062
1063 wmw->hEvent = CreateEventW(NULL, FALSE, FALSE, NULL);
1064 wmw->dwEventCount = 1L; /* for first buffer */
1065
1066 TRACE("Recording (normalized) from byte=%u for %u bytes\n", wmw->dwPosition, end - wmw->dwPosition);
1067
1068 dwRet = waveInStart(wmw->hWave);
1069
1070 while (wmw->dwPosition < end && wmw->dwStatus != MCI_MODE_STOP && wmw->dwStatus != MCI_MODE_NOT_READY) {
1071 WAVE_mciRecordWaitDone(wmw);
1072 }
1073
1074 /* needed so that the callback above won't add again the buffers returned by the reset */
1075 wmw->dwStatus = MCI_MODE_STOP;
1076
1077 waveInReset(wmw->hWave);
1078
1079 waveInUnprepareHeader(wmw->hWave, &waveHdr[0], sizeof(WAVEHDR));
1080 waveInUnprepareHeader(wmw->hWave, &waveHdr[1], sizeof(WAVEHDR));
1081
1082 dwRet = 0;
1083
1084 cleanUp:
1085 HeapFree(GetProcessHeap(), 0, waveHdr);
1086
1087 if (wmw->hWave) {
1088 waveInClose(wmw->hWave);
1089 wmw->hWave = 0;
1090 }
1091 CloseHandle(wmw->hEvent);
1092
1093 if (lpParms && (dwFlags & MCI_NOTIFY)) {
1094 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
1095 wmw->openParms.wDeviceID,
1096 dwRet ? MCI_NOTIFY_FAILURE : MCI_NOTIFY_SUCCESSFUL);
1097 }
1098
1099 wmw->dwStatus = MCI_MODE_STOP;
1100
1101 return dwRet;
1102
1103 }
1104
1105 /**************************************************************************
1106 * WAVE_mciPause [internal]
1107 */
1108 static DWORD WAVE_mciPause(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
1109 {
1110 DWORD dwRet;
1111 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1112
1113 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1114
1115 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1116 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1117
1118 if (wmw->dwStatus == MCI_MODE_PLAY) {
1119 wmw->dwStatus = MCI_MODE_PAUSE;
1120 }
1121
1122 if (wmw->fInput) dwRet = waveInStop(wmw->hWave);
1123 else dwRet = waveOutPause(wmw->hWave);
1124
1125 return (dwRet == MMSYSERR_NOERROR) ? 0 : MCIERR_INTERNAL;
1126 }
1127
1128 /**************************************************************************
1129 * WAVE_mciResume [internal]
1130 */
1131 static DWORD WAVE_mciResume(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_GENERIC_PARMS lpParms)
1132 {
1133 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1134 DWORD dwRet = 0;
1135
1136 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1137
1138 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1139
1140 if (wmw->dwStatus == MCI_MODE_PAUSE) {
1141 wmw->dwStatus = MCI_MODE_PLAY;
1142 }
1143
1144 if (wmw->fInput) dwRet = waveInStart(wmw->hWave);
1145 else dwRet = waveOutRestart(wmw->hWave);
1146 return (dwRet == MMSYSERR_NOERROR) ? 0 : MCIERR_INTERNAL;
1147 }
1148
1149 /**************************************************************************
1150 * WAVE_mciSeek [internal]
1151 */
1152 static DWORD WAVE_mciSeek(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_SEEK_PARMS lpParms)
1153 {
1154 DWORD ret = 0;
1155 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1156
1157 TRACE("(%04X, %08X, %p);\n", wDevID, dwFlags, lpParms);
1158
1159 if (lpParms == NULL) {
1160 ret = MCIERR_NULL_PARAMETER_BLOCK;
1161 } else if (wmw == NULL) {
1162 ret = MCIERR_INVALID_DEVICE_ID;
1163 } else {
1164 WAVE_mciStop(wDevID, MCI_WAIT, 0);
1165
1166 if (dwFlags & MCI_SEEK_TO_START) {
1167 wmw->dwPosition = 0;
1168 } else if (dwFlags & MCI_SEEK_TO_END) {
1169 wmw->dwPosition = wmw->ckWaveData.cksize;
1170 } else if (dwFlags & MCI_TO) {
1171 wmw->dwPosition = WAVE_ConvertTimeFormatToByte(wmw, lpParms->dwTo);
1172 } else {
1173 WARN("dwFlag doesn't tell where to seek to...\n");
1174 return MCIERR_MISSING_PARAMETER;
1175 }
1176
1177 TRACE("Seeking to position=%u bytes\n", wmw->dwPosition);
1178
1179 if (dwFlags & MCI_NOTIFY) {
1180 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
1181 wmw->openParms.wDeviceID, MCI_NOTIFY_SUCCESSFUL);
1182 }
1183 }
1184 return ret;
1185 }
1186
1187 /**************************************************************************
1188 * WAVE_mciSet [internal]
1189 */
1190 static DWORD WAVE_mciSet(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_SET_PARMS lpParms)
1191 {
1192 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1193
1194 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1195
1196 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1197 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1198
1199 if (dwFlags & MCI_SET_TIME_FORMAT) {
1200 switch (lpParms->dwTimeFormat) {
1201 case MCI_FORMAT_MILLISECONDS:
1202 TRACE("MCI_FORMAT_MILLISECONDS !\n");
1203 wmw->dwMciTimeFormat = MCI_FORMAT_MILLISECONDS;
1204 break;
1205 case MCI_FORMAT_BYTES:
1206 TRACE("MCI_FORMAT_BYTES !\n");
1207 wmw->dwMciTimeFormat = MCI_FORMAT_BYTES;
1208 break;
1209 case MCI_FORMAT_SAMPLES:
1210 TRACE("MCI_FORMAT_SAMPLES !\n");
1211 wmw->dwMciTimeFormat = MCI_FORMAT_SAMPLES;
1212 break;
1213 default:
1214 WARN("Bad time format %u!\n", lpParms->dwTimeFormat);
1215 return MCIERR_BAD_TIME_FORMAT;
1216 }
1217 }
1218 if (dwFlags & MCI_SET_VIDEO) {
1219 TRACE("No support for video !\n");
1220 return MCIERR_UNSUPPORTED_FUNCTION;
1221 }
1222 if (dwFlags & MCI_SET_DOOR_OPEN) {
1223 TRACE("No support for door open !\n");
1224 return MCIERR_UNSUPPORTED_FUNCTION;
1225 }
1226 if (dwFlags & MCI_SET_DOOR_CLOSED) {
1227 TRACE("No support for door close !\n");
1228 return MCIERR_UNSUPPORTED_FUNCTION;
1229 }
1230 if (dwFlags & MCI_SET_AUDIO) {
1231 if (dwFlags & MCI_SET_ON) {
1232 TRACE("MCI_SET_ON audio !\n");
1233 } else if (dwFlags & MCI_SET_OFF) {
1234 TRACE("MCI_SET_OFF audio !\n");
1235 } else {
1236 WARN("MCI_SET_AUDIO without SET_ON or SET_OFF\n");
1237 return MCIERR_BAD_INTEGER;
1238 }
1239
1240 switch (lpParms->dwAudio)
1241 {
1242 case MCI_SET_AUDIO_ALL: TRACE("MCI_SET_AUDIO_ALL !\n"); break;
1243 case MCI_SET_AUDIO_LEFT: TRACE("MCI_SET_AUDIO_LEFT !\n"); break;
1244 case MCI_SET_AUDIO_RIGHT: TRACE("MCI_SET_AUDIO_RIGHT !\n"); break;
1245 default: WARN("Unknown audio channel %u\n", lpParms->dwAudio); break;
1246 }
1247 }
1248 if (dwFlags & MCI_WAVE_INPUT)
1249 TRACE("MCI_WAVE_INPUT !\n");
1250 if (dwFlags & MCI_WAVE_OUTPUT)
1251 TRACE("MCI_WAVE_OUTPUT !\n");
1252 if (dwFlags & MCI_WAVE_SET_ANYINPUT)
1253 TRACE("MCI_WAVE_SET_ANYINPUT !\n");
1254 if (dwFlags & MCI_WAVE_SET_ANYOUTPUT)
1255 TRACE("MCI_WAVE_SET_ANYOUTPUT !\n");
1256 if (dwFlags & MCI_WAVE_SET_AVGBYTESPERSEC) {
1257 wmw->wfxRef.nAvgBytesPerSec = ((LPMCI_WAVE_SET_PARMS)lpParms)->nAvgBytesPerSec;
1258 TRACE("MCI_WAVE_SET_AVGBYTESPERSEC = %d\n", wmw->wfxRef.nAvgBytesPerSec);
1259 }
1260 if (dwFlags & MCI_WAVE_SET_BITSPERSAMPLE) {
1261 wmw->wfxRef.wBitsPerSample = ((LPMCI_WAVE_SET_PARMS)lpParms)->wBitsPerSample;
1262 TRACE("MCI_WAVE_SET_BITSPERSAMPLE = %d\n", wmw->wfxRef.wBitsPerSample);
1263 }
1264 if (dwFlags & MCI_WAVE_SET_BLOCKALIGN) {
1265 wmw->wfxRef.nBlockAlign = ((LPMCI_WAVE_SET_PARMS)lpParms)->nBlockAlign;
1266 TRACE("MCI_WAVE_SET_BLOCKALIGN = %d\n", wmw->wfxRef.nBlockAlign);
1267 }
1268 if (dwFlags & MCI_WAVE_SET_CHANNELS) {
1269 wmw->wfxRef.nChannels = ((LPMCI_WAVE_SET_PARMS)lpParms)->nChannels;
1270 TRACE("MCI_WAVE_SET_CHANNELS = %d\n", wmw->wfxRef.nChannels);
1271 }
1272 if (dwFlags & MCI_WAVE_SET_FORMATTAG) {
1273 wmw->wfxRef.wFormatTag = ((LPMCI_WAVE_SET_PARMS)lpParms)->wFormatTag;
1274 TRACE("MCI_WAVE_SET_FORMATTAG = %d\n", wmw->wfxRef.wFormatTag);
1275 }
1276 if (dwFlags & MCI_WAVE_SET_SAMPLESPERSEC) {
1277 wmw->wfxRef.nSamplesPerSec = ((LPMCI_WAVE_SET_PARMS)lpParms)->nSamplesPerSec;
1278 TRACE("MCI_WAVE_SET_SAMPLESPERSEC = %d\n", wmw->wfxRef.nSamplesPerSec);
1279 }
1280 return 0;
1281 }
1282
1283 /**************************************************************************
1284 * WAVE_mciSave [internal]
1285 */
1286 static DWORD WAVE_mciSave(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_SAVE_PARMSW lpParms)
1287 {
1288 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1289 DWORD ret = MCIERR_FILE_NOT_SAVED, tmpRet;
1290 WPARAM wparam = MCI_NOTIFY_FAILURE;
1291
1292 TRACE("%d, %08X, %p);\n", wDevID, dwFlags, lpParms);
1293 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1294 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1295
1296 if (dwFlags & MCI_WAIT)
1297 {
1298 FIXME("MCI_WAIT not implemented\n");
1299 }
1300 WAVE_mciStop(wDevID, 0, NULL);
1301
1302 ret = mmioAscend(wmw->hFile, &wmw->ckWaveData, 0);
1303 ret = mmioAscend(wmw->hFile, &wmw->ckMainRIFF, 0);
1304
1305 ret = mmioClose(wmw->hFile, 0);
1306 wmw->hFile = 0;
1307
1308 /*
1309 If the destination file already exists, it has to be overwritten. (Behaviour
1310 verified in Windows (2000)). If it doesn't overwrite, it is breaking one of
1311 my applications. We are making use of mmioRename, which WILL NOT overwrite
1312 the destination file (which is what Windows does, also verified in Win2K)
1313 So, lets delete the destination file before calling mmioRename. If the
1314 destination file DOESN'T exist, the delete will fail silently. Let's also be
1315 careful not to lose our previous error code.
1316 */
1317 tmpRet = GetLastError();
1318 DeleteFileW (lpParms->lpfilename);
1319 SetLastError(tmpRet);
1320
1321 if (0 == mmioRenameW(wmw->openParms.lpstrElementName, lpParms->lpfilename, 0, 0 )) {
1322 ret = MMSYSERR_NOERROR;
1323 }
1324
1325 if (dwFlags & MCI_NOTIFY) {
1326 if (ret == MMSYSERR_NOERROR) wparam = MCI_NOTIFY_SUCCESSFUL;
1327
1328 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
1329 wmw->openParms.wDeviceID, wparam);
1330 }
1331
1332 if (ret == MMSYSERR_NOERROR)
1333 ret = WAVE_mciOpenFile(wmw, lpParms->lpfilename);
1334
1335 return ret;
1336 }
1337
1338 /**************************************************************************
1339 * WAVE_mciStatus [internal]
1340 */
1341 static DWORD WAVE_mciStatus(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_STATUS_PARMS lpParms)
1342 {
1343 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1344 DWORD ret = 0;
1345
1346 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1347 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1348 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1349
1350 if (dwFlags & MCI_STATUS_ITEM) {
1351 switch (lpParms->dwItem) {
1352 case MCI_STATUS_CURRENT_TRACK:
1353 lpParms->dwReturn = 1;
1354 TRACE("MCI_STATUS_CURRENT_TRACK => %lu\n", lpParms->dwReturn);
1355 break;
1356 case MCI_STATUS_LENGTH:
1357 if (!wmw->hFile) {
1358 lpParms->dwReturn = 0;
1359 return MCIERR_UNSUPPORTED_FUNCTION;
1360 }
1361 /* only one track in file is currently handled, so don't take care of MCI_TRACK flag */
1362 lpParms->dwReturn = WAVE_ConvertByteToTimeFormat(wmw, wmw->ckWaveData.cksize, &ret);
1363 TRACE("MCI_STATUS_LENGTH => %lu\n", lpParms->dwReturn);
1364 break;
1365 case MCI_STATUS_MODE:
1366 TRACE("MCI_STATUS_MODE => %u\n", wmw->dwStatus);
1367 lpParms->dwReturn = MAKEMCIRESOURCE(wmw->dwStatus, wmw->dwStatus);
1368 ret = MCI_RESOURCE_RETURNED;
1369 break;
1370 case MCI_STATUS_MEDIA_PRESENT:
1371 TRACE("MCI_STATUS_MEDIA_PRESENT => TRUE!\n");
1372 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1373 ret = MCI_RESOURCE_RETURNED;
1374 break;
1375 case MCI_STATUS_NUMBER_OF_TRACKS:
1376 /* only one track in file is currently handled, so don't take care of MCI_TRACK flag */
1377 lpParms->dwReturn = 1;
1378 TRACE("MCI_STATUS_NUMBER_OF_TRACKS => %lu\n", lpParms->dwReturn);
1379 break;
1380 case MCI_STATUS_POSITION:
1381 if (!wmw->hFile) {
1382 lpParms->dwReturn = 0;
1383 return MCIERR_UNSUPPORTED_FUNCTION;
1384 }
1385 /* only one track in file is currently handled, so don't take care of MCI_TRACK flag */
1386 lpParms->dwReturn = WAVE_ConvertByteToTimeFormat(wmw,
1387 (dwFlags & MCI_STATUS_START) ? 0 : wmw->dwPosition,
1388 &ret);
1389 TRACE("MCI_STATUS_POSITION %s => %lu\n",
1390 (dwFlags & MCI_STATUS_START) ? "start" : "current", lpParms->dwReturn);
1391 break;
1392 case MCI_STATUS_READY:
1393 lpParms->dwReturn = (wmw->dwStatus == MCI_MODE_NOT_READY) ?
1394 MAKEMCIRESOURCE(FALSE, MCI_FALSE) : MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1395 TRACE("MCI_STATUS_READY => %u!\n", LOWORD(lpParms->dwReturn));
1396 ret = MCI_RESOURCE_RETURNED;
1397 break;
1398 case MCI_STATUS_TIME_FORMAT:
1399 lpParms->dwReturn = MAKEMCIRESOURCE(wmw->dwMciTimeFormat, MCI_FORMAT_RETURN_BASE + wmw->dwMciTimeFormat);
1400 TRACE("MCI_STATUS_TIME_FORMAT => %lu\n", lpParms->dwReturn);
1401 ret = MCI_RESOURCE_RETURNED;
1402 break;
1403 case MCI_WAVE_INPUT:
1404 TRACE("MCI_WAVE_INPUT !\n");
1405 lpParms->dwReturn = 0;
1406 ret = MCIERR_WAVE_INPUTUNSPECIFIED;
1407 break;
1408 case MCI_WAVE_OUTPUT:
1409 TRACE("MCI_WAVE_OUTPUT !\n");
1410 {
1411 UINT id;
1412 if (waveOutGetID(wmw->hWave, &id) == MMSYSERR_NOERROR) {
1413 lpParms->dwReturn = id;
1414 } else {
1415 lpParms->dwReturn = 0;
1416 ret = MCIERR_WAVE_INPUTUNSPECIFIED;
1417 }
1418 }
1419 break;
1420 case MCI_WAVE_STATUS_AVGBYTESPERSEC:
1421 if (!wmw->hFile) {
1422 lpParms->dwReturn = 0;
1423 return MCIERR_UNSUPPORTED_FUNCTION;
1424 }
1425 lpParms->dwReturn = wmw->lpWaveFormat->nAvgBytesPerSec;
1426 TRACE("MCI_WAVE_STATUS_AVGBYTESPERSEC => %lu\n", lpParms->dwReturn);
1427 break;
1428 case MCI_WAVE_STATUS_BITSPERSAMPLE:
1429 if (!wmw->hFile) {
1430 lpParms->dwReturn = 0;
1431 return MCIERR_UNSUPPORTED_FUNCTION;
1432 }
1433 lpParms->dwReturn = wmw->lpWaveFormat->wBitsPerSample;
1434 TRACE("MCI_WAVE_STATUS_BITSPERSAMPLE => %lu\n", lpParms->dwReturn);
1435 break;
1436 case MCI_WAVE_STATUS_BLOCKALIGN:
1437 if (!wmw->hFile) {
1438 lpParms->dwReturn = 0;
1439 return MCIERR_UNSUPPORTED_FUNCTION;
1440 }
1441 lpParms->dwReturn = wmw->lpWaveFormat->nBlockAlign;
1442 TRACE("MCI_WAVE_STATUS_BLOCKALIGN => %lu\n", lpParms->dwReturn);
1443 break;
1444 case MCI_WAVE_STATUS_CHANNELS:
1445 if (!wmw->hFile) {
1446 lpParms->dwReturn = 0;
1447 return MCIERR_UNSUPPORTED_FUNCTION;
1448 }
1449 lpParms->dwReturn = wmw->lpWaveFormat->nChannels;
1450 TRACE("MCI_WAVE_STATUS_CHANNELS => %lu\n", lpParms->dwReturn);
1451 break;
1452 case MCI_WAVE_STATUS_FORMATTAG:
1453 if (!wmw->hFile) {
1454 lpParms->dwReturn = 0;
1455 return MCIERR_UNSUPPORTED_FUNCTION;
1456 }
1457 lpParms->dwReturn = wmw->lpWaveFormat->wFormatTag;
1458 TRACE("MCI_WAVE_FORMATTAG => %lu\n", lpParms->dwReturn);
1459 break;
1460 case MCI_WAVE_STATUS_LEVEL:
1461 TRACE("MCI_WAVE_STATUS_LEVEL !\n");
1462 lpParms->dwReturn = 0xAAAA5555;
1463 break;
1464 case MCI_WAVE_STATUS_SAMPLESPERSEC:
1465 if (!wmw->hFile) {
1466 lpParms->dwReturn = 0;
1467 return MCIERR_UNSUPPORTED_FUNCTION;
1468 }
1469 lpParms->dwReturn = wmw->lpWaveFormat->nSamplesPerSec;
1470 TRACE("MCI_WAVE_STATUS_SAMPLESPERSEC => %lu\n", lpParms->dwReturn);
1471 break;
1472 default:
1473 WARN("unknown command %08X !\n", lpParms->dwItem);
1474 return MCIERR_UNRECOGNIZED_COMMAND;
1475 }
1476 }
1477 if (dwFlags & MCI_NOTIFY) {
1478 mciDriverNotify(HWND_32(LOWORD(lpParms->dwCallback)),
1479 wmw->openParms.wDeviceID, MCI_NOTIFY_SUCCESSFUL);
1480 }
1481 return ret;
1482 }
1483
1484 /**************************************************************************
1485 * WAVE_mciGetDevCaps [internal]
1486 */
1487 static DWORD WAVE_mciGetDevCaps(MCIDEVICEID wDevID, DWORD dwFlags,
1488 LPMCI_GETDEVCAPS_PARMS lpParms)
1489 {
1490 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1491 DWORD ret = 0;
1492
1493 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1494
1495 if (lpParms == NULL) return MCIERR_NULL_PARAMETER_BLOCK;
1496 if (wmw == NULL) return MCIERR_INVALID_DEVICE_ID;
1497
1498 if (dwFlags & MCI_GETDEVCAPS_ITEM) {
1499 switch(lpParms->dwItem) {
1500 case MCI_GETDEVCAPS_DEVICE_TYPE:
1501 lpParms->dwReturn = MAKEMCIRESOURCE(MCI_DEVTYPE_WAVEFORM_AUDIO, MCI_DEVTYPE_WAVEFORM_AUDIO);
1502 ret = MCI_RESOURCE_RETURNED;
1503 break;
1504 case MCI_GETDEVCAPS_HAS_AUDIO:
1505 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1506 ret = MCI_RESOURCE_RETURNED;
1507 break;
1508 case MCI_GETDEVCAPS_HAS_VIDEO:
1509 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
1510 ret = MCI_RESOURCE_RETURNED;
1511 break;
1512 case MCI_GETDEVCAPS_USES_FILES:
1513 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1514 ret = MCI_RESOURCE_RETURNED;
1515 break;
1516 case MCI_GETDEVCAPS_COMPOUND_DEVICE:
1517 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1518 ret = MCI_RESOURCE_RETURNED;
1519 break;
1520 case MCI_GETDEVCAPS_CAN_RECORD:
1521 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1522 ret = MCI_RESOURCE_RETURNED;
1523 break;
1524 case MCI_GETDEVCAPS_CAN_EJECT:
1525 lpParms->dwReturn = MAKEMCIRESOURCE(FALSE, MCI_FALSE);
1526 ret = MCI_RESOURCE_RETURNED;
1527 break;
1528 case MCI_GETDEVCAPS_CAN_PLAY:
1529 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1530 ret = MCI_RESOURCE_RETURNED;
1531 break;
1532 case MCI_GETDEVCAPS_CAN_SAVE:
1533 lpParms->dwReturn = MAKEMCIRESOURCE(TRUE, MCI_TRUE);
1534 ret = MCI_RESOURCE_RETURNED;
1535 break;
1536 case MCI_WAVE_GETDEVCAPS_INPUTS:
1537 lpParms->dwReturn = 1;
1538 break;
1539 case MCI_WAVE_GETDEVCAPS_OUTPUTS:
1540 lpParms->dwReturn = 1;
1541 break;
1542 default:
1543 FIXME("Unknown capability (%08x) !\n", lpParms->dwItem);
1544 return MCIERR_UNRECOGNIZED_COMMAND;
1545 }
1546 } else {
1547 WARN("No GetDevCaps-Item !\n");
1548 return MCIERR_UNRECOGNIZED_COMMAND;
1549 }
1550 return ret;
1551 }
1552
1553 /**************************************************************************
1554 * WAVE_mciInfo [internal]
1555 */
1556 static DWORD WAVE_mciInfo(MCIDEVICEID wDevID, DWORD dwFlags, LPMCI_INFO_PARMSW lpParms)
1557 {
1558 DWORD ret = 0;
1559 LPCWSTR str = 0;
1560 WINE_MCIWAVE* wmw = WAVE_mciGetOpenDev(wDevID);
1561
1562 TRACE("(%u, %08X, %p);\n", wDevID, dwFlags, lpParms);
1563
1564 if (lpParms == NULL || lpParms->lpstrReturn == NULL) {
1565 ret = MCIERR_NULL_PARAMETER_BLOCK;
1566 } else if (wmw == NULL) {
1567 ret = MCIERR_INVALID_DEVICE_ID;
1568 } else {
1569 static const WCHAR wszAudio [] = {'W','i','n','e','\'','s',' ','a','u','d','i','o',' ','p','l','a','y','e','r',0};
1570 static const WCHAR wszWaveIn [] = {'W','i','n','e',' ','W','a','v','e',' ','I','n',0};
1571 static const WCHAR wszWaveOut[] = {'W','i','n','e',' ','W','a','v','e',' ','O','u','t',0};
1572
1573 TRACE("buf=%p, len=%u\n", lpParms->lpstrReturn, lpParms->dwRetSize);
1574
1575 switch (dwFlags & ~(MCI_WAIT|MCI_NOTIFY)) {
1576 case MCI_INFO_PRODUCT: str = wszAudio; break;
1577 case MCI_INFO_FILE: str = wmw->openParms.lpstrElementName; break;
1578 case MCI_WAVE_INPUT: str = wszWaveIn; break;
1579 case MCI_WAVE_OUTPUT: str = wszWaveOut; break;
1580 default:
1581 WARN("Don't know this info command (%u)\n", dwFlags);
1582 ret = MCIERR_UNRECOGNIZED_COMMAND;
1583 }
1584 }
1585 if (str) {
1586 if (strlenW(str) + 1 > lpParms->dwRetSize) {
1587 ret = MCIERR_PARAM_OVERFLOW;
1588 } else {
1589 lstrcpynW(lpParms->lpstrReturn, str, lpParms->dwRetSize);
1590 }
1591 } else {
1592 lpParms->lpstrReturn[0] = 0;
1593 }
1594
1595 return ret;
1596 }
1597
1598 /**************************************************************************
1599 * DriverProc (MCIWAVE.@)
1600 */
1601 LRESULT CALLBACK MCIWAVE_DriverProc(DWORD_PTR dwDevID, HDRVR hDriv, UINT wMsg,
1602 LPARAM dwParam1, LPARAM dwParam2)
1603 {
1604 TRACE("(%08lX, %p, %08X, %08lX, %08lX)\n",
1605 dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1606
1607 switch (wMsg) {
1608 case DRV_LOAD: return 1;
1609 case DRV_FREE: return 1;
1610 case DRV_OPEN: return WAVE_drvOpen((LPCWSTR)dwParam1, (LPMCI_OPEN_DRIVER_PARMSW)dwParam2);
1611 case DRV_CLOSE: return WAVE_drvClose(dwDevID);
1612 case DRV_ENABLE: return 1;
1613 case DRV_DISABLE: return 1;
1614 case DRV_QUERYCONFIGURE: return 1;
1615 case DRV_CONFIGURE: MessageBoxA(0, "Sample MultiMedia Driver !", "OSS Driver", MB_OK); return 1;
1616 case DRV_INSTALL: return DRVCNF_RESTART;
1617 case DRV_REMOVE: return DRVCNF_RESTART;
1618 }
1619
1620 if (dwDevID == 0xFFFFFFFF) return MCIERR_UNSUPPORTED_FUNCTION;
1621
1622 switch (wMsg) {
1623 case MCI_OPEN_DRIVER: return WAVE_mciOpen (dwDevID, dwParam1, (LPMCI_WAVE_OPEN_PARMSW) dwParam2);
1624 case MCI_CLOSE_DRIVER: return WAVE_mciClose (dwDevID, dwParam1, (LPMCI_GENERIC_PARMS) dwParam2);
1625 case MCI_CUE: return WAVE_mciCue (dwDevID, dwParam1, (LPMCI_GENERIC_PARMS) dwParam2);
1626 case MCI_PLAY: return WAVE_mciPlay (dwDevID, dwParam1, (LPMCI_PLAY_PARMS) dwParam2);
1627 case MCI_RECORD: return WAVE_mciRecord (dwDevID, dwParam1, (LPMCI_RECORD_PARMS) dwParam2);
1628 case MCI_STOP: return WAVE_mciStop (dwDevID, dwParam1, (LPMCI_GENERIC_PARMS) dwParam2);
1629 case MCI_SET: return WAVE_mciSet (dwDevID, dwParam1, (LPMCI_SET_PARMS) dwParam2);
1630 case MCI_PAUSE: return WAVE_mciPause (dwDevID, dwParam1, (LPMCI_GENERIC_PARMS) dwParam2);
1631 case MCI_RESUME: return WAVE_mciResume (dwDevID, dwParam1, (LPMCI_GENERIC_PARMS) dwParam2);
1632 case MCI_STATUS: return WAVE_mciStatus (dwDevID, dwParam1, (LPMCI_STATUS_PARMS) dwParam2);
1633 case MCI_GETDEVCAPS: return WAVE_mciGetDevCaps(dwDevID, dwParam1, (LPMCI_GETDEVCAPS_PARMS) dwParam2);
1634 case MCI_INFO: return WAVE_mciInfo (dwDevID, dwParam1, (LPMCI_INFO_PARMSW) dwParam2);
1635 case MCI_SEEK: return WAVE_mciSeek (dwDevID, dwParam1, (LPMCI_SEEK_PARMS) dwParam2);
1636 case MCI_SAVE: return WAVE_mciSave (dwDevID, dwParam1, (LPMCI_SAVE_PARMSW) dwParam2);
1637 /* commands that should be supported */
1638 case MCI_LOAD:
1639 case MCI_FREEZE:
1640 case MCI_PUT:
1641 case MCI_REALIZE:
1642 case MCI_UNFREEZE:
1643 case MCI_UPDATE:
1644 case MCI_WHERE:
1645 case MCI_STEP:
1646 case MCI_SPIN:
1647 case MCI_ESCAPE:
1648 case MCI_COPY:
1649 case MCI_CUT:
1650 case MCI_DELETE:
1651 case MCI_PASTE:
1652 FIXME("Unsupported yet command [%u]\n", wMsg);
1653 break;
1654 case MCI_WINDOW:
1655 TRACE("Unsupported command [%u]\n", wMsg);
1656 break;
1657 /* option which can be silenced */
1658 case MCI_CONFIGURE:
1659 return 0;
1660 case MCI_OPEN:
1661 case MCI_CLOSE:
1662 ERR("Shouldn't receive a MCI_OPEN or CLOSE message\n");
1663 break;
1664 default:
1665 FIXME("is probably wrong msg [%u]\n", wMsg);
1666 return DefDriverProc(dwDevID, hDriv, wMsg, dwParam1, dwParam2);
1667 }
1668 return MCIERR_UNRECOGNIZED_COMMAND;
1669 }
useful hacks and other patches not (yet) suitable for mainline