?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Fixed some of the issues reported by winapi-check.
[wine.git] / multimedia / mmsystem.c
blob423f34854ad3f47a2c6b038fe8203aa43ee08581
1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
2
3 /*
4 * MMSYTEM functions
5 *
6 * Copyright 1993 Martin Ayotte
7 */
8
9 /*
10 * Eric POUECH :
11 * 98/9 added Win32 MCI support
12 * 99/4 added mmTask and mmThread functions support
13 * added midiStream support
14 */
15
16 /* FIXME: I think there are some segmented vs. linear pointer weirdnesses
17 * and long term pointers to 16 bit space in here
18 */
19
20 #include <string.h>
21
22 #include "winbase.h"
23 #include "wine/winbase16.h"
24 #include "heap.h"
25 #include "user.h"
26 #include "driver.h"
27 #include "multimedia.h"
28 #include "syslevel.h"
29 #include "callback.h"
30 #include "selectors.h"
31 #include "module.h"
32 #include "debugtools.h"
33
34 DEFAULT_DEBUG_CHANNEL(mmsys)
35
36 LONG WINAPI DrvDefDriverProc(DWORD dwDevID, HDRVR16 hDrv, WORD wMsg,
37 DWORD dwParam1, DWORD dwParam2);
38
39 static LPWINE_MM_IDATA lpFirstIData = NULL;
40
41 /**************************************************************************
42 * MULTIMEDIA_GetIData [internal]
43 */
44 LPWINE_MM_IDATA MULTIMEDIA_GetIData(void)
45 {
46 DWORD pid = GetCurrentProcessId();
47 LPWINE_MM_IDATA iData;
48
49 for (iData = lpFirstIData; iData; iData = iData->lpNextIData) {
50 if (iData->dwThisProcess == pid)
51 break;
52 }
53 return iData;
54 }
55
56 /**************************************************************************
57 * WINMM_LibMain [EntryPoint]
58 *
59 * WINMM DLL entry point
60 *
61 */
62 BOOL WINAPI WINMM_LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad)
63 {
64 static BOOL bInitDone = FALSE;
65 LPWINE_MM_IDATA iData;
66
67 TRACE("0x%x 0x%lx %p\n", hinstDLL, fdwReason, fImpLoad);
68
69 switch (fdwReason) {
70 case DLL_PROCESS_ATTACH:
71 if (!bInitDone) { /* to be done only once */
72 if (!MULTIMEDIA_MidiInit() || !MULTIMEDIA_MciInit()) {
73 return FALSE;
74 }
75 bInitDone = TRUE;
76 }
77 iData = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WINE_MM_IDATA));
78 if (!iData)
79 return FALSE;
80 iData->hWinMM32Instance = hinstDLL;
81 iData->dwThisProcess = GetCurrentProcessId();
82 iData->lpNextIData = lpFirstIData;
83 lpFirstIData = iData;
84 InitializeCriticalSection(&iData->cs);
85 break;
86 case DLL_PROCESS_DETACH:
87 iData = MULTIMEDIA_GetIData();
88 if (iData) {
89 LPWINE_MM_IDATA* ppid;
90
91 for (ppid = &lpFirstIData; *ppid; ppid = &(*ppid)->lpNextIData) {
92 if (*ppid == iData) {
93 *ppid = iData->lpNextIData;
94 break;
95 }
96 }
97 } else {
98 ERR("Idata is NULL, please report\n");
99 return FALSE;
100 }
101 /* FIXME: should also free content and resources allocated inside iData */
102 HeapFree(GetProcessHeap(), 0, iData);
103 break;
104 case DLL_THREAD_ATTACH:
105 case DLL_THREAD_DETACH:
106 break;
107 }
108 return TRUE;
109 }
110
111 /**************************************************************************
112 * MMSYSTEM_LibMain [EntryPoint]
113 *
114 * MMSYSTEM DLL entry point
115 *
116 */
117 BOOL WINAPI MMSYSTEM_LibMain(DWORD fdwReason, HINSTANCE hinstDLL, WORD ds,
118 WORD wHeapSize, DWORD dwReserved1, WORD wReserved2)
119 {
120 HANDLE hndl;
121 LPWINE_MM_IDATA iData;
122
123 TRACE("0x%x 0x%lx\n", hinstDLL, fdwReason);
124
125 switch (fdwReason) {
126 case DLL_PROCESS_ATTACH:
127 /* need to load WinMM in order to:
128 * - correctly initiates shared variables (MULTIMEDIA_Init())
129 * - correctly creates the per process WINE_MM_IDATA chunk
130 */
131 hndl = LoadLibraryA("WINMM.DLL");
132
133 if (!hndl) {
134 ERR("Could not load sibling WinMM.dll\n");
135 return FALSE;
136 }
137 iData = MULTIMEDIA_GetIData();
138 if (!iData) {ERR("Idata is NULL, please report\n"); return FALSE;}
139 iData->hWinMM16Instance = hinstDLL;
140 iData->h16Module32 = hndl;
141 break;
142 case DLL_PROCESS_DETACH:
143 iData = MULTIMEDIA_GetIData();
144 if (!iData) {
145 ERR("Idata is NULL, please report\n");
146 return FALSE;
147 }
148 FreeLibrary(iData->h16Module32);
149 break;
150 case DLL_THREAD_ATTACH:
151 case DLL_THREAD_DETACH:
152 break;
153 }
154 return TRUE;
155 }
156
157 /**************************************************************************
158 * MMSYSTEM_WEP [MMSYSTEM.1]
159 */
160 int WINAPI MMSYSTEM_WEP(HINSTANCE16 hInstance, WORD wDataSeg,
161 WORD cbHeapSize, LPSTR lpCmdLine)
162 {
163 FIXME("STUB: Unloading MMSystem DLL ... hInst=%04X \n", hInstance);
164 return TRUE;
165 }
166
167 static void MMSYSTEM_MMTIME32to16(LPMMTIME16 mmt16, const MMTIME* mmt32)
168 {
169 mmt16->wType = mmt32->wType;
170 /* layout of rest is the same for 32/16,
171 * Note: mmt16->u is 2 bytes smaller than mmt32->u, which has padding
172 */
173 memcpy(&(mmt16->u), &(mmt32->u), sizeof(mmt16->u));
174 }
175
176 static void MMSYSTEM_MMTIME16to32(LPMMTIME mmt32, const MMTIME16* mmt16)
177 {
178 mmt32->wType = mmt16->wType;
179 /* layout of rest is the same for 32/16,
180 * Note: mmt16->u is 2 bytes smaller than mmt32->u, which has padding
181 */
182 memcpy(&(mmt32->u), &(mmt16->u), sizeof(mmt16->u));
183 }
184
185 static HANDLE PlaySound_hThread = 0;
186 static HANDLE PlaySound_hPlayEvent = 0;
187 static HANDLE PlaySound_hReadyEvent = 0;
188 static HANDLE PlaySound_hMiddleEvent = 0;
189 static BOOL PlaySound_Result = FALSE;
190 static int PlaySound_Stop = FALSE;
191 static int PlaySound_Playing = FALSE;
192
193 static LPCSTR PlaySound_pszSound = NULL;
194 static HMODULE PlaySound_hmod = 0;
195 static DWORD PlaySound_fdwSound = 0;
196 static int PlaySound_Loop = FALSE;
197 static int PlaySound_SearchMode = 0; /* 1 - sndPlaySound search order
198 2 - PlaySound order */
199
200 static HMMIO16 get_mmioFromFile(LPCSTR lpszName)
201 {
202 return mmioOpen16((LPSTR)lpszName, NULL,
203 MMIO_ALLOCBUF | MMIO_READ | MMIO_DENYWRITE);
204 }
205
206 static HMMIO16 get_mmioFromProfile(UINT uFlags, LPCSTR lpszName)
207 {
208 char str[128];
209 LPSTR ptr;
210 HMMIO16 hmmio;
211
212 TRACE("searching in SystemSound List !\n");
213 GetProfileStringA("Sounds", (LPSTR)lpszName, "", str, sizeof(str));
214 if (strlen(str) == 0) {
215 if (uFlags & SND_NODEFAULT) return 0;
216 GetProfileStringA("Sounds", "Default", "", str, sizeof(str));
217 if (strlen(str) == 0) return 0;
218 }
219 if ((ptr = (LPSTR)strchr(str, ',')) != NULL) *ptr = '\0';
220 hmmio = get_mmioFromFile(str);
221 if (hmmio == 0) {
222 WARN("can't find SystemSound='%s' !\n", str);
223 return 0;
224 }
225 return hmmio;
226 }
227
228 static BOOL16 WINAPI proc_PlaySound(LPCSTR lpszSoundName, UINT uFlags)
229 {
230 BOOL16 bRet = FALSE;
231 HMMIO16 hmmio;
232 MMCKINFO ckMainRIFF;
233
234 TRACE("SoundName='%s' uFlags=%04X !\n", lpszSoundName, uFlags);
235 if (lpszSoundName == NULL) {
236 TRACE("Stop !\n");
237 return FALSE;
238 }
239 if (uFlags & SND_MEMORY) {
240 MMIOINFO16 mminfo;
241 memset(&mminfo, 0, sizeof(mminfo));
242 mminfo.fccIOProc = FOURCC_MEM;
243 mminfo.pchBuffer = (LPSTR)lpszSoundName;
244 mminfo.cchBuffer = -1;
245 TRACE("Memory sound %p\n", lpszSoundName);
246 hmmio = mmioOpen16(NULL, &mminfo, MMIO_READ);
247 } else {
248 hmmio = 0;
249 if (uFlags & SND_ALIAS)
250 if ((hmmio=get_mmioFromProfile(uFlags, lpszSoundName)) == 0)
251 return FALSE;
252
253 if (uFlags & SND_FILENAME)
254 if ((hmmio=get_mmioFromFile(lpszSoundName)) == 0) return FALSE;
255
256 if (PlaySound_SearchMode == 1) {
257 PlaySound_SearchMode = 0;
258 if ((hmmio=get_mmioFromFile(lpszSoundName)) == 0)
259 if ((hmmio=get_mmioFromProfile(uFlags, lpszSoundName)) == 0)
260 return FALSE;
261 }
262
263 if (PlaySound_SearchMode == 2) {
264 PlaySound_SearchMode = 0;
265 if ((hmmio=get_mmioFromProfile(uFlags | SND_NODEFAULT, lpszSoundName)) == 0)
266 if ((hmmio=get_mmioFromFile(lpszSoundName)) == 0)
267 if ((hmmio=get_mmioFromProfile(uFlags, lpszSoundName)) == 0) return FALSE;
268 }
269 }
270
271 if (mmioDescend(hmmio, &ckMainRIFF, NULL, 0) == 0) {
272 DWORD dwPos = mmioSeek(hmmio, 0, SEEK_CUR);
273 do {
274 TRACE("ParentChunk ckid=%.4s fccType=%.4s cksize=%08lX \n",
275 (LPSTR)&ckMainRIFF.ckid, (LPSTR)&ckMainRIFF.fccType,
276 ckMainRIFF.cksize);
277
278 mmioSeek(hmmio, dwPos, SEEK_SET);
279
280 if ((ckMainRIFF.ckid == FOURCC_RIFF) &&
281 (ckMainRIFF.fccType == mmioFOURCC('W', 'A', 'V', 'E'))) {
282 MMCKINFO mmckInfo;
283
284 mmckInfo.ckid = mmioFOURCC('f', 'm', 't', ' ');
285
286 if (mmioDescend(hmmio, &mmckInfo, &ckMainRIFF, MMIO_FINDCHUNK) == 0) {
287 PCMWAVEFORMAT pcmWaveFormat;
288
289 TRACE("Chunk Found ckid=%.4s fccType=%.4s cksize=%08lX \n",
290 (LPSTR)&mmckInfo.ckid, (LPSTR)&mmckInfo.fccType, mmckInfo.cksize);
291
292 if (mmioRead(hmmio, (HPSTR)&pcmWaveFormat,
293 (long) sizeof(PCMWAVEFORMAT)) == (long) sizeof(PCMWAVEFORMAT)) {
294 TRACE("wFormatTag=%04X !\n", pcmWaveFormat.wf.wFormatTag);
295 TRACE("nChannels=%d \n", pcmWaveFormat.wf.nChannels);
296 TRACE("nSamplesPerSec=%ld\n", pcmWaveFormat.wf.nSamplesPerSec);
297 TRACE("nAvgBytesPerSec=%ld\n", pcmWaveFormat.wf.nAvgBytesPerSec);
298 TRACE("nBlockAlign=%d \n", pcmWaveFormat.wf.nBlockAlign);
299 TRACE("wBitsPerSample=%u !\n", pcmWaveFormat.wBitsPerSample);
300
301 mmckInfo.ckid = mmioFOURCC('d', 'a', 't', 'a');
302 /* move to end of 'fmt ' chunk */
303 mmioSeek(hmmio, mmckInfo.dwDataOffset + ((mmckInfo.cksize + 1) & ~1), SEEK_SET);
304
305 if (mmioDescend(hmmio, &mmckInfo, &ckMainRIFF, MMIO_FINDCHUNK) == 0) {
306 WAVEOPENDESC waveDesc;
307 DWORD dwRet;
308
309 TRACE("Chunk Found ckid=%.4s fccType=%.4s cksize=%08lX\n",
310 (LPSTR)&mmckInfo.ckid, (LPSTR)&mmckInfo.fccType, mmckInfo.cksize);
311
312 pcmWaveFormat.wf.nAvgBytesPerSec = pcmWaveFormat.wf.nSamplesPerSec *
313 pcmWaveFormat.wf.nBlockAlign;
314 waveDesc.hWave = 0;
315 waveDesc.lpFormat = (LPWAVEFORMAT)&pcmWaveFormat;
316
317 dwRet = wodMessage(0, WODM_OPEN, 0, (DWORD)&waveDesc, CALLBACK_NULL);
318 if (dwRet == MMSYSERR_NOERROR) {
319 WAVEHDR waveHdr;
320 HGLOBAL16 hData;
321 INT count, bufsize, left = mmckInfo.cksize;
322
323 bufsize = 64000;
324 hData = GlobalAlloc16(GMEM_MOVEABLE, bufsize);
325 waveHdr.lpData = (LPSTR)GlobalLock16(hData);
326 waveHdr.dwBufferLength = bufsize;
327 waveHdr.dwUser = 0L;
328 waveHdr.dwFlags = 0L;
329 waveHdr.dwLoops = 0L;
330
331 dwRet = wodMessage(0, WODM_PREPARE, 0, (DWORD)&waveHdr, sizeof(WAVEHDR));
332 if (dwRet == MMSYSERR_NOERROR) {
333 while (left) {
334 if (PlaySound_Stop) {
335 PlaySound_Stop = FALSE;
336 PlaySound_Loop = FALSE;
337 break;
338 }
339 if (bufsize > left) bufsize = left;
340 count = mmioRead(hmmio, waveHdr.lpData,bufsize);
341 if (count < 1) break;
342 left -= count;
343 waveHdr.dwBufferLength = count;
344 /* FIXME */
345 waveHdr.reserved = (DWORD)&waveHdr;
346 /* waveHdr.dwBytesRecorded = count; */
347 /* FIXME: doesn't expect async ops */
348 wodMessage(0, WODM_WRITE, 0, (DWORD)&waveHdr, sizeof(WAVEHDR));
349 while (!(waveHdr.dwFlags & WHDR_DONE))
350 Sleep(10);
351 }
352 wodMessage(0, WODM_UNPREPARE, 0, (DWORD)&waveHdr, sizeof(WAVEHDR));
353 while (wodMessage(0, WODM_CLOSE, 0, 0L, 0L) == WAVERR_STILLPLAYING)
354 Sleep(100);
355
356 bRet = TRUE;
357 } else
358 WARN("can't prepare WaveOut device !\n");
359
360 GlobalUnlock16(hData);
361 GlobalFree16(hData);
362 }
363 }
364 }
365 }
366 }
367 } while (PlaySound_Loop);
368 }
369
370 if (hmmio != 0) mmioClose(hmmio, 0);
371 return bRet;
372 }
373
374 static DWORD WINAPI PlaySound_Thread(LPVOID arg)
375 {
376 DWORD res;
377
378 for (;;) {
379 PlaySound_Playing = FALSE;
380 SetEvent(PlaySound_hReadyEvent);
381 res = WaitForSingleObject(PlaySound_hPlayEvent, INFINITE);
382 ResetEvent(PlaySound_hReadyEvent);
383 SetEvent(PlaySound_hMiddleEvent);
384 if (res == WAIT_FAILED) ExitThread(2);
385 if (res != WAIT_OBJECT_0) continue;
386 PlaySound_Playing = TRUE;
387
388 if ((PlaySound_fdwSound & SND_RESOURCE) == SND_RESOURCE) {
389 HRSRC hRES;
390 HGLOBAL hGLOB;
391 void* ptr;
392
393 if ((hRES = FindResourceA(PlaySound_hmod, PlaySound_pszSound, "WAVE")) == 0) {
394 PlaySound_Result = FALSE;
395 continue;
396 }
397 if ((hGLOB = LoadResource(PlaySound_hmod, hRES)) == 0) {
398 PlaySound_Result = FALSE;
399 continue;
400 }
401 if ((ptr = LockResource(hGLOB)) == NULL) {
402 FreeResource(hGLOB);
403 PlaySound_Result = FALSE;
404 continue;
405 }
406 PlaySound_Result = proc_PlaySound(ptr,
407 ((UINT16)PlaySound_fdwSound ^ SND_RESOURCE) | SND_MEMORY);
408 FreeResource(hGLOB);
409 continue;
410 }
411 PlaySound_Result = proc_PlaySound(PlaySound_pszSound, (UINT16)PlaySound_fdwSound);
412 }
413 }
414
415 /**************************************************************************
416 * PlaySoundA [WINMM.1]
417 */
418 BOOL WINAPI PlaySoundA(LPCSTR pszSound, HMODULE hmod, DWORD fdwSound)
419 {
420 static LPSTR StrDup = NULL;
421
422 TRACE("pszSound='%p' hmod=%04X fdwSound=%08lX\n",
423 pszSound, hmod, fdwSound);
424
425 if (PlaySound_hThread == 0) { /* This is the first time they called us */
426 DWORD id;
427 if ((PlaySound_hReadyEvent = CreateEventA(NULL, TRUE, FALSE, NULL)) == 0)
428 return FALSE;
429 if ((PlaySound_hMiddleEvent = CreateEventA(NULL, FALSE, FALSE, NULL)) == 0)
430 return FALSE;
431 if ((PlaySound_hPlayEvent = CreateEventA(NULL, FALSE, FALSE, NULL)) == 0)
432 return FALSE;
433 if ((PlaySound_hThread = CreateThread(NULL, 0, PlaySound_Thread, 0, 0, &id)) == 0)
434 return FALSE;
435 }
436
437 /* FIXME? I see no difference between SND_WAIT and SND_NOSTOP ! */
438 if ((fdwSound & (SND_NOWAIT | SND_NOSTOP)) && PlaySound_Playing)
439 return FALSE;
440
441 /* Trying to stop if playing */
442 if (PlaySound_Playing) PlaySound_Stop = TRUE;
443
444 /* Waiting playing thread to get ready. I think 10 secs is ok & if not then leave*/
445 if (WaitForSingleObject(PlaySound_hReadyEvent, 1000*10) != WAIT_OBJECT_0)
446 return FALSE;
447
448 if (!pszSound || (fdwSound & SND_PURGE))
449 return FALSE; /* We stoped playing so leaving */
450
451 if (PlaySound_SearchMode != 1) PlaySound_SearchMode = 2;
452 if (!(fdwSound & SND_ASYNC)) {
453 if (fdwSound & SND_LOOP)
454 return FALSE;
455 PlaySound_pszSound = pszSound;
456 PlaySound_hmod = hmod;
457 PlaySound_fdwSound = fdwSound;
458 PlaySound_Result = FALSE;
459 SetEvent(PlaySound_hPlayEvent);
460 if (WaitForSingleObject(PlaySound_hMiddleEvent, INFINITE) != WAIT_OBJECT_0)
461 return FALSE;
462 if (WaitForSingleObject(PlaySound_hReadyEvent, INFINITE) != WAIT_OBJECT_0)
463 return FALSE;
464 return PlaySound_Result;
465 } else {
466 PlaySound_hmod = hmod;
467 PlaySound_fdwSound = fdwSound;
468 PlaySound_Result = FALSE;
469 if (StrDup) {
470 HeapFree(GetProcessHeap(), 0, StrDup);
471 StrDup = NULL;
472 }
473 if (!((fdwSound & SND_MEMORY) || ((fdwSound & SND_RESOURCE) &&
474 !((DWORD)pszSound >> 16)) || !pszSound)) {
475 StrDup = HEAP_strdupA(GetProcessHeap(), 0,pszSound);
476 PlaySound_pszSound = StrDup;
477 } else PlaySound_pszSound = pszSound;
478 PlaySound_Loop = fdwSound & SND_LOOP;
479 SetEvent(PlaySound_hPlayEvent);
480 ResetEvent(PlaySound_hMiddleEvent);
481 return TRUE;
482 }
483 return FALSE;
484 }
485
486 /**************************************************************************
487 * PlaySoundW [WINMM.18]
488 */
489 BOOL WINAPI PlaySoundW(LPCWSTR pszSound, HMODULE hmod, DWORD fdwSound)
490 {
491 LPSTR pszSoundA;
492 BOOL bSound;
493
494 if (!((fdwSound & SND_MEMORY) || ((fdwSound & SND_RESOURCE) &&
495 !((DWORD)pszSound >> 16)) || !pszSound)) {
496 pszSoundA = HEAP_strdupWtoA(GetProcessHeap(), 0,pszSound);
497 bSound = PlaySoundA(pszSoundA, hmod, fdwSound);
498 HeapFree(GetProcessHeap(), 0,pszSoundA);
499 } else
500 bSound = PlaySoundA((LPCSTR)pszSound, hmod, fdwSound);
501
502 return bSound;
503 }
504
505 /**************************************************************************
506 * PlaySound16 [MMSYSTEM.3]
507 */
508 BOOL16 WINAPI PlaySound16(LPCSTR pszSound, HMODULE16 hmod, DWORD fdwSound)
509 {
510 BOOL16 retv;
511
512 SYSLEVEL_ReleaseWin16Lock();
513 retv = PlaySoundA( pszSound, hmod, fdwSound );
514 SYSLEVEL_RestoreWin16Lock();
515
516 return retv;
517 }
518
519 /**************************************************************************
520 * sndPlaySoundA [WINMM135]
521 */
522 BOOL WINAPI sndPlaySoundA(LPCSTR lpszSoundName, UINT uFlags)
523 {
524 PlaySound_SearchMode = 1;
525 return PlaySoundA(lpszSoundName, 0, uFlags);
526 }
527
528 /**************************************************************************
529 * sndPlaySoundW [WINMM.136]
530 */
531 BOOL WINAPI sndPlaySoundW(LPCWSTR lpszSoundName, UINT uFlags)
532 {
533 PlaySound_SearchMode = 1;
534 return PlaySoundW(lpszSoundName, 0, uFlags);
535 }
536
537 /**************************************************************************
538 * sndPlaySound16 [MMSYSTEM.2]
539 */
540 BOOL16 WINAPI sndPlaySound16(LPCSTR lpszSoundName, UINT16 uFlags)
541 {
542 BOOL16 retv;
543
544 SYSLEVEL_ReleaseWin16Lock();
545 retv = sndPlaySoundA( lpszSoundName, uFlags );
546 SYSLEVEL_RestoreWin16Lock();
547
548 return retv;
549 }
550
551
552 /**************************************************************************
553 * mmsystemGetVersion [WINMM.134]
554 */
555 UINT WINAPI mmsystemGetVersion(void)
556 {
557 return mmsystemGetVersion16();
558 }
559
560 /**************************************************************************
561 * mmsystemGetVersion [MMSYSTEM.5]
562 * return value borrowed from Win95 winmm.dll ;)
563 */
564 UINT16 WINAPI mmsystemGetVersion16(void)
565 {
566 TRACE("3.10 (Win95?)\n");
567 return 0x030a;
568 }
569
570 /**************************************************************************
571 * DriverProc [MMSYSTEM.6]
572 */
573 LRESULT WINAPI DriverProc16(DWORD dwDevID, HDRVR16 hDrv, WORD wMsg,
574 DWORD dwParam1, DWORD dwParam2)
575 {
576 return DrvDefDriverProc(dwDevID, hDrv, wMsg, dwParam1, dwParam2);
577 }
578
579 /**************************************************************************
580 * DriverCallback [MMSYSTEM.31]
581 */
582 BOOL16 WINAPI DriverCallback16(DWORD dwCallBack, UINT16 uFlags, HANDLE16 hDev,
583 WORD wMsg, DWORD dwUser, DWORD dwParam1, DWORD dwParam2)
584 {
585 TRACE("(%08lX, %04X, %04X, %04X, %08lX, %08lX, %08lX); !\n",
586 dwCallBack, uFlags, hDev, wMsg, dwUser, dwParam1, dwParam2);
587
588 switch (uFlags & DCB_TYPEMASK) {
589 case DCB_NULL:
590 TRACE("Null !\n");
591 break;
592 case DCB_WINDOW:
593 TRACE("Window(%04lX) handle=%04X!\n", dwCallBack, hDev);
594 if (!IsWindow(dwCallBack) || USER_HEAP_LIN_ADDR(hDev) == NULL)
595 return FALSE;
596 Callout.PostMessageA((HWND16)dwCallBack, wMsg, hDev, dwParam1);
597 break;
598 case DCB_TASK: /* aka DCB_THREAD */
599 TRACE("Task(%04lx) !\n", dwCallBack);
600 Callout.PostThreadMessageA(dwCallBack, wMsg, hDev, dwParam1);
601 break;
602 case DCB_FUNCTION:
603 TRACE("Function (16bit) !\n");
604 Callbacks->CallDriverCallback((FARPROC16)dwCallBack, hDev, wMsg, dwUser,
605 dwParam1, dwParam2);
606 break;
607 case DCB_FUNC32: /* This is a Wine only value - AKAIF not used yet by MS */
608 TRACE("Function (32bit) !\n");
609 ((LPDRVCALLBACK)dwCallBack)(hDev, wMsg, dwUser, dwParam1, dwParam2);
610 break;
611 case DCB_EVENT:
612 TRACE("Event(%08lx) !\n", dwCallBack);
613 SetEvent((HANDLE)dwCallBack);
614 break;
615 case 6: /* I would dub it DCB_MMTHREADSIGNAL */
616 /* this is an undocumented DCB_ value used for mmThreads
617 * loword of dwCallBack contains the handle of the lpMMThd block
618 * which dwSignalCount has to be incremented
619 */
620 {
621 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(LOWORD(dwCallBack), 0);
622
623 TRACE("mmThread (%04x, %p) !\n", LOWORD(dwCallBack), lpMMThd);
624 /* same as mmThreadSignal16 */
625 InterlockedIncrement(&lpMMThd->dwSignalCount);
626 SetEvent(lpMMThd->hEvent);
627 /* some other stuff on lpMMThd->hVxD */
628 }
629 break;
630 #if 0
631 case 4:
632 /* this is an undocumented DCB_ value for... I don't know */
633 break;
634 #endif
635 default:
636 WARN("Unknown callback type %d\n", uFlags & DCB_TYPEMASK);
637 return FALSE;
638 }
639 TRACE("Done\n");
640 return TRUE;
641 }
642
643 /**************************************************************************
644 * Mixer devices. New to Win95
645 */
646
647 /**************************************************************************
648 * find out the real mixer ID depending on hmix (depends on dwFlags)
649 * FIXME: also fix dwInstance passing to mixMessage
650 */
651 static UINT MIXER_GetDevID(HMIXEROBJ hmix, DWORD dwFlags)
652 {
653 /* FIXME: Check dwFlags for MIXER_OBJSECTF_xxxx entries and modify hmix
654 * accordingly. For now we always use mixerdevice 0.
655 */
656 return 0;
657 }
658
659 /**************************************************************************
660 * mixerGetNumDevs [WINMM.108]
661 */
662 UINT WINAPI mixerGetNumDevs(void)
663 {
664 UINT16 count = mixMessage(0, MXDM_GETNUMDEVS, 0L, 0L, 0L);
665
666 TRACE("mixerGetNumDevs returns %d\n", count);
667 return count;
668 }
669
670 /**************************************************************************
671 * mixerGetNumDevs [MMSYSTEM.800]
672 */
673 UINT16 WINAPI mixerGetNumDevs16(void)
674 {
675 return mixerGetNumDevs();
676 }
677
678 /**************************************************************************
679 * mixerGetDevCapsA [WINMM.101]
680 */
681 UINT WINAPI mixerGetDevCapsA(UINT devid, LPMIXERCAPSA mixcaps, UINT size)
682 {
683 return mixMessage(devid, MXDM_GETDEVCAPS, 0L, (DWORD)mixcaps, (DWORD)size);
684 }
685
686 /**************************************************************************
687 * mixerGetDevCapsW [WINMM.102]
688 */
689 UINT WINAPI mixerGetDevCapsW(UINT devid, LPMIXERCAPSW mixcaps, UINT size)
690 {
691 MIXERCAPSA micA;
692 UINT ret = mixerGetDevCapsA(devid, &micA, sizeof(micA));
693
694 if (ret == MMSYSERR_NOERROR) {
695 mixcaps->wMid = micA.wMid;
696 mixcaps->wPid = micA.wPid;
697 mixcaps->vDriverVersion = micA.vDriverVersion;
698 lstrcpyAtoW(mixcaps->szPname, micA.szPname);
699 mixcaps->fdwSupport = micA.fdwSupport;
700 mixcaps->cDestinations = micA.cDestinations;
701 }
702 return ret;
703 }
704
705 /**************************************************************************
706 * mixerGetDevCaps [MMSYSTEM.801]
707 */
708 UINT16 WINAPI mixerGetDevCaps16(UINT16 devid, LPMIXERCAPS16 mixcaps, UINT16 size)
709 {
710 MIXERCAPSA micA;
711 UINT ret = mixerGetDevCapsA(devid, &micA, sizeof(micA));
712
713 if (ret == MMSYSERR_NOERROR) {
714 mixcaps->wMid = micA.wMid;
715 mixcaps->wPid = micA.wPid;
716 mixcaps->vDriverVersion = micA.vDriverVersion;
717 strcpy(mixcaps->szPname, micA.szPname);
718 mixcaps->fdwSupport = micA.fdwSupport;
719 mixcaps->cDestinations = micA.cDestinations;
720 }
721 return ret;
722 }
723
724 /**************************************************************************
725 * mixerOpen [WINMM.110]
726 */
727 UINT WINAPI mixerOpen(LPHMIXER lphmix, UINT uDeviceID, DWORD dwCallback,
728 DWORD dwInstance, DWORD fdwOpen)
729 {
730 HMIXER16 hmix16;
731 UINT ret;
732
733 TRACE("(%p, %d, %08lx, %08lx, %08lx)\n",
734 lphmix, uDeviceID, dwCallback, dwInstance, fdwOpen);
735 ret = mixerOpen16(&hmix16, uDeviceID, dwCallback, dwInstance,fdwOpen);
736 if (lphmix) *lphmix = hmix16;
737 return ret;
738 }
739
740 /**************************************************************************
741 * mixerOpen [MMSYSTEM.803]
742 */
743 UINT16 WINAPI mixerOpen16(LPHMIXER16 lphmix, UINT16 uDeviceID, DWORD dwCallback,
744 DWORD dwInstance, DWORD fdwOpen)
745 {
746 HMIXER16 hmix;
747 LPMIXEROPENDESC lpmod;
748 BOOL mapperflag = (uDeviceID == 0);
749 DWORD dwRet = 0;
750
751 TRACE("(%p, %d, %08lx, %08lx, %08lx)\n",
752 lphmix, uDeviceID, dwCallback, dwInstance, fdwOpen);
753 hmix = USER_HEAP_ALLOC(sizeof(MIXEROPENDESC));
754 if (lphmix) *lphmix = hmix;
755 lpmod = (LPMIXEROPENDESC)USER_HEAP_LIN_ADDR(hmix);
756 lpmod->hmx = hmix;
757 lpmod->dwCallback = dwCallback;
758 lpmod->dwInstance = dwInstance;
759 if (uDeviceID >= MAXMIXERDRIVERS)
760 uDeviceID = 0;
761 while (uDeviceID < MAXMIXERDRIVERS) {
762 dwRet = mixMessage(uDeviceID, MXDM_OPEN, dwInstance, (DWORD)lpmod, fdwOpen);
763 if (dwRet == MMSYSERR_NOERROR) break;
764 if (!mapperflag) break;
765 uDeviceID++;
766 }
767 lpmod->uDeviceID = uDeviceID;
768
769 if (dwRet != MMSYSERR_NOERROR) {
770 USER_HEAP_FREE(hmix);
771 if (lphmix) *lphmix = 0;
772 }
773
774 return dwRet;
775 }
776
777 /**************************************************************************
778 * mixerClose [WINMM.98]
779 */
780 UINT WINAPI mixerClose(HMIXER hmix)
781 {
782 LPMIXEROPENDESC lpmod;
783 DWORD dwRet;
784
785 TRACE("(%04x)\n", hmix);
786
787 lpmod = (LPMIXEROPENDESC)USER_HEAP_LIN_ADDR(hmix);
788 if (lpmod == NULL) return MMSYSERR_INVALHANDLE;
789 dwRet = mixMessage(lpmod->uDeviceID, MXDM_CLOSE, lpmod->dwInstance, 0L, 0L);
790 USER_HEAP_FREE(hmix);
791 return dwRet;
792 }
793
794 /**************************************************************************
795 * mixerClose [MMSYSTEM.803]
796 */
797 UINT16 WINAPI mixerClose16(HMIXER16 hmix)
798 {
799 return mixerClose(hmix);
800 }
801
802 /**************************************************************************
803 * mixerGetID [WINMM.103]
804 */
805 UINT WINAPI mixerGetID(HMIXEROBJ hmix, LPUINT lpid, DWORD fdwID)
806 {
807 FIXME("(%04x %p %08lx): semi-stub\n", hmix, lpid, fdwID);
808
809 if (lpid)
810 *lpid = MIXER_GetDevID(hmix, fdwID);
811
812 return MMSYSERR_NOERROR; /* FIXME: many error possibilities */
813 }
814
815 /**************************************************************************
816 * mixerGetID
817 */
818 UINT16 WINAPI mixerGetID16(HMIXEROBJ16 hmix, LPUINT16 lpid, DWORD fdwID)
819 {
820 UINT xid;
821 UINT ret = mixerGetID(hmix, &xid, fdwID);
822
823 if (lpid)
824 *lpid = xid;
825 return ret;
826 }
827
828 /**************************************************************************
829 * mixerGetControlDetailsA [WINMM.99]
830 */
831 UINT WINAPI mixerGetControlDetailsA(HMIXEROBJ hmix, LPMIXERCONTROLDETAILS lpmcdA, DWORD fdwDetails)
832 {
833 UINT uDevID;
834
835 TRACE("(%04x, %p, %08lx)\n", hmix, lpmcdA, fdwDetails);
836
837 if (lpmcdA == NULL || lpmcdA->cbStruct != sizeof(*lpmcdA))
838 return MMSYSERR_INVALPARAM;
839
840 uDevID = MIXER_GetDevID(hmix, fdwDetails);
841
842 return mixMessage(uDevID, MXDM_GETCONTROLDETAILS, 0, (DWORD)lpmcdA, fdwDetails);
843 }
844
845 /**************************************************************************
846 * mixerGetControlDetailsW [WINMM.100]
847 */
848 UINT WINAPI mixerGetControlDetailsW(HMIXEROBJ hmix, LPMIXERCONTROLDETAILS lpmcd, DWORD fdwDetails)
849 {
850 DWORD ret = MMSYSERR_NOTENABLED;
851
852 TRACE("(%04x, %p, %08lx)\n", hmix, lpmcd, fdwDetails);
853
854 if (lpmcd == NULL || lpmcd->cbStruct != sizeof(*lpmcd))
855 return MMSYSERR_INVALPARAM;
856
857 switch (fdwDetails & MIXER_GETCONTROLDETAILSF_QUERYMASK) {
858 case MIXER_GETCONTROLDETAILSF_VALUE:
859 /* can savely use W structure as it is, no string inside */
860 ret = mixerGetControlDetailsA(hmix, lpmcd, fdwDetails);
861 break;
862 case MIXER_GETCONTROLDETAILSF_LISTTEXT:
863 {
864 LPVOID paDetailsW = lpmcd->paDetails;
865 int size = MAX(1, lpmcd->cChannels) * sizeof(MIXERCONTROLDETAILS_LISTTEXTA);
866
867 if (lpmcd->u.cMultipleItems != 0 && lpmcd->u.cMultipleItems != lpmcd->u.hwndOwner) {
868 size *= lpmcd->u.cMultipleItems;
869 }
870 lpmcd->paDetails = HeapAlloc(GetProcessHeap(), 0, size);
871 /* set up lpmcd->paDetails */
872 ret = mixerGetControlDetailsA(hmix, lpmcd, fdwDetails);
873 /* copy from lpmcd->paDetails back to paDetailsW; */
874 HeapFree(GetProcessHeap(), 0, lpmcd->paDetails);
875 lpmcd->paDetails = paDetailsW;
876 }
877 break;
878 default:
879 ERR("Unsupported fdwDetails=0x%08lx\n", fdwDetails);
880 }
881
882 return ret;
883 }
884
885 /**************************************************************************
886 * mixerGetControlDetails [MMSYSTEM.808]
887 */
888 UINT16 WINAPI mixerGetControlDetails16(HMIXEROBJ16 hmix, LPMIXERCONTROLDETAILS16 lpmcd, DWORD fdwDetails)
889 {
890 DWORD ret = MMSYSERR_NOTENABLED;
891 SEGPTR sppaDetails;
892
893 TRACE("(%04x, %p, %08lx)\n", hmix, lpmcd, fdwDetails);
894
895 if (lpmcd == NULL || lpmcd->cbStruct != sizeof(*lpmcd))
896 return MMSYSERR_INVALPARAM;
897
898 sppaDetails = (SEGPTR)lpmcd->paDetails;
899 lpmcd->paDetails = PTR_SEG_TO_LIN(sppaDetails);
900 ret = mixerGetControlDetailsA(hmix, (LPMIXERCONTROLDETAILS)lpmcd, fdwDetails);
901 lpmcd->paDetails = (LPVOID)sppaDetails;
902
903 return ret;
904 }
905
906 /**************************************************************************
907 * mixerGetLineControlsA [WINMM.104]
908 */
909 UINT WINAPI mixerGetLineControlsA(HMIXEROBJ hmix, LPMIXERLINECONTROLSA lpmlcA, DWORD fdwControls)
910 {
911 UINT uDevID;
912
913 TRACE("(%04x, %p, %08lx)\n", hmix, lpmlcA, fdwControls);
914
915 if (lpmlcA == NULL || lpmlcA->cbStruct != sizeof(*lpmlcA))
916 return MMSYSERR_INVALPARAM;
917
918 uDevID = MIXER_GetDevID(hmix, 0);
919
920 return mixMessage(uDevID, MXDM_GETLINECONTROLS, 0, (DWORD)lpmlcA, fdwControls);
921 }
922
923 /**************************************************************************
924 * mixerGetLineControlsW [WINMM.105]
925 */
926 UINT WINAPI mixerGetLineControlsW(HMIXEROBJ hmix, LPMIXERLINECONTROLSW lpmlcW, DWORD fdwControls)
927 {
928 MIXERLINECONTROLSA mlcA;
929 DWORD ret;
930 int i;
931
932 TRACE("(%04x, %p, %08lx)\n", hmix, lpmlcW, fdwControls);
933
934 if (lpmlcW == NULL || lpmlcW->cbStruct != sizeof(*lpmlcW) || lpmlcW->cbmxctrl != sizeof(MIXERCONTROLW))
935 return MMSYSERR_INVALPARAM;
936
937 mlcA.cbStruct = sizeof(mlcA);
938 mlcA.dwLineID = lpmlcW->dwLineID;
939 mlcA.u.dwControlID = lpmlcW->u.dwControlID;
940 mlcA.u.dwControlType = lpmlcW->u.dwControlType;
941 mlcA.cControls = lpmlcW->cControls;
942 mlcA.cbmxctrl = sizeof(MIXERCONTROLA);
943 mlcA.pamxctrl = HeapAlloc(GetProcessHeap(), 0, mlcA.cControls * mlcA.cbmxctrl);
944
945 ret = mixerGetLineControlsA(hmix, &mlcA, fdwControls);
946
947 if (ret == MMSYSERR_NOERROR) {
948 lpmlcW->dwLineID = mlcA.dwLineID;
949 lpmlcW->u.dwControlID = mlcA.u.dwControlID;
950 lpmlcW->u.dwControlType = mlcA.u.dwControlType;
951 lpmlcW->cControls = mlcA.cControls;
952
953 for (i = 0; i < mlcA.cControls; i++) {
954 lpmlcW->pamxctrl[i].cbStruct = sizeof(MIXERCONTROLW);
955 lpmlcW->pamxctrl[i].dwControlID = mlcA.pamxctrl[i].dwControlID;
956 lpmlcW->pamxctrl[i].dwControlType = mlcA.pamxctrl[i].dwControlType;
957 lpmlcW->pamxctrl[i].fdwControl = mlcA.pamxctrl[i].fdwControl;
958 lpmlcW->pamxctrl[i].cMultipleItems = mlcA.pamxctrl[i].cMultipleItems;
959 lstrcpyAtoW(lpmlcW->pamxctrl[i].szShortName, mlcA.pamxctrl[i].szShortName);
960 lstrcpyAtoW(lpmlcW->pamxctrl[i].szName, mlcA.pamxctrl[i].szName);
961 /* sizeof(lpmlcW->pamxctrl[i].Bounds) == sizeof(mlcA.pamxctrl[i].Bounds) */
962 memcpy(&lpmlcW->pamxctrl[i].Bounds, &mlcA.pamxctrl[i].Bounds, sizeof(mlcA.pamxctrl[i].Bounds));
963 /* sizeof(lpmlcW->pamxctrl[i].Metrics) == sizeof(mlcA.pamxctrl[i].Metrics) */
964 memcpy(&lpmlcW->pamxctrl[i].Metrics, &mlcA.pamxctrl[i].Metrics, sizeof(mlcA.pamxctrl[i].Metrics));
965 }
966 }
967
968 HeapFree(GetProcessHeap(), 0, mlcA.pamxctrl);
969
970 return ret;
971 }
972
973 /**************************************************************************
974 * mixerGetLineControls [MMSYSTEM.807]
975 */
976 UINT16 WINAPI mixerGetLineControls16(HMIXEROBJ16 hmix, LPMIXERLINECONTROLS16 lpmlc16, DWORD fdwControls)
977 {
978 MIXERLINECONTROLSA mlcA;
979 DWORD ret;
980 int i;
981 LPMIXERCONTROL16 lpmc16;
982
983 TRACE("(%04x, %p, %08lx)\n", hmix, lpmlc16, fdwControls);
984
985 if (lpmlc16 == NULL || lpmlc16->cbStruct != sizeof(*lpmlc16) || lpmlc16->cbmxctrl != sizeof(MIXERCONTROL16))
986 return MMSYSERR_INVALPARAM;
987
988 mlcA.cbStruct = sizeof(mlcA);
989 mlcA.dwLineID = lpmlc16->dwLineID;
990 mlcA.u.dwControlID = lpmlc16->u.dwControlID;
991 mlcA.u.dwControlType = lpmlc16->u.dwControlType;
992 mlcA.cControls = lpmlc16->cControls;
993 mlcA.cbmxctrl = sizeof(MIXERCONTROLA);
994 mlcA.pamxctrl = HeapAlloc(GetProcessHeap(), 0, mlcA.cControls * mlcA.cbmxctrl);
995
996 ret = mixerGetLineControlsA(hmix, &mlcA, fdwControls);
997
998 if (ret == MMSYSERR_NOERROR) {
999 lpmlc16->dwLineID = mlcA.dwLineID;
1000 lpmlc16->u.dwControlID = mlcA.u.dwControlID;
1001 lpmlc16->u.dwControlType = mlcA.u.dwControlType;
1002 lpmlc16->cControls = mlcA.cControls;
1003
1004 lpmc16 = PTR_SEG_TO_LIN(lpmlc16->pamxctrl);
1005
1006 for (i = 0; i < mlcA.cControls; i++) {
1007 lpmc16[i].cbStruct = sizeof(MIXERCONTROL16);
1008 lpmc16[i].dwControlID = mlcA.pamxctrl[i].dwControlID;
1009 lpmc16[i].dwControlType = mlcA.pamxctrl[i].dwControlType;
1010 lpmc16[i].fdwControl = mlcA.pamxctrl[i].fdwControl;
1011 lpmc16[i].cMultipleItems = mlcA.pamxctrl[i].cMultipleItems;
1012 strcpy(lpmc16[i].szShortName, mlcA.pamxctrl[i].szShortName);
1013 strcpy(lpmc16[i].szName, mlcA.pamxctrl[i].szName);
1014 /* sizeof(lpmc16[i].Bounds) == sizeof(mlcA.pamxctrl[i].Bounds) */
1015 memcpy(&lpmc16[i].Bounds, &mlcA.pamxctrl[i].Bounds, sizeof(mlcA.pamxctrl[i].Bounds));
1016 /* sizeof(lpmc16[i].Metrics) == sizeof(mlcA.pamxctrl[i].Metrics) */
1017 memcpy(&lpmc16[i].Metrics, &mlcA.pamxctrl[i].Metrics, sizeof(mlcA.pamxctrl[i].Metrics));
1018 }
1019 }
1020
1021 HeapFree(GetProcessHeap(), 0, mlcA.pamxctrl);
1022
1023 return ret;
1024 }
1025
1026 /**************************************************************************
1027 * mixerGetLineInfoA [WINMM.106]
1028 */
1029 UINT WINAPI mixerGetLineInfoA(HMIXEROBJ hmix, LPMIXERLINEA lpmliW, DWORD fdwInfo)
1030 {
1031 UINT16 devid;
1032
1033 TRACE("(%04x, %p, %08lx)\n", hmix, lpmliW, fdwInfo);
1034
1035 /* FIXME: I'm not sure of the flags */
1036 devid = MIXER_GetDevID(hmix, fdwInfo);
1037 return mixMessage(devid, MXDM_GETLINEINFO, 0, (DWORD)lpmliW, fdwInfo);
1038 }
1039
1040 /**************************************************************************
1041 * mixerGetLineInfoW [WINMM.107]
1042 */
1043 UINT WINAPI mixerGetLineInfoW(HMIXEROBJ hmix, LPMIXERLINEW lpmliW, DWORD fdwInfo)
1044 {
1045 MIXERLINEA mliA;
1046 UINT ret;
1047
1048 TRACE("(%04x, %p, %08lx)\n", hmix, lpmliW, fdwInfo);
1049
1050 if (lpmliW == NULL || lpmliW->cbStruct != sizeof(*lpmliW))
1051 return MMSYSERR_INVALPARAM;
1052
1053 mliA.cbStruct = sizeof(mliA);
1054 switch (fdwInfo & MIXER_GETLINEINFOF_QUERYMASK) {
1055 case MIXER_GETLINEINFOF_COMPONENTTYPE:
1056 mliA.dwComponentType = lpmliW->dwComponentType;
1057 break;
1058 case MIXER_GETLINEINFOF_DESTINATION:
1059 mliA.dwDestination = lpmliW->dwDestination;
1060 break;
1061 case MIXER_GETLINEINFOF_LINEID:
1062 mliA.dwLineID = lpmliW->dwLineID;
1063 break;
1064 case MIXER_GETLINEINFOF_SOURCE:
1065 mliA.dwDestination = lpmliW->dwDestination;
1066 mliA.dwSource = lpmliW->dwSource;
1067 break;
1068 case MIXER_GETLINEINFOF_TARGETTYPE:
1069 mliA.Target.dwType = lpmliW->Target.dwType;
1070 mliA.Target.wMid = lpmliW->Target.wMid;
1071 mliA.Target.wPid = lpmliW->Target.wPid;
1072 mliA.Target.vDriverVersion = lpmliW->Target.vDriverVersion;
1073 lstrcpyWtoA(mliA.Target.szPname, lpmliW->Target.szPname);
1074 break;
1075 default:
1076 FIXME("Unsupported fdwControls=0x%08lx\n", fdwInfo);
1077 }
1078
1079 ret = mixerGetLineInfoA(hmix, &mliA, fdwInfo);
1080
1081 lpmliW->dwDestination = mliA.dwDestination;
1082 lpmliW->dwSource = mliA.dwSource;
1083 lpmliW->dwLineID = mliA.dwLineID;
1084 lpmliW->fdwLine = mliA.fdwLine;
1085 lpmliW->dwUser = mliA.dwUser;
1086 lpmliW->dwComponentType = mliA.dwComponentType;
1087 lpmliW->cChannels = mliA.cChannels;
1088 lpmliW->cConnections = mliA.cConnections;
1089 lpmliW->cControls = mliA.cControls;
1090 lstrcpyAtoW(lpmliW->szShortName, mliA.szShortName);
1091 lstrcpyAtoW(lpmliW->szName, mliA.szName);
1092 lpmliW->Target.dwType = mliA.Target.dwType;
1093 lpmliW->Target.dwDeviceID = mliA.Target.dwDeviceID;
1094 lpmliW->Target.wMid = mliA.Target.wMid;
1095 lpmliW->Target.wPid = mliA.Target.wPid;
1096 lpmliW->Target.vDriverVersion = mliA.Target.vDriverVersion;
1097 lstrcpyAtoW(lpmliW->Target.szPname, mliA.Target.szPname);
1098
1099 return ret;
1100 }
1101
1102 /**************************************************************************
1103 * mixerGetLineInfo [MMSYSTEM.805]
1104 */
1105 UINT16 WINAPI mixerGetLineInfo16(HMIXEROBJ16 hmix, LPMIXERLINE16 lpmli16, DWORD fdwInfo)
1106 {
1107 MIXERLINEA mliA;
1108 UINT ret;
1109
1110 TRACE("(%04x, %p, %08lx)\n", hmix, lpmli16, fdwInfo);
1111
1112 if (lpmli16 == NULL || lpmli16->cbStruct != sizeof(*lpmli16))
1113 return MMSYSERR_INVALPARAM;
1114
1115 mliA.cbStruct = sizeof(mliA);
1116 switch (fdwInfo & MIXER_GETLINEINFOF_QUERYMASK) {
1117 case MIXER_GETLINEINFOF_COMPONENTTYPE:
1118 mliA.dwComponentType = lpmli16->dwComponentType;
1119 break;
1120 case MIXER_GETLINEINFOF_DESTINATION:
1121 mliA.dwDestination = lpmli16->dwDestination;
1122 break;
1123 case MIXER_GETLINEINFOF_LINEID:
1124 mliA.dwLineID = lpmli16->dwLineID;
1125 break;
1126 case MIXER_GETLINEINFOF_SOURCE:
1127 mliA.dwDestination = lpmli16->dwDestination;
1128 mliA.dwSource = lpmli16->dwSource;
1129 break;
1130 case MIXER_GETLINEINFOF_TARGETTYPE:
1131 mliA.Target.dwType = lpmli16->Target.dwType;
1132 mliA.Target.wMid = lpmli16->Target.wMid;
1133 mliA.Target.wPid = lpmli16->Target.wPid;
1134 mliA.Target.vDriverVersion = lpmli16->Target.vDriverVersion;
1135 strcpy(mliA.Target.szPname, lpmli16->Target.szPname);
1136 break;
1137 default:
1138 FIXME("Unsupported fdwControls=0x%08lx\n", fdwInfo);
1139 }
1140
1141 ret = mixerGetLineInfoA(hmix, &mliA, fdwInfo);
1142
1143 lpmli16->dwDestination = mliA.dwDestination;
1144 lpmli16->dwSource = mliA.dwSource;
1145 lpmli16->dwLineID = mliA.dwLineID;
1146 lpmli16->fdwLine = mliA.fdwLine;
1147 lpmli16->dwUser = mliA.dwUser;
1148 lpmli16->dwComponentType = mliA.dwComponentType;
1149 lpmli16->cChannels = mliA.cChannels;
1150 lpmli16->cConnections = mliA.cConnections;
1151 lpmli16->cControls = mliA.cControls;
1152 strcpy(lpmli16->szShortName, mliA.szShortName);
1153 strcpy(lpmli16->szName, mliA.szName);
1154 lpmli16->Target.dwType = mliA.Target.dwType;
1155 lpmli16->Target.dwDeviceID = mliA.Target.dwDeviceID;
1156 lpmli16->Target.wMid = mliA.Target.wMid;
1157 lpmli16->Target.wPid = mliA.Target.wPid;
1158 lpmli16->Target.vDriverVersion = mliA.Target.vDriverVersion;
1159 strcpy(lpmli16->Target.szPname, mliA.Target.szPname);
1160
1161 return ret;
1162 }
1163
1164 /**************************************************************************
1165 * mixerSetControlDetails [WINMM.111]
1166 */
1167 UINT WINAPI mixerSetControlDetails(HMIXEROBJ hmix, LPMIXERCONTROLDETAILS lpmcdA, DWORD fdwDetails)
1168 {
1169 UINT uDevID;
1170
1171 TRACE("(%04x, %p, %08lx)\n", hmix, lpmcdA, fdwDetails);
1172
1173 uDevID = MIXER_GetDevID(hmix, fdwDetails);
1174
1175 return mixMessage(uDevID, MXDM_SETCONTROLDETAILS, 0, (DWORD)lpmcdA, fdwDetails);
1176 }
1177
1178 /**************************************************************************
1179 * mixerSetControlDetails [MMSYSTEM.809]
1180 */
1181 UINT16 WINAPI mixerSetControlDetails16(HMIXEROBJ16 hmix, LPMIXERCONTROLDETAILS16 lpmcd, DWORD fdwDetails)
1182 {
1183 TRACE("(%04x, %p, %08lx)\n", hmix, lpmcd, fdwDetails);
1184 return MMSYSERR_NOTENABLED;
1185 }
1186
1187 /**************************************************************************
1188 * mixerMessage [WINMM.109]
1189 */
1190 UINT WINAPI mixerMessage(HMIXER hmix, UINT uMsg, DWORD dwParam1, DWORD dwParam2)
1191 {
1192 LPMIXEROPENDESC lpmod;
1193 UINT16 uDeviceID;
1194
1195 lpmod = (LPMIXEROPENDESC)USER_HEAP_LIN_ADDR(hmix);
1196 if (lpmod)
1197 uDeviceID = lpmod->uDeviceID;
1198 else
1199 uDeviceID = 0;
1200 FIXME("(%04lx, %d, %08lx, %08lx): semi-stub?\n",
1201 (DWORD)hmix, uMsg, dwParam1, dwParam2);
1202 return mixMessage(uDeviceID, uMsg, 0L, dwParam1, dwParam2);
1203 }
1204
1205 /**************************************************************************
1206 * mixerMessage [MMSYSTEM.804]
1207 */
1208 UINT16 WINAPI mixerMessage16(HMIXER16 hmix, UINT16 uMsg, DWORD dwParam1, DWORD dwParam2)
1209 {
1210 LPMIXEROPENDESC lpmod;
1211 UINT16 uDeviceID;
1212
1213 lpmod = (LPMIXEROPENDESC)USER_HEAP_LIN_ADDR(hmix);
1214 uDeviceID = (lpmod) ? lpmod->uDeviceID : 0;
1215 FIXME("(%04x, %d, %08lx, %08lx) - semi-stub?\n",
1216 hmix, uMsg, dwParam1, dwParam2);
1217 return mixMessage(uDeviceID, uMsg, 0L, dwParam1, dwParam2);
1218 }
1219
1220 /**************************************************************************
1221 * auxGetNumDevs [WINMM.22]
1222 */
1223 UINT WINAPI auxGetNumDevs(void)
1224 {
1225 return auxGetNumDevs16();
1226 }
1227
1228 /**************************************************************************
1229 * auxGetNumDevs [MMSYSTEM.350]
1230 */
1231 UINT16 WINAPI auxGetNumDevs16(void)
1232 {
1233 UINT16 count;
1234
1235 TRACE("\n");
1236 count = auxMessage(0, AUXDM_GETNUMDEVS, 0L, 0L, 0L);
1237 TRACE("=> %u\n", count);
1238 return count;
1239 }
1240
1241 /**************************************************************************
1242 * auxGetDevCaps [WINMM.20]
1243 */
1244 UINT WINAPI auxGetDevCapsW(UINT uDeviceID, LPAUXCAPSW lpCaps, UINT uSize)
1245 {
1246 AUXCAPS16 ac16;
1247 UINT ret = auxGetDevCaps16(uDeviceID, &ac16, sizeof(ac16));
1248
1249 lpCaps->wMid = ac16.wMid;
1250 lpCaps->wPid = ac16.wPid;
1251 lpCaps->vDriverVersion = ac16.vDriverVersion;
1252 lstrcpyAtoW(lpCaps->szPname, ac16.szPname);
1253 lpCaps->wTechnology = ac16.wTechnology;
1254 lpCaps->dwSupport = ac16.dwSupport;
1255 return ret;
1256 }
1257
1258 /**************************************************************************
1259 * auxGetDevCaps [WINMM.21]
1260 */
1261 UINT WINAPI auxGetDevCapsA(UINT uDeviceID, LPAUXCAPSA lpCaps, UINT uSize)
1262 {
1263 AUXCAPS16 ac16;
1264 UINT ret = auxGetDevCaps16(uDeviceID, &ac16, sizeof(ac16));
1265
1266 lpCaps->wMid = ac16.wMid;
1267 lpCaps->wPid = ac16.wPid;
1268 lpCaps->vDriverVersion = ac16.vDriverVersion;
1269 strcpy(lpCaps->szPname, ac16.szPname);
1270 lpCaps->wTechnology = ac16.wTechnology;
1271 lpCaps->dwSupport = ac16.dwSupport;
1272 return ret;
1273 }
1274
1275 /**************************************************************************
1276 * auxGetDevCaps [MMSYSTEM.351]
1277 */
1278 UINT16 WINAPI auxGetDevCaps16(UINT16 uDeviceID, LPAUXCAPS16 lpCaps, UINT16 uSize)
1279 {
1280 TRACE("(%04X, %p, %d) !\n", uDeviceID, lpCaps, uSize);
1281
1282 return auxMessage(uDeviceID, AUXDM_GETDEVCAPS,
1283 0L, (DWORD)lpCaps, (DWORD)uSize);
1284 }
1285
1286 /**************************************************************************
1287 * auxGetVolume [WINM.23]
1288 */
1289 UINT WINAPI auxGetVolume(UINT uDeviceID, DWORD* lpdwVolume)
1290 {
1291 return auxGetVolume16(uDeviceID, lpdwVolume);
1292 }
1293
1294 /**************************************************************************
1295 * auxGetVolume [MMSYSTEM.352]
1296 */
1297 UINT16 WINAPI auxGetVolume16(UINT16 uDeviceID, DWORD* lpdwVolume)
1298 {
1299 TRACE("(%04X, %p) !\n", uDeviceID, lpdwVolume);
1300
1301 return auxMessage(uDeviceID, AUXDM_GETVOLUME, 0L, (DWORD)lpdwVolume, 0L);
1302 }
1303
1304 /**************************************************************************
1305 * auxSetVolume [WINMM.25]
1306 */
1307 UINT WINAPI auxSetVolume(UINT uDeviceID, DWORD dwVolume)
1308 {
1309 return auxSetVolume16(uDeviceID, dwVolume);
1310 }
1311
1312 /**************************************************************************
1313 * auxSetVolume [MMSYSTEM.353]
1314 */
1315 UINT16 WINAPI auxSetVolume16(UINT16 uDeviceID, DWORD dwVolume)
1316 {
1317 TRACE("(%04X, %08lX) !\n", uDeviceID, dwVolume);
1318
1319 return auxMessage(uDeviceID, AUXDM_SETVOLUME, 0L, dwVolume, 0L);
1320 }
1321
1322 /**************************************************************************
1323 * auxOutMessage [MMSYSTEM.354]
1324 */
1325 DWORD WINAPI auxOutMessage(UINT uDeviceID, UINT uMessage, DWORD dw1, DWORD dw2)
1326 {
1327 switch (uMessage) {
1328 case AUXDM_GETNUMDEVS:
1329 case AUXDM_GETVOLUME:
1330 case AUXDM_SETVOLUME:
1331 /* no argument conversion needed */
1332 break;
1333 case AUXDM_GETDEVCAPS:
1334 return auxGetDevCapsA(uDeviceID, (LPAUXCAPSA)dw1, dw2);
1335 default:
1336 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
1337 uDeviceID, uMessage, dw1, dw2);
1338 break;
1339 }
1340 return auxMessage(uDeviceID, uMessage, 0L, dw1, dw2);
1341 }
1342
1343 /**************************************************************************
1344 * auxOutMessage [MMSYSTEM.354]
1345 */
1346 DWORD WINAPI auxOutMessage16(UINT16 uDeviceID, UINT16 uMessage, DWORD dw1, DWORD dw2)
1347 {
1348 TRACE("(%04X, %04X, %08lX, %08lX)\n", uDeviceID, uMessage, dw1, dw2);
1349
1350 switch (uMessage) {
1351 case AUXDM_GETNUMDEVS:
1352 case AUXDM_SETVOLUME:
1353 /* no argument conversion needed */
1354 break;
1355 case AUXDM_GETVOLUME:
1356 return auxGetVolume16(uDeviceID, (LPDWORD)PTR_SEG_TO_LIN(dw1));
1357 case AUXDM_GETDEVCAPS:
1358 return auxGetDevCaps16(uDeviceID, (LPAUXCAPS16)PTR_SEG_TO_LIN(dw1), dw2);
1359 default:
1360 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
1361 uDeviceID, uMessage, dw1, dw2);
1362 break;
1363 }
1364 return auxMessage(uDeviceID, uMessage, 0L, dw1, dw2);
1365 }
1366
1367 /**************************************************************************
1368 * mciGetErrorStringW [WINMM.46]
1369 */
1370 BOOL WINAPI mciGetErrorStringW(DWORD wError, LPWSTR lpstrBuffer, UINT uLength)
1371 {
1372 LPSTR bufstr = HeapAlloc(GetProcessHeap(), 0, uLength);
1373 BOOL ret = mciGetErrorStringA(wError, bufstr, uLength);
1374
1375 lstrcpyAtoW(lpstrBuffer, bufstr);
1376 HeapFree(GetProcessHeap(), 0, bufstr);
1377 return ret;
1378 }
1379
1380 /**************************************************************************
1381 * mciGetErrorStringA [WINMM.45]
1382 */
1383 BOOL WINAPI mciGetErrorStringA(DWORD wError, LPSTR lpstrBuffer, UINT uLength)
1384 {
1385 return mciGetErrorString16(wError, lpstrBuffer, uLength);
1386 }
1387
1388 /**************************************************************************
1389 * mciGetErrorString [MMSYSTEM.706]
1390 */
1391 BOOL16 WINAPI mciGetErrorString16(DWORD dwError, LPSTR lpstrBuffer, UINT16 uLength)
1392 {
1393 BOOL16 ret = FALSE;
1394
1395 if (lpstrBuffer != NULL && uLength > 0 &&
1396 dwError >= MCIERR_BASE && dwError <= MCIERR_CUSTOM_DRIVER_BASE) {
1397 LPWINE_MM_IDATA iData = MULTIMEDIA_GetIData();
1398
1399 if (iData && LoadStringA(iData->hWinMM32Instance, dwError, lpstrBuffer, uLength) > 0) {
1400 ret = TRUE;
1401 }
1402 }
1403 return ret;
1404 }
1405
1406 /**************************************************************************
1407 * mciDriverNotify [MMSYSTEM.711]
1408 */
1409 BOOL16 WINAPI mciDriverNotify16(HWND16 hWndCallBack, UINT16 wDevID, UINT16 wStatus)
1410 {
1411 TRACE("(%04X, %04x, %04X)\n", hWndCallBack, wDevID, wStatus);
1412
1413 if (!IsWindow(hWndCallBack)) {
1414 WARN("bad hWnd for call back (0x%04x)\n", hWndCallBack);
1415 return FALSE;
1416 }
1417 TRACE("before PostMessage\n");
1418 Callout.PostMessageA(hWndCallBack, MM_MCINOTIFY, wStatus, wDevID);
1419 return TRUE;
1420 }
1421
1422 /**************************************************************************
1423 * mciDriverNotify [WINMM.36]
1424 */
1425 BOOL WINAPI mciDriverNotify(HWND hWndCallBack, UINT wDevID, UINT wStatus)
1426 {
1427
1428 TRACE("(%08X, %04x, %04X)\n", hWndCallBack, wDevID, wStatus);
1429
1430 if (!IsWindow(hWndCallBack)) {
1431 WARN("bad hWnd for call back (0x%04x)\n", hWndCallBack);
1432 return FALSE;
1433 }
1434 TRACE("before PostMessage\n");
1435 Callout.PostMessageA(hWndCallBack, MM_MCINOTIFY, wStatus, wDevID);
1436 return TRUE;
1437 }
1438
1439 /**************************************************************************
1440 * mciGetDriverData [MMSYSTEM.708]
1441 */
1442 DWORD WINAPI mciGetDriverData16(UINT16 uDeviceID)
1443 {
1444 return mciGetDriverData(uDeviceID);
1445 }
1446
1447 /**************************************************************************
1448 * mciGetDriverData [WINMM.44]
1449 */
1450 DWORD WINAPI mciGetDriverData(UINT uDeviceID)
1451 {
1452 LPWINE_MCIDRIVER wmd;
1453
1454 TRACE("(%04x)\n", uDeviceID);
1455
1456 wmd = MCI_GetDriver(uDeviceID);
1457
1458 if (!wmd) {
1459 WARN("Bad uDeviceID\n");
1460 return 0L;
1461 }
1462
1463 return wmd->dwPrivate;
1464 }
1465
1466 /**************************************************************************
1467 * mciSetDriverData [MMSYSTEM.707]
1468 */
1469 BOOL16 WINAPI mciSetDriverData16(UINT16 uDeviceID, DWORD data)
1470 {
1471 return mciSetDriverData(uDeviceID, data);
1472 }
1473
1474 /**************************************************************************
1475 * mciSetDriverData [WINMM.53]
1476 */
1477 BOOL WINAPI mciSetDriverData(UINT uDeviceID, DWORD data)
1478 {
1479 LPWINE_MCIDRIVER wmd;
1480
1481 TRACE("(%04x, %08lx)\n", uDeviceID, data);
1482
1483 wmd = MCI_GetDriver(uDeviceID);
1484
1485 if (!wmd) {
1486 WARN("Bad uDeviceID\n");
1487 return FALSE;
1488 }
1489
1490 wmd->dwPrivate = data;
1491 return TRUE;
1492 }
1493
1494 /**************************************************************************
1495 * mciSendCommandA [WINMM.49]
1496 */
1497 DWORD WINAPI mciSendCommandA(UINT wDevID, UINT wMsg, DWORD dwParam1, DWORD dwParam2)
1498 {
1499 DWORD dwRet;
1500
1501 TRACE("(%08x, %s, %08lx, %08lx)\n",
1502 wDevID, MCI_MessageToString(wMsg), dwParam1, dwParam2);
1503
1504 dwRet = MCI_SendCommand(wDevID, wMsg, dwParam1, dwParam2, TRUE);
1505 dwRet = MCI_CleanUp(dwRet, wMsg, dwParam2, TRUE);
1506 TRACE("=> %08lx\n", dwRet);
1507 return dwRet;
1508 }
1509
1510 /**************************************************************************
1511 * mciSendCommandW [WINMM.50]
1512 */
1513 DWORD WINAPI mciSendCommandW(UINT wDevID, UINT wMsg, DWORD dwParam1, DWORD dwParam2)
1514 {
1515 FIXME("(%08x, %s, %08lx, %08lx): stub\n", wDevID, MCI_MessageToString(wMsg), dwParam1, dwParam2);
1516 return MCIERR_UNSUPPORTED_FUNCTION;
1517 }
1518
1519 /**************************************************************************
1520 * mciSendCommand [MMSYSTEM.701]
1521 */
1522 DWORD WINAPI mciSendCommand16(UINT16 wDevID, UINT16 wMsg, DWORD dwParam1, DWORD dwParam2)
1523 {
1524 DWORD dwRet;
1525
1526 TRACE("(%04X, %s, %08lX, %08lX)\n",
1527 wDevID, MCI_MessageToString(wMsg), dwParam1, dwParam2);
1528
1529 dwRet = MCI_SendCommand(wDevID, wMsg, dwParam1, dwParam2, FALSE);
1530 dwRet = MCI_CleanUp(dwRet, wMsg, dwParam2, FALSE);
1531 TRACE("=> %ld\n", dwRet);
1532 return dwRet;
1533 }
1534
1535 /**************************************************************************
1536 * mciGetDeviceID [MMSYSTEM.703]
1537 */
1538 UINT16 WINAPI mciGetDeviceID16(LPCSTR lpstrName)
1539 {
1540 TRACE("(\"%s\")\n", lpstrName);
1541
1542 return MCI_GetDriverFromString(lpstrName);
1543 }
1544
1545 /**************************************************************************
1546 * mciGetDeviceIDA [WINMM.41]
1547 */
1548 UINT WINAPI mciGetDeviceIDA(LPCSTR lpstrName)
1549 {
1550 return MCI_GetDriverFromString(lpstrName);
1551 }
1552
1553 /**************************************************************************
1554 * mciGetDeviceIDW [WINMM.43]
1555 */
1556 UINT WINAPI mciGetDeviceIDW(LPCWSTR lpwstrName)
1557 {
1558 LPSTR lpstrName;
1559 UINT ret;
1560
1561 lpstrName = HEAP_strdupWtoA(GetProcessHeap(), 0, lpwstrName);
1562 ret = MCI_GetDriverFromString(lpstrName);
1563 HeapFree(GetProcessHeap(), 0, lpstrName);
1564 return ret;
1565 }
1566
1567 /**************************************************************************
1568 * MCI_DefYieldProc [internal]
1569 */
1570 UINT16 WINAPI MCI_DefYieldProc(UINT16 wDevID, DWORD data)
1571 {
1572 INT16 ret;
1573
1574 TRACE("(0x%04x, 0x%08lx)\n", wDevID, data);
1575
1576 if ((HIWORD(data) != 0 && GetActiveWindow16() != HIWORD(data)) ||
1577 (GetAsyncKeyState(LOWORD(data)) & 1) == 0) {
1578 UserYield16();
1579 ret = 0;
1580 } else {
1581 MSG msg;
1582
1583 msg.hwnd = HIWORD(data);
1584 while (!PeekMessageA(&msg, HIWORD(data), WM_KEYFIRST, WM_KEYLAST, PM_REMOVE));
1585 ret = -1;
1586 }
1587 return ret;
1588 }
1589
1590 /**************************************************************************
1591 * mciSetYieldProc [MMSYSTEM.714]
1592 */
1593 BOOL16 WINAPI mciSetYieldProc16(UINT16 uDeviceID, YIELDPROC fpYieldProc, DWORD dwYieldData)
1594 {
1595 LPWINE_MCIDRIVER wmd;
1596
1597 TRACE("(%u, %p, %08lx)\n", uDeviceID, fpYieldProc, dwYieldData);
1598
1599 if (!(wmd = MCI_GetDriver(uDeviceID))) {
1600 WARN("Bad uDeviceID\n");
1601 return FALSE;
1602 }
1603
1604 wmd->lpfnYieldProc = fpYieldProc;
1605 wmd->dwYieldData = dwYieldData;
1606 wmd->bIs32 = FALSE;
1607
1608 return TRUE;
1609 }
1610
1611 /**************************************************************************
1612 * mciSetYieldProc [WINMM.54]
1613 */
1614 BOOL WINAPI mciSetYieldProc(UINT uDeviceID, YIELDPROC fpYieldProc, DWORD dwYieldData)
1615 {
1616 LPWINE_MCIDRIVER wmd;
1617
1618 TRACE("(%u, %p, %08lx)\n", uDeviceID, fpYieldProc, dwYieldData);
1619
1620 if (!(wmd = MCI_GetDriver(uDeviceID))) {
1621 WARN("Bad uDeviceID\n");
1622 return FALSE;
1623 }
1624
1625 wmd->lpfnYieldProc = fpYieldProc;
1626 wmd->dwYieldData = dwYieldData;
1627 wmd->bIs32 = TRUE;
1628
1629 return TRUE;
1630 }
1631
1632 /**************************************************************************
1633 * mciGetDeviceIDFromElementID [MMSYSTEM.715]
1634 */
1635 UINT16 WINAPI mciGetDeviceIDFromElementID16(DWORD dwElementID, LPCSTR lpstrType)
1636 {
1637 FIXME("(%lu, %s) stub\n", dwElementID, lpstrType);
1638 return 0;
1639 }
1640
1641 /**************************************************************************
1642 * mciGetDeviceIDFromElementIDW [WINMM.42]
1643 */
1644 UINT WINAPI mciGetDeviceIDFromElementIDW(DWORD dwElementID, LPCWSTR lpstrType)
1645 {
1646 /* FIXME: that's rather strange, there is no
1647 * mciGetDeviceIDFromElementID32A in winmm.spec
1648 */
1649 FIXME("(%lu, %p) stub\n", dwElementID, lpstrType);
1650 return 0;
1651 }
1652
1653 /**************************************************************************
1654 * mciGetYieldProc [MMSYSTEM.716]
1655 */
1656 YIELDPROC WINAPI mciGetYieldProc16(UINT16 uDeviceID, DWORD* lpdwYieldData)
1657 {
1658 LPWINE_MCIDRIVER wmd;
1659
1660 TRACE("(%u, %p)\n", uDeviceID, lpdwYieldData);
1661
1662 if (!(wmd = MCI_GetDriver(uDeviceID))) {
1663 WARN("Bad uDeviceID\n");
1664 return NULL;
1665 }
1666 if (!wmd->lpfnYieldProc) {
1667 WARN("No proc set\n");
1668 return NULL;
1669 }
1670 if (wmd->bIs32) {
1671 WARN("Proc is 32 bit\n");
1672 return NULL;
1673 }
1674 return wmd->lpfnYieldProc;
1675 }
1676
1677 /**************************************************************************
1678 * mciGetYieldProc [WINMM.47]
1679 */
1680 YIELDPROC WINAPI mciGetYieldProc(UINT uDeviceID, DWORD* lpdwYieldData)
1681 {
1682 LPWINE_MCIDRIVER wmd;
1683
1684 TRACE("(%u, %p)\n", uDeviceID, lpdwYieldData);
1685
1686 if (!(wmd = MCI_GetDriver(uDeviceID))) {
1687 WARN("Bad uDeviceID\n");
1688 return NULL;
1689 }
1690 if (!wmd->lpfnYieldProc) {
1691 WARN("No proc set\n");
1692 return NULL;
1693 }
1694 if (!wmd->bIs32) {
1695 WARN("Proc is 32 bit\n");
1696 return NULL;
1697 }
1698 return wmd->lpfnYieldProc;
1699 }
1700
1701 /**************************************************************************
1702 * mciGetCreatorTask [MMSYSTEM.717]
1703 */
1704 HTASK16 WINAPI mciGetCreatorTask16(UINT16 uDeviceID)
1705 {
1706 return mciGetCreatorTask(uDeviceID);
1707 }
1708
1709 /**************************************************************************
1710 * mciGetCreatorTask [WINMM.40]
1711 */
1712 HTASK WINAPI mciGetCreatorTask(UINT uDeviceID)
1713 {
1714 LPWINE_MCIDRIVER wmd;
1715 HTASK ret;
1716
1717 TRACE("(%u)\n", uDeviceID);
1718
1719 ret = (!(wmd = MCI_GetDriver(uDeviceID))) ? 0 : wmd->hCreatorTask;
1720
1721 TRACE("=> %04x\n", ret);
1722 return ret;
1723 }
1724
1725 /**************************************************************************
1726 * mciDriverYield [MMSYSTEM.710]
1727 */
1728 UINT16 WINAPI mciDriverYield16(UINT16 uDeviceID)
1729 {
1730 LPWINE_MCIDRIVER wmd;
1731 UINT16 ret = 0;
1732
1733 /* TRACE("(%04x)\n", uDeviceID); */
1734
1735 if (!(wmd = MCI_GetDriver(uDeviceID)) || wmd->lpfnYieldProc || wmd->bIs32) {
1736 UserYield16();
1737 } else {
1738 ret = wmd->lpfnYieldProc(uDeviceID, wmd->dwYieldData);
1739 }
1740
1741 return ret;
1742 }
1743
1744 /**************************************************************************
1745 * mciDriverYield [WINMM.37]
1746 */
1747 UINT WINAPI mciDriverYield(UINT uDeviceID)
1748 {
1749 LPWINE_MCIDRIVER wmd;
1750 UINT ret = 0;
1751
1752 TRACE("(%04x)\n", uDeviceID);
1753
1754 if (!(wmd = MCI_GetDriver(uDeviceID)) || wmd->lpfnYieldProc || wmd->bIs32) {
1755 UserYield16();
1756 } else {
1757 ret = wmd->lpfnYieldProc(uDeviceID, wmd->dwYieldData);
1758 }
1759
1760 return ret;
1761 }
1762
1763 /**************************************************************************
1764 * midiOutGetNumDevs [WINMM.80]
1765 */
1766 UINT WINAPI midiOutGetNumDevs(void)
1767 {
1768 return midiOutGetNumDevs16();
1769 }
1770
1771 /**************************************************************************
1772 * midiOutGetNumDevs [MMSYSTEM.201]
1773 */
1774 UINT16 WINAPI midiOutGetNumDevs16(void)
1775 {
1776 UINT16 count = modMessage(0, MODM_GETNUMDEVS, 0L, 0L, 0L);
1777
1778 TRACE("returns %u\n", count);
1779 return count;
1780 }
1781
1782 /**************************************************************************
1783 * midiOutGetDevCapsW [WINMM.76]
1784 */
1785 UINT WINAPI midiOutGetDevCapsW(UINT uDeviceID, LPMIDIOUTCAPSW lpCaps, UINT uSize)
1786 {
1787 MIDIOUTCAPS16 moc16;
1788 UINT ret;
1789
1790 ret = midiOutGetDevCaps16(uDeviceID, &moc16, sizeof(moc16));
1791 lpCaps->wMid = moc16.wMid;
1792 lpCaps->wPid = moc16.wPid;
1793 lpCaps->vDriverVersion = moc16.vDriverVersion;
1794 lstrcpyAtoW(lpCaps->szPname, moc16.szPname);
1795 lpCaps->wTechnology = moc16.wTechnology;
1796 lpCaps->wVoices = moc16.wVoices;
1797 lpCaps->wNotes = moc16.wNotes;
1798 lpCaps->wChannelMask = moc16.wChannelMask;
1799 lpCaps->dwSupport = moc16.dwSupport;
1800 return ret;
1801 }
1802
1803 /**************************************************************************
1804 * midiOutGetDevCapsA [WINMM.75]
1805 */
1806 UINT WINAPI midiOutGetDevCapsA(UINT uDeviceID, LPMIDIOUTCAPSA lpCaps, UINT uSize)
1807 {
1808 MIDIOUTCAPS16 moc16;
1809 UINT ret;
1810
1811 ret = midiOutGetDevCaps16(uDeviceID, &moc16, sizeof(moc16));
1812 lpCaps->wMid = moc16.wMid;
1813 lpCaps->wPid = moc16.wPid;
1814 lpCaps->vDriverVersion = moc16.vDriverVersion;
1815 strcpy(lpCaps->szPname, moc16.szPname);
1816 lpCaps->wTechnology = moc16.wTechnology;
1817 lpCaps->wVoices = moc16.wVoices;
1818 lpCaps->wNotes = moc16.wNotes;
1819 lpCaps->wChannelMask = moc16.wChannelMask;
1820 lpCaps->dwSupport = moc16.dwSupport;
1821 return ret;
1822 }
1823
1824 /**************************************************************************
1825 * midiOutGetDevCaps [MMSYSTEM.202]
1826 */
1827 UINT16 WINAPI midiOutGetDevCaps16(UINT16 uDeviceID, LPMIDIOUTCAPS16 lpCaps, UINT16 uSize)
1828 {
1829 TRACE("(%u, %p, %u);\n", uDeviceID, lpCaps, uSize);
1830 return modMessage(uDeviceID, MODM_GETDEVCAPS, 0, (DWORD)lpCaps, uSize);
1831 }
1832
1833 /**************************************************************************
1834 * MIDI_GetErrorText [internal]
1835 */
1836 static UINT16 MIDI_GetErrorText(UINT16 uError, LPSTR lpText, UINT16 uSize)
1837 {
1838 UINT16 ret = MMSYSERR_BADERRNUM;
1839
1840 if (lpText == NULL) {
1841 ret = MMSYSERR_INVALPARAM;
1842 } else if (uSize == 0) {
1843 ret = MMSYSERR_NOERROR;
1844 } else if (
1845 /* test has been removed 'coz MMSYSERR_BASE is 0, and gcc did emit
1846 * a warning for the test was always true */
1847 (/*uError >= MMSYSERR_BASE && */ uError <= MMSYSERR_LASTERROR) ||
1848 (uError >= MIDIERR_BASE && uError <= MIDIERR_LASTERROR)) {
1849
1850 LPWINE_MM_IDATA iData = MULTIMEDIA_GetIData();
1851
1852 if (!iData) {
1853 ret = MMSYSERR_ERROR;
1854 } else if (LoadStringA(iData->hWinMM32Instance, uError, lpText, uSize) > 0) {
1855 ret = MMSYSERR_NOERROR;
1856 }
1857 }
1858 return ret;
1859 }
1860
1861 /**************************************************************************
1862 * midiOutGetErrorTextA [WINMM.77]
1863 */
1864 UINT WINAPI midiOutGetErrorTextA(UINT uError, LPSTR lpText, UINT uSize)
1865 {
1866 return MIDI_GetErrorText(uError, lpText, uSize);
1867 }
1868
1869 /**************************************************************************
1870 * midiOutGetErrorTextW [WINMM.78]
1871 */
1872 UINT WINAPI midiOutGetErrorTextW(UINT uError, LPWSTR lpText, UINT uSize)
1873 {
1874 LPSTR xstr = HeapAlloc(GetProcessHeap(), 0, uSize);
1875 UINT ret;
1876
1877 ret = MIDI_GetErrorText(uError, xstr, uSize);
1878 lstrcpyAtoW(lpText, xstr);
1879 HeapFree(GetProcessHeap(), 0, xstr);
1880 return ret;
1881 }
1882
1883 /**************************************************************************
1884 * midiOutGetErrorText [MMSYSTEM.203]
1885 */
1886 UINT16 WINAPI midiOutGetErrorText16(UINT16 uError, LPSTR lpText, UINT16 uSize)
1887 {
1888 return MIDI_GetErrorText(uError, lpText, uSize);
1889 }
1890
1891 /**************************************************************************
1892 * MIDI_OutAlloc [internal]
1893 */
1894 static LPMIDIOPENDESC MIDI_OutAlloc(HMIDIOUT16* lphMidiOut, DWORD dwCallback,
1895 DWORD dwInstance, DWORD cIDs, MIDIOPENSTRMID* lpIDs)
1896 {
1897 HMIDI16 hMidiOut;
1898 LPMIDIOPENDESC lpDesc;
1899
1900 hMidiOut = USER_HEAP_ALLOC(sizeof(MIDIOPENDESC) + (cIDs ? (cIDs - 1) : 0) * sizeof(MIDIOPENSTRMID));
1901
1902 if (lphMidiOut != NULL)
1903 *lphMidiOut = hMidiOut;
1904 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
1905
1906 if (lpDesc) {
1907 lpDesc->hMidi = hMidiOut;
1908 lpDesc->dwCallback = dwCallback;
1909 lpDesc->dwInstance = dwInstance;
1910 lpDesc->dnDevNode = 0;
1911 lpDesc->cIds = cIDs;
1912 if (cIDs)
1913 memcpy(&(lpDesc->rgIds), lpIDs, cIDs * sizeof(MIDIOPENSTRMID));
1914 }
1915 return lpDesc;
1916 }
1917
1918 /**************************************************************************
1919 * midiOutOpen [WINM.84]
1920 */
1921 UINT WINAPI midiOutOpen(HMIDIOUT* lphMidiOut, UINT uDeviceID,
1922 DWORD dwCallback, DWORD dwInstance, DWORD dwFlags)
1923 {
1924 HMIDIOUT16 hmo16;
1925 UINT ret;
1926
1927 ret = midiOutOpen16(&hmo16, uDeviceID, dwCallback, dwInstance,
1928 CALLBACK32CONV(dwFlags));
1929 if (lphMidiOut) *lphMidiOut = hmo16;
1930 return ret;
1931 }
1932
1933 /**************************************************************************
1934 * midiOutOpen [MMSYSTEM.204]
1935 */
1936 UINT16 WINAPI midiOutOpen16(HMIDIOUT16* lphMidiOut, UINT16 uDeviceID,
1937 DWORD dwCallback, DWORD dwInstance, DWORD dwFlags)
1938 {
1939 HMIDIOUT16 hMidiOut;
1940 LPMIDIOPENDESC lpDesc;
1941 UINT16 ret = 0;
1942 BOOL bMapperFlg = FALSE;
1943
1944 TRACE("(%p, %d, %08lX, %08lX, %08lX);\n",
1945 lphMidiOut, uDeviceID, dwCallback, dwInstance, dwFlags);
1946
1947 if (lphMidiOut != NULL) *lphMidiOut = 0;
1948
1949 if (uDeviceID == (UINT16)MIDI_MAPPER) {
1950 TRACE("MIDI_MAPPER mode requested !\n");
1951 bMapperFlg = TRUE;
1952 uDeviceID = 0;
1953 }
1954
1955 lpDesc = MIDI_OutAlloc(&hMidiOut, dwCallback, dwInstance, 0, NULL);
1956
1957 if (lpDesc == NULL)
1958 return MMSYSERR_NOMEM;
1959
1960 while (uDeviceID < MAXMIDIDRIVERS) {
1961 ret = modMessage(uDeviceID, MODM_OPEN,
1962 lpDesc->dwInstance, (DWORD)lpDesc, dwFlags);
1963 if (ret == MMSYSERR_NOERROR) break;
1964 if (!bMapperFlg) break;
1965 uDeviceID++;
1966 TRACE("MIDI_MAPPER mode ! try next driver...\n");
1967 }
1968 TRACE("=> wDevID=%u (%d)\n", uDeviceID, ret);
1969 if (ret != MMSYSERR_NOERROR) {
1970 USER_HEAP_FREE(hMidiOut);
1971 if (lphMidiOut) *lphMidiOut = 0;
1972 } else {
1973 lpDesc->wDevID = uDeviceID;
1974 if (lphMidiOut) *lphMidiOut = hMidiOut;
1975 }
1976
1977 return ret;
1978 }
1979
1980 /**************************************************************************
1981 * midiOutClose [WINMM.74]
1982 */
1983 UINT WINAPI midiOutClose(HMIDIOUT hMidiOut)
1984 {
1985 return midiOutClose16(hMidiOut);
1986 }
1987
1988 /**************************************************************************
1989 * midiOutClose [MMSYSTEM.205]
1990 */
1991 UINT16 WINAPI midiOutClose16(HMIDIOUT16 hMidiOut)
1992 {
1993 LPMIDIOPENDESC lpDesc;
1994 DWORD dwRet;
1995
1996 TRACE("(%04X)\n", hMidiOut);
1997
1998 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
1999
2000 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2001 dwRet = modMessage(lpDesc->wDevID, MODM_CLOSE, lpDesc->dwInstance, 0L, 0L);
2002 USER_HEAP_FREE(hMidiOut);
2003 return dwRet;
2004 }
2005
2006 /**************************************************************************
2007 * midiOutPrepareHeader [WINMM.85]
2008 */
2009 UINT WINAPI midiOutPrepareHeader(HMIDIOUT hMidiOut,
2010 MIDIHDR* lpMidiOutHdr, UINT uSize)
2011 {
2012 LPMIDIOPENDESC lpDesc;
2013
2014 TRACE("(%04X, %p, %d)\n", hMidiOut, lpMidiOutHdr, uSize);
2015
2016 lpDesc = (LPMIDIOPENDESC)USER_HEAP_LIN_ADDR(hMidiOut);
2017 if (lpDesc == NULL)
2018 return MMSYSERR_INVALHANDLE;
2019 lpMidiOutHdr->reserved = (DWORD)lpMidiOutHdr;
2020 return modMessage(lpDesc->wDevID, MODM_PREPARE, lpDesc->dwInstance,
2021 (DWORD)lpMidiOutHdr, (DWORD)uSize);
2022 }
2023
2024 /**************************************************************************
2025 * midiOutPrepareHeader [MMSYSTEM.206]
2026 */
2027 UINT16 WINAPI midiOutPrepareHeader16(HMIDIOUT16 hMidiOut,
2028 LPMIDIHDR16 /*SEGPTR*/ _lpMidiOutHdr, UINT16 uSize)
2029 {
2030 LPMIDIOPENDESC lpDesc;
2031 LPMIDIHDR16 lpMidiOutHdr = (LPMIDIHDR16)PTR_SEG_TO_LIN(_lpMidiOutHdr);
2032
2033 TRACE("(%04X, %p, %d)\n", hMidiOut, lpMidiOutHdr, uSize);
2034
2035 lpDesc = (LPMIDIOPENDESC)USER_HEAP_LIN_ADDR(hMidiOut);
2036 if (lpDesc == NULL)
2037 return MMSYSERR_INVALHANDLE;
2038 lpMidiOutHdr->reserved = (DWORD)_lpMidiOutHdr;
2039 return modMessage(lpDesc->wDevID, MODM_PREPARE, lpDesc->dwInstance,
2040 (DWORD)lpMidiOutHdr, (DWORD)uSize);
2041 }
2042
2043 /**************************************************************************
2044 * midiOutUnprepareHeader [WINMM.89]
2045 */
2046 UINT WINAPI midiOutUnprepareHeader(HMIDIOUT hMidiOut,
2047 MIDIHDR* lpMidiOutHdr, UINT uSize)
2048 {
2049 return midiOutUnprepareHeader16(hMidiOut, (MIDIHDR16*)lpMidiOutHdr, uSize);
2050 }
2051
2052 /**************************************************************************
2053 * midiOutUnprepareHeader [MMSYSTEM.207]
2054 */
2055 UINT16 WINAPI midiOutUnprepareHeader16(HMIDIOUT16 hMidiOut,
2056 MIDIHDR16* lpMidiOutHdr, UINT16 uSize)
2057 {
2058 LPMIDIOPENDESC lpDesc;
2059
2060 TRACE("(%04X, %p, %d)\n", hMidiOut, lpMidiOutHdr, uSize);
2061
2062 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2063 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2064 return modMessage(lpDesc->wDevID, MODM_UNPREPARE, lpDesc->dwInstance,
2065 (DWORD)lpMidiOutHdr, (DWORD)uSize);
2066 }
2067
2068 /**************************************************************************
2069 * midiOutShortMsg [WINMM.88]
2070 */
2071 UINT WINAPI midiOutShortMsg(HMIDIOUT hMidiOut, DWORD dwMsg)
2072 {
2073 return midiOutShortMsg16(hMidiOut, dwMsg);
2074 }
2075
2076 /**************************************************************************
2077 * midiOutShortMsg [MMSYSTEM.208]
2078 */
2079 UINT16 WINAPI midiOutShortMsg16(HMIDIOUT16 hMidiOut, DWORD dwMsg)
2080 {
2081 LPMIDIOPENDESC lpDesc;
2082
2083 TRACE("(%04X, %08lX)\n", hMidiOut, dwMsg);
2084
2085 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2086 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2087 return modMessage(lpDesc->wDevID, MODM_DATA, lpDesc->dwInstance, dwMsg, 0L);
2088 }
2089
2090 /**************************************************************************
2091 * midiOutLongMsg [WINMM.82]
2092 */
2093 UINT WINAPI midiOutLongMsg(HMIDIOUT hMidiOut,
2094 MIDIHDR* lpMidiOutHdr, UINT uSize)
2095 {
2096 return midiOutLongMsg16(hMidiOut, (MIDIHDR16*)lpMidiOutHdr, uSize);
2097 }
2098
2099 /**************************************************************************
2100 * midiOutLongMsg [MMSYSTEM.209]
2101 */
2102 UINT16 WINAPI midiOutLongMsg16(HMIDIOUT16 hMidiOut,
2103 MIDIHDR16* lpMidiOutHdr, UINT16 uSize)
2104 {
2105 LPMIDIOPENDESC lpDesc;
2106
2107 TRACE("(%04X, %p, %d)\n", hMidiOut, lpMidiOutHdr, uSize);
2108
2109 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2110 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2111 return modMessage(lpDesc->wDevID, MODM_LONGDATA, lpDesc->dwInstance,
2112 (DWORD)lpMidiOutHdr, (DWORD)uSize);
2113 }
2114
2115 /**************************************************************************
2116 * midiOutReset [WINMM.86]
2117 */
2118 UINT WINAPI midiOutReset(HMIDIOUT hMidiOut)
2119 {
2120 return midiOutReset16(hMidiOut);
2121 }
2122
2123 /**************************************************************************
2124 * midiOutReset [MMSYSTEM.210]
2125 */
2126 UINT16 WINAPI midiOutReset16(HMIDIOUT16 hMidiOut)
2127 {
2128 LPMIDIOPENDESC lpDesc;
2129
2130 TRACE("(%04X)\n", hMidiOut);
2131
2132 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2133 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2134 return modMessage(lpDesc->wDevID, MODM_RESET, lpDesc->dwInstance, 0L, 0L);
2135 }
2136
2137 /**************************************************************************
2138 * midiOutGetVolume [WINM.81]
2139 */
2140 UINT WINAPI midiOutGetVolume(UINT uDeviceID, DWORD* lpdwVolume)
2141 {
2142 return midiOutGetVolume16(uDeviceID, lpdwVolume);
2143 }
2144
2145 /**************************************************************************
2146 * midiOutGetVolume [MMSYSTEM.211]
2147 */
2148 UINT16 WINAPI midiOutGetVolume16(UINT16 uDeviceID, DWORD* lpdwVolume)
2149 {
2150 TRACE("(%04X, %p);\n", uDeviceID, lpdwVolume);
2151 return modMessage(uDeviceID, MODM_GETVOLUME, 0L, (DWORD)lpdwVolume, 0L);
2152 }
2153
2154 /**************************************************************************
2155 * midiOutSetVolume [WINMM.87]
2156 */
2157 UINT WINAPI midiOutSetVolume(UINT uDeviceID, DWORD dwVolume)
2158 {
2159 return midiOutSetVolume16(uDeviceID, dwVolume);
2160 }
2161
2162 /**************************************************************************
2163 * midiOutSetVolume [MMSYSTEM.212]
2164 */
2165 UINT16 WINAPI midiOutSetVolume16(UINT16 uDeviceID, DWORD dwVolume)
2166 {
2167 TRACE("(%04X, %08lX);\n", uDeviceID, dwVolume);
2168 return modMessage(uDeviceID, MODM_SETVOLUME, 0L, dwVolume, 0L);
2169 }
2170
2171 /**************************************************************************
2172 * midiOutCachePatches [WINMM.73]
2173 */
2174 UINT WINAPI midiOutCachePatches(HMIDIOUT hMidiOut, UINT uBank,
2175 WORD* lpwPatchArray, UINT uFlags)
2176 {
2177 return midiOutCachePatches16(hMidiOut, uBank, lpwPatchArray, uFlags);
2178 }
2179
2180 /**************************************************************************
2181 * midiOutCachePatches [MMSYSTEM.213]
2182 */
2183 UINT16 WINAPI midiOutCachePatches16(HMIDIOUT16 hMidiOut, UINT16 uBank,
2184 WORD* lpwPatchArray, UINT16 uFlags)
2185 {
2186 /* not really necessary to support this */
2187 FIXME("not supported yet\n");
2188 return MMSYSERR_NOTSUPPORTED;
2189 }
2190
2191 /**************************************************************************
2192 * midiOutCacheDrumPatches [WINMM.72]
2193 */
2194 UINT WINAPI midiOutCacheDrumPatches(HMIDIOUT hMidiOut, UINT uPatch,
2195 WORD* lpwKeyArray, UINT uFlags)
2196 {
2197 return midiOutCacheDrumPatches16(hMidiOut, uPatch, lpwKeyArray, uFlags);
2198 }
2199
2200 /**************************************************************************
2201 * midiOutCacheDrumPatches [MMSYSTEM.214]
2202 */
2203 UINT16 WINAPI midiOutCacheDrumPatches16(HMIDIOUT16 hMidiOut, UINT16 uPatch,
2204 WORD* lpwKeyArray, UINT16 uFlags)
2205 {
2206 FIXME("not supported yet\n");
2207 return MMSYSERR_NOTSUPPORTED;
2208 }
2209
2210 /**************************************************************************
2211 * midiOutGetID [WINMM.79]
2212 */
2213 UINT WINAPI midiOutGetID(HMIDIOUT hMidiOut, UINT* lpuDeviceID)
2214 {
2215 UINT16 xid;
2216 UINT ret;
2217
2218 ret = midiOutGetID16(hMidiOut, &xid);
2219 *lpuDeviceID = xid;
2220 return ret;
2221 }
2222
2223 /**************************************************************************
2224 * midiOutGetID [MMSYSTEM.215]
2225 */
2226 UINT16 WINAPI midiOutGetID16(HMIDIOUT16 hMidiOut, UINT16* lpuDeviceID)
2227 {
2228 TRACE("midiOutGetID\n");
2229 return 0;
2230 }
2231
2232 /**************************************************************************
2233 * midiOutMessage [WINMM.83]
2234 */
2235 DWORD WINAPI midiOutMessage(HMIDIOUT hMidiOut, UINT uMessage,
2236 DWORD dwParam1, DWORD dwParam2)
2237 {
2238 LPMIDIOPENDESC lpDesc;
2239
2240 /* Shouldn't we anyway use the functions midiOutXXX ?
2241 * M$ doc says: This function is used only for driver-specific
2242 * messages that are not supported by the MIDI API.
2243 * Clearly not what we are currently doing
2244 */
2245
2246 TRACE("(%04X, %04X, %08lX, %08lX)\n",
2247 hMidiOut, uMessage, dwParam1, dwParam2);
2248
2249 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2250 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2251 switch (uMessage) {
2252 case MODM_OPEN:
2253 FIXME("can't handle MODM_OPEN!\n");
2254 return 0;
2255 case MODM_GETDEVCAPS:
2256 return midiOutGetDevCapsA(hMidiOut, (LPMIDIOUTCAPSA)dwParam1, dwParam2);
2257 case MODM_GETNUMDEVS:
2258 case MODM_RESET:
2259 case MODM_CLOSE:
2260 case MODM_GETVOLUME:
2261 case MODM_SETVOLUME:
2262 case MODM_LONGDATA:
2263 case MODM_PREPARE:
2264 case MODM_UNPREPARE:
2265 /* no argument conversion needed */
2266 break;
2267 default:
2268 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
2269 hMidiOut, uMessage, dwParam1, dwParam2);
2270 break;
2271 }
2272 return modMessage(lpDesc->wDevID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
2273 }
2274
2275 /**************************************************************************
2276 * midiOutMessage [MMSYSTEM.216]
2277 */
2278 DWORD WINAPI midiOutMessage16(HMIDIOUT16 hMidiOut, UINT16 uMessage,
2279 DWORD dwParam1, DWORD dwParam2)
2280 {
2281 LPMIDIOPENDESC lpDesc;
2282
2283 TRACE("(%04X, %04X, %08lX, %08lX)\n",
2284 hMidiOut, uMessage, dwParam1, dwParam2);
2285 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiOut);
2286 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2287 switch (uMessage) {
2288 case MODM_OPEN:
2289 FIXME("can't handle MODM_OPEN!\n");
2290 return 0;
2291 case MODM_GETNUMDEVS:
2292 case MODM_RESET:
2293 case MODM_CLOSE:
2294 case MODM_SETVOLUME:
2295 /* no argument conversion needed */
2296 break;
2297 case MODM_GETVOLUME:
2298 return midiOutGetVolume16(hMidiOut, (LPDWORD)PTR_SEG_TO_LIN(dwParam1));
2299 case MODM_LONGDATA:
2300 return midiOutLongMsg16(hMidiOut, (LPMIDIHDR16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2301 case MODM_PREPARE:
2302 /* lpMidiOutHdr is still a segmented pointer for this function */
2303 return midiOutPrepareHeader16(hMidiOut, (LPMIDIHDR16)dwParam1, dwParam2);
2304 case MODM_UNPREPARE:
2305 return midiOutUnprepareHeader16(hMidiOut, (LPMIDIHDR16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2306 default:
2307 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
2308 hMidiOut, uMessage, dwParam1, dwParam2);
2309 break;
2310 }
2311 return modMessage(lpDesc->wDevID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
2312 }
2313
2314 /**************************************************************************
2315 * midiInGetNumDevs [WINMM.64]
2316 */
2317 UINT WINAPI midiInGetNumDevs(void)
2318 {
2319 return midiInGetNumDevs16();
2320 }
2321
2322 /**************************************************************************
2323 * midiInGetNumDevs [MMSYSTEM.301]
2324 */
2325 UINT16 WINAPI midiInGetNumDevs16(void)
2326 {
2327 UINT16 count = 0;
2328 TRACE("midiInGetNumDevs\n");
2329 count += midMessage(0, MIDM_GETNUMDEVS, 0L, 0L, 0L);
2330 TRACE("midiInGetNumDevs return %u \n", count);
2331 return count;
2332 }
2333
2334 /**************************************************************************
2335 * midiInGetDevCaps [WINMM.60]
2336 */
2337 UINT WINAPI midiInGetDevCapsW(UINT uDeviceID, LPMIDIINCAPSW lpCaps, UINT uSize)
2338 {
2339 MIDIINCAPS16 mic16;
2340 UINT ret = midiInGetDevCaps16(uDeviceID, &mic16, uSize);
2341
2342 lpCaps->wMid = mic16.wMid;
2343 lpCaps->wPid = mic16.wPid;
2344 lpCaps->vDriverVersion = mic16.vDriverVersion;
2345 lstrcpyAtoW(lpCaps->szPname, mic16.szPname);
2346 lpCaps->dwSupport = mic16.dwSupport;
2347 return ret;
2348 }
2349
2350 /**************************************************************************
2351 * midiInGetDevCaps [WINMM.59]
2352 */
2353 UINT WINAPI midiInGetDevCapsA(UINT uDeviceID, LPMIDIINCAPSA lpCaps, UINT uSize)
2354 {
2355 MIDIINCAPS16 mic16;
2356 UINT ret = midiInGetDevCaps16(uDeviceID, &mic16, uSize);
2357
2358 lpCaps->wMid = mic16.wMid;
2359 lpCaps->wPid = mic16.wPid;
2360 lpCaps->vDriverVersion = mic16.vDriverVersion;
2361 strcpy(lpCaps->szPname, mic16.szPname);
2362 lpCaps->dwSupport = mic16.dwSupport;
2363 return ret;
2364 }
2365
2366 /**************************************************************************
2367 * midiInGetDevCaps [MMSYSTEM.302]
2368 */
2369 UINT16 WINAPI midiInGetDevCaps16(UINT16 uDeviceID,
2370 LPMIDIINCAPS16 lpCaps, UINT16 uSize)
2371 {
2372 TRACE("(%d, %p, %d);\n",uDeviceID, lpCaps, uSize);
2373
2374 return midMessage(uDeviceID, MIDM_GETDEVCAPS, 0, (DWORD)lpCaps, uSize);
2375 }
2376
2377 /**************************************************************************
2378 * midiInGetErrorText [WINMM.62]
2379 */
2380 UINT WINAPI midiInGetErrorTextW(UINT uError, LPWSTR lpText, UINT uSize)
2381 {
2382 LPSTR xstr = HeapAlloc(GetProcessHeap(), 0, uSize);
2383 UINT ret = MIDI_GetErrorText(uError, xstr, uSize);
2384
2385 lstrcpyAtoW(lpText, xstr);
2386 HeapFree(GetProcessHeap(), 0, xstr);
2387 return ret;
2388 }
2389
2390 /**************************************************************************
2391 * midiInGetErrorText [WINMM.61]
2392 */
2393 UINT WINAPI midiInGetErrorTextA(UINT uError, LPSTR lpText, UINT uSize)
2394 {
2395 return MIDI_GetErrorText(uError, lpText, uSize);
2396 }
2397
2398 /**************************************************************************
2399 * midiInGetErrorText [MMSYSTEM.303]
2400 */
2401 UINT16 WINAPI midiInGetErrorText16(UINT16 uError, LPSTR lpText, UINT16 uSize)
2402 {
2403 return MIDI_GetErrorText(uError, lpText, uSize);
2404 }
2405
2406 /**************************************************************************
2407 * midiInOpen [WINMM.66]
2408 */
2409 UINT WINAPI midiInOpen(HMIDIIN* lphMidiIn, UINT uDeviceID,
2410 DWORD dwCallback, DWORD dwInstance, DWORD dwFlags)
2411 {
2412 HMIDIIN16 xhmid16;
2413 UINT ret = midiInOpen16(&xhmid16, uDeviceID, dwCallback, dwInstance,
2414 CALLBACK32CONV(dwFlags));
2415 if (lphMidiIn)
2416 *lphMidiIn = xhmid16;
2417 return ret;
2418 }
2419
2420 /**************************************************************************
2421 * midiInOpen [MMSYSTEM.304]
2422 */
2423 UINT16 WINAPI midiInOpen16(HMIDIIN16* lphMidiIn, UINT16 uDeviceID,
2424 DWORD dwCallback, DWORD dwInstance, DWORD dwFlags)
2425 {
2426 HMIDI16 hMidiIn;
2427 LPMIDIOPENDESC lpDesc;
2428 DWORD dwRet = 0;
2429 BOOL bMapperFlg = FALSE;
2430
2431 if (lphMidiIn != NULL)
2432 *lphMidiIn = 0;
2433 TRACE("(%p, %d, %08lX, %08lX, %08lX);\n",
2434 lphMidiIn, uDeviceID, dwCallback, dwInstance, dwFlags);
2435 if (uDeviceID == (UINT16)MIDI_MAPPER) {
2436 TRACE("MIDI_MAPPER mode requested !\n");
2437 bMapperFlg = TRUE;
2438 uDeviceID = 0;
2439 }
2440 hMidiIn = USER_HEAP_ALLOC(sizeof(MIDIOPENDESC));
2441 if (lphMidiIn != NULL)
2442 *lphMidiIn = hMidiIn;
2443 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2444 if (lpDesc == NULL)
2445 return MMSYSERR_NOMEM;
2446 lpDesc->hMidi = hMidiIn;
2447 lpDesc->dwCallback = dwCallback;
2448 lpDesc->dwInstance = dwInstance;
2449
2450 while (uDeviceID < MAXMIDIDRIVERS) {
2451 dwRet = midMessage(uDeviceID, MIDM_OPEN,
2452 lpDesc->dwInstance, (DWORD)lpDesc, dwFlags);
2453 if (dwRet == MMSYSERR_NOERROR)
2454 break;
2455 if (!bMapperFlg)
2456 break;
2457 uDeviceID++;
2458 TRACE("MIDI_MAPPER mode ! try next driver...\n");
2459 }
2460 lpDesc->wDevID = uDeviceID;
2461
2462 if (dwRet != MMSYSERR_NOERROR) {
2463 USER_HEAP_FREE(hMidiIn);
2464 if (lphMidiIn) *lphMidiIn = 0;
2465 }
2466
2467 return dwRet;
2468 }
2469
2470 /**************************************************************************
2471 * midiInClose [WINMM.58]
2472 */
2473 UINT WINAPI midiInClose(HMIDIIN hMidiIn)
2474 {
2475 return midiInClose16(hMidiIn);
2476 }
2477
2478 /**************************************************************************
2479 * midiInClose [MMSYSTEM.305]
2480 */
2481 UINT16 WINAPI midiInClose16(HMIDIIN16 hMidiIn)
2482 {
2483 LPMIDIOPENDESC lpDesc;
2484 DWORD dwRet;
2485
2486 TRACE("(%04X)\n", hMidiIn);
2487 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2488
2489 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2490 dwRet = midMessage(lpDesc->wDevID, MIDM_CLOSE, lpDesc->dwInstance, 0L, 0L);
2491 USER_HEAP_FREE(hMidiIn);
2492 return dwRet;
2493 }
2494
2495 /**************************************************************************
2496 * midiInPrepareHeader [WINMM.67]
2497 */
2498 UINT WINAPI midiInPrepareHeader(HMIDIIN hMidiIn,
2499 MIDIHDR* lpMidiInHdr, UINT uSize)
2500 {
2501 LPMIDIOPENDESC lpDesc;
2502
2503 TRACE("(%04X, %p, %d)\n", hMidiIn, lpMidiInHdr, uSize);
2504
2505 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2506 if (lpDesc == NULL)
2507 return MMSYSERR_INVALHANDLE;
2508 lpMidiInHdr->reserved = (DWORD)lpMidiInHdr;
2509 return midMessage(lpDesc->wDevID, MIDM_PREPARE, lpDesc->dwInstance,
2510 (DWORD)lpMidiInHdr, (DWORD)uSize);
2511 }
2512
2513 /**************************************************************************
2514 * midiInPrepareHeader [MMSYSTEM.306]
2515 */
2516 UINT16 WINAPI midiInPrepareHeader16(HMIDIIN16 hMidiIn,
2517 MIDIHDR16* /*SEGPTR*/ _lpMidiInHdr, UINT16 uSize)
2518 {
2519 LPMIDIOPENDESC lpDesc;
2520 LPMIDIHDR16 lpMidiInHdr = (LPMIDIHDR16)PTR_SEG_TO_LIN(_lpMidiInHdr);
2521
2522 TRACE("(%04X, %p, %d)\n", hMidiIn, lpMidiInHdr, uSize);
2523
2524 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2525 if (lpDesc == NULL)
2526 return MMSYSERR_INVALHANDLE;
2527 lpMidiInHdr->reserved = (DWORD)_lpMidiInHdr;
2528 return midMessage(lpDesc->wDevID, MIDM_PREPARE, lpDesc->dwInstance,
2529 (DWORD)lpMidiInHdr, (DWORD)uSize);
2530 }
2531
2532 /**************************************************************************
2533 * midiInUnprepareHeader [WINMM.71]
2534 */
2535 UINT WINAPI midiInUnprepareHeader(HMIDIIN hMidiIn,
2536 MIDIHDR* lpMidiInHdr, UINT uSize)
2537 {
2538 return midiInUnprepareHeader16(hMidiIn, (MIDIHDR16*)lpMidiInHdr, uSize);
2539 }
2540
2541 /**************************************************************************
2542 * midiInUnprepareHeader [MMSYSTEM.307]
2543 */
2544 UINT16 WINAPI midiInUnprepareHeader16(HMIDIIN16 hMidiIn,
2545 MIDIHDR16* lpMidiInHdr, UINT16 uSize)
2546 {
2547 LPMIDIOPENDESC lpDesc;
2548
2549 TRACE("(%04X, %p, %d)\n", hMidiIn, lpMidiInHdr, uSize);
2550
2551 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2552 if (lpDesc == NULL)
2553 return MMSYSERR_INVALHANDLE;
2554 return midMessage(lpDesc->wDevID, MIDM_UNPREPARE, lpDesc->dwInstance,
2555 (DWORD)lpMidiInHdr, (DWORD)uSize);
2556 }
2557
2558 /**************************************************************************
2559 * midiInAddBuffer [WINMM.57]
2560 */
2561 UINT WINAPI midiInAddBuffer(HMIDIIN hMidiIn,
2562 MIDIHDR* lpMidiInHdr, UINT uSize)
2563 {
2564 return midiInAddBuffer16(hMidiIn, (MIDIHDR16*)lpMidiInHdr, uSize);
2565 }
2566
2567 /**************************************************************************
2568 * midiInAddBuffer [MMSYSTEM.308]
2569 */
2570 UINT16 WINAPI midiInAddBuffer16(HMIDIIN16 hMidiIn,
2571 MIDIHDR16* lpMidiInHdr, UINT16 uSize)
2572 {
2573 TRACE("midiInAddBuffer\n");
2574 return 0;
2575 }
2576
2577 /**************************************************************************
2578 * midiInStart [WINMM.69]
2579 */
2580 UINT WINAPI midiInStart(HMIDIIN hMidiIn)
2581 {
2582 return midiInStart16(hMidiIn);
2583 }
2584
2585 /**************************************************************************
2586 * midiInStart [MMSYSTEM.309]
2587 */
2588 UINT16 WINAPI midiInStart16(HMIDIIN16 hMidiIn)
2589 {
2590 LPMIDIOPENDESC lpDesc;
2591
2592 TRACE("(%04X)\n", hMidiIn);
2593 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2594 if (lpDesc == NULL)
2595 return MMSYSERR_INVALHANDLE;
2596 return midMessage(lpDesc->wDevID, MIDM_START, lpDesc->dwInstance, 0L, 0L);
2597 }
2598
2599 /**************************************************************************
2600 * midiInStop [WINMM.70]
2601 */
2602 UINT WINAPI midiInStop(HMIDIIN hMidiIn)
2603 {
2604 return midiInStop16(hMidiIn);
2605 }
2606
2607 /**************************************************************************
2608 * midiInStop [MMSYSTEM.310]
2609 */
2610 UINT16 WINAPI midiInStop16(HMIDIIN16 hMidiIn)
2611 {
2612 LPMIDIOPENDESC lpDesc;
2613
2614 TRACE("(%04X)\n", hMidiIn);
2615 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2616 if (lpDesc == NULL)
2617 return MMSYSERR_INVALHANDLE;
2618 return midMessage(lpDesc->wDevID, MIDM_STOP, lpDesc->dwInstance, 0L, 0L);
2619 }
2620
2621 /**************************************************************************
2622 * midiInReset [WINMM.68]
2623 */
2624 UINT WINAPI midiInReset(HMIDIIN hMidiIn)
2625 {
2626 return midiInReset16(hMidiIn);
2627 }
2628
2629 /**************************************************************************
2630 * midiInReset [MMSYSTEM.311]
2631 */
2632 UINT16 WINAPI midiInReset16(HMIDIIN16 hMidiIn)
2633 {
2634 LPMIDIOPENDESC lpDesc;
2635
2636 TRACE("(%04X)\n", hMidiIn);
2637 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2638 if (lpDesc == NULL)
2639 return MMSYSERR_INVALHANDLE;
2640 return midMessage(lpDesc->wDevID, MIDM_RESET, lpDesc->dwInstance, 0L, 0L);
2641 }
2642
2643 /**************************************************************************
2644 * midiInGetID [WINMM.63]
2645 */
2646 UINT WINAPI midiInGetID(HMIDIIN hMidiIn, UINT* lpuDeviceID)
2647 {
2648 LPMIDIOPENDESC lpDesc;
2649
2650 TRACE("(%04X, %p)\n", hMidiIn, lpuDeviceID);
2651 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2652 if (lpDesc == NULL)
2653 return MMSYSERR_INVALHANDLE;
2654 if (lpuDeviceID == NULL)
2655 return MMSYSERR_INVALPARAM;
2656 *lpuDeviceID = lpDesc->wDevID;
2657
2658 return MMSYSERR_NOERROR;
2659 }
2660
2661 /**************************************************************************
2662 * midiInGetID [MMSYSTEM.312]
2663 */
2664 UINT16 WINAPI midiInGetID16(HMIDIIN16 hMidiIn, UINT16* lpuDeviceID)
2665 {
2666 LPMIDIOPENDESC lpDesc;
2667
2668 TRACE("(%04X, %p)\n", hMidiIn, lpuDeviceID);
2669 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2670 if (lpDesc == NULL)
2671 return MMSYSERR_INVALHANDLE;
2672 if (lpuDeviceID == NULL)
2673 return MMSYSERR_INVALPARAM;
2674 *lpuDeviceID = lpDesc->wDevID;
2675
2676 return MMSYSERR_NOERROR;
2677 }
2678
2679 /**************************************************************************
2680 * midiInMessage [WINMM.65]
2681 */
2682 DWORD WINAPI midiInMessage(HMIDIIN hMidiIn, UINT uMessage,
2683 DWORD dwParam1, DWORD dwParam2)
2684 {
2685 LPMIDIOPENDESC lpDesc;
2686
2687 TRACE("(%04X, %04X, %08lX, %08lX)\n",
2688 hMidiIn, uMessage, dwParam1, dwParam2);
2689 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2690 if (lpDesc == NULL)
2691 return MMSYSERR_INVALHANDLE;
2692
2693 switch (uMessage) {
2694 case MIDM_OPEN:
2695 FIXME("can't handle MIDM_OPEN!\n");
2696 return 0;
2697 case MIDM_GETDEVCAPS:
2698 return midiInGetDevCapsA(hMidiIn, (LPMIDIINCAPSA)dwParam1, dwParam2);
2699 case MIDM_GETNUMDEVS:
2700 case MIDM_RESET:
2701 case MIDM_STOP:
2702 case MIDM_START:
2703 case MIDM_CLOSE:
2704 /* no argument conversion needed */
2705 break;
2706 case MIDM_PREPARE:
2707 return midiInPrepareHeader(hMidiIn, (LPMIDIHDR)dwParam1, dwParam2);
2708 case MIDM_UNPREPARE:
2709 return midiInUnprepareHeader(hMidiIn, (LPMIDIHDR)dwParam1, dwParam2);
2710 case MIDM_ADDBUFFER:
2711 return midiInAddBuffer(hMidiIn, (LPMIDIHDR)dwParam1, dwParam2);
2712 default:
2713 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
2714 hMidiIn, uMessage, dwParam1, dwParam2);
2715 break;
2716 }
2717 return midMessage(0, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
2718 }
2719
2720 /**************************************************************************
2721 * midiInMessage [MMSYSTEM.313]
2722 */
2723 DWORD WINAPI midiInMessage16(HMIDIIN16 hMidiIn, UINT16 uMessage,
2724 DWORD dwParam1, DWORD dwParam2)
2725 {
2726 LPMIDIOPENDESC lpDesc;
2727
2728 TRACE("(%04X, %04X, %08lX, %08lX)\n", hMidiIn, uMessage, dwParam1, dwParam2);
2729
2730 lpDesc = (LPMIDIOPENDESC) USER_HEAP_LIN_ADDR(hMidiIn);
2731 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
2732 switch (uMessage) {
2733 case MIDM_OPEN:
2734 WARN("can't handle MIDM_OPEN!\n");
2735 return 0;
2736 case MIDM_GETDEVCAPS:
2737 return midiInGetDevCaps16(hMidiIn, (LPMIDIINCAPS16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2738 case MIDM_GETNUMDEVS:
2739 case MIDM_RESET:
2740 case MIDM_STOP:
2741 case MIDM_START:
2742 case MIDM_CLOSE:
2743 /* no argument conversion needed */
2744 break;
2745 case MIDM_PREPARE:
2746 return midiInPrepareHeader16(hMidiIn, (LPMIDIHDR16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2747 case MIDM_UNPREPARE:
2748 return midiInUnprepareHeader16(hMidiIn, (LPMIDIHDR16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2749 case MIDM_ADDBUFFER:
2750 return midiInAddBuffer16(hMidiIn, (LPMIDIHDR16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
2751 default:
2752 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
2753 hMidiIn, uMessage, dwParam1, dwParam2);
2754 break;
2755 }
2756 return midMessage(0, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
2757 }
2758
2759 typedef struct WINE_MIDIStream{
2760 HMIDIOUT hDevice;
2761 HANDLE hThread;
2762 DWORD dwThreadID;
2763 DWORD dwTempo;
2764 DWORD dwTimeDiv;
2765 DWORD dwPositionMS;
2766 DWORD dwPulses;
2767 DWORD dwStartTicks;
2768 WORD wFlags;
2769 HANDLE hEvent;
2770 LPMIDIHDR lpMidiHdr;
2771 } WINE_MIDIStream;
2772
2773 #define WINE_MSM_HEADER (WM_USER+0)
2774 #define WINE_MSM_STOP (WM_USER+1)
2775
2776 /**************************************************************************
2777 * MMSYSTEM_GetMidiStream [internal]
2778 */
2779 static BOOL MMSYSTEM_GetMidiStream(HMIDISTRM hMidiStrm, WINE_MIDIStream** lpMidiStrm, MIDIOPENDESC** lplpDesc)
2780 {
2781 MIDIOPENDESC* lpDesc = (LPMIDIOPENDESC)USER_HEAP_LIN_ADDR(hMidiStrm);
2782
2783 if (lplpDesc)
2784 *lplpDesc = lpDesc;
2785
2786 if (lpDesc == NULL) {
2787 return FALSE;
2788 }
2789
2790 *lpMidiStrm = (WINE_MIDIStream*)lpDesc->rgIds.dwStreamID;
2791
2792 return *lpMidiStrm != NULL;
2793 }
2794
2795 /**************************************************************************
2796 * MMSYSTEM_MidiStream_Convert [internal]
2797 */
2798 static DWORD MMSYSTEM_MidiStream_Convert(WINE_MIDIStream* lpMidiStrm, DWORD pulse)
2799 {
2800 DWORD ret = 0;
2801
2802 if (lpMidiStrm->dwTimeDiv == 0) {
2803 FIXME("Shouldn't happen. lpMidiStrm->dwTimeDiv = 0\n");
2804 } else if (lpMidiStrm->dwTimeDiv > 0x8000) { /* SMPTE, unchecked FIXME? */
2805 int nf = -(char)HIBYTE(lpMidiStrm->dwTimeDiv); /* number of frames */
2806 int nsf = LOBYTE(lpMidiStrm->dwTimeDiv); /* number of sub-frames */
2807 ret = (pulse * 1000) / (nf * nsf);
2808 } else {
2809 ret = (DWORD)((double)pulse * ((double)lpMidiStrm->dwTempo / 1000) /
2810 (double)lpMidiStrm->dwTimeDiv);
2811 }
2812
2813 return ret;
2814 }
2815
2816 /**************************************************************************
2817 * MMSYSTEM_MidiStream_MessageHandler [internal]
2818 */
2819 static BOOL MMSYSTEM_MidiStream_MessageHandler(WINE_MIDIStream* lpMidiStrm, LPMIDIOPENDESC lpDesc, LPMSG msg)
2820 {
2821 LPMIDIHDR lpMidiHdr;
2822 LPMIDIHDR* lpmh;
2823 LPBYTE lpData;
2824
2825 switch (msg->message) {
2826 case WM_QUIT:
2827 SetEvent(lpMidiStrm->hEvent);
2828 return FALSE;
2829 case WINE_MSM_STOP:
2830 TRACE("STOP\n");
2831 /* this is not quite what MS doc says... */
2832 midiOutReset(lpMidiStrm->hDevice);
2833 /* empty list of already submitted buffers */
2834 for (lpMidiHdr = lpMidiStrm->lpMidiHdr; lpMidiHdr; lpMidiHdr = (LPMIDIHDR)lpMidiHdr->lpNext) {
2835 lpMidiHdr->dwFlags |= MHDR_DONE;
2836 lpMidiHdr->dwFlags &= ~MHDR_INQUEUE;
2837
2838 DriverCallback16(lpDesc->dwCallback, lpMidiStrm->wFlags, lpMidiStrm->hDevice,
2839 MM_MOM_DONE, lpDesc->dwInstance, lpMidiHdr->reserved, 0L);
2840 }
2841 lpMidiStrm->lpMidiHdr = 0;
2842 SetEvent(lpMidiStrm->hEvent);
2843 break;
2844 case WINE_MSM_HEADER:
2845 /* sets initial tick count for first MIDIHDR */
2846 if (!lpMidiStrm->dwStartTicks)
2847 lpMidiStrm->dwStartTicks = GetTickCount();
2848
2849 /* FIXME(EPP): "I don't understand the content of the first MIDIHDR sent
2850 * by native mcimidi, it doesn't look like a correct one".
2851 * this trick allows to throw it away... but I don't like it.
2852 * It looks like part of the file I'm trying to play and definitively looks
2853 * like raw midi content
2854 * I'd really like to understand why native mcimidi sends it. Perhaps a bad
2855 * synchronization issue where native mcimidi is still processing raw MIDI
2856 * content before generating MIDIEVENTs ?
2857 *
2858 * 4c 04 89 3b 00 81 7c 99 3b 43 00 99 23 5e 04 89 L..;..|.;C..#^..
2859 * 3b 00 00 89 23 00 7c 99 3b 45 00 99 28 62 04 89 ;...#.|.;E..(b..
2860 * 3b 00 00 89 28 00 81 7c 99 3b 4e 00 99 23 5e 04 ;...(..|.;N..#^.
2861 * 89 3b 00 00 89 23 00 7c 99 3b 45 00 99 23 78 04 .;...#.|.;E..#x.
2862 * 89 3b 00 00 89 23 00 81 7c 99 3b 48 00 99 23 5e .;...#..|.;H..#^
2863 * 04 89 3b 00 00 89 23 00 7c 99 3b 4e 00 99 28 62 ..;...#.|.;N..(b
2864 * 04 89 3b 00 00 89 28 00 81 7c 99 39 4c 00 99 23 ..;...(..|.9L..#
2865 * 5e 04 89 39 00 00 89 23 00 82 7c 99 3b 4c 00 99 ^..9...#..|.;L..
2866 * 23 5e 04 89 3b 00 00 89 23 00 7c 99 3b 48 00 99 #^..;...#.|.;H..
2867 * 28 62 04 89 3b 00 00 89 28 00 81 7c 99 3b 3f 04 (b..;...(..|.;?.
2868 * 89 3b 00 1c 99 23 5e 04 89 23 00 5c 99 3b 45 00 .;...#^..#.\.;E.
2869 * 99 23 78 04 89 3b 00 00 89 23 00 81 7c 99 3b 46 .#x..;...#..|.;F
2870 * 00 99 23 5e 04 89 3b 00 00 89 23 00 7c 99 3b 48 ..#^..;...#.|.;H
2871 * 00 99 28 62 04 89 3b 00 00 89 28 00 81 7c 99 3b ..(b..;...(..|.;
2872 * 46 00 99 23 5e 04 89 3b 00 00 89 23 00 7c 99 3b F..#^..;...#.|.;
2873 * 48 00 99 23 78 04 89 3b 00 00 89 23 00 81 7c 99 H..#x..;...#..|.
2874 * 3b 4c 00 99 23 5e 04 89 3b 00 00 89 23 00 7c 99 ;L..#^..;...#.|.
2875 */
2876 lpMidiHdr = (LPMIDIHDR)msg->lParam;
2877 lpData = ((DWORD)lpMidiHdr == lpMidiHdr->reserved) ?
2878 (LPBYTE)lpMidiHdr->lpData : (LPBYTE)PTR_SEG_TO_LIN(lpMidiHdr->lpData);
2879 TRACE("Adding %s lpMidiHdr=%p [lpData=0x%08lx dwBufferLength=%lu/%lu dwFlags=0x%08lx size=%u]\n",
2880 (lpMidiHdr->dwFlags & MHDR_ISSTRM) ? "stream" : "regular", lpMidiHdr,
2881 lpMidiHdr->reserved, lpMidiHdr->dwBufferLength, lpMidiHdr->dwBytesRecorded,
2882 lpMidiHdr->dwFlags, msg->wParam);
2883 #if 0
2884 /* dumps content of lpMidiHdr->lpData
2885 * FIXME: there should be a debug routine somewhere that already does this
2886 * I hate spreading this type of shit all around the code
2887 */
2888 for (dwToGo = 0; dwToGo < lpMidiHdr->dwBufferLength; dwToGo += 16) {
2889 DWORD i;
2890 BYTE ch;
2891
2892 for (i = 0; i < MIN(16, lpMidiHdr->dwBufferLength - dwToGo); i++)
2893 printf("%02x ", lpData[dwToGo + i]);
2894 for (; i < 16; i++)
2895 printf(" ");
2896 for (i = 0; i < MIN(16, lpMidiHdr->dwBufferLength - dwToGo); i++) {
2897 ch = lpData[dwToGo + i];
2898 printf("%c", (ch >= 0x20 && ch <= 0x7F) ? ch : '.');
2899 }
2900 printf("\n");
2901 }
2902 #endif
2903 if (((LPMIDIEVENT)lpData)->dwStreamID != 0 &&
2904 ((LPMIDIEVENT)lpData)->dwStreamID != 0xFFFFFFFF &&
2905 ((LPMIDIEVENT)lpData)->dwStreamID != (DWORD)lpMidiStrm) {
2906 FIXME("Dropping bad %s lpMidiHdr (streamID=%08lx)\n",
2907 (lpMidiHdr->dwFlags & MHDR_ISSTRM) ? "stream" : "regular",
2908 ((LPMIDIEVENT)lpData)->dwStreamID);
2909 lpMidiHdr->dwFlags |= MHDR_DONE;
2910 lpMidiHdr->dwFlags &= ~MHDR_INQUEUE;
2911
2912 DriverCallback16(lpDesc->dwCallback, lpMidiStrm->wFlags, lpMidiStrm->hDevice,
2913 MM_MOM_DONE, lpDesc->dwInstance, lpMidiHdr->reserved, 0L);
2914 break;
2915 }
2916
2917 for (lpmh = &lpMidiStrm->lpMidiHdr; *lpmh; lpmh = (LPMIDIHDR*)&((*lpmh)->lpNext));
2918 *lpmh = lpMidiHdr;
2919 lpMidiHdr = (LPMIDIHDR)msg->lParam;
2920 lpMidiHdr->lpNext = 0;
2921 lpMidiHdr->dwFlags |= MHDR_INQUEUE;
2922 lpMidiHdr->dwFlags &= MHDR_DONE;
2923 lpMidiHdr->dwOffset = 0;
2924
2925 break;
2926 default:
2927 FIXME("Unknown message %d\n", msg->message);
2928 break;
2929 }
2930 return TRUE;
2931 }
2932
2933 /**************************************************************************
2934 * MMSYSTEM_MidiStream_Player [internal]
2935 */
2936 static DWORD CALLBACK MMSYSTEM_MidiStream_Player(LPVOID pmt)
2937 {
2938 WINE_MIDIStream* lpMidiStrm = pmt;
2939 MIDIOPENDESC* lpDesc = USER_HEAP_LIN_ADDR(lpMidiStrm->hDevice);
2940 MSG msg;
2941 DWORD dwToGo;
2942 DWORD dwCurrTC;
2943 LPMIDIHDR lpMidiHdr;
2944 LPMIDIEVENT me;
2945 LPBYTE lpData = 0;
2946
2947 TRACE("(%p)!\n", lpMidiStrm);
2948
2949 /* force thread's queue creation */
2950 /* Used to be InitThreadInput16(0, 5); */
2951 /* but following works also with hack in midiStreamOpen */
2952 Callout.PeekMessageA(&msg, 0, 0, 0, 0);
2953
2954 /* FIXME: this next line must be called before midiStreamOut or midiStreamRestart are called */
2955 SetEvent(lpMidiStrm->hEvent);
2956 TRACE("Ready to go 1\n");
2957 /* thread is started in paused mode */
2958 SuspendThread(lpMidiStrm->hThread);
2959 TRACE("Ready to go 2\n");
2960
2961 lpMidiStrm->dwStartTicks = 0;
2962 lpMidiStrm->dwPulses = 0;
2963
2964 lpMidiStrm->lpMidiHdr = 0;
2965
2966 for (;;) {
2967 lpMidiHdr = lpMidiStrm->lpMidiHdr;
2968 if (!lpMidiHdr) {
2969 /* for first message, block until one arrives, then process all that are available */
2970 Callout.GetMessageA(&msg, 0, 0, 0);
2971 do {
2972 if (!MMSYSTEM_MidiStream_MessageHandler(lpMidiStrm, lpDesc, &msg))
2973 goto the_end;
2974 } while (Callout.PeekMessageA(&msg, 0, 0, 0, PM_REMOVE));
2975 lpData = 0;
2976 continue;
2977 }
2978
2979 /* <HACK>
2980 * midiOutPrepareHeader(), in Wine, sets the 'reserved' field of MIDIHDR to the
2981 * 16 or 32 bit address of lpMidiHdr (depending if called from 16 to 32 bit code)
2982 */
2983 if (!lpData)
2984 lpData = ((DWORD)lpMidiHdr == lpMidiHdr->reserved) ?
2985 (LPBYTE)lpMidiHdr->lpData : (LPBYTE)PTR_SEG_TO_LIN(lpMidiHdr->lpData);
2986
2987 me = (LPMIDIEVENT)(lpData + lpMidiHdr->dwOffset);
2988
2989 /* do we have to wait ? */
2990 if (me->dwDeltaTime) {
2991 lpMidiStrm->dwPositionMS += MMSYSTEM_MidiStream_Convert(lpMidiStrm, me->dwDeltaTime);
2992 lpMidiStrm->dwPulses += me->dwDeltaTime;
2993
2994 dwToGo = lpMidiStrm->dwStartTicks + lpMidiStrm->dwPositionMS;
2995
2996 TRACE("%ld/%ld/%ld\n", dwToGo, GetTickCount(), me->dwDeltaTime);
2997 while ((dwCurrTC = GetTickCount()) < dwToGo) {
2998 if (MsgWaitForMultipleObjects(0, NULL, FALSE, dwToGo - dwCurrTC, QS_ALLINPUT) == WAIT_OBJECT_0) {
2999 /* got a message, handle it */
3000 while (Callout.PeekMessageA(&msg, 0, 0, 0, PM_REMOVE)) {
3001 if (!MMSYSTEM_MidiStream_MessageHandler(lpMidiStrm, lpDesc, &msg))
3002 goto the_end;
3003 }
3004 lpData = 0;
3005 } else {
3006 /* timeout, so me->dwDeltaTime is elapsed, can break the while loop */
3007 break;
3008 }
3009 }
3010 }
3011 switch (MEVT_EVENTTYPE(me->dwEvent & ~MEVT_F_CALLBACK)) {
3012 case MEVT_COMMENT:
3013 FIXME("NIY: MEVT_COMMENT\n");
3014 /* do nothing, skip bytes */
3015 break;
3016 case MEVT_LONGMSG:
3017 FIXME("NIY: MEVT_LONGMSG, aka sending Sysex event\n");
3018 break;
3019 case MEVT_NOP:
3020 break;
3021 case MEVT_SHORTMSG:
3022 midiOutShortMsg(lpMidiStrm->hDevice, MEVT_EVENTPARM(me->dwEvent));
3023 break;
3024 case MEVT_TEMPO:
3025 lpMidiStrm->dwTempo = MEVT_EVENTPARM(me->dwEvent);
3026 break;
3027 case MEVT_VERSION:
3028 break;
3029 default:
3030 FIXME("Unknown MEVT (0x%02x)\n", MEVT_EVENTTYPE(me->dwEvent & ~MEVT_F_CALLBACK));
3031 break;
3032 }
3033 if (me->dwEvent & MEVT_F_CALLBACK) {
3034 DriverCallback16(lpDesc->dwCallback, lpMidiStrm->wFlags, lpMidiStrm->hDevice,
3035 MM_MOM_POSITIONCB, lpDesc->dwInstance, (LPARAM)lpMidiHdr, 0L);
3036 }
3037 lpMidiHdr->dwOffset += sizeof(MIDIEVENT);
3038 if (me->dwEvent & MEVT_F_LONG)
3039 lpMidiHdr->dwOffset += (MEVT_EVENTPARM(me->dwEvent) + 3) & ~3;
3040 if (lpMidiHdr->dwOffset >= lpMidiHdr->dwBufferLength) {
3041 /* done with this header */
3042 lpMidiHdr->dwFlags |= MHDR_DONE;
3043 lpMidiHdr->dwFlags &= ~MHDR_INQUEUE;
3044
3045 lpMidiStrm->lpMidiHdr = (LPMIDIHDR)lpMidiHdr->lpNext;
3046 DriverCallback16(lpDesc->dwCallback, lpMidiStrm->wFlags, lpMidiStrm->hDevice,
3047 MM_MOM_DONE, lpDesc->dwInstance, lpMidiHdr->reserved, 0L);
3048 lpData = 0;
3049 }
3050 }
3051 the_end:
3052 TRACE("End of thread\n");
3053 ExitThread(0);
3054 return 0; /* for removing the warning, never executed */
3055 }
3056
3057 /**************************************************************************
3058 * MMSYSTEM_MidiStream_PostMessage [internal]
3059 */
3060 static BOOL MMSYSTEM_MidiStream_PostMessage(WINE_MIDIStream* lpMidiStrm, WORD msg, DWORD pmt1, DWORD pmt2)
3061 {
3062 if (Callout.PostThreadMessageA(lpMidiStrm->dwThreadID, msg, pmt1, pmt2)) {
3063 DWORD count;
3064 BOOL bHasWin16Lock;
3065
3066 /* FIXME: should use the new syslevel APIs */
3067 if ((bHasWin16Lock = _ConfirmWin16Lock()) != 0) {
3068 ReleaseThunkLock(&count);
3069 }
3070 WaitForSingleObject(lpMidiStrm->hEvent, INFINITE);
3071 if (bHasWin16Lock) {
3072 RestoreThunkLock(count);
3073 }
3074 } else {
3075 WARN("bad PostThreadMessageA\n");
3076 return FALSE;
3077 }
3078 return TRUE;
3079 }
3080
3081 /**************************************************************************
3082 * midiStreamClose [WINMM.90]
3083 */
3084 MMRESULT WINAPI midiStreamClose(HMIDISTRM hMidiStrm)
3085 {
3086 WINE_MIDIStream* lpMidiStrm;
3087
3088 TRACE("(%08x)!\n", hMidiStrm);
3089
3090 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL))
3091 return MMSYSERR_INVALHANDLE;
3092
3093 midiStreamStop(hMidiStrm);
3094 MMSYSTEM_MidiStream_PostMessage(lpMidiStrm, WM_QUIT, 0, 0);
3095 HeapFree(GetProcessHeap(), 0, lpMidiStrm);
3096 CloseHandle(lpMidiStrm->hEvent);
3097
3098 return midiOutClose(hMidiStrm);
3099 }
3100
3101 /**************************************************************************
3102 * MMSYSTEM_MidiStream_Open [internal]
3103 */
3104 static MMRESULT WINAPI MMSYSTEM_MidiStream_Open(HMIDISTRM* lphMidiStrm, LPUINT lpuDeviceID,
3105 DWORD cMidi, DWORD dwCallback,
3106 DWORD dwInstance, DWORD fdwOpen)
3107 {
3108 WINE_MIDIStream* lpMidiStrm;
3109 MMRESULT ret;
3110 MIDIOPENSTRMID mosm;
3111 MIDIOPENDESC* lpDesc;
3112 HMIDIOUT16 hMidiOut16;
3113
3114 TRACE("(%p, %p, %ld, 0x%08lx, 0x%08lx, 0x%08lx)!\n",
3115 lphMidiStrm, lpuDeviceID, cMidi, dwCallback, dwInstance, fdwOpen);
3116
3117 if (cMidi != 1 || lphMidiStrm == NULL || lpuDeviceID == NULL)
3118 return MMSYSERR_INVALPARAM;
3119
3120 if (*lpuDeviceID == (UINT16)MIDI_MAPPER) {
3121 FIXME("MIDI_MAPPER mode requested ! => forcing devID to 0\n");
3122 *lpuDeviceID = 0;
3123 }
3124
3125 lpMidiStrm = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_MIDIStream));
3126 if (!lpMidiStrm)
3127 return MMSYSERR_NOMEM;
3128
3129 lpMidiStrm->dwTempo = 500000;
3130 lpMidiStrm->dwTimeDiv = 480; /* 480 is 120 quater notes per minute *//* FIXME ??*/
3131 lpMidiStrm->dwPositionMS = 0;
3132
3133 mosm.dwStreamID = (DWORD)lpMidiStrm;
3134 /* FIXME: the correct value is not allocated yet for MAPPER */
3135 mosm.wDeviceID = *lpuDeviceID;
3136 lpDesc = MIDI_OutAlloc(&hMidiOut16, dwCallback, dwInstance, 1, &mosm);
3137 lpMidiStrm->hDevice = hMidiOut16;
3138 if (lphMidiStrm)
3139 *lphMidiStrm = hMidiOut16;
3140
3141 lpDesc->wDevID = *lpuDeviceID;
3142 ret = modMessage(lpDesc->wDevID, MODM_OPEN,
3143 lpDesc->dwInstance, (DWORD)lpDesc, fdwOpen);
3144 lpMidiStrm->hEvent = CreateEventA(NULL, FALSE, FALSE, NULL);
3145 lpMidiStrm->wFlags = HIWORD(fdwOpen);
3146
3147 lpMidiStrm->hThread = CreateThread(NULL, 0, MMSYSTEM_MidiStream_Player,
3148 lpMidiStrm, 0, &(lpMidiStrm->dwThreadID));
3149
3150 if (!lpMidiStrm->hThread) {
3151 midiStreamClose((HMIDISTRM)hMidiOut16);
3152 return MMSYSERR_NOMEM;
3153 }
3154
3155 /* wait for thread to have started, and for it's queue to be created */
3156 {
3157 DWORD count;
3158 BOOL bHasWin16Lock;
3159
3160 /* (Release|Restore)ThunkLock() is needed when this method is called from 16 bit code,
3161 * (meaning the Win16Lock is set), so that it's released and the 32 bit thread running
3162 * MMSYSTEM_MidiStreamPlayer can acquire Win16Lock to create its queue.
3163 */
3164 if ((bHasWin16Lock = _ConfirmWin16Lock()) != 0) {
3165 ReleaseThunkLock(&count);
3166 }
3167 WaitForSingleObject(lpMidiStrm->hEvent, INFINITE);
3168 if (bHasWin16Lock) {
3169 RestoreThunkLock(count);
3170 }
3171 }
3172
3173 TRACE("=> (%u/%d) hMidi=0x%04x ret=%d lpMidiStrm=%p\n", *lpuDeviceID, lpDesc->wDevID, *lphMidiStrm, ret, lpMidiStrm);
3174 return ret;
3175 }
3176
3177 /**************************************************************************
3178 * midiStreamOpen [WINMM.91]
3179 */
3180 MMRESULT WINAPI midiStreamOpen(HMIDISTRM* lphMidiStrm, LPUINT lpuDeviceID,
3181 DWORD cMidi, DWORD dwCallback,
3182 DWORD dwInstance, DWORD fdwOpen)
3183 {
3184 return MMSYSTEM_MidiStream_Open(lphMidiStrm, lpuDeviceID, cMidi, dwCallback, dwInstance, CALLBACK32CONV(fdwOpen));
3185 }
3186
3187 /**************************************************************************
3188 * midiStreamOut [WINMM.92]
3189 */
3190 MMRESULT WINAPI midiStreamOut(HMIDISTRM hMidiStrm, LPMIDIHDR lpMidiHdr, UINT cbMidiHdr)
3191 {
3192 WINE_MIDIStream* lpMidiStrm;
3193 DWORD ret = MMSYSERR_NOERROR;
3194
3195 TRACE("(%08x, %p, %u)!\n", hMidiStrm, lpMidiHdr, cbMidiHdr);
3196
3197 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3198 ret = MMSYSERR_INVALHANDLE;
3199 } else {
3200 if (!Callout.PostThreadMessageA(lpMidiStrm->dwThreadID, WINE_MSM_HEADER, cbMidiHdr, (DWORD)lpMidiHdr)) {
3201 WARN("bad PostThreadMessageA\n");
3202 ret = MMSYSERR_ERROR;
3203 }
3204 }
3205 return ret;
3206 }
3207
3208 /**************************************************************************
3209 * midiStreamPause [WINMM.93]
3210 */
3211 MMRESULT WINAPI midiStreamPause(HMIDISTRM hMidiStrm)
3212 {
3213 WINE_MIDIStream* lpMidiStrm;
3214 DWORD ret = MMSYSERR_NOERROR;
3215
3216 TRACE("(%08x)!\n", hMidiStrm);
3217
3218 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3219 ret = MMSYSERR_INVALHANDLE;
3220 } else {
3221 if (SuspendThread(lpMidiStrm->hThread) == 0xFFFFFFFF) {
3222 WARN("bad Suspend (%ld)\n", GetLastError());
3223 ret = MMSYSERR_ERROR;
3224 }
3225 }
3226 return ret;
3227 }
3228
3229 /**************************************************************************
3230 * midiStreamPosition [WINMM.94]
3231 */
3232 MMRESULT WINAPI midiStreamPosition(HMIDISTRM hMidiStrm, LPMMTIME lpMMT, UINT cbmmt)
3233 {
3234 WINE_MIDIStream* lpMidiStrm;
3235 DWORD ret = MMSYSERR_NOERROR;
3236
3237 TRACE("(%08x, %p, %u)!\n", hMidiStrm, lpMMT, cbmmt);
3238
3239 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3240 ret = MMSYSERR_INVALHANDLE;
3241 } else if (lpMMT == NULL || cbmmt != sizeof(MMTIME)) {
3242 ret = MMSYSERR_INVALPARAM;
3243 } else {
3244 switch (lpMMT->wType) {
3245 case TIME_MS:
3246 lpMMT->u.ms = lpMidiStrm->dwPositionMS;
3247 TRACE("=> %ld ms\n", lpMMT->u.ms);
3248 break;
3249 case TIME_TICKS:
3250 lpMMT->u.ticks = lpMidiStrm->dwPulses;
3251 TRACE("=> %ld ticks\n", lpMMT->u.ticks);
3252 break;
3253 default:
3254 WARN("Unsupported time type %d\n", lpMMT->wType);
3255 lpMMT->wType = TIME_MS;
3256 ret = MMSYSERR_INVALPARAM;
3257 break;
3258 }
3259 }
3260 return ret;
3261 }
3262
3263 /**************************************************************************
3264 * midiStreamProperty [WINMM.95]
3265 */
3266 MMRESULT WINAPI midiStreamProperty(HMIDISTRM hMidiStrm, LPBYTE lpPropData, DWORD dwProperty)
3267 {
3268 WINE_MIDIStream* lpMidiStrm;
3269 MMRESULT ret = MMSYSERR_NOERROR;
3270
3271 TRACE("(%08x, %p, %lx)\n", hMidiStrm, lpPropData, dwProperty);
3272
3273 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3274 ret = MMSYSERR_INVALHANDLE;
3275 } else if ((dwProperty & (MIDIPROP_GET|MIDIPROP_SET)) == 0) {
3276 ret = MMSYSERR_INVALPARAM;
3277 } else if (dwProperty & MIDIPROP_TEMPO) {
3278 MIDIPROPTEMPO* mpt = (MIDIPROPTEMPO*)lpPropData;
3279
3280 if (sizeof(MIDIPROPTEMPO) != mpt->cbStruct) {
3281 ret = MMSYSERR_INVALPARAM;
3282 } else if (dwProperty & MIDIPROP_SET) {
3283 lpMidiStrm->dwTempo = mpt->dwTempo;
3284 TRACE("Setting tempo to %ld\n", mpt->dwTempo);
3285 } else if (dwProperty & MIDIPROP_GET) {
3286 mpt->dwTempo = lpMidiStrm->dwTempo;
3287 TRACE("Getting tempo <= %ld\n", mpt->dwTempo);
3288 }
3289 } else if (dwProperty & MIDIPROP_TIMEDIV) {
3290 MIDIPROPTIMEDIV* mptd = (MIDIPROPTIMEDIV*)lpPropData;
3291
3292 if (sizeof(MIDIPROPTIMEDIV) != mptd->cbStruct) {
3293 ret = MMSYSERR_INVALPARAM;
3294 } else if (dwProperty & MIDIPROP_SET) {
3295 lpMidiStrm->dwTimeDiv = mptd->dwTimeDiv;
3296 TRACE("Setting time div to %ld\n", mptd->dwTimeDiv);
3297 } else if (dwProperty & MIDIPROP_GET) {
3298 mptd->dwTimeDiv = lpMidiStrm->dwTimeDiv;
3299 TRACE("Getting time div <= %ld\n", mptd->dwTimeDiv);
3300 }
3301 } else {
3302 ret = MMSYSERR_INVALPARAM;
3303 }
3304
3305 return ret;
3306 }
3307
3308 /**************************************************************************
3309 * midiStreamRestart [WINMM.96]
3310 */
3311 MMRESULT WINAPI midiStreamRestart(HMIDISTRM hMidiStrm)
3312 {
3313 WINE_MIDIStream* lpMidiStrm;
3314 MMRESULT ret = MMSYSERR_NOERROR;
3315
3316 TRACE("(%08x)!\n", hMidiStrm);
3317
3318 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3319 ret = MMSYSERR_INVALHANDLE;
3320 } else {
3321 if (ResumeThread(lpMidiStrm->hThread) == 0xFFFFFFFF) {
3322 WARN("bad Resume (%ld)\n", GetLastError());
3323 ret = MMSYSERR_ERROR;
3324 } else {
3325 lpMidiStrm->dwStartTicks = GetTickCount() - lpMidiStrm->dwPositionMS;
3326 }
3327 }
3328 return ret;
3329 }
3330
3331 /**************************************************************************
3332 * midiStreamStop [WINMM.97]
3333 */
3334 MMRESULT WINAPI midiStreamStop(HMIDISTRM hMidiStrm)
3335 {
3336 WINE_MIDIStream* lpMidiStrm;
3337 MMRESULT ret = MMSYSERR_NOERROR;
3338
3339 TRACE("(%08x)!\n", hMidiStrm);
3340
3341 if (!MMSYSTEM_GetMidiStream(hMidiStrm, &lpMidiStrm, NULL)) {
3342 ret = MMSYSERR_INVALHANDLE;
3343 } else {
3344 /* in case stream has been paused... FIXME is the current state correct ? */
3345 midiStreamRestart(hMidiStrm);
3346 MMSYSTEM_MidiStream_PostMessage(lpMidiStrm, WINE_MSM_STOP, 0, 0);
3347 }
3348 return ret;
3349 }
3350
3351 /**************************************************************************
3352 * midiStreamClose [MMSYSTEM.252]
3353 */
3354 MMRESULT16 WINAPI midiStreamClose16(HMIDISTRM16 hMidiStrm)
3355 {
3356 return midiStreamClose(hMidiStrm);
3357 }
3358
3359 /**************************************************************************
3360 * midiStreamOpen [MMSYSTEM.251]
3361 */
3362 MMRESULT16 WINAPI midiStreamOpen16(HMIDISTRM16* phMidiStrm, LPUINT16 devid,
3363 DWORD cMidi, DWORD dwCallback,
3364 DWORD dwInstance, DWORD fdwOpen)
3365 {
3366 HMIDISTRM hMidiStrm32;
3367 MMRESULT ret;
3368 UINT devid32;
3369
3370 if (!phMidiStrm || !devid)
3371 return MMSYSERR_INVALPARAM;
3372 devid32 = *devid;
3373 ret = MMSYSTEM_MidiStream_Open(&hMidiStrm32, &devid32, cMidi, dwCallback, dwInstance, fdwOpen);
3374 *phMidiStrm = hMidiStrm32;
3375 *devid = devid32;
3376 return ret;
3377 }
3378
3379 /**************************************************************************
3380 * midiStreamOut [MMSYSTEM.254]
3381 */
3382 MMRESULT16 WINAPI midiStreamOut16(HMIDISTRM16 hMidiStrm, LPMIDIHDR16 lpMidiHdr, UINT16 cbMidiHdr)
3383 {
3384 return midiStreamOut(hMidiStrm, (LPMIDIHDR)lpMidiHdr, cbMidiHdr);
3385 }
3386
3387 /**************************************************************************
3388 * midiStreamPause [MMSYSTEM.255]
3389 */
3390 MMRESULT16 WINAPI midiStreamPause16(HMIDISTRM16 hMidiStrm)
3391 {
3392 return midiStreamPause(hMidiStrm);
3393 }
3394
3395 /**************************************************************************
3396 * midiStreamPosition [MMSYSTEM.253]
3397 */
3398 MMRESULT16 WINAPI midiStreamPosition16(HMIDISTRM16 hMidiStrm, LPMMTIME16 lpmmt16, UINT16 cbmmt)
3399 {
3400 MMTIME mmt32;
3401 MMRESULT ret;
3402
3403 if (!lpmmt16)
3404 return MMSYSERR_INVALPARAM;
3405 MMSYSTEM_MMTIME16to32(&mmt32, lpmmt16);
3406 ret = midiStreamPosition(hMidiStrm, &mmt32, sizeof(MMTIME));
3407 MMSYSTEM_MMTIME32to16(lpmmt16, &mmt32);
3408 return ret;
3409 }
3410
3411 /**************************************************************************
3412 * midiStreamProperty [MMSYSTEM.250]
3413 */
3414 MMRESULT16 WINAPI midiStreamProperty16(HMIDISTRM16 hMidiStrm, LPBYTE lpPropData, DWORD dwProperty)
3415 {
3416 return midiStreamProperty(hMidiStrm, lpPropData, dwProperty);
3417 }
3418
3419 /**************************************************************************
3420 * midiStreamRestart [MMSYSTEM.256]
3421 */
3422 MMRESULT16 WINAPI midiStreamRestart16(HMIDISTRM16 hMidiStrm)
3423 {
3424 return midiStreamRestart(hMidiStrm);
3425 }
3426
3427 /**************************************************************************
3428 * midiStreamStop [MMSYSTEM.257]
3429 */
3430 MMRESULT16 WINAPI midiStreamStop16(HMIDISTRM16 hMidiStrm)
3431 {
3432 return midiStreamStop(hMidiStrm);
3433 }
3434
3435 /**************************************************************************
3436 * waveOutGetNumDevs [MMSYSTEM.401]
3437 */
3438 UINT WINAPI waveOutGetNumDevs(void)
3439 {
3440 return waveOutGetNumDevs16();
3441 }
3442
3443 /**************************************************************************
3444 * waveOutGetNumDevs [WINMM.167]
3445 */
3446 UINT16 WINAPI waveOutGetNumDevs16(void)
3447 {
3448 UINT16 count = 0;
3449 TRACE("waveOutGetNumDevs\n");
3450 count += wodMessage(0, WODM_GETNUMDEVS, 0L, 0L, 0L);
3451 TRACE("waveOutGetNumDevs return %u \n", count);
3452 return count;
3453 }
3454
3455 /**************************************************************************
3456 * waveOutGetDevCaps [MMSYSTEM.402]
3457 */
3458 UINT16 WINAPI waveOutGetDevCaps16(UINT16 uDeviceID, LPWAVEOUTCAPS16 lpCaps,
3459 UINT16 uSize)
3460 {
3461 TRACE("waveOutGetDevCaps\n");
3462
3463 /* FIXME: do we have a wave mapper ? */
3464 if (uDeviceID == (UINT16)WAVE_MAPPER)
3465 uDeviceID = 0;
3466 /* return MMSYSERR_BADDEVICEID; */
3467
3468 if (uDeviceID >= waveOutGetNumDevs16()) return MMSYSERR_BADDEVICEID;
3469
3470 return wodMessage(uDeviceID, WODM_GETDEVCAPS, 0L, (DWORD)lpCaps, uSize);
3471 }
3472
3473 /**************************************************************************
3474 * waveOutGetDevCapsA [WINMM.162]
3475 */
3476 UINT WINAPI waveOutGetDevCapsA(UINT uDeviceID, LPWAVEOUTCAPSA lpCaps,
3477 UINT uSize)
3478 {
3479 WAVEOUTCAPS16 woc16;
3480 UINT16 ret = waveOutGetDevCaps16(uDeviceID, &woc16, sizeof(woc16));
3481
3482 lpCaps->wMid = woc16.wMid;
3483 lpCaps->wPid = woc16.wPid;
3484 lpCaps->vDriverVersion = woc16.vDriverVersion;
3485 strcpy(lpCaps->szPname, woc16.szPname);
3486 lpCaps->dwFormats = woc16.dwFormats;
3487 lpCaps->wChannels = woc16.wChannels;
3488 lpCaps->dwSupport = woc16.dwSupport;
3489 return ret;
3490 }
3491
3492 /**************************************************************************
3493 * waveOutGetDevCapsW [WINMM.163]
3494 */
3495 UINT WINAPI waveOutGetDevCapsW(UINT uDeviceID, LPWAVEOUTCAPSW lpCaps,
3496 UINT uSize)
3497 {
3498 WAVEOUTCAPS16 woc16;
3499 UINT ret = waveOutGetDevCaps16(uDeviceID, &woc16, sizeof(woc16));
3500
3501 lpCaps->wMid = woc16.wMid;
3502 lpCaps->wPid = woc16.wPid;
3503 lpCaps->vDriverVersion = woc16.vDriverVersion;
3504 lstrcpyAtoW(lpCaps->szPname, woc16.szPname);
3505 lpCaps->dwFormats = woc16.dwFormats;
3506 lpCaps->wChannels = woc16.wChannels;
3507 lpCaps->dwSupport = woc16.dwSupport;
3508 return ret;
3509 }
3510
3511 /**************************************************************************
3512 * WAVE_GetErrorText [internal]
3513 */
3514 static UINT16 WAVE_GetErrorText(UINT16 uError, LPSTR lpText, UINT16 uSize)
3515 {
3516 UINT16 ret = MMSYSERR_BADERRNUM;
3517
3518 if (lpText == NULL) {
3519 ret = MMSYSERR_INVALPARAM;
3520 } else if (uSize == 0) {
3521 ret = MMSYSERR_NOERROR;
3522 } else if (
3523 /* test has been removed 'coz MMSYSERR_BASE is 0, and gcc did emit
3524 * a warning for the test was always true */
3525 (/*uError >= MMSYSERR_BASE && */uError <= MMSYSERR_LASTERROR) ||
3526 (uError >= WAVERR_BASE && uError <= WAVERR_LASTERROR)) {
3527
3528 LPWINE_MM_IDATA iData = MULTIMEDIA_GetIData();
3529
3530 if (!iData) {
3531 ret = MMSYSERR_ERROR;
3532 } else if (LoadStringA(iData->hWinMM32Instance, uError, lpText, uSize) > 0) {
3533 ret = MMSYSERR_NOERROR;
3534 }
3535 }
3536 return ret;
3537 }
3538
3539 /**************************************************************************
3540 * waveOutGetErrorText [MMSYSTEM.403]
3541 */
3542 UINT16 WINAPI waveOutGetErrorText16(UINT16 uError, LPSTR lpText, UINT16 uSize)
3543 {
3544 return WAVE_GetErrorText(uError, lpText, uSize);
3545 }
3546
3547 /**************************************************************************
3548 * waveOutGetErrorTextA [WINMM.164]
3549 */
3550 UINT WINAPI waveOutGetErrorTextA(UINT uError, LPSTR lpText, UINT uSize)
3551 {
3552 return WAVE_GetErrorText(uError, lpText, uSize);
3553 }
3554
3555 /**************************************************************************
3556 * waveOutGetErrorTextW [WINMM.165]
3557 */
3558 UINT WINAPI waveOutGetErrorTextW(UINT uError, LPWSTR lpText, UINT uSize)
3559 {
3560 LPSTR xstr = HeapAlloc(GetProcessHeap(), 0, uSize);
3561 UINT ret = WAVE_GetErrorText(uError, xstr, uSize);
3562
3563 lstrcpyAtoW(lpText, xstr);
3564 HeapFree(GetProcessHeap(), 0, xstr);
3565 return ret;
3566 }
3567
3568 /**************************************************************************
3569 * waveOutOpen [WINMM.173]
3570 * All the args/structs have the same layout as the win16 equivalents
3571 */
3572 UINT WINAPI waveOutOpen(HWAVEOUT* lphWaveOut, UINT uDeviceID,
3573 const LPWAVEFORMATEX lpFormat, DWORD dwCallback,
3574 DWORD dwInstance, DWORD dwFlags)
3575 {
3576 HWAVEOUT16 hwo16;
3577 UINT ret = waveOutOpen16(&hwo16, uDeviceID, lpFormat, dwCallback, dwInstance,
3578 CALLBACK32CONV(dwFlags));
3579
3580 if (lphWaveOut) *lphWaveOut = hwo16;
3581 return ret;
3582 }
3583
3584 /**************************************************************************
3585 * waveOutOpen [MMSYSTEM.404]
3586 */
3587 UINT16 WINAPI waveOutOpen16(HWAVEOUT16* lphWaveOut, UINT16 uDeviceID,
3588 const LPWAVEFORMATEX lpFormat, DWORD dwCallback,
3589 DWORD dwInstance, DWORD dwFlags)
3590 {
3591 HWAVEOUT16 hWaveOut;
3592 LPWAVEOPENDESC lpDesc;
3593 DWORD dwRet = MMSYSERR_NOERROR;
3594 BOOL bMapperFlg = FALSE;
3595
3596 TRACE("(%p, %d, %p, %08lX, %08lX, %08lX);\n",
3597 lphWaveOut, uDeviceID, lpFormat, dwCallback, dwInstance, dwFlags);
3598 if (dwFlags & WAVE_FORMAT_QUERY)
3599 TRACE("WAVE_FORMAT_QUERY requested !\n");
3600 if (uDeviceID == (UINT16)WAVE_MAPPER) {
3601 TRACE("WAVE_MAPPER mode requested !\n");
3602 bMapperFlg = TRUE;
3603 uDeviceID = 0;
3604 }
3605 if (lpFormat == NULL) return WAVERR_BADFORMAT;
3606
3607 hWaveOut = USER_HEAP_ALLOC(sizeof(WAVEOPENDESC));
3608 if (hWaveOut == 0) return MMSYSERR_NOMEM;
3609 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3610 if (lpDesc == NULL) return MMSYSERR_NOMEM;
3611 lpDesc->hWave = hWaveOut;
3612 lpDesc->lpFormat = (LPWAVEFORMAT)lpFormat; /* should the struct be copied iso pointer? */
3613 lpDesc->dwCallBack = dwCallback;
3614 lpDesc->dwInstance = dwInstance;
3615 if (uDeviceID >= MAXWAVEDRIVERS)
3616 uDeviceID = 0;
3617 while (uDeviceID < MAXWAVEDRIVERS) {
3618 /* FIXME: dwUser parameter is wrong, it's not lpDesc->dwInstancen but
3619 * a pointer to a DWORD (see ms/ddkdoc/s2abc.htm)
3620 */
3621 dwRet = wodMessage(uDeviceID, WODM_OPEN,
3622 lpDesc->dwInstance, (DWORD)lpDesc, dwFlags);
3623 if (dwRet == MMSYSERR_NOERROR) break;
3624 if (!bMapperFlg) break;
3625 uDeviceID++;
3626 TRACE("WAVE_MAPPER mode ! try next driver...\n");
3627 }
3628 lpDesc->uDeviceID = uDeviceID; /* save physical Device ID */
3629 if (dwFlags & WAVE_FORMAT_QUERY) {
3630 TRACE("End of WAVE_FORMAT_QUERY !\n");
3631 USER_HEAP_FREE(hWaveOut);
3632 hWaveOut = 0;
3633 }
3634 else if (dwRet != MMSYSERR_NOERROR)
3635 {
3636 USER_HEAP_FREE(hWaveOut);
3637 hWaveOut = 0;
3638 }
3639 if (lphWaveOut != NULL) *lphWaveOut = hWaveOut;
3640 TRACE("=> %ld\n", dwRet);
3641 return dwRet;
3642 }
3643
3644 /**************************************************************************
3645 * waveOutClose [WINMM.161]
3646 */
3647 UINT WINAPI waveOutClose(HWAVEOUT hWaveOut)
3648 {
3649 return waveOutClose16(hWaveOut);
3650 }
3651
3652 /**************************************************************************
3653 * waveOutClose [MMSYSTEM.405]
3654 */
3655 UINT16 WINAPI waveOutClose16(HWAVEOUT16 hWaveOut)
3656 {
3657 LPWAVEOPENDESC lpDesc;
3658 DWORD dwRet;
3659
3660 TRACE("(%04X)\n", hWaveOut);
3661
3662 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3663 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3664 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3665 dwRet = wodMessage(lpDesc->uDeviceID, WODM_CLOSE, lpDesc->dwInstance, 0L, 0L);
3666 USER_HEAP_FREE(hWaveOut);
3667 return dwRet;
3668 }
3669
3670 /**************************************************************************
3671 * waveOutPrepareHeader [WINMM.175]
3672 */
3673 UINT WINAPI waveOutPrepareHeader(HWAVEOUT hWaveOut,
3674 WAVEHDR* lpWaveOutHdr, UINT uSize)
3675 {
3676 LPWAVEOPENDESC lpDesc;
3677
3678 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3679
3680 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3681 if (lpDesc == NULL)
3682 return MMSYSERR_INVALHANDLE;
3683 lpWaveOutHdr->reserved = (DWORD)lpWaveOutHdr;
3684 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3685 return wodMessage(lpDesc->uDeviceID, WODM_PREPARE, lpDesc->dwInstance,
3686 (DWORD)lpWaveOutHdr, uSize);
3687 }
3688
3689 /**************************************************************************
3690 * waveOutPrepareHeader [MMSYSTEM.406]
3691 */
3692 UINT16 WINAPI waveOutPrepareHeader16(HWAVEOUT16 hWaveOut,
3693 WAVEHDR* /*SEGPTR*/ _lpWaveOutHdr, UINT16 uSize)
3694 {
3695 LPWAVEOPENDESC lpDesc;
3696 LPWAVEHDR lpWaveOutHdr = (LPWAVEHDR)PTR_SEG_TO_LIN(_lpWaveOutHdr);
3697 UINT16 ret;
3698
3699 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3700
3701 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3702 if (lpDesc == NULL)
3703 return MMSYSERR_INVALHANDLE;
3704 lpWaveOutHdr->reserved = (DWORD)_lpWaveOutHdr;
3705 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3706 ret = wodMessage(lpDesc->uDeviceID, WODM_PREPARE, lpDesc->dwInstance,
3707 (DWORD)lpWaveOutHdr, uSize);
3708 return ret;
3709 }
3710
3711 /**************************************************************************
3712 * waveOutUnprepareHeader [WINMM.181]
3713 */
3714 UINT WINAPI waveOutUnprepareHeader(HWAVEOUT hWaveOut,
3715 WAVEHDR* lpWaveOutHdr, UINT uSize)
3716 {
3717 LPWAVEOPENDESC lpDesc;
3718
3719 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3720
3721 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3722 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3723 lpWaveOutHdr->reserved = (DWORD)lpWaveOutHdr;
3724 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3725 return wodMessage(lpDesc->uDeviceID, WODM_UNPREPARE, lpDesc->dwInstance,
3726 (DWORD)lpWaveOutHdr, uSize);
3727 }
3728
3729 /**************************************************************************
3730 * waveOutUnprepareHeader [MMSYSTEM.407]
3731 */
3732 UINT16 WINAPI waveOutUnprepareHeader16(HWAVEOUT16 hWaveOut,
3733 WAVEHDR* lpWaveOutHdr, UINT16 uSize)
3734 {
3735 LPWAVEOPENDESC lpDesc;
3736 UINT16 ret;
3737
3738 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3739
3740 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3741 if (lpDesc == NULL)
3742 return MMSYSERR_INVALHANDLE;
3743 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3744 ret = wodMessage(lpDesc->uDeviceID, WODM_UNPREPARE, lpDesc->dwInstance,
3745 (DWORD)lpWaveOutHdr, uSize);
3746 return ret;
3747 }
3748
3749 /**************************************************************************
3750 * waveOutWrite [MMSYSTEM.408]
3751 */
3752 UINT WINAPI waveOutWrite(HWAVEOUT hWaveOut, WAVEHDR* lpWaveOutHdr,
3753 UINT uSize)
3754 {
3755 LPWAVEOPENDESC lpDesc;
3756
3757 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3758
3759 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3760 if (lpDesc == NULL)
3761 return MMSYSERR_INVALHANDLE;
3762 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3763 return wodMessage(lpDesc->uDeviceID, WODM_WRITE, lpDesc->dwInstance,
3764 (DWORD)lpWaveOutHdr, uSize);
3765 }
3766
3767 /**************************************************************************
3768 * waveOutWrite [MMSYSTEM.408]
3769 */
3770 UINT16 WINAPI waveOutWrite16(HWAVEOUT16 hWaveOut, WAVEHDR* lpWaveOutHdr,
3771 UINT16 uSize)
3772 {
3773 LPWAVEOPENDESC lpDesc;
3774 UINT16 ret;
3775
3776 TRACE("(%04X, %p, %u);\n", hWaveOut, lpWaveOutHdr, uSize);
3777
3778 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3779 if (lpDesc == NULL)
3780 return MMSYSERR_INVALHANDLE;
3781 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3782 ret = wodMessage(lpDesc->uDeviceID, WODM_WRITE, lpDesc->dwInstance,
3783 (DWORD)lpWaveOutHdr, uSize);
3784 return ret;
3785 }
3786
3787 /**************************************************************************
3788 * waveOutPause [WINMM.174]
3789 */
3790 UINT WINAPI waveOutPause(HWAVEOUT hWaveOut)
3791 {
3792 return waveOutPause16(hWaveOut);
3793 }
3794
3795 /**************************************************************************
3796 * waveOutPause [MMSYSTEM.409]
3797 */
3798 UINT16 WINAPI waveOutPause16(HWAVEOUT16 hWaveOut)
3799 {
3800 LPWAVEOPENDESC lpDesc;
3801
3802 TRACE("(%04X)\n", hWaveOut);
3803
3804 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3805 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3806 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3807 return wodMessage(lpDesc->uDeviceID, WODM_PAUSE, lpDesc->dwInstance, 0L, 0L);
3808 }
3809
3810 /**************************************************************************
3811 * waveOutRestart [WINMM.177]
3812 */
3813 UINT WINAPI waveOutRestart(HWAVEOUT hWaveOut)
3814 {
3815 return waveOutRestart16(hWaveOut);
3816 }
3817
3818 /**************************************************************************
3819 * waveOutRestart [MMSYSTEM.410]
3820 */
3821 UINT16 WINAPI waveOutRestart16(HWAVEOUT16 hWaveOut)
3822 {
3823 LPWAVEOPENDESC lpDesc;
3824
3825 TRACE("(%04X)\n", hWaveOut);
3826
3827 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3828 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3829 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3830 return wodMessage(lpDesc->uDeviceID, WODM_RESTART, lpDesc->dwInstance, 0L, 0L);
3831 }
3832
3833 /**************************************************************************
3834 * waveOutReset [WINMM.176]
3835 */
3836 UINT WINAPI waveOutReset(HWAVEOUT hWaveOut)
3837 {
3838 return waveOutReset16(hWaveOut);
3839 }
3840
3841 /**************************************************************************
3842 * waveOutReset [MMSYSTEM.411]
3843 */
3844 UINT16 WINAPI waveOutReset16(HWAVEOUT16 hWaveOut)
3845 {
3846 LPWAVEOPENDESC lpDesc;
3847
3848 TRACE("(%04X)\n", hWaveOut);
3849
3850 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3851 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3852 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3853 return wodMessage(lpDesc->uDeviceID, WODM_RESET, lpDesc->dwInstance, 0L, 0L);
3854 }
3855
3856 /**************************************************************************
3857 * waveOutGetPosition [WINMM.170]
3858 */
3859 UINT WINAPI waveOutGetPosition(HWAVEOUT hWaveOut, LPMMTIME lpTime,
3860 UINT uSize)
3861 {
3862 MMTIME16 mmt16;
3863 UINT ret;
3864
3865 mmt16.wType = lpTime->wType;
3866 ret = waveOutGetPosition16(hWaveOut, &mmt16, sizeof(mmt16));
3867 MMSYSTEM_MMTIME16to32(lpTime, &mmt16);
3868 return ret;
3869 }
3870
3871 /**************************************************************************
3872 * waveOutGetPosition [MMSYSTEM.412]
3873 */
3874 UINT16 WINAPI waveOutGetPosition16(HWAVEOUT16 hWaveOut, LPMMTIME16 lpTime,
3875 UINT16 uSize)
3876 {
3877 LPWAVEOPENDESC lpDesc;
3878 TRACE("(%04X, %p, %u);\n", hWaveOut, lpTime, uSize);
3879 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3880 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3881 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */
3882 return wodMessage(lpDesc->uDeviceID, WODM_GETPOS, lpDesc->dwInstance,
3883 (DWORD)lpTime, (DWORD)uSize);
3884 }
3885
3886 #define WAVEOUT_SHORTCUT_1(xx, XX, atype) \
3887 UINT WINAPI waveOut##xx(HWAVEOUT hWaveOut, atype x) \
3888 {return waveOut##xx##16(hWaveOut, x);} \
3889 UINT16 WINAPI waveOut##xx##16(HWAVEOUT16 hWaveOut, atype x) \
3890 { \
3891 LPWAVEOPENDESC lpDesc; \
3892 TRACE("(%04X, %08lx);\n", hWaveOut, (DWORD)x); \
3893 lpDesc = (LPWAVEOPENDESC)USER_HEAP_LIN_ADDR(hWaveOut); \
3894 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */ \
3895 return (lpDesc == NULL) ? MMSYSERR_INVALHANDLE : \
3896 wodMessage(lpDesc->uDeviceID, WODM_##XX, \
3897 lpDesc->dwInstance, (DWORD)x, 0L); \
3898 }
3899
3900 WAVEOUT_SHORTCUT_1(GetPitch, GETPITCH, LPDWORD)
3901 WAVEOUT_SHORTCUT_1(SetPitch, SETPITCH, DWORD)
3902 WAVEOUT_SHORTCUT_1(GetPlaybackRate, GETPLAYBACKRATE, LPDWORD)
3903 WAVEOUT_SHORTCUT_1(SetPlaybackRate, SETPLAYBACKRATE, DWORD)
3904 #undef WAVEOUT_SHORTCUT_1
3905
3906 #define WAVEOUT_SHORTCUT_2(xx, XX, atype) \
3907 UINT WINAPI waveOut##xx(UINT devid, atype x) \
3908 {return waveOut##xx##16(devid, x);} \
3909 UINT16 WINAPI waveOut##xx##16(UINT16 devid, atype x) \
3910 { \
3911 TRACE("(%04X, %08lx);\n", devid, (DWORD)x); \
3912 /* FIXME: dwUser parameter is wrong (cf waveOutOpen) */ \
3913 return wodMessage(devid, WODM_##XX, 0, (DWORD)x, 0L); \
3914 }
3915
3916 WAVEOUT_SHORTCUT_2(GetVolume, GETVOLUME, LPDWORD)
3917 WAVEOUT_SHORTCUT_2(SetVolume, SETVOLUME, DWORD)
3918 #undef WAVEOUT_SHORTCUT_1
3919
3920 /**************************************************************************
3921 * waveOutBreakLoop [MMSYSTEM.419]
3922 */
3923 UINT WINAPI waveOutBreakLoop(HWAVEOUT hWaveOut)
3924 {
3925 return waveOutBreakLoop16(hWaveOut);
3926 }
3927
3928 /**************************************************************************
3929 * waveOutBreakLoop [MMSYSTEM.419]
3930 */
3931 UINT16 WINAPI waveOutBreakLoop16(HWAVEOUT16 hWaveOut)
3932 {
3933 FIXME("(%04X)\n", hWaveOut);
3934 return MMSYSERR_INVALHANDLE;
3935 }
3936
3937 /**************************************************************************
3938 * waveOutGetID [MMSYSTEM.420]
3939 */
3940 UINT WINAPI waveOutGetID(HWAVEOUT hWaveOut, UINT* lpuDeviceID)
3941 {
3942 LPWAVEOPENDESC lpDesc;
3943
3944 TRACE("(%04X, %p);\n", hWaveOut, lpuDeviceID);
3945
3946 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3947 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3948 if (lpuDeviceID == NULL) return MMSYSERR_INVALHANDLE;
3949 *lpuDeviceID = lpDesc->uDeviceID;
3950 return 0;
3951 }
3952
3953 /**************************************************************************
3954 * waveOutGetID [MMSYSTEM.420]
3955 */
3956 UINT16 WINAPI waveOutGetID16(HWAVEOUT16 hWaveOut, UINT16* lpuDeviceID)
3957 {
3958 LPWAVEOPENDESC lpDesc;
3959
3960 TRACE("(%04X, %p);\n", hWaveOut, lpuDeviceID);
3961
3962 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3963 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3964 if (lpuDeviceID == NULL) return MMSYSERR_INVALHANDLE;
3965 *lpuDeviceID = lpDesc->uDeviceID;
3966 return 0;
3967 }
3968
3969 /**************************************************************************
3970 * waveOutMessage [MMSYSTEM.421]
3971 */
3972 DWORD WINAPI waveOutMessage(HWAVEOUT hWaveOut, UINT uMessage,
3973 DWORD dwParam1, DWORD dwParam2)
3974 {
3975 LPWAVEOPENDESC lpDesc;
3976
3977 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
3978 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
3979 switch (uMessage) {
3980 case WODM_GETNUMDEVS:
3981 case WODM_GETPOS:
3982 case WODM_GETVOLUME:
3983 case WODM_GETPITCH:
3984 case WODM_GETPLAYBACKRATE:
3985 case WODM_SETVOLUME:
3986 case WODM_SETPITCH:
3987 case WODM_SETPLAYBACKRATE:
3988 case WODM_RESET:
3989 case WODM_PAUSE:
3990 case WODM_PREPARE:
3991 case WODM_UNPREPARE:
3992 case WODM_STOP:
3993 case WODM_CLOSE:
3994 /* no argument conversion needed */
3995 break;
3996 case WODM_WRITE:
3997 return waveOutWrite(hWaveOut, (LPWAVEHDR)dwParam1, dwParam2);
3998 case WODM_GETDEVCAPS:
3999 /* FIXME: UNICODE/ANSI? */
4000 return waveOutGetDevCapsA(hWaveOut, (LPWAVEOUTCAPSA)dwParam1, dwParam2);
4001 case WODM_OPEN:
4002 FIXME("can't handle WODM_OPEN, please report.\n");
4003 break;
4004 default:
4005 ERR("(0x%04x, 0x%04x, %08lx, %08lx): unhandled message\n",
4006 hWaveOut, uMessage, dwParam1, dwParam2);
4007 break;
4008 }
4009 return wodMessage(lpDesc->uDeviceID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
4010 }
4011
4012 /**************************************************************************
4013 * waveOutMessage [MMSYSTEM.421]
4014 */
4015 DWORD WINAPI waveOutMessage16(HWAVEOUT16 hWaveOut, UINT16 uMessage,
4016 DWORD dwParam1, DWORD dwParam2)
4017 {
4018 LPWAVEOPENDESC lpDesc;
4019
4020 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveOut);
4021 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4022 switch (uMessage) {
4023 case WODM_GETNUMDEVS:
4024 case WODM_SETVOLUME:
4025 case WODM_SETPITCH:
4026 case WODM_SETPLAYBACKRATE:
4027 case WODM_RESET:
4028 case WODM_PAUSE:
4029 case WODM_STOP:
4030 case WODM_CLOSE:
4031 /* no argument conversion needed */
4032 break;
4033 case WODM_GETPOS:
4034 return waveOutGetPosition16(hWaveOut, (LPMMTIME16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4035 case WODM_GETVOLUME:
4036 return waveOutGetVolume16(hWaveOut, (LPDWORD)PTR_SEG_TO_LIN(dwParam1));
4037 case WODM_GETPITCH:
4038 return waveOutGetPitch16(hWaveOut, (LPDWORD)PTR_SEG_TO_LIN(dwParam1));
4039 case WODM_GETPLAYBACKRATE:
4040 return waveOutGetPlaybackRate16(hWaveOut, (LPDWORD)PTR_SEG_TO_LIN(dwParam1));
4041 case WODM_GETDEVCAPS:
4042 return waveOutGetDevCaps16(hWaveOut, (LPWAVEOUTCAPS16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4043 case WODM_PREPARE:
4044 return waveOutPrepareHeader16(hWaveOut, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4045 case WODM_UNPREPARE:
4046 return waveOutUnprepareHeader16(hWaveOut, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4047 case WODM_WRITE:
4048 return waveOutWrite16(hWaveOut, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4049 case WODM_OPEN:
4050 FIXME("can't handle WODM_OPEN, please report.\n");
4051 break;
4052 default:
4053 ERR("(0x%04x, 0x%04x, %08lx, %08lx): unhandled message\n",
4054 hWaveOut, uMessage, dwParam1, dwParam2);
4055 }
4056 return wodMessage(lpDesc->uDeviceID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
4057 }
4058
4059 /**************************************************************************
4060 * waveInGetNumDevs [WINMM.151]
4061 */
4062 UINT WINAPI waveInGetNumDevs(void)
4063 {
4064 return waveInGetNumDevs16();
4065 }
4066
4067 /**************************************************************************
4068 * waveInGetNumDevs [MMSYSTEM.501]
4069 */
4070 UINT16 WINAPI waveInGetNumDevs16(void)
4071 {
4072 UINT16 count = 0;
4073
4074 count += widMessage(0, WIDM_GETNUMDEVS, 0L, 0L, 0L);
4075 TRACE("=> %u \n", count);
4076 return count;
4077 }
4078
4079 /**************************************************************************
4080 * waveInGetDevCapsA [WINMM.147]
4081 */
4082 UINT WINAPI waveInGetDevCapsW(UINT uDeviceID, LPWAVEINCAPSW lpCaps, UINT uSize)
4083 {
4084 WAVEINCAPS16 wic16;
4085 UINT ret = waveInGetDevCaps16(uDeviceID, &wic16, uSize);
4086
4087 lpCaps->wMid = wic16.wMid;
4088 lpCaps->wPid = wic16.wPid;
4089 lpCaps->vDriverVersion = wic16.vDriverVersion;
4090 lstrcpyAtoW(lpCaps->szPname, wic16.szPname);
4091 lpCaps->dwFormats = wic16.dwFormats;
4092 lpCaps->wChannels = wic16.wChannels;
4093
4094 return ret;
4095 }
4096
4097 /**************************************************************************
4098 * waveInGetDevCapsA [WINMM.146]
4099 */
4100 UINT WINAPI waveInGetDevCapsA(UINT uDeviceID, LPWAVEINCAPSA lpCaps, UINT uSize)
4101 {
4102 WAVEINCAPS16 wic16;
4103 UINT ret = waveInGetDevCaps16(uDeviceID, &wic16, uSize);
4104
4105 lpCaps->wMid = wic16.wMid;
4106 lpCaps->wPid = wic16.wPid;
4107 lpCaps->vDriverVersion = wic16.vDriverVersion;
4108 strcpy(lpCaps->szPname, wic16.szPname);
4109 lpCaps->dwFormats = wic16.dwFormats;
4110 lpCaps->wChannels = wic16.wChannels;
4111 return ret;
4112 }
4113
4114 /**************************************************************************
4115 * waveInGetDevCaps [MMSYSTEM.502]
4116 */
4117 UINT16 WINAPI waveInGetDevCaps16(UINT16 uDeviceID, LPWAVEINCAPS16 lpCaps, UINT16 uSize)
4118 {
4119 return widMessage(uDeviceID, WIDM_GETDEVCAPS, 0L, (DWORD)lpCaps, uSize);
4120 }
4121
4122 /**************************************************************************
4123 * waveInGetErrorTextA [WINMM.148]
4124 */
4125 UINT WINAPI waveInGetErrorTextA(UINT uError, LPSTR lpText, UINT uSize)
4126 {
4127 return WAVE_GetErrorText(uError, lpText, uSize);
4128 }
4129
4130 /**************************************************************************
4131 * waveInGetErrorTextW [WINMM.149]
4132 */
4133 UINT WINAPI waveInGetErrorTextW(UINT uError, LPWSTR lpText, UINT uSize)
4134 {
4135 LPSTR txt = HeapAlloc(GetProcessHeap(), 0, uSize);
4136 UINT ret = WAVE_GetErrorText(uError, txt, uSize);
4137
4138 lstrcpyAtoW(lpText, txt);
4139 HeapFree(GetProcessHeap(), 0, txt);
4140 return ret;
4141 }
4142
4143 /**************************************************************************
4144 * waveInGetErrorText [MMSYSTEM.503]
4145 */
4146 UINT16 WINAPI waveInGetErrorText16(UINT16 uError, LPSTR lpText, UINT16 uSize)
4147 {
4148 return WAVE_GetErrorText(uError, lpText, uSize);
4149 }
4150
4151 /**************************************************************************
4152 * waveInOpen [WINMM.154]
4153 */
4154 UINT WINAPI waveInOpen(HWAVEIN* lphWaveIn, UINT uDeviceID,
4155 const LPWAVEFORMAT lpFormat, DWORD dwCallback,
4156 DWORD dwInstance, DWORD dwFlags)
4157 {
4158 HWAVEIN16 hwin16;
4159 UINT ret = waveInOpen16(&hwin16, uDeviceID, lpFormat, dwCallback, dwInstance,
4160 CALLBACK32CONV(dwFlags));
4161 if (lphWaveIn) *lphWaveIn = hwin16;
4162 return ret;
4163 }
4164
4165 /**************************************************************************
4166 * waveInOpen [MMSYSTEM.504]
4167 */
4168 UINT16 WINAPI waveInOpen16(HWAVEIN16* lphWaveIn, UINT16 uDeviceID,
4169 const LPWAVEFORMAT lpFormat, DWORD dwCallback,
4170 DWORD dwInstance, DWORD dwFlags)
4171 {
4172 HWAVEIN16 hWaveIn;
4173 LPWAVEOPENDESC lpDesc;
4174 DWORD dwRet = 0;
4175 BOOL bMapperFlg = FALSE;
4176
4177 TRACE("(%p, %d, %p, %08lX, %08lX, %08lX);\n",
4178 lphWaveIn, uDeviceID, lpFormat, dwCallback, dwInstance, dwFlags);
4179 if (dwFlags & WAVE_FORMAT_QUERY)
4180 TRACE("WAVE_FORMAT_QUERY requested !\n");
4181 if (uDeviceID == (UINT16)WAVE_MAPPER) {
4182 TRACE("WAVE_MAPPER mode requested !\n");
4183 bMapperFlg = TRUE;
4184 uDeviceID = 0;
4185 }
4186 if (lpFormat == NULL) return WAVERR_BADFORMAT;
4187 hWaveIn = USER_HEAP_ALLOC(sizeof(WAVEOPENDESC));
4188 if (lphWaveIn != NULL) *lphWaveIn = hWaveIn;
4189 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4190 if (lpDesc == NULL) return MMSYSERR_NOMEM;
4191 lpDesc->hWave = hWaveIn;
4192 lpDesc->lpFormat = lpFormat;
4193 lpDesc->dwCallBack = dwCallback;
4194 lpDesc->dwInstance = dwInstance;
4195 while (uDeviceID < MAXWAVEDRIVERS) {
4196 dwRet = widMessage(uDeviceID, WIDM_OPEN,
4197 lpDesc->dwInstance, (DWORD)lpDesc, 0L);
4198 if (dwRet == MMSYSERR_NOERROR) break;
4199 if (!bMapperFlg) break;
4200 uDeviceID++;
4201 TRACE("WAVE_MAPPER mode ! try next driver...\n");
4202 }
4203 lpDesc->uDeviceID = uDeviceID;
4204 if (dwFlags & WAVE_FORMAT_QUERY) {
4205 TRACE("End of WAVE_FORMAT_QUERY !\n");
4206 dwRet = waveInClose16(hWaveIn);
4207 } else if (dwRet != MMSYSERR_NOERROR) {
4208 USER_HEAP_FREE(hWaveIn);
4209 if (lphWaveIn) *lphWaveIn = 0;
4210 }
4211
4212 return dwRet;
4213 }
4214
4215 /**************************************************************************
4216 * waveInClose [WINMM.145]
4217 */
4218 UINT WINAPI waveInClose(HWAVEIN hWaveIn)
4219 {
4220 return waveInClose16(hWaveIn);
4221 }
4222
4223 /**************************************************************************
4224 * waveInClose [MMSYSTEM.505]
4225 */
4226 UINT16 WINAPI waveInClose16(HWAVEIN16 hWaveIn)
4227 {
4228 LPWAVEOPENDESC lpDesc;
4229 DWORD dwRet;
4230
4231 TRACE("(%04X)\n", hWaveIn);
4232 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4233 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4234 dwRet = widMessage(lpDesc->uDeviceID, WIDM_CLOSE, lpDesc->dwInstance, 0L, 0L);
4235 USER_HEAP_FREE(hWaveIn);
4236 return dwRet;
4237 }
4238
4239 /**************************************************************************
4240 * waveInPrepareHeader [WINMM.155]
4241 */
4242 UINT WINAPI waveInPrepareHeader(HWAVEIN hWaveIn,
4243 WAVEHDR* lpWaveInHdr, UINT uSize)
4244 {
4245 LPWAVEOPENDESC lpDesc;
4246
4247 TRACE("(%04X, %p, %u);\n", hWaveIn, lpWaveInHdr, uSize);
4248 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4249 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4250 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4251 lpWaveInHdr->lpNext = NULL;
4252 lpWaveInHdr->dwBytesRecorded = 0;
4253 lpWaveInHdr->reserved = (DWORD)lpWaveInHdr;
4254
4255 return widMessage(lpDesc->uDeviceID, WIDM_PREPARE, lpDesc->dwInstance,
4256 (DWORD)lpWaveInHdr, uSize);
4257 }
4258
4259 /**************************************************************************
4260 * waveInPrepareHeader [MMSYSTEM.506]
4261 */
4262 UINT16 WINAPI waveInPrepareHeader16(HWAVEIN16 hWaveIn,
4263 WAVEHDR* /* SEGPTR */ _lpWaveInHdr, UINT16 uSize)
4264 {
4265 LPWAVEOPENDESC lpDesc;
4266 LPWAVEHDR lpWaveInHdr = (LPWAVEHDR)PTR_SEG_TO_LIN(_lpWaveInHdr);
4267 UINT16 ret;
4268
4269 TRACE("(%04X, %p, %u);\n", hWaveIn, lpWaveInHdr, uSize);
4270
4271 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4272 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4273 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4274
4275 lpWaveInHdr->lpNext = NULL;
4276 lpWaveInHdr->dwBytesRecorded = 0;
4277
4278 lpWaveInHdr->reserved = (DWORD)_lpWaveInHdr;
4279
4280 ret = widMessage(lpDesc->uDeviceID, WIDM_PREPARE, lpDesc->dwInstance,
4281 (DWORD)lpWaveInHdr, uSize);
4282 return ret;
4283 }
4284
4285 /**************************************************************************
4286 * waveInUnprepareHeader [WINMM.159]
4287 */
4288 UINT WINAPI waveInUnprepareHeader(HWAVEIN hWaveIn,
4289 WAVEHDR* lpWaveInHdr, UINT uSize)
4290 {
4291 LPWAVEOPENDESC lpDesc;
4292
4293 TRACE("(%04X, %p, %u);\n",
4294 hWaveIn, lpWaveInHdr, uSize);
4295 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4296 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4297 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4298
4299 lpWaveInHdr->lpNext = NULL;
4300 return widMessage(lpDesc->uDeviceID, WIDM_UNPREPARE, lpDesc->dwInstance,
4301 (DWORD)lpWaveInHdr, uSize);
4302 }
4303
4304 /**************************************************************************
4305 * waveInUnprepareHeader [MMSYSTEM.507]
4306 */
4307 UINT16 WINAPI waveInUnprepareHeader16(HWAVEIN16 hWaveIn,
4308 WAVEHDR* lpWaveInHdr, UINT16 uSize)
4309 {
4310 LPWAVEOPENDESC lpDesc;
4311
4312 TRACE("(%04X, %p, %u);\n",
4313 hWaveIn, lpWaveInHdr, uSize);
4314 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4315 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4316 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4317
4318 return widMessage(lpDesc->uDeviceID, WIDM_UNPREPARE, lpDesc->dwInstance,
4319 (DWORD)lpWaveInHdr, uSize);
4320 }
4321
4322 /**************************************************************************
4323 * waveInAddBuffer [WINMM.144]
4324 */
4325 UINT WINAPI waveInAddBuffer(HWAVEIN hWaveIn,
4326 WAVEHDR* lpWaveInHdr, UINT uSize)
4327 {
4328 LPWAVEOPENDESC lpDesc;
4329
4330 TRACE("(%04X, %p, %u);\n", hWaveIn, lpWaveInHdr, uSize);
4331
4332 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4333 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4334 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4335
4336 lpWaveInHdr->lpNext = NULL;
4337 lpWaveInHdr->dwBytesRecorded = 0;
4338
4339 return widMessage(lpDesc->uDeviceID, WIDM_ADDBUFFER, lpDesc->dwInstance,
4340 (DWORD)lpWaveInHdr, uSize);
4341
4342 }
4343
4344 /**************************************************************************
4345 * waveInAddBuffer [MMSYSTEM.508]
4346 */
4347 UINT16 WINAPI waveInAddBuffer16(HWAVEIN16 hWaveIn,
4348 WAVEHDR* lpWaveInHdr, UINT16 uSize)
4349 {
4350 LPWAVEOPENDESC lpDesc;
4351 UINT16 ret;
4352
4353 TRACE("(%04X, %p, %u);\n", hWaveIn, lpWaveInHdr, uSize);
4354
4355 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4356 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4357 if (lpWaveInHdr == NULL) return MMSYSERR_INVALHANDLE;
4358 lpWaveInHdr->lpNext = NULL;
4359 lpWaveInHdr->dwBytesRecorded = 0;
4360
4361 ret = widMessage(lpDesc->uDeviceID, WIDM_ADDBUFFER, lpDesc->dwInstance,
4362 (DWORD)lpWaveInHdr, uSize);
4363 return ret;
4364 }
4365
4366 /**************************************************************************
4367 * waveInStart [WINMM.157]
4368 */
4369 UINT WINAPI waveInStart(HWAVEIN hWaveIn)
4370 {
4371 return waveInStart16(hWaveIn);
4372 }
4373
4374 /**************************************************************************
4375 * waveInStart [MMSYSTEM.509]
4376 */
4377 UINT16 WINAPI waveInStart16(HWAVEIN16 hWaveIn)
4378 {
4379 LPWAVEOPENDESC lpDesc;
4380
4381 TRACE("(%04X)\n", hWaveIn);
4382 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4383 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4384 return widMessage(lpDesc->uDeviceID, WIDM_START, lpDesc->dwInstance, 0, 0);
4385 }
4386
4387 /**************************************************************************
4388 * waveInStop [WINMM.158]
4389 */
4390 UINT WINAPI waveInStop(HWAVEIN hWaveIn)
4391 {
4392 return waveInStop16(hWaveIn);
4393 }
4394
4395 /**************************************************************************
4396 * waveInStop [MMSYSTEM.510]
4397 */
4398 UINT16 WINAPI waveInStop16(HWAVEIN16 hWaveIn)
4399 {
4400 LPWAVEOPENDESC lpDesc;
4401
4402 TRACE("(%04X)\n", hWaveIn);
4403 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4404 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4405 return widMessage(lpDesc->uDeviceID, WIDM_STOP, lpDesc->dwInstance, 0L, 0L);
4406 }
4407
4408 /**************************************************************************
4409 * waveInReset [WINMM.156]
4410 */
4411 UINT WINAPI waveInReset(HWAVEIN hWaveIn)
4412 {
4413 return waveInReset16(hWaveIn);
4414 }
4415
4416 /**************************************************************************
4417 * waveInReset [MMSYSTEM.511]
4418 */
4419 UINT16 WINAPI waveInReset16(HWAVEIN16 hWaveIn)
4420 {
4421 LPWAVEOPENDESC lpDesc;
4422
4423 TRACE("(%04X)\n", hWaveIn);
4424 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4425 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4426 return widMessage(lpDesc->uDeviceID, WIDM_RESET, lpDesc->dwInstance, 0, 0);
4427 }
4428
4429 /**************************************************************************
4430 * waveInGetPosition [WINMM.152]
4431 */
4432 UINT WINAPI waveInGetPosition(HWAVEIN hWaveIn, LPMMTIME lpTime,
4433 UINT uSize)
4434 {
4435 MMTIME16 mmt16;
4436 UINT ret;
4437
4438 mmt16.wType = lpTime->wType;
4439 ret = waveInGetPosition16(hWaveIn, &mmt16, uSize);
4440
4441 MMSYSTEM_MMTIME16to32(lpTime, &mmt16);
4442 return ret;
4443 }
4444
4445 /**************************************************************************
4446 * waveInGetPosition [MMSYSTEM.512]
4447 */
4448 UINT16 WINAPI waveInGetPosition16(HWAVEIN16 hWaveIn, LPMMTIME16 lpTime,
4449 UINT16 uSize)
4450 {
4451 LPWAVEOPENDESC lpDesc;
4452
4453 TRACE("(%04X, %p, %u);\n", hWaveIn, lpTime, uSize);
4454 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4455 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4456 return widMessage(lpDesc->uDeviceID, WIDM_GETPOS, lpDesc->dwInstance,
4457 (DWORD)lpTime, (DWORD)uSize);
4458 }
4459
4460 /**************************************************************************
4461 * waveInGetID [WINMM.150]
4462 */
4463 UINT WINAPI waveInGetID(HWAVEIN hWaveIn, UINT* lpuDeviceID)
4464 {
4465 LPWAVEOPENDESC lpDesc;
4466
4467 TRACE("(%04x)\n", hWaveIn);
4468 if (lpuDeviceID == NULL) return MMSYSERR_INVALHANDLE;
4469 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4470 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4471 *lpuDeviceID = lpDesc->uDeviceID;
4472 return 0;
4473 }
4474
4475 /**************************************************************************
4476 * waveInGetID [MMSYSTEM.513]
4477 */
4478 UINT16 WINAPI waveInGetID16(HWAVEIN16 hWaveIn, UINT16* lpuDeviceID)
4479 {
4480 LPWAVEOPENDESC lpDesc;
4481
4482 TRACE("(%04x)\n", hWaveIn);
4483 if (lpuDeviceID == NULL) return MMSYSERR_INVALHANDLE;
4484 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4485 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4486 *lpuDeviceID = lpDesc->uDeviceID;
4487 return 0;
4488 }
4489
4490 /**************************************************************************
4491 * waveInMessage [WINMM.153]
4492 */
4493 DWORD WINAPI waveInMessage(HWAVEIN hWaveIn, UINT uMessage,
4494 DWORD dwParam1, DWORD dwParam2)
4495 {
4496 LPWAVEOPENDESC lpDesc;
4497
4498 FIXME("(%04X, %04X, %08lX, %08lX)\n",
4499 hWaveIn, uMessage, dwParam1, dwParam2);
4500
4501 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4502 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4503 switch (uMessage) {
4504 case WIDM_OPEN:
4505 FIXME("cannot handle WIDM_OPEN, please report.\n");
4506 break;
4507 case WIDM_GETNUMDEVS:
4508 case WIDM_GETPOS:
4509 case WIDM_CLOSE:
4510 case WIDM_STOP:
4511 case WIDM_RESET:
4512 case WIDM_START:
4513 case WIDM_PREPARE:
4514 case WIDM_UNPREPARE:
4515 case WIDM_ADDBUFFER:
4516 case WIDM_PAUSE:
4517 /* no argument conversion needed */
4518 break;
4519 case WIDM_GETDEVCAPS:
4520 /*FIXME: ANSI/UNICODE */
4521 return waveInGetDevCapsA(hWaveIn, (LPWAVEINCAPSA)dwParam1, dwParam2);
4522 default:
4523 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
4524 hWaveIn, uMessage, dwParam1, dwParam2);
4525 break;
4526 }
4527 return widMessage(lpDesc->uDeviceID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
4528 }
4529
4530 /**************************************************************************
4531 * waveInMessage [MMSYSTEM.514]
4532 */
4533 DWORD WINAPI waveInMessage16(HWAVEIN16 hWaveIn, UINT16 uMessage,
4534 DWORD dwParam1, DWORD dwParam2)
4535 {
4536 LPWAVEOPENDESC lpDesc;
4537
4538 FIXME("(%04X, %04X, %08lX, %08lX)\n",
4539 hWaveIn, uMessage, dwParam1, dwParam2);
4540 lpDesc = (LPWAVEOPENDESC) USER_HEAP_LIN_ADDR(hWaveIn);
4541 if (lpDesc == NULL) return MMSYSERR_INVALHANDLE;
4542 switch (uMessage) {
4543 case WIDM_OPEN:
4544 FIXME("cannot handle WIDM_OPEN, please report.\n");
4545 break;
4546 case WIDM_GETNUMDEVS:
4547 case WIDM_CLOSE:
4548 case WIDM_STOP:
4549 case WIDM_RESET:
4550 case WIDM_START:
4551 case WIDM_PAUSE:
4552 /* no argument conversion needed */
4553 break;
4554 case WIDM_GETDEVCAPS:
4555 return waveInGetDevCaps16(hWaveIn, (LPWAVEINCAPS16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4556 case WIDM_GETPOS:
4557 return waveInGetPosition16(hWaveIn, (LPMMTIME16)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4558 case WIDM_PREPARE:
4559 return waveInPrepareHeader16(hWaveIn, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4560 case WIDM_UNPREPARE:
4561 return waveInUnprepareHeader16(hWaveIn, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4562 case WIDM_ADDBUFFER:
4563 return waveInAddBuffer16(hWaveIn, (LPWAVEHDR)PTR_SEG_TO_LIN(dwParam1), dwParam2);
4564 default:
4565 ERR("(%04x, %04x, %08lx, %08lx): unhandled message\n",
4566 hWaveIn, uMessage, dwParam1, dwParam2);
4567 break;
4568 }
4569 return widMessage(lpDesc->uDeviceID, uMessage, lpDesc->dwInstance, dwParam1, dwParam2);
4570 }
4571
4572 /**************************************************************************
4573 * DrvOpen [MMSYSTEM.1100]
4574 */
4575 HDRVR16 WINAPI DrvOpen(LPSTR lpDriverName, LPSTR lpSectionName, LPARAM lParam)
4576 {
4577 TRACE("('%s','%s', %08lX);\n", lpDriverName, lpSectionName, lParam);
4578
4579 return OpenDriver16(lpDriverName, lpSectionName, lParam);
4580 }
4581
4582 /**************************************************************************
4583 * DrvClose [MMSYSTEM.1101]
4584 */
4585 LRESULT WINAPI DrvClose(HDRVR16 hDrv, LPARAM lParam1, LPARAM lParam2)
4586 {
4587 TRACE("(%04X, %08lX, %08lX);\n", hDrv, lParam1, lParam2);
4588
4589 return CloseDriver16(hDrv, lParam1, lParam2);
4590 }
4591
4592 /**************************************************************************
4593 * DrvSendMessage [MMSYSTEM.1102]
4594 */
4595 LRESULT WINAPI DrvSendMessage(HDRVR16 hDrv, WORD msg, LPARAM lParam1,
4596 LPARAM lParam2)
4597 {
4598 return SendDriverMessage(hDrv, msg, lParam1, lParam2);
4599 }
4600
4601 /**************************************************************************
4602 * DrvGetModuleHandle [MMSYSTEM.1103]
4603 */
4604 HANDLE16 WINAPI DrvGetModuleHandle16(HDRVR16 hDrv)
4605 {
4606 return GetDriverModuleHandle16(hDrv);
4607 }
4608
4609 /**************************************************************************
4610 * DrvDefDriverProc [MMSYSTEM.1104]
4611 */
4612 LRESULT WINAPI DrvDefDriverProc(DWORD dwDriverID, HDRVR16 hDrv, WORD wMsg,
4613 DWORD dwParam1, DWORD dwParam2)
4614 {
4615 /* FIXME : any mapping from 32 to 16 bit structure ? */
4616 return DefDriverProc16(dwDriverID, hDrv, wMsg, dwParam1, dwParam2);
4617 }
4618
4619 /**************************************************************************
4620 * DefDriverProc [WINMM.5]
4621 */
4622 LRESULT WINAPI DefDriverProc(DWORD dwDriverIdentifier, HDRVR hDrv,
4623 UINT Msg, LPARAM lParam1, LPARAM lParam2)
4624 {
4625 switch (Msg) {
4626 case DRV_LOAD:
4627 case DRV_FREE:
4628 case DRV_ENABLE:
4629 case DRV_DISABLE:
4630 return 1;
4631 case DRV_INSTALL:
4632 case DRV_REMOVE:
4633 return DRV_SUCCESS;
4634 default:
4635 return 0;
4636 }
4637 }
4638
4639 /*#define USE_MM_TSK_WINE*/
4640
4641 /**************************************************************************
4642 * mmTaskCreate [MMSYSTEM.900]
4643 *
4644 * Creates a 16 bit MM task. It's entry point is lpFunc, and it should be
4645 * called upon creation with dwPmt as parameter.
4646 */
4647 HINSTANCE16 WINAPI mmTaskCreate16(SEGPTR spProc, HINSTANCE16 *lphMmTask, DWORD dwPmt)
4648 {
4649 DWORD showCmd = 0x40002;
4650 LPSTR cmdline;
4651 WORD sel1, sel2;
4652 LOADPARAMS16* lp;
4653 HINSTANCE16 ret;
4654 HINSTANCE16 handle;
4655
4656 TRACE("(%08lx, %p, %08lx);\n", spProc, lphMmTask, dwPmt);
4657 /* This to work requires NE modules to be started with a binary command line
4658 * which is not currently the case. A patch exists but has never been committed.
4659 * A workaround would be to integrate code for mmtask.tsk into Wine, but
4660 * this requires tremendous work (starting with patching tools/build to
4661 * create NE executables (and not only DLLs) for builtins modules.
4662 * EP 99/04/25
4663 */
4664 FIXME("This is currently broken. It will fail\n");
4665
4666 cmdline = (LPSTR)HeapAlloc(GetProcessHeap(), 0, 0x0d);
4667 cmdline[0] = 0x0d;
4668 *(LPDWORD)(cmdline + 1) = (DWORD)spProc;
4669 *(LPDWORD)(cmdline + 5) = dwPmt;
4670 *(LPDWORD)(cmdline + 9) = 0;
4671
4672 sel1 = SELECTOR_AllocBlock(cmdline, 0x0d, SEGMENT_DATA, FALSE, FALSE);
4673 sel2 = SELECTOR_AllocBlock(&showCmd, sizeof(showCmd),
4674 SEGMENT_DATA, FALSE, FALSE);
4675
4676 lp = (LOADPARAMS16*)HeapAlloc(GetProcessHeap(), 0, sizeof(LOADPARAMS16));
4677 lp->hEnvironment = 0;
4678 lp->cmdLine = PTR_SEG_OFF_TO_SEGPTR(sel1, 0);
4679 lp->showCmd = PTR_SEG_OFF_TO_SEGPTR(sel2, 0);
4680 lp->reserved = 0;
4681
4682 #ifndef USE_MM_TSK_WINE
4683 handle = LoadModule16("c:\\windows\\system\\mmtask.tsk", lp);
4684 #else
4685 handle = LoadModule16("mmtask.tsk", lp);
4686 #endif
4687 if (handle < 32) {
4688 ret = (handle) ? 1 : 2;
4689 handle = 0;
4690 } else {
4691 ret = 0;
4692 }
4693 if (lphMmTask)
4694 *lphMmTask = handle;
4695
4696 UnMapLS(PTR_SEG_OFF_TO_SEGPTR(sel2, 0));
4697 UnMapLS(PTR_SEG_OFF_TO_SEGPTR(sel1, 0));
4698
4699 HeapFree(GetProcessHeap(), 0, lp);
4700 HeapFree(GetProcessHeap(), 0, cmdline);
4701
4702 TRACE("=> 0x%04x/%d\n", handle, ret);
4703 return ret;
4704 }
4705
4706 #ifdef USE_MM_TSK_WINE
4707 /* C equivalent to mmtask.tsk binary content */
4708 void mmTaskEntryPoint16(LPSTR cmdLine, WORD di, WORD si)
4709 {
4710 int len = cmdLine[0x80];
4711
4712 if (len / 2 == 6) {
4713 void (*fpProc)(DWORD) = (void (*)(DWORD))PTR_SEG_TO_LIN(*((DWORD*)(cmdLine + 1)));
4714 DWORD dwPmt = *((DWORD*)(cmdLine + 5));
4715
4716 #if 0
4717 InitTask16(); /* fixme: pmts / from context ? */
4718 InitApp(di);
4719 #endif
4720 if (SetMessageQueue16(0x40)) {
4721 WaitEvent16(0);
4722 if (HIWORD(fpProc)) {
4723 OldYield16();
4724 /* EPP StackEnter16(); */
4725 (fpProc)(dwPmt);
4726 }
4727 }
4728 }
4729 OldYield16();
4730 OldYield16();
4731 OldYield16();
4732 ExitProcess(0);
4733 }
4734 #endif
4735
4736 /**************************************************************************
4737 * mmTaskBlock [MMSYSTEM.902]
4738 */
4739 void WINAPI mmTaskBlock16(HINSTANCE16 WINE_UNUSED hInst)
4740 {
4741 MSG msg;
4742
4743 do {
4744 GetMessageA(&msg, 0, 0, 0);
4745 if (msg.hwnd) {
4746 TranslateMessage(&msg);
4747 DispatchMessageA(&msg);
4748 }
4749 } while (msg.message < 0x3A0);
4750 }
4751
4752 /**************************************************************************
4753 * mmTaskSignal [MMSYSTEM.903]
4754 */
4755 LRESULT WINAPI mmTaskSignal16(HTASK16 ht)
4756 {
4757 TRACE("(%04x);\n", ht);
4758 return Callout.PostAppMessage16(ht, WM_USER, 0, 0);
4759 }
4760
4761 /**************************************************************************
4762 * mmTaskYield16 [MMSYSTEM.905]
4763 */
4764 void WINAPI mmTaskYield16(void)
4765 {
4766 MSG msg;
4767
4768 if (PeekMessageA(&msg, 0, 0, 0, 0)) {
4769 Yield16();
4770 }
4771 }
4772
4773 DWORD WINAPI GetProcessFlags(DWORD);
4774
4775 /**************************************************************************
4776 * mmThreadCreate [MMSYSTEM.1120]
4777 *
4778 * undocumented
4779 * Creates a MM thread, calling fpThreadAddr(dwPmt).
4780 * dwFlags:
4781 * bit.0 set means create a 16 bit task instead of thread calling a 16 bit proc
4782 * bit.1 set means to open a VxD for this thread (unsupported)
4783 */
4784 LRESULT WINAPI mmThreadCreate16(FARPROC16 fpThreadAddr, LPHANDLE lpHndl, DWORD dwPmt, DWORD dwFlags)
4785 {
4786 HANDLE16 hndl;
4787 LRESULT ret;
4788
4789 TRACE("(%p, %p, %08lx, %08lx)!\n", fpThreadAddr, lpHndl, dwPmt, dwFlags);
4790
4791 hndl = GlobalAlloc16(sizeof(WINE_MMTHREAD), GMEM_SHARE|GMEM_ZEROINIT);
4792
4793 if (hndl == 0) {
4794 ret = 2;
4795 } else {
4796 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
4797
4798 #if 0
4799 /* force mmtask routines even if mmthread is required */
4800 /* this will work only if the patch about binary cmd line and NE tasks
4801 * is committed
4802 */
4803 dwFlags |= 1;
4804 #endif
4805
4806 lpMMThd->dwSignature = WINE_MMTHREAD_CREATED;
4807 lpMMThd->dwCounter = 0;
4808 lpMMThd->hThread = 0;
4809 lpMMThd->dwThreadID = 0;
4810 lpMMThd->fpThread = fpThreadAddr;
4811 lpMMThd->dwThreadPmt = dwPmt;
4812 lpMMThd->dwSignalCount = 0;
4813 lpMMThd->hEvent = 0;
4814 lpMMThd->hVxD = 0;
4815 lpMMThd->dwStatus = 0;
4816 lpMMThd->dwFlags = dwFlags;
4817 lpMMThd->hTask = 0;
4818
4819 if ((dwFlags & 1) == 0 && (GetProcessFlags(GetCurrentThreadId()) & 8) == 0) {
4820 lpMMThd->hEvent = CreateEventA(0, 0, 1, 0);
4821
4822 TRACE("Let's go crazy... trying new MM thread. lpMMThd=%p\n", lpMMThd);
4823 if (lpMMThd->dwFlags & 2) {
4824 /* as long as we don't support MM VxD in wine, we don't need
4825 * to care about this flag
4826 */
4827 /* FIXME("Don't know how to properly open VxD handles\n"); */
4828 /* lpMMThd->hVxD = OpenVxDHandle(lpMMThd->hEvent); */
4829 }
4830
4831 lpMMThd->hThread = CreateThread(0, 0, (LPTHREAD_START_ROUTINE)WINE_mmThreadEntryPoint,
4832 (LPVOID)(DWORD)hndl, CREATE_SUSPENDED, &lpMMThd->dwThreadID);
4833 if (lpMMThd->hThread == 0) {
4834 WARN("Couldn't create thread\n");
4835 /* clean-up(VxDhandle...); devicedirectio... */
4836 if (lpMMThd->hEvent != 0)
4837 CloseHandle(lpMMThd->hEvent);
4838 ret = 2;
4839 } else {
4840 TRACE("Got a nice thread hndl=0x%04x id=0x%08lx\n", lpMMThd->hThread, lpMMThd->dwThreadID);
4841 ret = 0;
4842 }
4843 } else {
4844 /* get WINE_mmThreadEntryPoint()
4845 * 2047 is its ordinal in mmsystem.spec
4846 */
4847 FARPROC16 fp = GetProcAddress16(GetModuleHandle16("MMSYSTEM"), (SEGPTR)2047);
4848
4849 TRACE("farproc seg=0x%08lx lin=%p\n", (DWORD)fp, PTR_SEG_TO_LIN(fp));
4850
4851 ret = (fp == 0) ? 2 : mmTaskCreate16((DWORD)fp, 0, hndl);
4852 }
4853
4854 if (ret == 0) {
4855 if (lpMMThd->hThread && !ResumeThread(lpMMThd->hThread))
4856 WARN("Couldn't resume thread\n");
4857
4858 while (lpMMThd->dwStatus != 0x10) { /* test also HIWORD of dwStatus */
4859 UserYield16();
4860 }
4861 }
4862 }
4863
4864 if (ret != 0) {
4865 GlobalFree16(hndl);
4866 hndl = 0;
4867 }
4868
4869 if (lpHndl)
4870 *lpHndl = hndl;
4871
4872 TRACE("ok => %ld\n", ret);
4873 return ret;
4874 }
4875
4876 /**************************************************************************
4877 * mmThreadSignal [MMSYSTEM.1121]
4878 */
4879 void WINAPI mmThreadSignal16(HANDLE16 hndl)
4880 {
4881 TRACE("(%04x)!\n", hndl);
4882
4883 if (hndl) {
4884 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
4885
4886 lpMMThd->dwCounter++;
4887 if (lpMMThd->hThread != 0) {
4888 InterlockedIncrement(&lpMMThd->dwSignalCount);
4889 SetEvent(lpMMThd->hEvent);
4890 } else {
4891 mmTaskSignal16(lpMMThd->hTask);
4892 }
4893 lpMMThd->dwCounter--;
4894 }
4895 }
4896
4897 /**************************************************************************
4898 * MMSYSTEM_ThreadBlock [internal]
4899 */
4900 static void MMSYSTEM_ThreadBlock(WINE_MMTHREAD* lpMMThd)
4901 {
4902 MSG msg;
4903 DWORD ret;
4904
4905 if (lpMMThd->dwThreadID != GetCurrentThreadId())
4906 ERR("Not called by thread itself\n");
4907
4908 for (;;) {
4909 ResetEvent(lpMMThd->hEvent);
4910 if (InterlockedDecrement(&lpMMThd->dwSignalCount) >= 0)
4911 break;
4912 InterlockedIncrement(&lpMMThd->dwSignalCount);
4913
4914 TRACE("S1\n");
4915
4916 ret = MsgWaitForMultipleObjects(1, &lpMMThd->hEvent, FALSE, INFINITE, QS_ALLINPUT);
4917 switch (ret) {
4918 case WAIT_OBJECT_0: /* Event */
4919 TRACE("S2.1\n");
4920 break;
4921 case WAIT_OBJECT_0 + 1: /* Msg */
4922 TRACE("S2.2\n");
4923 if (Callout.PeekMessageA(&msg, 0, 0, 0, PM_REMOVE)) {
4924 Callout.TranslateMessage(&msg);
4925 Callout.DispatchMessageA(&msg);
4926 }
4927 break;
4928 default:
4929 WARN("S2.x unsupported ret val 0x%08lx\n", ret);
4930 }
4931 TRACE("S3\n");
4932 }
4933 }
4934
4935 /**************************************************************************
4936 * mmThreadBlock [MMSYSTEM.1122]
4937 */
4938 void WINAPI mmThreadBlock16(HANDLE16 hndl)
4939 {
4940 TRACE("(%04x)!\n", hndl);
4941
4942 if (hndl) {
4943 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
4944
4945 if (lpMMThd->hThread != 0) {
4946 SYSLEVEL_ReleaseWin16Lock();
4947 MMSYSTEM_ThreadBlock(lpMMThd);
4948 SYSLEVEL_RestoreWin16Lock();
4949 } else {
4950 mmTaskBlock16(lpMMThd->hTask);
4951 }
4952 }
4953 TRACE("done\n");
4954 }
4955
4956 /**************************************************************************
4957 * mmThreadIsCurrent [MMSYSTEM.1123]
4958 */
4959 BOOL16 WINAPI mmThreadIsCurrent16(HANDLE16 hndl)
4960 {
4961 BOOL16 ret = FALSE;
4962
4963 TRACE("(%04x)!\n", hndl);
4964
4965 if (hndl && mmThreadIsValid16(hndl)) {
4966 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
4967 ret = (GetCurrentThreadId() == lpMMThd->dwThreadID);
4968 #if 1 /* EPP */
4969 /* FIXME: just a test */
4970 SYSLEVEL_ReleaseWin16Lock();
4971 SYSLEVEL_RestoreWin16Lock();
4972 #endif
4973 }
4974 TRACE("=> %d\n", ret);
4975 return ret;
4976 }
4977
4978 /**************************************************************************
4979 * mmThreadIsValid [MMSYSTEM.1124]
4980 */
4981 BOOL16 WINAPI mmThreadIsValid16(HANDLE16 hndl)
4982 {
4983 BOOL16 ret = FALSE;
4984
4985 TRACE("(%04x)!\n", hndl);
4986
4987 if (hndl) {
4988 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
4989
4990 if (!IsBadWritePtr(lpMMThd, sizeof(WINE_MMTHREAD)) &&
4991 lpMMThd->dwSignature == WINE_MMTHREAD_CREATED &&
4992 IsTask16(lpMMThd->hTask)) {
4993 lpMMThd->dwCounter++;
4994 if (lpMMThd->hThread != 0) {
4995 DWORD dwThreadRet;
4996 if (GetExitCodeThread(lpMMThd->hThread, &dwThreadRet) &&
4997 dwThreadRet == STATUS_PENDING) {
4998 ret = TRUE;
4999 }
5000 } else {
5001 ret = TRUE;
5002 }
5003 lpMMThd->dwCounter--;
5004 }
5005 }
5006 TRACE("=> %d\n", ret);
5007 return ret;
5008 }
5009
5010 /**************************************************************************
5011 * mmThreadGetTask [MMSYSTEM.1125]
5012 */
5013 HANDLE16 WINAPI mmThreadGetTask16(HANDLE16 hndl)
5014 {
5015 HANDLE16 ret = 0;
5016
5017 TRACE("(%04x)\n", hndl);
5018
5019 if (mmThreadIsValid16(hndl)) {
5020 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
5021 ret = lpMMThd->hTask;
5022 }
5023 return ret;
5024 }
5025
5026 /**************************************************************************
5027 * mmThreadGetTask [internal]
5028 */
5029 void WINAPI WINE_mmThreadEntryPoint(DWORD _pmt)
5030 {
5031 HANDLE16 hndl = (HANDLE16)_pmt;
5032 WINE_MMTHREAD* lpMMThd = (WINE_MMTHREAD*)PTR_SEG_OFF_TO_LIN(hndl, 0);
5033
5034 TRACE("(%04x %p)\n", hndl, lpMMThd);
5035
5036 lpMMThd->hTask = LOWORD(GetCurrentTask());
5037 TRACE("[10-%08x] setting hTask to 0x%08x\n", lpMMThd->hThread, lpMMThd->hTask);
5038 lpMMThd->dwStatus = 0x10;
5039 MMSYSTEM_ThreadBlock(lpMMThd);
5040 TRACE("[20-%08x]\n", lpMMThd->hThread);
5041 lpMMThd->dwStatus = 0x20;
5042 if (lpMMThd->fpThread) {
5043 /* it's not a WOW call back proc, but since the proc signature is the
5044 * same, why bother creating a new entry in Callbacks table ?
5045 */
5046 Callbacks->CallWOWCallbackProc(lpMMThd->fpThread, lpMMThd->dwThreadPmt);
5047 }
5048 lpMMThd->dwStatus = 0x30;
5049 TRACE("[30-%08x]\n", lpMMThd->hThread);
5050 while (lpMMThd->dwCounter) {
5051 Sleep(1);
5052 /* Yield16();*/
5053 }
5054 TRACE("[XX-%08x]\n", lpMMThd->hThread);
5055 /* paranoia */
5056 lpMMThd->dwSignature = WINE_MMTHREAD_DELETED;
5057 /* close lpMMThread->hVxD directio */
5058 if (lpMMThd->hEvent)
5059 CloseHandle(lpMMThd->hEvent);
5060 GlobalFree16(hndl);
5061 TRACE("done\n");
5062 }
5063
5064 typedef BOOL16 (WINAPI *MMCPLCALLBACK)(HWND, LPCSTR, LPCSTR, LPCSTR);
5065
5066 /**************************************************************************
5067 * mmShowMMCPLPropertySheet [MMSYSTEM.1150]
5068 */
5069 BOOL16 WINAPI mmShowMMCPLPropertySheet16(HWND hWnd, LPCSTR lpStrDevice,
5070 LPCSTR lpStrTab, LPCSTR lpStrTitle)
5071 {
5072 HANDLE hndl;
5073 BOOL16 ret = FALSE;
5074
5075 TRACE("(%04x \"%s\" \"%s\" \"%s\")\n", hWnd, lpStrDevice, lpStrTab, lpStrTitle);
5076
5077 hndl = LoadLibraryA("MMSYS.CPL");
5078 if (hndl != 0) {
5079 MMCPLCALLBACK fp = (MMCPLCALLBACK)GetProcAddress(hndl, "ShowMMCPLPropertySheet");
5080 if (fp != NULL) {
5081 SYSLEVEL_ReleaseWin16Lock();
5082 ret = (fp)(hWnd, lpStrDevice, lpStrTab, lpStrTitle);
5083 SYSLEVEL_RestoreWin16Lock();
5084 }
5085 FreeLibrary(hndl);
5086 }
5087
5088 return ret;
5089 }
5090
5091 /**************************************************************************
5092 * StackEnter & StackLeave [MMSYSTEM.32][MMSYSTEM.33]
5093 */
5094 void WINAPI StackEnterLeave16(void)
5095 {
5096 #ifdef __i386__
5097 /* mmsystem.dll from Win 95 does only this: so does Wine */
5098 __asm__("stc");
5099 #endif
5100 }
Windows API implementation