1 /* -*- tab-width: 8; c-basic-offset: 4 -*- */
3 * Sample Wine Driver for Open Sound System (featured in Linux and FreeBSD)
5 * Copyright 1994 Martin Ayotte
6 * 1999 Eric Pouech (async playing in waveOut/waveIn)
7 * 2000 Eric Pouech (loops in waveOut)
11 * pause in waveOut does not work correctly
12 * full duplex (in/out) is not working (device is opened twice for Out
13 * and In) (OSS is known for its poor duplex capabilities, alsa is
17 /*#define EMULATE_SB16*/
27 #include <sys/ioctl.h>
28 #ifdef HAVE_SYS_MMAN_H
29 # include <sys/mman.h>
34 #include "wine/winuser16.h"
40 #include "debugtools.h"
42 DEFAULT_DEBUG_CHANNEL(wave
);
44 /* Allow 1% deviation for sample rates (some ES137x cards) */
45 #define NEAR_MATCH(rate1,rate2) (((100*((int)(rate1)-(int)(rate2)))/(rate1))==0)
49 #define SOUND_DEV "/dev/dsp"
50 #define MIXER_DEV "/dev/mixer"
52 #define MAX_WAVEOUTDRV (1)
53 #define MAX_WAVEINDRV (1)
55 /* state diagram for waveOut writing:
57 * +---------+-------------+---------------+---------------------------------+
58 * | state | function | event | new state |
59 * +---------+-------------+---------------+---------------------------------+
60 * | | open() | | STOPPED |
61 * | PAUSED | write() | | PAUSED |
62 * | STOPPED | write() | <thrd create> | PLAYING |
63 * | PLAYING | write() | HEADER | PLAYING |
64 * | (other) | write() | <error> | |
65 * | (any) | pause() | PAUSING | PAUSED |
66 * | PAUSED | restart() | RESTARTING | PLAYING (if no thrd => STOPPED) |
67 * | (any) | reset() | RESETTING | STOPPED |
68 * | (any) | close() | CLOSING | CLOSED |
69 * +---------+-------------+---------------+---------------------------------+
72 /* states of the playing device */
73 #define WINE_WS_PLAYING 0
74 #define WINE_WS_PAUSED 1
75 #define WINE_WS_STOPPED 2
76 #define WINE_WS_CLOSED 3
78 /* events to be send to device */
79 #define WINE_WM_PAUSING (WM_USER + 1)
80 #define WINE_WM_RESTARTING (WM_USER + 2)
81 #define WINE_WM_RESETTING (WM_USER + 3)
82 #define WINE_WM_CLOSING (WM_USER + 4)
83 #define WINE_WM_HEADER (WM_USER + 5)
85 #define WINE_WM_FIRST WINE_WM_PAUSING
86 #define WINE_WM_LAST WINE_WM_HEADER
95 volatile int state
; /* one of the WINE_WS_ manifest constants */
96 DWORD dwFragmentSize
; /* size of OSS buffer fragment */
97 WAVEOPENDESC waveDesc
;
100 LPWAVEHDR lpQueuePtr
; /* start of queued WAVEHDRs (waiting to be notified) */
101 LPWAVEHDR lpPlayPtr
; /* start of not yet fully played buffers */
102 LPWAVEHDR lpLoopPtr
; /* pointer of first buffer in loop, if any */
104 DWORD dwLastFragDone
; /* time in ms, when last played fragment will be actually played */
105 DWORD dwPlayedTotal
; /* number of bytes played since opening */
107 /* info on current lpQueueHdr->lpWaveHdr */
108 DWORD dwOffCurrHdr
; /* offset in lpPlayPtr->lpData for fragments */
109 DWORD dwRemain
; /* number of bytes to write to end the current fragment */
111 /* synchronization stuff */
115 #define WWO_RING_BUFFER_SIZE 30
116 WWO_MSG messages
[WWO_RING_BUFFER_SIZE
];
120 CRITICAL_SECTION msg_crst
;
123 /* DirectSound stuff */
131 DWORD dwFragmentSize
; /* OpenSound '/dev/dsp' give us that size */
132 WAVEOPENDESC waveDesc
;
134 PCMWAVEFORMAT format
;
135 LPWAVEHDR lpQueuePtr
;
136 DWORD dwTotalRecorded
;
138 BOOL bTriggerSupport
;
140 /* synchronization stuff */
146 static WINE_WAVEOUT WOutDev
[MAX_WAVEOUTDRV
];
147 static WINE_WAVEIN WInDev
[MAX_WAVEINDRV
];
149 static DWORD
wodDsCreate(UINT wDevID
, PIDSDRIVER
* drv
);
151 /*======================================================================*
152 * Low level WAVE implementation *
153 *======================================================================*/
155 LONG
OSS_WaveInit(void)
167 /* start with output device */
169 /* initialize all device handles to -1 */
170 for (i
= 0; i
< MAX_WAVEOUTDRV
; ++i
)
172 WOutDev
[i
].unixdev
= -1;
175 /* FIXME: only one device is supported */
176 memset(&WOutDev
[0].caps
, 0, sizeof(WOutDev
[0].caps
));
178 if (access(SOUND_DEV
,0) != 0 ||
179 (audio
= open(SOUND_DEV
, O_WRONLY
|O_NDELAY
, 0)) == -1) {
180 WARN("Couldn't open out %s (%s)\n", SOUND_DEV
, strerror(errno
));
184 ioctl(audio
, SNDCTL_DSP_RESET
, 0);
186 /* FIXME: some programs compare this string against the content of the registry
187 * for MM drivers. The names have to match in order for the program to work
188 * (e.g. MS win9x mplayer.exe)
191 WOutDev
[0].caps
.wMid
= 0x0002;
192 WOutDev
[0].caps
.wPid
= 0x0104;
193 strcpy(WOutDev
[0].caps
.szPname
, "SB16 Wave Out");
195 WOutDev
[0].caps
.wMid
= 0x00FF; /* Manufac ID */
196 WOutDev
[0].caps
.wPid
= 0x0001; /* Product ID */
197 /* strcpy(WOutDev[0].caps.szPname, "OpenSoundSystem WAVOUT Driver");*/
198 strcpy(WOutDev
[0].caps
.szPname
, "CS4236/37/38");
200 WOutDev
[0].caps
.vDriverVersion
= 0x0100;
201 WOutDev
[0].caps
.dwFormats
= 0x00000000;
202 WOutDev
[0].caps
.dwSupport
= WAVECAPS_VOLUME
;
204 IOCTL(audio
, SNDCTL_DSP_GETFMTS
, mask
);
205 TRACE("OSS dsp out mask=%08x\n", mask
);
207 /* First bytespersampl, then stereo */
208 bytespersmpl
= (IOCTL(audio
, SNDCTL_DSP_SAMPLESIZE
, samplesize
) != 0) ? 1 : 2;
210 WOutDev
[0].caps
.wChannels
= (IOCTL(audio
, SNDCTL_DSP_STEREO
, dsp_stereo
) != 0) ? 1 : 2;
211 if (WOutDev
[0].caps
.wChannels
> 1) WOutDev
[0].caps
.dwSupport
|= WAVECAPS_LRVOLUME
;
214 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
215 if (mask
& AFMT_U8
) {
216 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4M08
;
217 if (WOutDev
[0].caps
.wChannels
> 1)
218 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4S08
;
220 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
221 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4M16
;
222 if (WOutDev
[0].caps
.wChannels
> 1)
223 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4S16
;
227 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
228 if (mask
& AFMT_U8
) {
229 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2M08
;
230 if (WOutDev
[0].caps
.wChannels
> 1)
231 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2S08
;
233 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
234 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2M16
;
235 if (WOutDev
[0].caps
.wChannels
> 1)
236 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2S16
;
240 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
241 if (mask
& AFMT_U8
) {
242 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1M08
;
243 if (WOutDev
[0].caps
.wChannels
> 1)
244 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1S08
;
246 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
247 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1M16
;
248 if (WOutDev
[0].caps
.wChannels
> 1)
249 WOutDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1S16
;
252 if (IOCTL(audio
, SNDCTL_DSP_GETCAPS
, caps
) == 0) {
253 TRACE("OSS dsp out caps=%08X\n", caps
);
254 if ((caps
& DSP_CAP_REALTIME
) && !(caps
& DSP_CAP_BATCH
)) {
255 WOutDev
[0].caps
.dwSupport
|= WAVECAPS_SAMPLEACCURATE
;
257 /* well, might as well use the DirectSound cap flag for something */
258 if ((caps
& DSP_CAP_TRIGGER
) && (caps
& DSP_CAP_MMAP
))
259 WOutDev
[0].caps
.dwSupport
|= WAVECAPS_DIRECTSOUND
;
263 TRACE("out dwFormats = %08lX, dwSupport = %08lX\n",
264 WOutDev
[0].caps
.dwFormats
, WOutDev
[0].caps
.dwSupport
);
266 /* then do input device */
270 for (i
= 0; i
< MAX_WAVEINDRV
; ++i
)
272 WInDev
[i
].unixdev
= -1;
275 memset(&WInDev
[0].caps
, 0, sizeof(WInDev
[0].caps
));
277 if (access(SOUND_DEV
,0) != 0 ||
278 (audio
= open(SOUND_DEV
, O_RDONLY
|O_NDELAY
, 0)) == -1) {
279 WARN("Couldn't open in %s (%s)\n", SOUND_DEV
, strerror(errno
));
283 ioctl(audio
, SNDCTL_DSP_RESET
, 0);
286 WInDev
[0].caps
.wMid
= 0x0002;
287 WInDev
[0].caps
.wPid
= 0x0004;
288 strcpy(WInDev
[0].caps
.szPname
, "SB16 Wave In");
290 WInDev
[0].caps
.wMid
= 0x00FF; /* Manufac ID */
291 WInDev
[0].caps
.wPid
= 0x0001; /* Product ID */
292 strcpy(WInDev
[0].caps
.szPname
, "OpenSoundSystem WAVIN Driver");
294 WInDev
[0].caps
.dwFormats
= 0x00000000;
295 WInDev
[0].caps
.wChannels
= (IOCTL(audio
, SNDCTL_DSP_STEREO
, dsp_stereo
) != 0) ? 1 : 2;
297 WInDev
[0].bTriggerSupport
= FALSE
;
298 if (IOCTL(audio
, SNDCTL_DSP_GETCAPS
, caps
) == 0) {
299 TRACE("OSS dsp in caps=%08X\n", caps
);
300 if (caps
& DSP_CAP_TRIGGER
)
301 WInDev
[0].bTriggerSupport
= TRUE
;
304 IOCTL(audio
, SNDCTL_DSP_GETFMTS
, mask
);
305 TRACE("OSS in dsp mask=%08x\n", mask
);
307 bytespersmpl
= (IOCTL(audio
, SNDCTL_DSP_SAMPLESIZE
, samplesize
) != 0) ? 1 : 2;
309 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
310 if (mask
& AFMT_U8
) {
311 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4M08
;
312 if (WInDev
[0].caps
.wChannels
> 1)
313 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4S08
;
315 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
316 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4M16
;
317 if (WInDev
[0].caps
.wChannels
> 1)
318 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_4S16
;
322 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
323 if (mask
& AFMT_U8
) {
324 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2M08
;
325 if (WInDev
[0].caps
.wChannels
> 1)
326 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2S08
;
328 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
329 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2M16
;
330 if (WInDev
[0].caps
.wChannels
> 1)
331 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_2S16
;
335 if (IOCTL(audio
, SNDCTL_DSP_SPEED
, smplrate
) == 0) {
336 if (mask
& AFMT_U8
) {
337 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1M08
;
338 if (WInDev
[0].caps
.wChannels
> 1)
339 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1S08
;
341 if ((mask
& AFMT_S16_LE
) && bytespersmpl
> 1) {
342 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1M16
;
343 if (WInDev
[0].caps
.wChannels
> 1)
344 WInDev
[0].caps
.dwFormats
|= WAVE_FORMAT_1S16
;
348 TRACE("in dwFormats = %08lX\n", WInDev
[0].caps
.dwFormats
);
353 /**************************************************************************
354 * OSS_NotifyClient [internal]
356 static DWORD
OSS_NotifyClient(UINT wDevID
, WORD wMsg
, DWORD dwParam1
,
359 TRACE("wDevID = %04X wMsg = %d dwParm1 = %04lX dwParam2 = %04lX\n",wDevID
, wMsg
, dwParam1
, dwParam2
);
365 if (wDevID
>= MAX_WAVEOUTDRV
) return MCIERR_INTERNAL
;
367 if (WOutDev
[wDevID
].wFlags
!= DCB_NULL
&&
368 !DriverCallback(WOutDev
[wDevID
].waveDesc
.dwCallback
,
369 WOutDev
[wDevID
].wFlags
,
370 WOutDev
[wDevID
].waveDesc
.hWave
,
372 WOutDev
[wDevID
].waveDesc
.dwInstance
,
375 WARN("can't notify client !\n");
376 return MMSYSERR_NOERROR
;
383 if (wDevID
>= MAX_WAVEINDRV
) return MCIERR_INTERNAL
;
385 if (WInDev
[wDevID
].wFlags
!= DCB_NULL
&&
386 !DriverCallback(WInDev
[wDevID
].waveDesc
.dwCallback
,
387 WInDev
[wDevID
].wFlags
,
388 WInDev
[wDevID
].waveDesc
.hWave
,
390 WInDev
[wDevID
].waveDesc
.dwInstance
,
393 WARN("can't notify client !\n");
394 return MMSYSERR_NOERROR
;
398 FIXME("Unknown CB message %u\n", wMsg
);
404 /*======================================================================*
405 * Low level WAVE OUT implementation *
406 *======================================================================*/
408 /**************************************************************************
409 * wodPlayer_WriteFragments [internal]
411 * wodPlayer helper. Writes as many fragments as it can to unixdev.
412 * Returns TRUE in case of buffer underrun.
414 static BOOL
wodPlayer_WriteFragments(WINE_WAVEOUT
* wwo
)
422 if (ioctl(wwo
->unixdev
, SNDCTL_DSP_GETOSPACE
, &info
) < 0) {
423 ERR("ioctl failed (%s)\n", strerror(errno
));
427 TRACE("info={frag=%d fsize=%d ftotal=%d bytes=%d}\n", info
.fragments
, info
.fragsize
, info
.fragstotal
, info
.bytes
);
429 if (!info
.fragments
) /* output queue is full, wait a bit */
432 lpWaveHdr
= wwo
->lpPlayPtr
;
434 if (wwo
->dwRemain
> 0 && /* still data to send to complete current fragment */
435 wwo
->dwLastFragDone
&& /* first fragment has been played */
436 info
.fragments
+ 2 > info
.fragstotal
) { /* done with all waveOutWrite()' fragments */
437 /* FIXME: should do better handling here */
438 WARN("Oooch, buffer underrun !\n");
439 return TRUE
; /* force resetting of waveOut device */
441 return FALSE
; /* wait a bit */
444 if (wwo
->dwOffCurrHdr
== 0) {
445 TRACE("Starting a new wavehdr %p of %ld bytes\n", lpWaveHdr
, lpWaveHdr
->dwBufferLength
);
446 if (lpWaveHdr
->dwFlags
& WHDR_BEGINLOOP
) {
447 if (wwo
->lpLoopPtr
) {
448 WARN("Already in a loop. Discarding loop on this header (%p)\n", lpWaveHdr
);
450 wwo
->lpLoopPtr
= lpWaveHdr
;
455 lpData
= lpWaveHdr
->lpData
;
457 /* finish current wave hdr ? */
458 if (wwo
->dwOffCurrHdr
+ wwo
->dwRemain
>= lpWaveHdr
->dwBufferLength
) {
459 DWORD toWrite
= lpWaveHdr
->dwBufferLength
- wwo
->dwOffCurrHdr
;
461 /* write end of current wave hdr */
462 count
= write(wwo
->unixdev
, lpData
+ wwo
->dwOffCurrHdr
, toWrite
);
463 TRACE("write(%p[%5lu], %5lu) => %d\n", lpData
, wwo
->dwOffCurrHdr
, toWrite
, count
);
465 if (count
> 0 || toWrite
== 0) {
466 DWORD tc
= GetTickCount();
468 if (wwo
->dwLastFragDone
/* + guard time ?? */ < tc
)
469 wwo
->dwLastFragDone
= tc
;
470 wwo
->dwLastFragDone
+= (toWrite
* 1000) / wwo
->format
.wf
.nAvgBytesPerSec
;
472 lpWaveHdr
->reserved
= wwo
->dwLastFragDone
;
473 TRACE("Tagging hdr %p with %08lx\n", lpWaveHdr
, wwo
->dwLastFragDone
);
475 /* WAVEHDR written, go to next one */
476 if ((lpWaveHdr
->dwFlags
& WHDR_ENDLOOP
) && wwo
->lpLoopPtr
) {
477 if (--wwo
->lpLoopPtr
->dwLoops
> 0) {
478 wwo
->lpPlayPtr
= wwo
->lpLoopPtr
;
480 /* last one played */
481 if (wwo
->lpLoopPtr
!= lpWaveHdr
&& (lpWaveHdr
->dwFlags
& WHDR_BEGINLOOP
)) {
482 FIXME("Correctly handled case ? (ending loop buffer also starts a new loop)\n");
483 /* shall we consider the END flag for the closing loop or for
484 * the opening one or for both ???
485 * code assumes for closing loop only
487 wwo
->lpLoopPtr
= lpWaveHdr
;
489 wwo
->lpLoopPtr
= NULL
;
491 wwo
->lpPlayPtr
= lpWaveHdr
->lpNext
;
494 wwo
->lpPlayPtr
= lpWaveHdr
->lpNext
;
496 wwo
->dwOffCurrHdr
= 0;
497 if ((wwo
->dwRemain
-= count
) == 0) {
498 wwo
->dwRemain
= wwo
->dwFragmentSize
;
501 continue; /* try to go to use next wavehdr */
503 count
= write(wwo
->unixdev
, lpData
+ wwo
->dwOffCurrHdr
, wwo
->dwRemain
);
504 TRACE("write(%p[%5lu], %5lu) => %d\n", lpData
, wwo
->dwOffCurrHdr
, wwo
->dwRemain
, count
);
506 DWORD tc
= GetTickCount();
508 if (wwo
->dwLastFragDone
/* + guard time ?? */ < tc
)
509 wwo
->dwLastFragDone
= tc
;
510 wwo
->dwLastFragDone
+= (wwo
->dwRemain
* 1000) / wwo
->format
.wf
.nAvgBytesPerSec
;
512 TRACE("Tagging frag with %08lx\n", wwo
->dwLastFragDone
);
514 wwo
->dwOffCurrHdr
+= count
;
515 wwo
->dwRemain
= wwo
->dwFragmentSize
;
522 int wodPlayer_Message(WINE_WAVEOUT
*wwo
, int msg
, DWORD param
)
524 EnterCriticalSection(&wwo
->msg_crst
);
525 if ((wwo
->msg_tosave
== wwo
->msg_toget
) /* buffer overflow ? */
526 && (wwo
->messages
[wwo
->msg_toget
].msg
))
528 ERR("buffer overflow !?\n");
529 LeaveCriticalSection(&wwo
->msg_crst
);
533 wwo
->messages
[wwo
->msg_tosave
].msg
= msg
;
534 wwo
->messages
[wwo
->msg_tosave
].param
= param
;
536 if (wwo
->msg_tosave
> WWO_RING_BUFFER_SIZE
-1)
538 LeaveCriticalSection(&wwo
->msg_crst
);
539 /* signal a new message */
540 SetEvent(wwo
->msg_event
);
544 int wodPlayer_RetrieveMessage(WINE_WAVEOUT
*wwo
, int *msg
, DWORD
*param
)
546 EnterCriticalSection(&wwo
->msg_crst
);
548 if (wwo
->msg_toget
== wwo
->msg_tosave
) /* buffer empty ? */
550 LeaveCriticalSection(&wwo
->msg_crst
);
554 *msg
= wwo
->messages
[wwo
->msg_toget
].msg
;
555 wwo
->messages
[wwo
->msg_toget
].msg
= 0;
556 *param
= wwo
->messages
[wwo
->msg_toget
].param
;
558 if (wwo
->msg_toget
> WWO_RING_BUFFER_SIZE
-1)
560 LeaveCriticalSection(&wwo
->msg_crst
);
564 /**************************************************************************
565 * wodPlayer_Notify [internal]
567 * wodPlayer helper. Notifies (and remove from queue) all the wavehdr which content
568 * have been played (actually to speaker, not to unixdev fd).
570 static void wodPlayer_Notify(WINE_WAVEOUT
* wwo
, WORD uDevID
, BOOL force
)
573 DWORD tc
= GetTickCount();
575 while (wwo
->lpQueuePtr
&&
577 (wwo
->lpQueuePtr
!= wwo
->lpPlayPtr
&& wwo
->lpQueuePtr
!= wwo
->lpLoopPtr
))) {
578 lpWaveHdr
= wwo
->lpQueuePtr
;
580 if (lpWaveHdr
->reserved
> tc
&& !force
) break;
582 wwo
->dwPlayedTotal
+= lpWaveHdr
->dwBufferLength
;
583 wwo
->lpQueuePtr
= lpWaveHdr
->lpNext
;
585 lpWaveHdr
->dwFlags
&= ~WHDR_INQUEUE
;
586 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
588 TRACE("Notifying client with %p\n", lpWaveHdr
);
589 if (OSS_NotifyClient(uDevID
, WOM_DONE
, (DWORD
)lpWaveHdr
, 0) != MMSYSERR_NOERROR
) {
590 WARN("can't notify client !\n");
595 /**************************************************************************
596 * wodPlayer_Reset [internal]
598 * wodPlayer helper. Resets current output stream.
600 static void wodPlayer_Reset(WINE_WAVEOUT
* wwo
, WORD uDevID
, BOOL reset
)
602 /* updates current notify list */
603 wodPlayer_Notify(wwo
, uDevID
, FALSE
);
605 /* flush all possible output */
606 if (ioctl(wwo
->unixdev
, SNDCTL_DSP_RESET
, 0) == -1) {
607 perror("ioctl SNDCTL_DSP_RESET");
609 wwo
->state
= WINE_WS_STOPPED
;
613 wwo
->dwOffCurrHdr
= 0;
614 wwo
->dwRemain
= wwo
->dwFragmentSize
;
616 /* empty notify list */
617 wodPlayer_Notify(wwo
, uDevID
, TRUE
);
619 wwo
->lpPlayPtr
= wwo
->lpQueuePtr
= wwo
->lpLoopPtr
= NULL
;
620 wwo
->state
= WINE_WS_STOPPED
;
621 wwo
->dwPlayedTotal
= 0;
623 /* FIXME: this is not accurate when looping, but can be do better ? */
624 wwo
->lpPlayPtr
= (wwo
->lpLoopPtr
) ? wwo
->lpLoopPtr
: wwo
->lpQueuePtr
;
625 wwo
->state
= WINE_WS_PAUSED
;
629 /**************************************************************************
630 * wodPlayer [internal]
632 static DWORD CALLBACK
wodPlayer(LPVOID pmt
)
634 WORD uDevID
= (DWORD
)pmt
;
635 WINE_WAVEOUT
* wwo
= (WINE_WAVEOUT
*)&WOutDev
[uDevID
];
642 wwo
->state
= WINE_WS_STOPPED
;
644 wwo
->dwLastFragDone
= 0;
645 wwo
->dwOffCurrHdr
= 0;
646 wwo
->dwRemain
= wwo
->dwFragmentSize
;
647 wwo
->lpQueuePtr
= wwo
->lpPlayPtr
= wwo
->lpLoopPtr
= NULL
;
648 wwo
->dwPlayedTotal
= 0;
650 TRACE("imhere[0]\n");
651 SetEvent(wwo
->hEvent
);
654 /* wait for dwSleepTime or an event in thread's queue
656 * - is wait time calculation optimal ?
657 * - these 100 ms parts should be changed, but Eric reports
658 * that the wodPlayer thread might lock up if we use INFINITE
659 * (strange !), so I better don't change that now... */
660 if (wwo
->state
!= WINE_WS_PLAYING
)
665 if (tc
< wwo
->dwLastFragDone
)
667 /* calculate sleep time depending on when the last fragment
669 dwSleepTime
= (wwo
->dwLastFragDone
- tc
)*7/10;
670 if (dwSleepTime
> 100)
677 TRACE("imhere[1]\n");
679 WaitForSingleObject(wwo
->msg_event
, dwSleepTime
);
680 TRACE("imhere[2] (q=%p p=%p)\n", wwo
->lpQueuePtr
, wwo
->lpPlayPtr
);
681 while (wodPlayer_RetrieveMessage(wwo
, &msg
, ¶m
)) {
683 case WINE_WM_PAUSING
:
684 wodPlayer_Reset(wwo
, uDevID
, FALSE
);
685 wwo
->state
= WINE_WS_PAUSED
;
686 SetEvent(wwo
->hEvent
);
688 case WINE_WM_RESTARTING
:
689 wwo
->state
= WINE_WS_PLAYING
;
690 SetEvent(wwo
->hEvent
);
693 lpWaveHdr
= (LPWAVEHDR
)param
;
695 /* insert buffer at the end of queue */
698 for (wh
= &(wwo
->lpQueuePtr
); *wh
; wh
= &((*wh
)->lpNext
));
701 if (!wwo
->lpPlayPtr
) wwo
->lpPlayPtr
= lpWaveHdr
;
702 if (wwo
->state
== WINE_WS_STOPPED
)
703 wwo
->state
= WINE_WS_PLAYING
;
705 case WINE_WM_RESETTING
:
706 wodPlayer_Reset(wwo
, uDevID
, TRUE
);
707 SetEvent(wwo
->hEvent
);
709 case WINE_WM_CLOSING
:
710 /* sanity check: this should not happen since the device must have been reset before */
711 if (wwo
->lpQueuePtr
|| wwo
->lpPlayPtr
) ERR("out of sync\n");
713 wwo
->state
= WINE_WS_CLOSED
;
714 SetEvent(wwo
->hEvent
);
716 /* shouldn't go here */
718 FIXME("unknown message %d\n", msg
);
722 if (wwo
->state
== WINE_WS_PLAYING
) {
723 wodPlayer_WriteFragments(wwo
);
725 wodPlayer_Notify(wwo
, uDevID
, FALSE
);
728 /* just for not generating compilation warnings... should never be executed */
732 /**************************************************************************
733 * wodGetDevCaps [internal]
735 static DWORD
wodGetDevCaps(WORD wDevID
, LPWAVEOUTCAPSA lpCaps
, DWORD dwSize
)
737 TRACE("(%u, %p, %lu);\n", wDevID
, lpCaps
, dwSize
);
739 if (lpCaps
== NULL
) return MMSYSERR_NOTENABLED
;
741 if (wDevID
>= MAX_WAVEOUTDRV
) {
742 TRACE("MAX_WAVOUTDRV reached !\n");
743 return MMSYSERR_BADDEVICEID
;
746 memcpy(lpCaps
, &WOutDev
[wDevID
].caps
, min(dwSize
, sizeof(*lpCaps
)));
747 return MMSYSERR_NOERROR
;
750 /**************************************************************************
753 static DWORD
wodOpen(WORD wDevID
, LPWAVEOPENDESC lpDesc
, DWORD dwFlags
)
763 TRACE("(%u, %p, %08lX);\n", wDevID
, lpDesc
, dwFlags
);
764 if (lpDesc
== NULL
) {
765 WARN("Invalid Parameter !\n");
766 return MMSYSERR_INVALPARAM
;
768 if (wDevID
>= MAX_WAVEOUTDRV
) {
769 TRACE("MAX_WAVOUTDRV reached !\n");
770 return MMSYSERR_BADDEVICEID
;
773 /* only PCM format is supported so far... */
774 if (lpDesc
->lpFormat
->wFormatTag
!= WAVE_FORMAT_PCM
||
775 lpDesc
->lpFormat
->nChannels
== 0 ||
776 lpDesc
->lpFormat
->nSamplesPerSec
== 0) {
777 WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n",
778 lpDesc
->lpFormat
->wFormatTag
, lpDesc
->lpFormat
->nChannels
,
779 lpDesc
->lpFormat
->nSamplesPerSec
);
780 return WAVERR_BADFORMAT
;
783 if (dwFlags
& WAVE_FORMAT_QUERY
) {
784 TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n",
785 lpDesc
->lpFormat
->wFormatTag
, lpDesc
->lpFormat
->nChannels
,
786 lpDesc
->lpFormat
->nSamplesPerSec
);
787 return MMSYSERR_NOERROR
;
790 wwo
= &WOutDev
[wDevID
];
792 if ((dwFlags
& WAVE_DIRECTSOUND
) && !(wwo
->caps
.dwSupport
& WAVECAPS_DIRECTSOUND
))
793 /* not supported, ignore it */
794 dwFlags
&= ~WAVE_DIRECTSOUND
;
796 if (access(SOUND_DEV
, 0) != 0)
797 return MMSYSERR_NOTENABLED
;
798 if (dwFlags
& WAVE_DIRECTSOUND
)
799 /* we want to be able to mmap() the device, which means it must be opened readable,
800 * otherwise mmap() will fail (at least under Linux) */
801 audio
= open(SOUND_DEV
, O_RDWR
|O_NDELAY
, 0);
803 audio
= open(SOUND_DEV
, O_WRONLY
|O_NDELAY
, 0);
805 WARN("can't open sound device %s (%s)!\n", SOUND_DEV
, strerror(errno
));
806 return MMSYSERR_ALLOCATED
;
808 fcntl(audio
, F_SETFD
, 1); /* set close on exec flag */
809 wwo
->unixdev
= audio
;
810 wwo
->wFlags
= HIWORD(dwFlags
& CALLBACK_TYPEMASK
);
812 memcpy(&wwo
->waveDesc
, lpDesc
, sizeof(WAVEOPENDESC
));
813 memcpy(&wwo
->format
, lpDesc
->lpFormat
, sizeof(PCMWAVEFORMAT
));
815 if (wwo
->format
.wBitsPerSample
== 0) {
816 WARN("Resetting zeroed wBitsPerSample\n");
817 wwo
->format
.wBitsPerSample
= 8 *
818 (wwo
->format
.wf
.nAvgBytesPerSec
/
819 wwo
->format
.wf
.nSamplesPerSec
) /
820 wwo
->format
.wf
.nChannels
;
823 if (dwFlags
& WAVE_DIRECTSOUND
) {
824 /* with DirectSound, fragments are irrelevant, but a large buffer isn't...
825 * so let's choose a full 64KB (32 * 2^11) for DirectSound */
826 audio_fragment
= 0x0020000B;
828 /* shockwave player uses only 4 1k-fragments at a rate of 22050 bytes/sec
829 * thus leading to 46ms per fragment, and a turnaround time of 185ms
831 /* 16 fragments max, 2^10=1024 bytes per fragment */
832 audio_fragment
= 0x000F000A;
834 sample_rate
= wwo
->format
.wf
.nSamplesPerSec
;
835 dsp_stereo
= (wwo
->format
.wf
.nChannels
> 1) ? 1 : 0;
836 format
= (wwo
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
;
838 IOCTL(audio
, SNDCTL_DSP_SETFRAGMENT
, audio_fragment
);
839 /* First size and stereo then samplerate */
840 IOCTL(audio
, SNDCTL_DSP_SETFMT
, format
);
841 IOCTL(audio
, SNDCTL_DSP_STEREO
, dsp_stereo
);
842 IOCTL(audio
, SNDCTL_DSP_SPEED
, sample_rate
);
844 /* paranoid checks */
845 if (format
!= ((wwo
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
))
846 ERR("Can't set format to %d (%d)\n",
847 (wwo
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
, format
);
848 if (dsp_stereo
!= (wwo
->format
.wf
.nChannels
> 1) ? 1 : 0)
849 ERR("Can't set stereo to %u (%d)\n",
850 (wwo
->format
.wf
.nChannels
> 1) ? 1 : 0, dsp_stereo
);
851 if (!NEAR_MATCH(sample_rate
,wwo
->format
.wf
.nSamplesPerSec
))
852 ERR("Can't set sample_rate to %lu (%d)\n",
853 wwo
->format
.wf
.nSamplesPerSec
, sample_rate
);
855 /* even if we set fragment size above, read it again, just in case */
856 IOCTL(audio
, SNDCTL_DSP_GETBLKSIZE
, fragment_size
);
857 if (fragment_size
== -1) {
858 WARN("IOCTL can't 'SNDCTL_DSP_GETBLKSIZE' !\n");
861 return MMSYSERR_NOTENABLED
;
863 wwo
->dwFragmentSize
= fragment_size
;
867 wwo
->msg_event
= CreateEventA(NULL
, FALSE
, FALSE
, NULL
);
868 memset(wwo
->messages
, 0, sizeof(WWO_MSG
)*WWO_RING_BUFFER_SIZE
);
869 InitializeCriticalSection(&wwo
->msg_crst
);
871 if (!(dwFlags
& WAVE_DIRECTSOUND
)) {
872 wwo
->hEvent
= CreateEventA(NULL
, FALSE
, FALSE
, NULL
);
873 wwo
->hThread
= CreateThread(NULL
, 0, wodPlayer
, (LPVOID
)(DWORD
)wDevID
, 0, &(wwo
->dwThreadID
));
874 WaitForSingleObject(wwo
->hEvent
, INFINITE
);
876 wwo
->hEvent
= INVALID_HANDLE_VALUE
;
877 wwo
->hThread
= INVALID_HANDLE_VALUE
;
881 TRACE("fd=%d fragmentSize=%ld\n",
882 wwo
->unixdev
, wwo
->dwFragmentSize
);
883 if (wwo
->dwFragmentSize
% wwo
->format
.wf
.nBlockAlign
)
884 ERR("Fragment doesn't contain an integral number of data blocks\n");
886 TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%lu, nSamplesPerSec=%lu, nChannels=%u nBlockAlign=%u!\n",
887 wwo
->format
.wBitsPerSample
, wwo
->format
.wf
.nAvgBytesPerSec
,
888 wwo
->format
.wf
.nSamplesPerSec
, wwo
->format
.wf
.nChannels
,
889 wwo
->format
.wf
.nBlockAlign
);
891 if (OSS_NotifyClient(wDevID
, WOM_OPEN
, 0L, 0L) != MMSYSERR_NOERROR
) {
892 WARN("can't notify client !\n");
893 return MMSYSERR_INVALPARAM
;
895 return MMSYSERR_NOERROR
;
898 /**************************************************************************
899 * wodClose [internal]
901 static DWORD
wodClose(WORD wDevID
)
903 DWORD ret
= MMSYSERR_NOERROR
;
906 TRACE("(%u);\n", wDevID
);
908 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
909 WARN("bad device ID !\n");
910 return MMSYSERR_BADDEVICEID
;
913 wwo
= &WOutDev
[wDevID
];
914 if (wwo
->lpQueuePtr
) {
915 WARN("buffers still playing !\n");
916 ret
= WAVERR_STILLPLAYING
;
918 TRACE("imhere[3-close]\n");
919 if (wwo
->hEvent
!= INVALID_HANDLE_VALUE
) {
920 wodPlayer_Message(wwo
, WINE_WM_CLOSING
, 0);
921 WaitForSingleObject(wwo
->hEvent
, INFINITE
);
922 CloseHandle(wwo
->hEvent
);
925 munmap(wwo
->mapping
, wwo
->maplen
);
931 wwo
->dwFragmentSize
= 0;
932 if (OSS_NotifyClient(wDevID
, WOM_CLOSE
, 0L, 0L) != MMSYSERR_NOERROR
) {
933 WARN("can't notify client !\n");
934 ret
= MMSYSERR_INVALPARAM
;
940 /**************************************************************************
941 * wodWrite [internal]
944 static DWORD
wodWrite(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
946 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
948 /* first, do the sanity checks... */
949 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
950 WARN("bad dev ID !\n");
951 return MMSYSERR_BADDEVICEID
;
954 if (lpWaveHdr
->lpData
== NULL
|| !(lpWaveHdr
->dwFlags
& WHDR_PREPARED
))
955 return WAVERR_UNPREPARED
;
957 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
)
958 return WAVERR_STILLPLAYING
;
960 lpWaveHdr
->dwFlags
&= ~WHDR_DONE
;
961 lpWaveHdr
->dwFlags
|= WHDR_INQUEUE
;
962 lpWaveHdr
->lpNext
= 0;
964 TRACE("imhere[3-HEADER]\n");
965 wodPlayer_Message(&WOutDev
[wDevID
], WINE_WM_HEADER
, (DWORD
)lpWaveHdr
);
967 return MMSYSERR_NOERROR
;
970 /**************************************************************************
971 * wodPrepare [internal]
973 static DWORD
wodPrepare(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
975 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
977 if (wDevID
>= MAX_WAVEOUTDRV
) {
978 WARN("bad device ID !\n");
979 return MMSYSERR_BADDEVICEID
;
982 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
)
983 return WAVERR_STILLPLAYING
;
985 lpWaveHdr
->dwFlags
|= WHDR_PREPARED
;
986 lpWaveHdr
->dwFlags
&= ~WHDR_DONE
;
987 return MMSYSERR_NOERROR
;
990 /**************************************************************************
991 * wodUnprepare [internal]
993 static DWORD
wodUnprepare(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
995 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
997 if (wDevID
>= MAX_WAVEOUTDRV
) {
998 WARN("bad device ID !\n");
999 return MMSYSERR_BADDEVICEID
;
1002 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
)
1003 return WAVERR_STILLPLAYING
;
1005 lpWaveHdr
->dwFlags
&= ~WHDR_PREPARED
;
1006 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
1008 return MMSYSERR_NOERROR
;
1011 /**************************************************************************
1012 * wodPause [internal]
1014 static DWORD
wodPause(WORD wDevID
)
1016 TRACE("(%u);!\n", wDevID
);
1018 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
1019 WARN("bad device ID !\n");
1020 return MMSYSERR_BADDEVICEID
;
1023 TRACE("imhere[3-PAUSING]\n");
1024 wodPlayer_Message(&WOutDev
[wDevID
], WINE_WM_PAUSING
, 0);
1025 WaitForSingleObject(WOutDev
[wDevID
].hEvent
, INFINITE
);
1027 return MMSYSERR_NOERROR
;
1030 /**************************************************************************
1031 * wodRestart [internal]
1033 static DWORD
wodRestart(WORD wDevID
)
1035 TRACE("(%u);\n", wDevID
);
1037 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
1038 WARN("bad device ID !\n");
1039 return MMSYSERR_BADDEVICEID
;
1042 if (WOutDev
[wDevID
].state
== WINE_WS_PAUSED
) {
1043 TRACE("imhere[3-RESTARTING]\n");
1044 wodPlayer_Message(&WOutDev
[wDevID
], WINE_WM_RESTARTING
, 0);
1045 WaitForSingleObject(WOutDev
[wDevID
].hEvent
, INFINITE
);
1048 /* FIXME: is NotifyClient with WOM_DONE right ? (Comet Busters 1.3.3 needs this notification) */
1049 /* FIXME: Myst crashes with this ... hmm -MM
1050 if (OSS_NotifyClient(wDevID, WOM_DONE, 0L, 0L) != MMSYSERR_NOERROR) {
1051 WARN("can't notify client !\n");
1052 return MMSYSERR_INVALPARAM;
1056 return MMSYSERR_NOERROR
;
1059 /**************************************************************************
1060 * wodReset [internal]
1062 static DWORD
wodReset(WORD wDevID
)
1064 TRACE("(%u);\n", wDevID
);
1066 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
1067 WARN("bad device ID !\n");
1068 return MMSYSERR_BADDEVICEID
;
1071 TRACE("imhere[3-RESET]\n");
1072 wodPlayer_Message(&WOutDev
[wDevID
], WINE_WM_RESETTING
, 0);
1073 WaitForSingleObject(WOutDev
[wDevID
].hEvent
, INFINITE
);
1075 return MMSYSERR_NOERROR
;
1079 /**************************************************************************
1080 * wodGetPosition [internal]
1082 static DWORD
wodGetPosition(WORD wDevID
, LPMMTIME lpTime
, DWORD uSize
)
1088 TRACE("(%u, %p, %lu);\n", wDevID
, lpTime
, uSize
);
1090 if (wDevID
>= MAX_WAVEOUTDRV
|| WOutDev
[wDevID
].unixdev
== -1) {
1091 WARN("bad device ID !\n");
1092 return MMSYSERR_BADDEVICEID
;
1095 if (lpTime
== NULL
) return MMSYSERR_INVALPARAM
;
1097 wwo
= &WOutDev
[wDevID
];
1098 val
= wwo
->dwPlayedTotal
;
1100 TRACE("wType=%04X wBitsPerSample=%u nSamplesPerSec=%lu nChannels=%u nAvgBytesPerSec=%lu\n",
1101 lpTime
->wType
, wwo
->format
.wBitsPerSample
,
1102 wwo
->format
.wf
.nSamplesPerSec
, wwo
->format
.wf
.nChannels
,
1103 wwo
->format
.wf
.nAvgBytesPerSec
);
1104 TRACE("dwTotalPlayed=%lu\n", val
);
1106 switch (lpTime
->wType
) {
1109 TRACE("TIME_BYTES=%lu\n", lpTime
->u
.cb
);
1112 lpTime
->u
.sample
= val
* 8 / wwo
->format
.wBitsPerSample
;
1113 TRACE("TIME_SAMPLES=%lu\n", lpTime
->u
.sample
);
1116 time
= val
/ (wwo
->format
.wf
.nAvgBytesPerSec
/ 1000);
1117 lpTime
->u
.smpte
.hour
= time
/ 108000;
1118 time
-= lpTime
->u
.smpte
.hour
* 108000;
1119 lpTime
->u
.smpte
.min
= time
/ 1800;
1120 time
-= lpTime
->u
.smpte
.min
* 1800;
1121 lpTime
->u
.smpte
.sec
= time
/ 30;
1122 time
-= lpTime
->u
.smpte
.sec
* 30;
1123 lpTime
->u
.smpte
.frame
= time
;
1124 lpTime
->u
.smpte
.fps
= 30;
1125 TRACE("TIME_SMPTE=%02u:%02u:%02u:%02u\n",
1126 lpTime
->u
.smpte
.hour
, lpTime
->u
.smpte
.min
,
1127 lpTime
->u
.smpte
.sec
, lpTime
->u
.smpte
.frame
);
1130 FIXME("Format %d not supported ! use TIME_MS !\n", lpTime
->wType
);
1131 lpTime
->wType
= TIME_MS
;
1133 lpTime
->u
.ms
= val
/ (wwo
->format
.wf
.nAvgBytesPerSec
/ 1000);
1134 TRACE("TIME_MS=%lu\n", lpTime
->u
.ms
);
1137 return MMSYSERR_NOERROR
;
1140 /**************************************************************************
1141 * wodGetVolume [internal]
1143 static DWORD
wodGetVolume(WORD wDevID
, LPDWORD lpdwVol
)
1149 TRACE("(%u, %p);\n", wDevID
, lpdwVol
);
1151 if (lpdwVol
== NULL
)
1152 return MMSYSERR_NOTENABLED
;
1153 if ((mixer
= open(MIXER_DEV
, O_RDONLY
|O_NDELAY
)) < 0) {
1154 WARN("mixer device not available !\n");
1155 return MMSYSERR_NOTENABLED
;
1157 if (ioctl(mixer
, SOUND_MIXER_READ_PCM
, &volume
) == -1) {
1158 WARN("unable read mixer !\n");
1159 return MMSYSERR_NOTENABLED
;
1162 left
= LOBYTE(volume
);
1163 right
= HIBYTE(volume
);
1164 TRACE("left=%ld right=%ld !\n", left
, right
);
1165 *lpdwVol
= ((left
* 0xFFFFl
) / 100) + (((right
* 0xFFFFl
) / 100) << 16);
1166 return MMSYSERR_NOERROR
;
1170 /**************************************************************************
1171 * wodSetVolume [internal]
1173 static DWORD
wodSetVolume(WORD wDevID
, DWORD dwParam
)
1179 TRACE("(%u, %08lX);\n", wDevID
, dwParam
);
1181 left
= (LOWORD(dwParam
) * 100) / 0xFFFFl
;
1182 right
= (HIWORD(dwParam
) * 100) / 0xFFFFl
;
1183 volume
= left
+ (right
<< 8);
1185 if ((mixer
= open(MIXER_DEV
, O_WRONLY
|O_NDELAY
)) < 0) {
1186 WARN("mixer device not available !\n");
1187 return MMSYSERR_NOTENABLED
;
1189 if (ioctl(mixer
, SOUND_MIXER_WRITE_PCM
, &volume
) == -1) {
1190 WARN("unable set mixer !\n");
1191 return MMSYSERR_NOTENABLED
;
1193 TRACE("volume=%04x\n", (unsigned)volume
);
1196 return MMSYSERR_NOERROR
;
1199 /**************************************************************************
1200 * wodGetNumDevs [internal]
1202 static DWORD
wodGetNumDevs(void)
1206 /* FIXME: For now, only one sound device (SOUND_DEV) is allowed */
1207 int audio
= open(SOUND_DEV
, O_WRONLY
|O_NDELAY
, 0);
1218 /**************************************************************************
1219 * OSS_wodMessage [sample driver]
1221 DWORD WINAPI
OSS_wodMessage(UINT wDevID
, UINT wMsg
, DWORD dwUser
,
1222 DWORD dwParam1
, DWORD dwParam2
)
1224 TRACE("(%u, %04X, %08lX, %08lX, %08lX);\n",
1225 wDevID
, wMsg
, dwUser
, dwParam1
, dwParam2
);
1232 /* FIXME: Pretend this is supported */
1234 case WODM_OPEN
: return wodOpen (wDevID
, (LPWAVEOPENDESC
)dwParam1
, dwParam2
);
1235 case WODM_CLOSE
: return wodClose (wDevID
);
1236 case WODM_WRITE
: return wodWrite (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
1237 case WODM_PAUSE
: return wodPause (wDevID
);
1238 case WODM_GETPOS
: return wodGetPosition (wDevID
, (LPMMTIME
)dwParam1
, dwParam2
);
1239 case WODM_BREAKLOOP
: return MMSYSERR_NOTSUPPORTED
;
1240 case WODM_PREPARE
: return wodPrepare (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
1241 case WODM_UNPREPARE
: return wodUnprepare (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
1242 case WODM_GETDEVCAPS
: return wodGetDevCaps (wDevID
, (LPWAVEOUTCAPSA
)dwParam1
, dwParam2
);
1243 case WODM_GETNUMDEVS
: return wodGetNumDevs ();
1244 case WODM_GETPITCH
: return MMSYSERR_NOTSUPPORTED
;
1245 case WODM_SETPITCH
: return MMSYSERR_NOTSUPPORTED
;
1246 case WODM_GETPLAYBACKRATE
: return MMSYSERR_NOTSUPPORTED
;
1247 case WODM_SETPLAYBACKRATE
: return MMSYSERR_NOTSUPPORTED
;
1248 case WODM_GETVOLUME
: return wodGetVolume (wDevID
, (LPDWORD
)dwParam1
);
1249 case WODM_SETVOLUME
: return wodSetVolume (wDevID
, dwParam1
);
1250 case WODM_RESTART
: return wodRestart (wDevID
);
1251 case WODM_RESET
: return wodReset (wDevID
);
1252 case 0x810: return wodDsCreate(wDevID
, (PIDSDRIVER
*)dwParam1
);
1254 FIXME("unknown message %d!\n", wMsg
);
1256 return MMSYSERR_NOTSUPPORTED
;
1259 /*======================================================================*
1260 * Low level DSOUND implementation *
1261 *======================================================================*/
1263 typedef struct IDsDriverImpl IDsDriverImpl
;
1264 typedef struct IDsDriverBufferImpl IDsDriverBufferImpl
;
1266 struct IDsDriverImpl
1268 /* IUnknown fields */
1269 ICOM_VFIELD(IDsDriver
);
1271 /* IDsDriverImpl fields */
1273 IDsDriverBufferImpl
*primary
;
1276 struct IDsDriverBufferImpl
1278 /* IUnknown fields */
1279 ICOM_VFIELD(IDsDriverBuffer
);
1281 /* IDsDriverBufferImpl fields */
1286 static HRESULT
DSDB_MapPrimary(IDsDriverBufferImpl
*dsdb
)
1288 WINE_WAVEOUT
*wwo
= &(WOutDev
[dsdb
->drv
->wDevID
]);
1289 if (!wwo
->mapping
) {
1290 wwo
->mapping
= mmap(NULL
, wwo
->maplen
, PROT_WRITE
, MAP_SHARED
,
1292 if (wwo
->mapping
== (LPBYTE
)-1) {
1293 ERR("(%p): Could not map sound device for direct access (errno=%d)\n", dsdb
, errno
);
1294 return DSERR_GENERIC
;
1296 TRACE("(%p): sound device has been mapped for direct access at %p, size=%ld\n", dsdb
, wwo
->mapping
, wwo
->maplen
);
1298 /* for some reason, es1371 and sblive! sometimes have junk in here. */
1299 memset(wwo
->mapping
,0,wwo
->maplen
); /* clear it, or we get junk noise */
1304 static HRESULT
DSDB_UnmapPrimary(IDsDriverBufferImpl
*dsdb
)
1306 WINE_WAVEOUT
*wwo
= &(WOutDev
[dsdb
->drv
->wDevID
]);
1308 if (munmap(wwo
->mapping
, wwo
->maplen
) < 0) {
1309 ERR("(%p): Could not unmap sound device (errno=%d)\n", dsdb
, errno
);
1310 return DSERR_GENERIC
;
1312 wwo
->mapping
= NULL
;
1313 TRACE("(%p): sound device unmapped\n", dsdb
);
1318 static HRESULT WINAPI
IDsDriverBufferImpl_QueryInterface(PIDSDRIVERBUFFER iface
, REFIID riid
, LPVOID
*ppobj
)
1320 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1321 FIXME("(): stub!\n");
1322 return DSERR_UNSUPPORTED
;
1325 static ULONG WINAPI
IDsDriverBufferImpl_AddRef(PIDSDRIVERBUFFER iface
)
1327 ICOM_THIS(IDsDriverBufferImpl
,iface
);
1332 static ULONG WINAPI
IDsDriverBufferImpl_Release(PIDSDRIVERBUFFER iface
)
1334 ICOM_THIS(IDsDriverBufferImpl
,iface
);
1337 if (This
== This
->drv
->primary
)
1338 This
->drv
->primary
= NULL
;
1339 DSDB_UnmapPrimary(This
);
1340 HeapFree(GetProcessHeap(),0,This
);
1344 static HRESULT WINAPI
IDsDriverBufferImpl_Lock(PIDSDRIVERBUFFER iface
,
1345 LPVOID
*ppvAudio1
,LPDWORD pdwLen1
,
1346 LPVOID
*ppvAudio2
,LPDWORD pdwLen2
,
1347 DWORD dwWritePosition
,DWORD dwWriteLen
,
1350 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1351 /* since we (GetDriverDesc flags) have specified DSDDESC_DONTNEEDPRIMARYLOCK,
1352 * and that we don't support secondary buffers, this method will never be called */
1353 TRACE("(%p): stub\n",iface
);
1354 return DSERR_UNSUPPORTED
;
1357 static HRESULT WINAPI
IDsDriverBufferImpl_Unlock(PIDSDRIVERBUFFER iface
,
1358 LPVOID pvAudio1
,DWORD dwLen1
,
1359 LPVOID pvAudio2
,DWORD dwLen2
)
1361 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1362 TRACE("(%p): stub\n",iface
);
1363 return DSERR_UNSUPPORTED
;
1366 static HRESULT WINAPI
IDsDriverBufferImpl_SetFormat(PIDSDRIVERBUFFER iface
,
1367 LPWAVEFORMATEX pwfx
)
1369 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1371 TRACE("(%p,%p)\n",iface
,pwfx
);
1372 /* On our request (GetDriverDesc flags), DirectSound has by now used
1373 * waveOutClose/waveOutOpen to set the format...
1374 * unfortunately, this means our mmap() is now gone...
1375 * so we need to somehow signal to our DirectSound implementation
1376 * that it should completely recreate this HW buffer...
1377 * this unexpected error code should do the trick... */
1378 return DSERR_BUFFERLOST
;
1381 static HRESULT WINAPI
IDsDriverBufferImpl_SetFrequency(PIDSDRIVERBUFFER iface
, DWORD dwFreq
)
1383 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1384 TRACE("(%p,%ld): stub\n",iface
,dwFreq
);
1385 return DSERR_UNSUPPORTED
;
1388 static HRESULT WINAPI
IDsDriverBufferImpl_SetVolumePan(PIDSDRIVERBUFFER iface
, PDSVOLUMEPAN pVolPan
)
1390 /* ICOM_THIS(IDsDriverBufferImpl,iface); */
1391 FIXME("(%p,%p): stub!\n",iface
,pVolPan
);
1392 return DSERR_UNSUPPORTED
;
1395 static HRESULT WINAPI
IDsDriverBufferImpl_SetPosition(PIDSDRIVERBUFFER iface
, DWORD dwNewPos
)
1397 /* ICOM_THIS(IDsDriverImpl,iface); */
1398 TRACE("(%p,%ld): stub\n",iface
,dwNewPos
);
1399 return DSERR_UNSUPPORTED
;
1402 static HRESULT WINAPI
IDsDriverBufferImpl_GetPosition(PIDSDRIVERBUFFER iface
,
1403 LPDWORD lpdwPlay
, LPDWORD lpdwWrite
)
1405 ICOM_THIS(IDsDriverBufferImpl
,iface
);
1409 TRACE("(%p)\n",iface
);
1410 if (ioctl(WOutDev
[This
->drv
->wDevID
].unixdev
, SNDCTL_DSP_GETOPTR
, &info
) < 0) {
1411 ERR("ioctl failed (%d)\n", errno
);
1412 return DSERR_GENERIC
;
1414 ptr
= info
.ptr
& ~3; /* align the pointer, just in case */
1415 if (lpdwPlay
) *lpdwPlay
= ptr
;
1417 /* add some safety margin (not strictly necessary, but...) */
1418 *lpdwWrite
= ptr
+ 32;
1419 while (*lpdwWrite
> This
->buflen
)
1420 *lpdwWrite
-= This
->buflen
;
1422 TRACE("playpos=%ld, writepos=%ld\n", lpdwPlay
?*lpdwPlay
:0, lpdwWrite
?*lpdwWrite
:0);
1423 return DSERR_UNSUPPORTED
;
1426 static HRESULT WINAPI
IDsDriverBufferImpl_Play(PIDSDRIVERBUFFER iface
, DWORD dwRes1
, DWORD dwRes2
, DWORD dwFlags
)
1428 ICOM_THIS(IDsDriverBufferImpl
,iface
);
1429 int enable
= PCM_ENABLE_OUTPUT
;
1430 TRACE("(%p,%lx,%lx,%lx)\n",iface
,dwRes1
,dwRes2
,dwFlags
);
1431 if (ioctl(WOutDev
[This
->drv
->wDevID
].unixdev
, SNDCTL_DSP_SETTRIGGER
, &enable
) < 0) {
1432 ERR("ioctl failed (%d)\n", errno
);
1433 return DSERR_GENERIC
;
1438 static HRESULT WINAPI
IDsDriverBufferImpl_Stop(PIDSDRIVERBUFFER iface
)
1440 ICOM_THIS(IDsDriverBufferImpl
,iface
);
1442 TRACE("(%p)\n",iface
);
1443 /* no more playing */
1444 if (ioctl(WOutDev
[This
->drv
->wDevID
].unixdev
, SNDCTL_DSP_SETTRIGGER
, &enable
) < 0) {
1445 ERR("ioctl failed (%d)\n", errno
);
1446 return DSERR_GENERIC
;
1449 /* the play position must be reset to the beginning of the buffer */
1450 if (ioctl(WOutDev
[This
->drv
->wDevID
].unixdev
, SNDCTL_DSP_RESET
, 0) < 0) {
1451 ERR("ioctl failed (%d)\n", errno
);
1452 return DSERR_GENERIC
;
1458 static ICOM_VTABLE(IDsDriverBuffer
) dsdbvt
=
1460 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
1461 IDsDriverBufferImpl_QueryInterface
,
1462 IDsDriverBufferImpl_AddRef
,
1463 IDsDriverBufferImpl_Release
,
1464 IDsDriverBufferImpl_Lock
,
1465 IDsDriverBufferImpl_Unlock
,
1466 IDsDriverBufferImpl_SetFormat
,
1467 IDsDriverBufferImpl_SetFrequency
,
1468 IDsDriverBufferImpl_SetVolumePan
,
1469 IDsDriverBufferImpl_SetPosition
,
1470 IDsDriverBufferImpl_GetPosition
,
1471 IDsDriverBufferImpl_Play
,
1472 IDsDriverBufferImpl_Stop
1475 static HRESULT WINAPI
IDsDriverImpl_QueryInterface(PIDSDRIVER iface
, REFIID riid
, LPVOID
*ppobj
)
1477 /* ICOM_THIS(IDsDriverImpl,iface); */
1478 FIXME("(%p): stub!\n",iface
);
1479 return DSERR_UNSUPPORTED
;
1482 static ULONG WINAPI
IDsDriverImpl_AddRef(PIDSDRIVER iface
)
1484 ICOM_THIS(IDsDriverImpl
,iface
);
1489 static ULONG WINAPI
IDsDriverImpl_Release(PIDSDRIVER iface
)
1491 ICOM_THIS(IDsDriverImpl
,iface
);
1494 HeapFree(GetProcessHeap(),0,This
);
1498 static HRESULT WINAPI
IDsDriverImpl_GetDriverDesc(PIDSDRIVER iface
, PDSDRIVERDESC pDesc
)
1500 ICOM_THIS(IDsDriverImpl
,iface
);
1501 TRACE("(%p,%p)\n",iface
,pDesc
);
1502 pDesc
->dwFlags
= DSDDESC_DOMMSYSTEMOPEN
| DSDDESC_DOMMSYSTEMSETFORMAT
|
1503 DSDDESC_USESYSTEMMEMORY
| DSDDESC_DONTNEEDPRIMARYLOCK
;
1504 strcpy(pDesc
->szDesc
,"WineOSS DirectSound Driver");
1505 strcpy(pDesc
->szDrvName
,"wineoss.drv");
1506 pDesc
->dnDevNode
= WOutDev
[This
->wDevID
].waveDesc
.dnDevNode
;
1508 pDesc
->wReserved
= 0;
1509 pDesc
->ulDeviceNum
= This
->wDevID
;
1510 pDesc
->dwHeapType
= DSDHEAP_NOHEAP
;
1511 pDesc
->pvDirectDrawHeap
= NULL
;
1512 pDesc
->dwMemStartAddress
= 0;
1513 pDesc
->dwMemEndAddress
= 0;
1514 pDesc
->dwMemAllocExtra
= 0;
1515 pDesc
->pvReserved1
= NULL
;
1516 pDesc
->pvReserved2
= NULL
;
1520 static HRESULT WINAPI
IDsDriverImpl_Open(PIDSDRIVER iface
)
1522 ICOM_THIS(IDsDriverImpl
,iface
);
1525 TRACE("(%p)\n",iface
);
1526 /* make sure the card doesn't start playing before we want it to */
1527 if (ioctl(WOutDev
[This
->wDevID
].unixdev
, SNDCTL_DSP_SETTRIGGER
, &enable
) < 0) {
1528 ERR("ioctl failed (%d)\n", errno
);
1529 return DSERR_GENERIC
;
1534 static HRESULT WINAPI
IDsDriverImpl_Close(PIDSDRIVER iface
)
1536 ICOM_THIS(IDsDriverImpl
,iface
);
1537 TRACE("(%p)\n",iface
);
1538 if (This
->primary
) {
1539 ERR("problem with DirectSound: primary not released\n");
1540 return DSERR_GENERIC
;
1545 static HRESULT WINAPI
IDsDriverImpl_GetCaps(PIDSDRIVER iface
, PDSDRIVERCAPS pCaps
)
1547 /* ICOM_THIS(IDsDriverImpl,iface); */
1548 TRACE("(%p,%p)\n",iface
,pCaps
);
1549 memset(pCaps
, 0, sizeof(*pCaps
));
1550 /* FIXME: need to check actual capabilities */
1551 pCaps
->dwFlags
= DSCAPS_PRIMARYMONO
| DSCAPS_PRIMARYSTEREO
|
1552 DSCAPS_PRIMARY8BIT
| DSCAPS_PRIMARY16BIT
;
1553 pCaps
->dwPrimaryBuffers
= 1;
1554 /* the other fields only apply to secondary buffers, which we don't support
1555 * (unless we want to mess with wavetable synthesizers and MIDI) */
1559 static HRESULT WINAPI
IDsDriverImpl_CreateSoundBuffer(PIDSDRIVER iface
,
1560 LPWAVEFORMATEX pwfx
,
1561 DWORD dwFlags
, DWORD dwCardAddress
,
1562 LPDWORD pdwcbBufferSize
,
1566 ICOM_THIS(IDsDriverImpl
,iface
);
1567 IDsDriverBufferImpl
** ippdsdb
= (IDsDriverBufferImpl
**)ppvObj
;
1569 audio_buf_info info
;
1571 TRACE("(%p,%p,%lx,%lx)\n",iface
,pwfx
,dwFlags
,dwCardAddress
);
1572 /* we only support primary buffers */
1573 if (!(dwFlags
& DSBCAPS_PRIMARYBUFFER
))
1574 return DSERR_UNSUPPORTED
;
1576 return DSERR_ALLOCATED
;
1577 if (dwFlags
& (DSBCAPS_CTRLFREQUENCY
| DSBCAPS_CTRLPAN
))
1578 return DSERR_CONTROLUNAVAIL
;
1580 *ippdsdb
= (IDsDriverBufferImpl
*)HeapAlloc(GetProcessHeap(),0,sizeof(IDsDriverBufferImpl
));
1581 if (*ippdsdb
== NULL
)
1582 return DSERR_OUTOFMEMORY
;
1583 ICOM_VTBL(*ippdsdb
) = &dsdbvt
;
1584 (*ippdsdb
)->ref
= 1;
1585 (*ippdsdb
)->drv
= This
;
1587 /* check how big the DMA buffer is now */
1588 if (ioctl(WOutDev
[This
->wDevID
].unixdev
, SNDCTL_DSP_GETOSPACE
, &info
) < 0) {
1589 ERR("ioctl failed (%d)\n", errno
);
1590 HeapFree(GetProcessHeap(),0,*ippdsdb
);
1592 return DSERR_GENERIC
;
1594 WOutDev
[This
->wDevID
].maplen
= (*ippdsdb
)->buflen
= info
.fragstotal
* info
.fragsize
;
1596 /* map the DMA buffer */
1597 err
= DSDB_MapPrimary(*ippdsdb
);
1599 HeapFree(GetProcessHeap(),0,*ippdsdb
);
1604 /* primary buffer is ready to go */
1605 *pdwcbBufferSize
= WOutDev
[This
->wDevID
].maplen
;
1606 *ppbBuffer
= WOutDev
[This
->wDevID
].mapping
;
1608 This
->primary
= *ippdsdb
;
1613 static HRESULT WINAPI
IDsDriverImpl_DuplicateSoundBuffer(PIDSDRIVER iface
,
1614 PIDSDRIVERBUFFER pBuffer
,
1617 /* ICOM_THIS(IDsDriverImpl,iface); */
1618 TRACE("(%p,%p): stub\n",iface
,pBuffer
);
1619 return DSERR_INVALIDCALL
;
1622 static ICOM_VTABLE(IDsDriver
) dsdvt
=
1624 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
1625 IDsDriverImpl_QueryInterface
,
1626 IDsDriverImpl_AddRef
,
1627 IDsDriverImpl_Release
,
1628 IDsDriverImpl_GetDriverDesc
,
1630 IDsDriverImpl_Close
,
1631 IDsDriverImpl_GetCaps
,
1632 IDsDriverImpl_CreateSoundBuffer
,
1633 IDsDriverImpl_DuplicateSoundBuffer
1636 static DWORD
wodDsCreate(UINT wDevID
, PIDSDRIVER
* drv
)
1638 IDsDriverImpl
** idrv
= (IDsDriverImpl
**)drv
;
1640 /* the HAL isn't much better than the HEL if we can't do mmap() */
1641 if (!(WOutDev
[wDevID
].caps
.dwSupport
& WAVECAPS_DIRECTSOUND
)) {
1642 ERR("DirectSound flag not set\n");
1643 MESSAGE("This sound card's driver does not support direct access\n");
1644 MESSAGE("The (slower) DirectSound HEL mode will be used instead.\n");
1645 return MMSYSERR_NOTSUPPORTED
;
1648 *idrv
= (IDsDriverImpl
*)HeapAlloc(GetProcessHeap(),0,sizeof(IDsDriverImpl
));
1650 return MMSYSERR_NOMEM
;
1651 ICOM_VTBL(*idrv
) = &dsdvt
;
1654 (*idrv
)->wDevID
= wDevID
;
1655 (*idrv
)->primary
= NULL
;
1656 return MMSYSERR_NOERROR
;
1659 /*======================================================================*
1660 * Low level WAVE IN implementation *
1661 *======================================================================*/
1663 /**************************************************************************
1664 * widGetDevCaps [internal]
1666 static DWORD
widGetDevCaps(WORD wDevID
, LPWAVEINCAPSA lpCaps
, DWORD dwSize
)
1668 TRACE("(%u, %p, %lu);\n", wDevID
, lpCaps
, dwSize
);
1670 if (lpCaps
== NULL
) return MMSYSERR_NOTENABLED
;
1672 if (wDevID
>= MAX_WAVEINDRV
) {
1673 TRACE("MAX_WAVINDRV reached !\n");
1674 return MMSYSERR_BADDEVICEID
;
1677 memcpy(lpCaps
, &WInDev
[wDevID
].caps
, min(dwSize
, sizeof(*lpCaps
)));
1678 return MMSYSERR_NOERROR
;
1681 /**************************************************************************
1682 * widRecorder [internal]
1684 static DWORD CALLBACK
widRecorder(LPVOID pmt
)
1686 WORD uDevID
= (DWORD
)pmt
;
1687 WINE_WAVEIN
* wwi
= (WINE_WAVEIN
*)&WInDev
[uDevID
];
1693 audio_buf_info info
;
1695 LPVOID buffer
= HeapAlloc(GetProcessHeap(),
1697 wwi
->dwFragmentSize
);
1699 LPVOID pOffset
= buffer
;
1701 PeekMessageA(&msg
, 0, 0, 0, 0);
1702 wwi
->state
= WINE_WS_STOPPED
;
1703 wwi
->dwTotalRecorded
= 0;
1705 SetEvent(wwi
->hEvent
);
1707 /* make sleep time to be # of ms to output a fragment */
1708 dwSleepTime
= (wwi
->dwFragmentSize
* 1000) / wwi
->format
.wf
.nAvgBytesPerSec
;
1709 TRACE("sleeptime=%ld ms\n", dwSleepTime
);
1712 /* wait for dwSleepTime or an event in thread's queue */
1713 /* FIXME: could improve wait time depending on queue state,
1714 * ie, number of queued fragments
1717 if (wwi
->lpQueuePtr
!= NULL
&& wwi
->state
== WINE_WS_PLAYING
)
1719 lpWaveHdr
= wwi
->lpQueuePtr
;
1722 ioctl(wwi
->unixdev
, SNDCTL_DSP_GETISPACE
, &info
);
1723 TRACE("info={frag=%d fsize=%d ftotal=%d bytes=%d}\n", info
.fragments
, info
.fragsize
, info
.fragstotal
, info
.bytes
);
1726 /* read all the fragments accumulated so far */
1727 while ((info
.fragments
> 0) && (wwi
->lpQueuePtr
))
1731 if (lpWaveHdr
->dwBufferLength
- lpWaveHdr
->dwBytesRecorded
> wwi
->dwFragmentSize
)
1733 /* directly read fragment in wavehdr */
1734 bytesRead
= read(wwi
->unixdev
,
1735 lpWaveHdr
->lpData
+ lpWaveHdr
->dwBytesRecorded
,
1736 wwi
->dwFragmentSize
);
1738 TRACE("bytesRead=%ld (direct)\n", bytesRead
);
1739 if (bytesRead
!= (DWORD
) -1)
1741 /* update number of bytes recorded in current buffer and by this device */
1742 lpWaveHdr
->dwBytesRecorded
+= bytesRead
;
1743 wwi
->dwTotalRecorded
+= bytesRead
;
1745 /* buffer is full. notify client */
1746 if (lpWaveHdr
->dwBytesRecorded
== lpWaveHdr
->dwBufferLength
)
1748 lpWaveHdr
->dwFlags
&= ~WHDR_INQUEUE
;
1749 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
1751 if (OSS_NotifyClient(uDevID
,
1754 lpWaveHdr
->dwBytesRecorded
) != MMSYSERR_NOERROR
)
1756 WARN("can't notify client !\n");
1758 lpWaveHdr
= wwi
->lpQueuePtr
= lpWaveHdr
->lpNext
;
1764 /* read the fragment in a local buffer */
1765 bytesRead
= read(wwi
->unixdev
, buffer
, wwi
->dwFragmentSize
);
1768 TRACE("bytesRead=%ld (local)\n", bytesRead
);
1770 /* copy data in client buffers */
1771 while (bytesRead
!= (DWORD
) -1 && bytesRead
> 0)
1773 DWORD dwToCopy
= min (bytesRead
, lpWaveHdr
->dwBufferLength
- lpWaveHdr
->dwBytesRecorded
);
1775 memcpy(lpWaveHdr
->lpData
+ lpWaveHdr
->dwBytesRecorded
,
1779 /* update number of bytes recorded in current buffer and by this device */
1780 lpWaveHdr
->dwBytesRecorded
+= dwToCopy
;
1781 wwi
->dwTotalRecorded
+= dwToCopy
;
1782 bytesRead
-= dwToCopy
;
1783 pOffset
+= dwToCopy
;
1785 /* client buffer is full. notify client */
1786 if (lpWaveHdr
->dwBytesRecorded
== lpWaveHdr
->dwBufferLength
)
1788 lpWaveHdr
->dwFlags
&= ~WHDR_INQUEUE
;
1789 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
1791 if (OSS_NotifyClient(uDevID
,
1794 lpWaveHdr
->dwBytesRecorded
) != MMSYSERR_NOERROR
)
1796 WARN("can't notify client !\n");
1799 if (lpWaveHdr
->lpNext
)
1801 lpWaveHdr
= lpWaveHdr
->lpNext
;
1802 wwi
->lpQueuePtr
= lpWaveHdr
;
1806 /* no more buffer to copy data to, but we did read more.
1807 * what hasn't been copied will be dropped
1809 if (bytesRead
) WARN("buffer over run! %lu bytes dropped.\n", bytesRead
);
1810 wwi
->lpQueuePtr
= NULL
;
1819 MsgWaitForMultipleObjects(0, NULL
, FALSE
, dwSleepTime
, QS_POSTMESSAGE
);
1821 while (PeekMessageA(&msg
, 0, WINE_WM_FIRST
, WINE_WM_LAST
, PM_REMOVE
)) {
1823 TRACE("msg=0x%x wParam=0x%x lParam=0x%lx\n", msg
.message
, msg
.wParam
, msg
.lParam
);
1824 switch (msg
.message
) {
1825 case WINE_WM_PAUSING
:
1826 wwi
->state
= WINE_WS_PAUSED
;
1827 /*FIXME("Device should stop recording");*/
1828 SetEvent(wwi
->hEvent
);
1830 case WINE_WM_RESTARTING
:
1832 int enable
= PCM_ENABLE_INPUT
;
1833 wwi
->state
= WINE_WS_PLAYING
;
1835 if (wwi
->bTriggerSupport
)
1837 /* start the recording */
1838 if (ioctl(wwi
->unixdev
, SNDCTL_DSP_SETTRIGGER
, &enable
) < 0)
1840 ERR("ioctl(SNDCTL_DSP_SETTRIGGER) failed (%d)\n", errno
);
1845 unsigned char data
[4];
1846 /* read 4 bytes to start the recording */
1847 read(wwi
->unixdev
, data
, 4);
1850 SetEvent(wwi
->hEvent
);
1853 case WINE_WM_HEADER
:
1854 lpWaveHdr
= (LPWAVEHDR
)msg
.lParam
;
1855 lpWaveHdr
->lpNext
= 0;
1857 /* insert buffer at the end of queue */
1860 for (wh
= &(wwi
->lpQueuePtr
); *wh
; wh
= &((*wh
)->lpNext
));
1864 case WINE_WM_RESETTING
:
1865 wwi
->state
= WINE_WS_STOPPED
;
1866 /* return all buffers to the app */
1867 for (lpWaveHdr
= wwi
->lpQueuePtr
; lpWaveHdr
; lpWaveHdr
= lpWaveHdr
->lpNext
) {
1868 TRACE("reset %p %p\n", lpWaveHdr
, lpWaveHdr
->lpNext
);
1869 lpWaveHdr
->dwFlags
&= ~WHDR_INQUEUE
;
1870 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
1872 if (OSS_NotifyClient(uDevID
, WIM_DATA
, (DWORD
)lpWaveHdr
,
1873 lpWaveHdr
->dwBytesRecorded
) != MMSYSERR_NOERROR
) {
1874 WARN("can't notify client !\n");
1877 wwi
->lpQueuePtr
= NULL
;
1878 SetEvent(wwi
->hEvent
);
1880 case WINE_WM_CLOSING
:
1882 wwi
->state
= WINE_WS_CLOSED
;
1883 SetEvent(wwi
->hEvent
);
1884 HeapFree(GetProcessHeap(), 0, buffer
);
1886 /* shouldn't go here */
1888 FIXME("unknown message %d\n", msg
.message
);
1894 /* just for not generating compilation warnings... should never be executed */
1899 /**************************************************************************
1900 * widOpen [internal]
1902 static DWORD
widOpen(WORD wDevID
, LPWAVEOPENDESC lpDesc
, DWORD dwFlags
)
1911 TRACE("(%u, %p, %08lX);\n", wDevID
, lpDesc
, dwFlags
);
1912 if (lpDesc
== NULL
) {
1913 WARN("Invalid Parameter !\n");
1914 return MMSYSERR_INVALPARAM
;
1916 if (wDevID
>= MAX_WAVEINDRV
) return MMSYSERR_BADDEVICEID
;
1918 /* only PCM format is supported so far... */
1919 if (lpDesc
->lpFormat
->wFormatTag
!= WAVE_FORMAT_PCM
||
1920 lpDesc
->lpFormat
->nChannels
== 0 ||
1921 lpDesc
->lpFormat
->nSamplesPerSec
== 0) {
1922 WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n",
1923 lpDesc
->lpFormat
->wFormatTag
, lpDesc
->lpFormat
->nChannels
,
1924 lpDesc
->lpFormat
->nSamplesPerSec
);
1925 return WAVERR_BADFORMAT
;
1928 if (dwFlags
& WAVE_FORMAT_QUERY
) {
1929 TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n",
1930 lpDesc
->lpFormat
->wFormatTag
, lpDesc
->lpFormat
->nChannels
,
1931 lpDesc
->lpFormat
->nSamplesPerSec
);
1932 return MMSYSERR_NOERROR
;
1935 if (access(SOUND_DEV
,0) != 0) return MMSYSERR_NOTENABLED
;
1936 audio
= open(SOUND_DEV
, O_RDONLY
|O_NDELAY
, 0);
1938 WARN("can't open sound device %s (%s)!\n", SOUND_DEV
, strerror(errno
));
1939 return MMSYSERR_ALLOCATED
;
1941 fcntl(audio
, F_SETFD
, 1); /* set close on exec flag */
1943 wwi
= &WInDev
[wDevID
];
1944 if (wwi
->lpQueuePtr
) {
1945 WARN("Should have an empty queue (%p)\n", wwi
->lpQueuePtr
);
1946 wwi
->lpQueuePtr
= NULL
;
1948 wwi
->unixdev
= audio
;
1949 wwi
->dwTotalRecorded
= 0;
1950 wwi
->wFlags
= HIWORD(dwFlags
& CALLBACK_TYPEMASK
);
1952 memcpy(&wwi
->waveDesc
, lpDesc
, sizeof(WAVEOPENDESC
));
1953 memcpy(&wwi
->format
, lpDesc
->lpFormat
, sizeof(PCMWAVEFORMAT
));
1955 if (wwi
->format
.wBitsPerSample
== 0) {
1956 WARN("Resetting zeroed wBitsPerSample\n");
1957 wwi
->format
.wBitsPerSample
= 8 *
1958 (wwi
->format
.wf
.nAvgBytesPerSec
/
1959 wwi
->format
.wf
.nSamplesPerSec
) /
1960 wwi
->format
.wf
.nChannels
;
1963 sample_rate
= wwi
->format
.wf
.nSamplesPerSec
;
1964 dsp_stereo
= (wwi
->format
.wf
.nChannels
> 1) ? TRUE
: FALSE
;
1965 format
= (wwi
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
;
1967 IOCTL(audio
, SNDCTL_DSP_SETFMT
, format
);
1968 IOCTL(audio
, SNDCTL_DSP_STEREO
, dsp_stereo
);
1969 IOCTL(audio
, SNDCTL_DSP_SPEED
, sample_rate
);
1971 /* paranoid checks */
1972 if (format
!= ((wwi
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
))
1973 ERR("Can't set format to %d (%d)\n",
1974 (wwi
->format
.wBitsPerSample
== 16) ? AFMT_S16_LE
: AFMT_U8
, format
);
1975 if (dsp_stereo
!= (wwi
->format
.wf
.nChannels
> 1) ? 1 : 0)
1976 ERR("Can't set stereo to %u (%d)\n",
1977 (wwi
->format
.wf
.nChannels
> 1) ? 1 : 0, dsp_stereo
);
1978 if (!NEAR_MATCH(sample_rate
, wwi
->format
.wf
.nSamplesPerSec
))
1979 ERR("Can't set sample_rate to %lu (%d)\n",
1980 wwi
->format
.wf
.nSamplesPerSec
, sample_rate
);
1982 IOCTL(audio
, SNDCTL_DSP_GETBLKSIZE
, fragment_size
);
1983 if (fragment_size
== -1) {
1984 WARN("IOCTL can't 'SNDCTL_DSP_GETBLKSIZE' !\n");
1987 return MMSYSERR_NOTENABLED
;
1989 wwi
->dwFragmentSize
= fragment_size
;
1991 TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%lu, nSamplesPerSec=%lu, nChannels=%u nBlockAlign=%u!\n",
1992 wwi
->format
.wBitsPerSample
, wwi
->format
.wf
.nAvgBytesPerSec
,
1993 wwi
->format
.wf
.nSamplesPerSec
, wwi
->format
.wf
.nChannels
,
1994 wwi
->format
.wf
.nBlockAlign
);
1996 wwi
->hEvent
= CreateEventA(NULL
, FALSE
, FALSE
, NULL
);
1997 wwi
->hThread
= CreateThread(NULL
, 0, widRecorder
, (LPVOID
)(DWORD
)wDevID
, 0, &(wwi
->dwThreadID
));
1998 WaitForSingleObject(wwi
->hEvent
, INFINITE
);
2000 if (OSS_NotifyClient(wDevID
, WIM_OPEN
, 0L, 0L) != MMSYSERR_NOERROR
) {
2001 WARN("can't notify client !\n");
2002 return MMSYSERR_INVALPARAM
;
2004 return MMSYSERR_NOERROR
;
2007 /**************************************************************************
2008 * widClose [internal]
2010 static DWORD
widClose(WORD wDevID
)
2014 TRACE("(%u);\n", wDevID
);
2015 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2016 WARN("can't close !\n");
2017 return MMSYSERR_INVALHANDLE
;
2020 wwi
= &WInDev
[wDevID
];
2022 if (wwi
->lpQueuePtr
!= NULL
) {
2023 WARN("still buffers open !\n");
2024 return WAVERR_STILLPLAYING
;
2027 PostThreadMessageA(wwi
->dwThreadID
, WINE_WM_CLOSING
, 0, 0);
2028 WaitForSingleObject(wwi
->hEvent
, INFINITE
);
2029 CloseHandle(wwi
->hEvent
);
2030 close(wwi
->unixdev
);
2032 wwi
->dwFragmentSize
= 0;
2033 if (OSS_NotifyClient(wDevID
, WIM_CLOSE
, 0L, 0L) != MMSYSERR_NOERROR
) {
2034 WARN("can't notify client !\n");
2035 return MMSYSERR_INVALPARAM
;
2037 return MMSYSERR_NOERROR
;
2040 /**************************************************************************
2041 * widAddBuffer [internal]
2043 static DWORD
widAddBuffer(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
2045 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
2047 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2048 WARN("can't do it !\n");
2049 return MMSYSERR_INVALHANDLE
;
2051 if (!(lpWaveHdr
->dwFlags
& WHDR_PREPARED
)) {
2052 TRACE("never been prepared !\n");
2053 return WAVERR_UNPREPARED
;
2055 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
) {
2056 TRACE("header already in use !\n");
2057 return WAVERR_STILLPLAYING
;
2060 lpWaveHdr
->dwFlags
|= WHDR_INQUEUE
;
2061 lpWaveHdr
->dwFlags
&= ~WHDR_DONE
;
2062 lpWaveHdr
->dwBytesRecorded
= 0;
2063 lpWaveHdr
->lpNext
= NULL
;
2065 PostThreadMessageA(WInDev
[wDevID
].dwThreadID
, WINE_WM_HEADER
, 0, (DWORD
)lpWaveHdr
);
2066 return MMSYSERR_NOERROR
;
2069 /**************************************************************************
2070 * widPrepare [internal]
2072 static DWORD
widPrepare(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
2074 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
2076 if (wDevID
>= MAX_WAVEINDRV
) return MMSYSERR_INVALHANDLE
;
2078 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
)
2079 return WAVERR_STILLPLAYING
;
2081 lpWaveHdr
->dwFlags
|= WHDR_PREPARED
;
2082 lpWaveHdr
->dwFlags
&= ~(WHDR_INQUEUE
|WHDR_DONE
);
2083 lpWaveHdr
->dwBytesRecorded
= 0;
2084 TRACE("header prepared !\n");
2085 return MMSYSERR_NOERROR
;
2088 /**************************************************************************
2089 * widUnprepare [internal]
2091 static DWORD
widUnprepare(WORD wDevID
, LPWAVEHDR lpWaveHdr
, DWORD dwSize
)
2093 TRACE("(%u, %p, %08lX);\n", wDevID
, lpWaveHdr
, dwSize
);
2094 if (wDevID
>= MAX_WAVEINDRV
) return MMSYSERR_INVALHANDLE
;
2096 if (lpWaveHdr
->dwFlags
& WHDR_INQUEUE
)
2097 return WAVERR_STILLPLAYING
;
2099 lpWaveHdr
->dwFlags
&= ~(WHDR_PREPARED
|WHDR_INQUEUE
);
2100 lpWaveHdr
->dwFlags
|= WHDR_DONE
;
2102 return MMSYSERR_NOERROR
;
2105 /**************************************************************************
2106 * widStart [internal]
2108 static DWORD
widStart(WORD wDevID
)
2110 TRACE("(%u);\n", wDevID
);
2111 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2112 WARN("can't start recording !\n");
2113 return MMSYSERR_INVALHANDLE
;
2116 PostThreadMessageA(WInDev
[wDevID
].dwThreadID
, WINE_WM_RESTARTING
, 0, 0);
2117 WaitForSingleObject(WInDev
[wDevID
].hEvent
, INFINITE
);
2118 return MMSYSERR_NOERROR
;
2121 /**************************************************************************
2122 * widStop [internal]
2124 static DWORD
widStop(WORD wDevID
)
2126 TRACE("(%u);\n", wDevID
);
2127 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2128 WARN("can't stop !\n");
2129 return MMSYSERR_INVALHANDLE
;
2131 /* FIXME: reset aint stop */
2132 PostThreadMessageA(WInDev
[wDevID
].dwThreadID
, WINE_WM_RESETTING
, 0, 0);
2133 WaitForSingleObject(WInDev
[wDevID
].hEvent
, INFINITE
);
2135 return MMSYSERR_NOERROR
;
2138 /**************************************************************************
2139 * widReset [internal]
2141 static DWORD
widReset(WORD wDevID
)
2143 TRACE("(%u);\n", wDevID
);
2144 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2145 WARN("can't reset !\n");
2146 return MMSYSERR_INVALHANDLE
;
2148 PostThreadMessageA(WInDev
[wDevID
].dwThreadID
, WINE_WM_RESETTING
, 0, 0);
2149 WaitForSingleObject(WInDev
[wDevID
].hEvent
, INFINITE
);
2150 return MMSYSERR_NOERROR
;
2153 /**************************************************************************
2154 * widGetPosition [internal]
2156 static DWORD
widGetPosition(WORD wDevID
, LPMMTIME lpTime
, DWORD uSize
)
2161 TRACE("(%u, %p, %lu);\n", wDevID
, lpTime
, uSize
);
2163 if (wDevID
>= MAX_WAVEINDRV
|| WInDev
[wDevID
].unixdev
== -1) {
2164 WARN("can't get pos !\n");
2165 return MMSYSERR_INVALHANDLE
;
2167 if (lpTime
== NULL
) return MMSYSERR_INVALPARAM
;
2169 wwi
= &WInDev
[wDevID
];
2171 TRACE("wType=%04X !\n", lpTime
->wType
);
2172 TRACE("wBitsPerSample=%u\n", wwi
->format
.wBitsPerSample
);
2173 TRACE("nSamplesPerSec=%lu\n", wwi
->format
.wf
.nSamplesPerSec
);
2174 TRACE("nChannels=%u\n", wwi
->format
.wf
.nChannels
);
2175 TRACE("nAvgBytesPerSec=%lu\n", wwi
->format
.wf
.nAvgBytesPerSec
);
2176 switch (lpTime
->wType
) {
2178 lpTime
->u
.cb
= wwi
->dwTotalRecorded
;
2179 TRACE("TIME_BYTES=%lu\n", lpTime
->u
.cb
);
2182 lpTime
->u
.sample
= wwi
->dwTotalRecorded
* 8 /
2183 wwi
->format
.wBitsPerSample
;
2184 TRACE("TIME_SAMPLES=%lu\n", lpTime
->u
.sample
);
2187 time
= wwi
->dwTotalRecorded
/
2188 (wwi
->format
.wf
.nAvgBytesPerSec
/ 1000);
2189 lpTime
->u
.smpte
.hour
= time
/ 108000;
2190 time
-= lpTime
->u
.smpte
.hour
* 108000;
2191 lpTime
->u
.smpte
.min
= time
/ 1800;
2192 time
-= lpTime
->u
.smpte
.min
* 1800;
2193 lpTime
->u
.smpte
.sec
= time
/ 30;
2194 time
-= lpTime
->u
.smpte
.sec
* 30;
2195 lpTime
->u
.smpte
.frame
= time
;
2196 lpTime
->u
.smpte
.fps
= 30;
2197 TRACE("TIME_SMPTE=%02u:%02u:%02u:%02u\n",
2198 lpTime
->u
.smpte
.hour
, lpTime
->u
.smpte
.min
,
2199 lpTime
->u
.smpte
.sec
, lpTime
->u
.smpte
.frame
);
2202 lpTime
->u
.ms
= wwi
->dwTotalRecorded
/
2203 (wwi
->format
.wf
.nAvgBytesPerSec
/ 1000);
2204 TRACE("TIME_MS=%lu\n", lpTime
->u
.ms
);
2207 FIXME("format not supported (%u) ! use TIME_MS !\n", lpTime
->wType
);
2208 lpTime
->wType
= TIME_MS
;
2210 return MMSYSERR_NOERROR
;
2213 /**************************************************************************
2214 * OSS_widMessage [sample driver]
2216 DWORD WINAPI
OSS_widMessage(WORD wDevID
, WORD wMsg
, DWORD dwUser
,
2217 DWORD dwParam1
, DWORD dwParam2
)
2219 TRACE("(%u, %04X, %08lX, %08lX, %08lX);\n",
2220 wDevID
, wMsg
, dwUser
, dwParam1
, dwParam2
);
2227 /* FIXME: Pretend this is supported */
2229 case WIDM_OPEN
: return widOpen (wDevID
, (LPWAVEOPENDESC
)dwParam1
, dwParam2
);
2230 case WIDM_CLOSE
: return widClose (wDevID
);
2231 case WIDM_ADDBUFFER
: return widAddBuffer (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
2232 case WIDM_PREPARE
: return widPrepare (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
2233 case WIDM_UNPREPARE
: return widUnprepare (wDevID
, (LPWAVEHDR
)dwParam1
, dwParam2
);
2234 case WIDM_GETDEVCAPS
: return widGetDevCaps (wDevID
, (LPWAVEINCAPSA
)dwParam1
, dwParam2
);
2235 case WIDM_GETNUMDEVS
: return wodGetNumDevs (); /* same number of devices in output as in input */
2236 case WIDM_GETPOS
: return widGetPosition(wDevID
, (LPMMTIME
)dwParam1
, dwParam2
);
2237 case WIDM_RESET
: return widReset (wDevID
);
2238 case WIDM_START
: return widStart (wDevID
);
2239 case WIDM_STOP
: return widStop (wDevID
);
2241 FIXME("unknown message %u!\n", wMsg
);
2243 return MMSYSERR_NOTSUPPORTED
;
2246 #else /* !HAVE_OSS */
2248 /**************************************************************************
2249 * OSS_wodMessage [sample driver]
2251 DWORD WINAPI
OSS_wodMessage(WORD wDevID
, WORD wMsg
, DWORD dwUser
,
2252 DWORD dwParam1
, DWORD dwParam2
)
2254 FIXME("(%u, %04X, %08lX, %08lX, %08lX):stub\n", wDevID
, wMsg
, dwUser
, dwParam1
, dwParam2
);
2255 return MMSYSERR_NOTENABLED
;
2258 /**************************************************************************
2259 * OSS_widMessage [sample driver]
2261 DWORD WINAPI
OSS_widMessage(WORD wDevID
, WORD wMsg
, DWORD dwUser
,
2262 DWORD dwParam1
, DWORD dwParam2
)
2264 FIXME("(%u, %04X, %08lX, %08lX, %08lX):stub\n", wDevID
, wMsg
, dwUser
, dwParam1
, dwParam2
);
2265 return MMSYSERR_NOTENABLED
;
2268 #endif /* HAVE_OSS */