dsoundaudio.c@ 35353

最後變更在這個檔案從35353是 35353,由 vboxsync 提交於 14 年前
Move the misc files the in src/VBox/Devices/ directory into a build/ subdirectory, changing their names to match the target module.
屬性 svn:eol-style 設為 `native` 屬性 svn:keywords 設為 `Author Date Id Revision`
檔案大小: 28.2 KB

行
1	/*
2	* QEMU DirectSound audio driver
3	*
4	* Copyright (c) 2005 Vassili Karpov (malc)
5	*
6	* Permission is hereby granted, free of charge, to any person obtaining a copy
7	* of this software and associated documentation files (the "Software"), to deal
8	* in the Software without restriction, including without limitation the rights
9	* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10	* copies of the Software, and to permit persons to whom the Software is
11	* furnished to do so, subject to the following conditions:
12	*
13	* The above copyright notice and this permission notice shall be included in
14	* all copies or substantial portions of the Software.
15	*
16	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17	* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19	* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21	* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22	* THE SOFTWARE.
23	*/
24
25	/*
26	* SEAL 1.07 by Carlos 'pel' Hasan was used as documentation
27	*/
28
29	#define LOG_GROUP LOG_GROUP_DEV_AUDIO
30	#define _WIN32_DCOM
31	#include <windows.h>
32	#include <objbase.h>
33	#include <dsound.h>
34
35	#include "VBoxDD.h"
36	#include "vl_vbox.h"
37	#include "audio.h"
38	#include <iprt/alloc.h>
39	#include <VBox/log.h>
40
41
42	#define AUDIO_CAP "dsound"
43	#include "audio_int.h"
44
45	/* #define DEBUG_DSOUND */
46
47	static struct {
48	int lock_retries;
49	int restore_retries;
50	int getstatus_retries;
51	int set_primary;
52	int bufsize_in;
53	int bufsize_out;
54	audsettings_t settings;
55	int latency_millis;
56	} conf = {
57	1,
58	1,
59	1,
60	0,
61	16384,
62	16384,
63	{
64	44100,
65	2,
66	AUD_FMT_S16
67	},
68	10
69	};
70
71	typedef struct {
72	LPDIRECTSOUND dsound;
73	LPDIRECTSOUNDCAPTURE dsound_capture;
74	LPDIRECTSOUNDBUFFER dsound_primary_buffer;
75	audsettings_t settings;
76	} dsound;
77
78	static dsound glob_dsound;
79
80	typedef struct {
81	HWVoiceOut hw;
82	LPDIRECTSOUNDBUFFER dsound_buffer;
83	DWORD old_pos;
84	int first_time;
85	#ifdef DEBUG_DSOUND
86	DWORD old_ppos;
87	DWORD played;
88	DWORD mixed;
89	#endif
90	} DSoundVoiceOut;
91
92	typedef struct {
93	HWVoiceIn hw;
94	int first_time;
95	LPDIRECTSOUNDCAPTUREBUFFER dsound_capture_buffer;
96	} DSoundVoiceIn;
97
98	static void dsound_log_hresult (HRESULT hr)
99	{
100	const char *str = "BUG";
101
102	switch (hr) {
103	case DS_OK:
104	str = "The method succeeded";
105	break;
106	#ifdef DS_NO_VIRTUALIZATION
107	case DS_NO_VIRTUALIZATION:
108	str = "The buffer was created, but another 3D algorithm was substituted";
109	break;
110	#endif
111	#ifdef DS_INCOMPLETE
112	case DS_INCOMPLETE:
113	str = "The method succeeded, but not all the optional effects were obtained";
114	break;
115	#endif
116	#ifdef DSERR_ACCESSDENIED
117	case DSERR_ACCESSDENIED:
118	str = "The request failed because access was denied";
119	break;
120	#endif
121	#ifdef DSERR_ALLOCATED
122	case DSERR_ALLOCATED:
123	str = "The request failed because resources, such as a priority level, were already in use by another caller";
124	break;
125	#endif
126	#ifdef DSERR_ALREADYINITIALIZED
127	case DSERR_ALREADYINITIALIZED:
128	str = "The object is already initialized";
129	break;
130	#endif
131	#ifdef DSERR_BADFORMAT
132	case DSERR_BADFORMAT:
133	str = "The specified wave format is not supported";
134	break;
135	#endif
136	#ifdef DSERR_BADSENDBUFFERGUID
137	case DSERR_BADSENDBUFFERGUID:
138	str = "The GUID specified in an audiopath file does not match a valid mix-in buffer";
139	break;
140	#endif
141	#ifdef DSERR_BUFFERLOST
142	case DSERR_BUFFERLOST:
143	str = "The buffer memory has been lost and must be restored";
144	break;
145	#endif
146	#ifdef DSERR_BUFFERTOOSMALL
147	case DSERR_BUFFERTOOSMALL:
148	str = "The buffer size is not great enough to enable effects processing";
149	break;
150	#endif
151	#ifdef DSERR_CONTROLUNAVAIL
152	case DSERR_CONTROLUNAVAIL:
153	str = "The buffer control (volume, pan, and so on) requested by the caller is not available. Controls must be specified when the buffer is created, using the dwFlags member of DSBUFFERDESC";
154	break;
155	#endif
156	#ifdef DSERR_DS8_REQUIRED
157	case DSERR_DS8_REQUIRED:
158	str = "A DirectSound object of class CLSID_DirectSound8 or later is required for the requested functionality. For more information, see IDirectSound8 Interface";
159	break;
160	#endif
161	#ifdef DSERR_FXUNAVAILABLE
162	case DSERR_FXUNAVAILABLE:
163	str = "The effects requested could not be found on the system, or they are in the wrong order or in the wrong location; for example, an effect expected in hardware was found in software";
164	break;
165	#endif
166	#ifdef DSERR_GENERIC
167	case DSERR_GENERIC :
168	str = "An undetermined error occurred inside the DirectSound subsystem";
169	break;
170	#endif
171	#ifdef DSERR_INVALIDCALL
172	case DSERR_INVALIDCALL:
173	str = "This function is not valid for the current state of this object";
174	break;
175	#endif
176	#ifdef DSERR_INVALIDPARAM
177	case DSERR_INVALIDPARAM:
178	str = "An invalid parameter was passed to the returning function";
179	break;
180	#endif
181	#ifdef DSERR_NOAGGREGATION
182	case DSERR_NOAGGREGATION:
183	str = "The object does not support aggregation";
184	break;
185	#endif
186	#ifdef DSERR_NODRIVER
187	case DSERR_NODRIVER:
188	str = "No sound driver is available for use, or the given GUID is not a valid DirectSound device ID";
189	break;
190	#endif
191	#ifdef DSERR_NOINTERFACE
192	case DSERR_NOINTERFACE:
193	str = "The requested COM interface is not available";
194	break;
195	#endif
196	#ifdef DSERR_OBJECTNOTFOUND
197	case DSERR_OBJECTNOTFOUND:
198	str = "The requested object was not found";
199	break;
200	#endif
201	#ifdef DSERR_OTHERAPPHASPRIO
202	case DSERR_OTHERAPPHASPRIO:
203	str = "Another application has a higher priority level, preventing this call from succeeding";
204	break;
205	#endif
206	#ifdef DSERR_OUTOFMEMORY
207	case DSERR_OUTOFMEMORY:
208	str = "The DirectSound subsystem could not allocate sufficient memory to complete the caller's request";
209	break;
210	#endif
211	#ifdef DSERR_PRIOLEVELNEEDED
212	case DSERR_PRIOLEVELNEEDED:
213	str = "A cooperative level of DSSCL_PRIORITY or higher is required";
214	break;
215	#endif
216	#ifdef DSERR_SENDLOOP
217	case DSERR_SENDLOOP:
218	str = "A circular loop of send effects was detected";
219	break;
220	#endif
221	#ifdef DSERR_UNINITIALIZED
222	case DSERR_UNINITIALIZED:
223	str = "The Initialize method has not been called or has not been called successfully before other methods were called";
224	break;
225	#endif
226	#ifdef DSERR_UNSUPPORTED
227	case DSERR_UNSUPPORTED:
228	str = "The function called is not supported at this time";
229	break;
230	#endif
231	default:
232	AUD_log (AUDIO_CAP, "Reason: Unknown (HRESULT %#lx)\n", hr);
233	return;
234	}
235
236	AUD_log (AUDIO_CAP, "Reason: %s\n", str);
237	#ifdef VBOX
238	LogRel(("DSound: Reason: %s\n", str));
239	#endif
240	}
241
242	static void GCC_FMT_ATTR (2, 3) dsound_logerr (
243	HRESULT hr,
244	const char *fmt,
245	...
246	)
247	{
248	va_list ap;
249
250	va_start (ap, fmt);
251	AUD_vlog (AUDIO_CAP, fmt, ap);
252	va_end (ap);
253
254	dsound_log_hresult (hr);
255	}
256
257	static void GCC_FMT_ATTR (3, 4) dsound_logerr2 (
258	HRESULT hr,
259	const char *typ,
260	const char *fmt,
261	...
262	)
263	{
264	va_list ap;
265
266	AUD_log (AUDIO_CAP, "Could not initialize %s\n", typ);
267	va_start (ap, fmt);
268	AUD_vlog (AUDIO_CAP, fmt, ap);
269	va_end (ap);
270
271	dsound_log_hresult (hr);
272	}
273
274	static DWORD millis_to_bytes (struct audio_pcm_info *info, DWORD millis)
275	{
276	return (millis * info->bytes_per_second) / 1000;
277	}
278
279	#ifdef DEBUG_DSOUND
280	static void print_wave_format (WAVEFORMATEX *wfx)
281	{
282	dolog ("tag = %d\n", wfx->wFormatTag);
283	dolog ("nChannels = %d\n", wfx->nChannels);
284	dolog ("nSamplesPerSec = %ld\n", wfx->nSamplesPerSec);
285	dolog ("nAvgBytesPerSec = %ld\n", wfx->nAvgBytesPerSec);
286	dolog ("nBlockAlign = %d\n", wfx->nBlockAlign);
287	dolog ("wBitsPerSample = %d\n", wfx->wBitsPerSample);
288	dolog ("cbSize = %d\n", wfx->cbSize);
289	}
290	#endif
291
292	static int dsound_restore_out (LPDIRECTSOUNDBUFFER dsb)
293	{
294	HRESULT hr;
295	int i;
296
297	for (i = 0; i < conf.restore_retries; ++i) {
298	hr = IDirectSoundBuffer_Restore (dsb);
299
300	switch (hr) {
301	case DS_OK:
302	return 0;
303
304	case DSERR_BUFFERLOST:
305	continue;
306
307	default:
308	dsound_logerr (hr, "Could not restore playback buffer\n");
309	return -1;
310	}
311	}
312
313	dolog ("%d attempts to restore playback buffer failed\n", i);
314	return -1;
315	}
316
317	static int waveformat_from_audio_settings (WAVEFORMATEX wfx, audsettings_t as)
318	{
319	memset (wfx, 0, sizeof (*wfx));
320
321	wfx->wFormatTag = WAVE_FORMAT_PCM;
322	wfx->nChannels = as->nchannels;
323	wfx->nSamplesPerSec = as->freq;
324	wfx->nAvgBytesPerSec = as->freq << (as->nchannels == 2);
325	wfx->nBlockAlign = 1 << (as->nchannels == 2);
326	wfx->cbSize = 0;
327
328	switch (as->fmt) {
329	case AUD_FMT_S8:
330	case AUD_FMT_U8:
331	wfx->wBitsPerSample = 8;
332	break;
333
334	case AUD_FMT_S16:
335	case AUD_FMT_U16:
336	wfx->wBitsPerSample = 16;
337	wfx->nAvgBytesPerSec <<= 1;
338	wfx->nBlockAlign <<= 1;
339	break;
340
341	case AUD_FMT_S32:
342	case AUD_FMT_U32:
343	wfx->wBitsPerSample = 32;
344	wfx->nAvgBytesPerSec <<= 2;
345	wfx->nBlockAlign <<= 2;
346	break;
347
348	default:
349	dolog ("Internal logic error: Bad audio format %d\n", as->freq);
350	return -1;
351	}
352
353	return 0;
354	}
355
356	static int waveformat_to_audio_settings (WAVEFORMATEX wfx, audsettings_t as)
357	{
358	if (wfx->wFormatTag != WAVE_FORMAT_PCM) {
359	dolog ("Invalid wave format, tag is not PCM, but %d\n",
360	wfx->wFormatTag);
361	return -1;
362	}
363
364	if (!wfx->nSamplesPerSec) {
365	dolog ("Invalid wave format, frequency is zero\n");
366	return -1;
367	}
368	as->freq = wfx->nSamplesPerSec;
369
370	switch (wfx->nChannels) {
371	case 1:
372	as->nchannels = 1;
373	break;
374
375	case 2:
376	as->nchannels = 2;
377	break;
378
379	default:
380	dolog (
381	"Invalid wave format, number of channels is not 1 or 2, but %d\n",
382	wfx->nChannels
383	);
384	return -1;
385	}
386
387	switch (wfx->wBitsPerSample) {
388	case 8:
389	as->fmt = AUD_FMT_U8;
390	break;
391
392	case 16:
393	as->fmt = AUD_FMT_S16;
394	break;
395
396	case 32:
397	as->fmt = AUD_FMT_S32;
398	break;
399
400	default:
401	dolog ("Invalid wave format, bits per sample is not "
402	"8, 16 or 32, but %d\n",
403	wfx->wBitsPerSample);
404	return -1;
405	}
406
407	return 0;
408	}
409
410	#include "dsound_template.h"
411	#define DSBTYPE_IN
412	#include "dsound_template.h"
413	#undef DSBTYPE_IN
414
415	static int dsound_get_status_out (LPDIRECTSOUNDBUFFER dsb, DWORD *statusp)
416	{
417	HRESULT hr;
418	int i;
419
420	for (i = 0; i < conf.getstatus_retries; ++i) {
421	hr = IDirectSoundBuffer_GetStatus (dsb, statusp);
422	if (FAILED (hr)) {
423	dsound_logerr (hr, "Could not get playback buffer status\n");
424	return -1;
425	}
426
427	if (*statusp & DSERR_BUFFERLOST) {
428	if (dsound_restore_out (dsb)) {
429	return -1;
430	}
431	continue;
432	}
433	break;
434	}
435
436	return 0;
437	}
438
439	static int dsound_get_status_in (LPDIRECTSOUNDCAPTUREBUFFER dscb,
440	DWORD *statusp)
441	{
442	HRESULT hr;
443
444	hr = IDirectSoundCaptureBuffer_GetStatus (dscb, statusp);
445	if (FAILED (hr)) {
446	dsound_logerr (hr, "Could not get capture buffer status\n");
447	return -1;
448	}
449
450	return 0;
451	}
452
453	static void dsound_write_sample (HWVoiceOut hw, uint8_t dst, int dst_len)
454	{
455	int src_len1 = dst_len;
456	int src_len2 = 0;
457	int pos = hw->rpos + dst_len;
458	st_sample_t *src1 = hw->mix_buf + hw->rpos;
459	st_sample_t *src2 = NULL;
460
461	if (pos > hw->samples) {
462	src_len1 = hw->samples - hw->rpos;
463	src2 = hw->mix_buf;
464	src_len2 = dst_len - src_len1;
465	pos = src_len2;
466	}
467
468	if (src_len1) {
469	hw->clip (dst, src1, src_len1);
470	// mixeng_sniff_and_clear (hw, src1, dst, src_len1);
471	}
472
473	if (src_len2) {
474	dst = advance (dst, src_len1 << hw->info.shift);
475	hw->clip (dst, src2, src_len2);
476	// mixeng_sniff_and_clear (hw, src2, dst, src_len2);
477	}
478
479	hw->rpos = pos % hw->samples;
480	}
481
482	static void dsound_clear_sample (HWVoiceOut *hw, LPDIRECTSOUNDBUFFER dsb)
483	{
484	int err;
485	LPVOID p1, p2;
486	DWORD blen1, blen2, len1, len2;
487
488	err = dsound_lock_out (
489	dsb,
490	&hw->info,
491	0,
492	hw->samples << hw->info.shift,
493	&p1, &p2,
494	&blen1, &blen2,
495	1
496	);
497	if (err) {
498	return;
499	}
500
501	len1 = blen1 >> hw->info.shift;
502	len2 = blen2 >> hw->info.shift;
503
504	#ifdef DEBUG_DSOUND
505	dolog ("clear %p,%ld,%ld %p,%ld,%ld\n",
506	p1, blen1, len1,
507	p2, blen2, len2);
508	#endif
509
510	if (p1 && len1) {
511	audio_pcm_info_clear_buf (&hw->info, p1, len1);
512	}
513
514	if (p2 && len2) {
515	audio_pcm_info_clear_buf (&hw->info, p2, len2);
516	}
517
518	dsound_unlock_out (dsb, p1, p2, blen1, blen2);
519	}
520
521	static void dsound_close (dsound *s)
522	{
523	HRESULT hr;
524
525	if (s->dsound_primary_buffer) {
526	hr = IDirectSoundBuffer_Release (s->dsound_primary_buffer);
527	if (FAILED (hr)) {
528	dsound_logerr (hr, "Could not release primary buffer\n");
529	}
530	s->dsound_primary_buffer = NULL;
531	}
532	}
533
534	static int dsound_open (dsound *s)
535	{
536	int err;
537	HRESULT hr;
538	WAVEFORMATEX wfx;
539	DSBUFFERDESC dsbd;
540	HWND hwnd;
541
542	hwnd = GetForegroundWindow ();
543	hr = IDirectSound_SetCooperativeLevel (
544	s->dsound,
545	hwnd,
546	DSSCL_PRIORITY
547	);
548
549	if (FAILED (hr)) {
550	#ifndef VBOX
551	dsound_logerr (hr, "Could not set cooperative level for window %p\n",
552	hwnd);
553	#else
554	LogRel(("DSound: Could not set cooperative level for window %p\n", hwnd));
555	dsound_log_hresult(hr);
556	#endif
557	return -1;
558	}
559
560	if (!conf.set_primary) {
561	return 0;
562	}
563
564	err = waveformat_from_audio_settings (&wfx, &conf.settings);
565	if (err) {
566	return -1;
567	}
568
569	memset (&dsbd, 0, sizeof (dsbd));
570	dsbd.dwSize = sizeof (dsbd);
571	dsbd.dwFlags = DSBCAPS_PRIMARYBUFFER;
572	dsbd.dwBufferBytes = 0;
573	dsbd.lpwfxFormat = NULL;
574
575	hr = IDirectSound_CreateSoundBuffer (
576	s->dsound,
577	&dsbd,
578	&s->dsound_primary_buffer,
579	NULL
580	);
581	if (FAILED (hr)) {
582	#ifndef VBOX
583	dsound_logerr (hr, "Could not create primary playback buffer\n");
584	#else
585	LogRel(("DSound: Could not create primary playback buffer\n"));
586	dsound_log_hresult(hr);
587	#endif
588	return -1;
589	}
590
591	hr = IDirectSoundBuffer_SetFormat (s->dsound_primary_buffer, &wfx);
592	if (FAILED (hr)) {
593	#ifndef VBOX
594	dsound_logerr (hr, "Could not set primary playback buffer format\n");
595	#else
596	LogRel(("DSound: Could not set primary playback buffer format\n"));
597	dsound_log_hresult(hr);
598	#endif
599	}
600
601	hr = IDirectSoundBuffer_GetFormat (
602	s->dsound_primary_buffer,
603	&wfx,
604	sizeof (wfx),
605	NULL
606	);
607	if (FAILED (hr)) {
608	#ifndef VBOX
609	dsound_logerr (hr, "Could not get primary playback buffer format\n");
610	#else
611	LogRel(("DSound: Could not get primary playback buffer format\n"));
612	dsound_log_hresult(hr);
613	#endif
614	goto fail0;
615	}
616
617	#ifdef DEBUG_DSOUND
618	dolog ("Primary\n");
619	print_wave_format (&wfx);
620	#endif
621
622	err = waveformat_to_audio_settings (&wfx, &s->settings);
623	if (err) {
624	goto fail0;
625	}
626
627	return 0;
628
629	fail0:
630	dsound_close (s);
631	return -1;
632	}
633
634	static int dsound_ctl_out (HWVoiceOut *hw, int cmd, ...)
635	{
636	HRESULT hr;
637	DWORD status;
638	DSoundVoiceOut ds = (DSoundVoiceOut ) hw;
639	LPDIRECTSOUNDBUFFER dsb = ds->dsound_buffer;
640
641	if (!dsb) {
642	dolog ("Attempt to control voice without a buffer\n");
643	return 0;
644	}
645
646	switch (cmd) {
647	case VOICE_ENABLE:
648	if (dsound_get_status_out (dsb, &status)) {
649	return -1;
650	}
651
652	if (status & DSBSTATUS_PLAYING) {
653	dolog ("warning: Voice is already playing\n");
654	return 0;
655	}
656
657	dsound_clear_sample (hw, dsb);
658
659	hr = IDirectSoundBuffer_Play (dsb, 0, 0, DSBPLAY_LOOPING);
660	if (FAILED (hr)) {
661	dsound_logerr (hr, "Could not start playing buffer\n");
662	return -1;
663	}
664	break;
665
666	case VOICE_DISABLE:
667	if (dsound_get_status_out (dsb, &status)) {
668	return -1;
669	}
670
671	if (status & DSBSTATUS_PLAYING) {
672	hr = IDirectSoundBuffer_Stop (dsb);
673	if (FAILED (hr)) {
674	dsound_logerr (hr, "Could not stop playing buffer\n");
675	return -1;
676	}
677	}
678	else {
679	dolog ("warning: Voice is not playing\n");
680	}
681	break;
682	}
683	return 0;
684	}
685
686	static int dsound_write (SWVoiceOut sw, void buf, int len)
687	{
688	return audio_pcm_sw_write (sw, buf, len);
689	}
690
691	static int dsound_run_out (HWVoiceOut *hw)
692	{
693	int err;
694	HRESULT hr;
695	DSoundVoiceOut ds = (DSoundVoiceOut ) hw;
696	LPDIRECTSOUNDBUFFER dsb = ds->dsound_buffer;
697	int live, len, hwshift;
698	DWORD blen1, blen2;
699	DWORD len1, len2;
700	DWORD decr;
701	DWORD wpos, ppos, old_pos;
702	LPVOID p1, p2;
703	int bufsize;
704
705	if (!dsb) {
706	dolog ("Attempt to run empty with playback buffer\n");
707	return 0;
708	}
709
710	hwshift = hw->info.shift;
711	bufsize = hw->samples << hwshift;
712
713	live = audio_pcm_hw_get_live_out (hw);
714
715	hr = IDirectSoundBuffer_GetCurrentPosition (
716	dsb,
717	&ppos,
718	ds->first_time ? &wpos : NULL
719	);
720	if (FAILED (hr)) {
721	dsound_logerr (hr, "Could not get playback buffer position\n");
722	return 0;
723	}
724
725	len = live << hwshift;
726
727	if (ds->first_time) {
728	if (conf.latency_millis) {
729	DWORD cur_blat;
730
731	cur_blat = audio_ring_dist (wpos, ppos, bufsize);
732	ds->first_time = 0;
733	old_pos = wpos;
734	old_pos +=
735	millis_to_bytes (&hw->info, conf.latency_millis) - cur_blat;
736	old_pos %= bufsize;
737	old_pos &= ~hw->info.align;
738	}
739	else {
740	old_pos = wpos;
741	}
742	#ifdef DEBUG_DSOUND
743	ds->played = 0;
744	ds->mixed = 0;
745	#endif
746	}
747	else {
748	if (ds->old_pos == ppos) {
749	#ifdef DEBUG_DSOUND
750	dolog ("old_pos == ppos\n");
751	#endif
752	return 0;
753	}
754
755	#ifdef DEBUG_DSOUND
756	ds->played += audio_ring_dist (ds->old_pos, ppos, bufsize);
757	#endif
758	old_pos = ds->old_pos;
759	}
760
761	if ((old_pos < ppos) && ((old_pos + len) > ppos)) {
762	len = ppos - old_pos;
763	}
764	else {
765	if ((old_pos > ppos) && ((old_pos + len) > (ppos + bufsize))) {
766	len = bufsize - old_pos + ppos;
767	}
768	}
769
770	if (audio_bug (AUDIO_FUNC, len < 0 \|\| len > bufsize)) {
771	dolog ("len=%d bufsize=%d old_pos=%ld ppos=%ld\n",
772	len, bufsize, old_pos, ppos);
773	return 0;
774	}
775
776	len &= ~hw->info.align;
777	if (!len) {
778	return 0;
779	}
780
781	#ifdef DEBUG_DSOUND
782	ds->old_ppos = ppos;
783	#endif
784	err = dsound_lock_out (
785	dsb,
786	&hw->info,
787	old_pos,
788	len,
789	&p1, &p2,
790	&blen1, &blen2,
791	0
792	);
793	if (err) {
794	return 0;
795	}
796
797	len1 = blen1 >> hwshift;
798	len2 = blen2 >> hwshift;
799	decr = len1 + len2;
800
801	if (p1 && len1) {
802	dsound_write_sample (hw, p1, len1);
803	}
804
805	if (p2 && len2) {
806	dsound_write_sample (hw, p2, len2);
807	}
808
809	dsound_unlock_out (dsb, p1, p2, blen1, blen2);
810	ds->old_pos = (old_pos + (decr << hwshift)) % bufsize;
811
812	#ifdef DEBUG_DSOUND
813	ds->mixed += decr << hwshift;
814
815	dolog ("played %lu mixed %lu diff %ld sec %f\n",
816	ds->played,
817	ds->mixed,
818	ds->mixed - ds->played,
819	abs (ds->mixed - ds->played) / (double) hw->info.bytes_per_second);
820	#endif
821	return decr;
822	}
823
824	static int dsound_ctl_in (HWVoiceIn *hw, int cmd, ...)
825	{
826	HRESULT hr;
827	DWORD status;
828	DSoundVoiceIn ds = (DSoundVoiceIn ) hw;
829	LPDIRECTSOUNDCAPTUREBUFFER dscb = ds->dsound_capture_buffer;
830
831	if (!dscb) {
832	dolog ("Attempt to control capture voice without a buffer\n");
833	return -1;
834	}
835
836	switch (cmd) {
837	case VOICE_ENABLE:
838	if (dsound_get_status_in (dscb, &status)) {
839	return -1;
840	}
841
842	if (status & DSCBSTATUS_CAPTURING) {
843	dolog ("warning: Voice is already capturing\n");
844	return 0;
845	}
846
847	/* clear ?? */
848
849	hr = IDirectSoundCaptureBuffer_Start (dscb, DSCBSTART_LOOPING);
850	if (FAILED (hr)) {
851	dsound_logerr (hr, "Could not start capturing\n");
852	return -1;
853	}
854	break;
855
856	case VOICE_DISABLE:
857	if (dsound_get_status_in (dscb, &status)) {
858	return -1;
859	}
860
861	if (status & DSCBSTATUS_CAPTURING) {
862	hr = IDirectSoundCaptureBuffer_Stop (dscb);
863	if (FAILED (hr)) {
864	dsound_logerr (hr, "Could not stop capturing\n");
865	return -1;
866	}
867	}
868	else {
869	dolog ("warning: Voice is not capturing\n");
870	}
871	break;
872	}
873	return 0;
874	}
875
876	static int dsound_read (SWVoiceIn sw, void buf, int len)
877	{
878	return audio_pcm_sw_read (sw, buf, len);
879	}
880
881	static int dsound_run_in (HWVoiceIn *hw)
882	{
883	int err;
884	HRESULT hr;
885	DSoundVoiceIn ds = (DSoundVoiceIn ) hw;
886	LPDIRECTSOUNDCAPTUREBUFFER dscb = ds->dsound_capture_buffer;
887	int live, len, dead;
888	DWORD blen1, blen2;
889	DWORD len1, len2;
890	DWORD decr;
891	DWORD cpos, rpos;
892	LPVOID p1, p2;
893	int hwshift;
894
895	if (!dscb) {
896	dolog ("Attempt to run without capture buffer\n");
897	return 0;
898	}
899
900	hwshift = hw->info.shift;
901
902	live = audio_pcm_hw_get_live_in (hw);
903	dead = hw->samples - live;
904	if (!dead) {
905	return 0;
906	}
907
908	hr = IDirectSoundCaptureBuffer_GetCurrentPosition (
909	dscb,
910	&cpos,
911	ds->first_time ? &rpos : NULL
912	);
913	if (FAILED (hr)) {
914	dsound_logerr (hr, "Could not get capture buffer position\n");
915	return 0;
916	}
917
918	if (ds->first_time) {
919	ds->first_time = 0;
920	if (rpos & hw->info.align) {
921	ldebug ("warning: Misaligned capture read position %ld(%d)\n",
922	rpos, hw->info.align);
923	}
924	hw->wpos = rpos >> hwshift;
925	}
926
927	if (cpos & hw->info.align) {
928	ldebug ("warning: Misaligned capture position %ld(%d)\n",
929	cpos, hw->info.align);
930	}
931	cpos >>= hwshift;
932
933	len = audio_ring_dist (cpos, hw->wpos, hw->samples);
934	if (!len) {
935	return 0;
936	}
937	len = audio_MIN (len, dead);
938
939	err = dsound_lock_in (
940	dscb,
941	&hw->info,
942	hw->wpos << hwshift,
943	len << hwshift,
944	&p1,
945	&p2,
946	&blen1,
947	&blen2,
948	0
949	);
950	if (err) {
951	return 0;
952	}
953
954	len1 = blen1 >> hwshift;
955	len2 = blen2 >> hwshift;
956	decr = len1 + len2;
957
958	#ifndef VBOX
959	if (p1 && len1) {
960	hw->conv (hw->conv_buf + hw->wpos, p1, len1, &nominal_volume);
961	}
962
963	if (p2 && len2) {
964	hw->conv (hw->conv_buf, p2, len2, &nominal_volume);
965	}
966	#else
967	if (p1 && len1) {
968	hw->conv (hw->conv_buf + hw->wpos, p1, len1, &pcm_in_volume);
969	}
970
971	if (p2 && len2) {
972	hw->conv (hw->conv_buf, p2, len2, &pcm_in_volume);
973	}
974	#endif
975
976	dsound_unlock_in (dscb, p1, p2, blen1, blen2);
977	hw->wpos = (hw->wpos + decr) % hw->samples;
978	return decr;
979	}
980
981	static void dsound_audio_fini (void *opaque)
982	{
983	HRESULT hr;
984	dsound *s = opaque;
985
986	if (!s->dsound) {
987	return;
988	}
989
990	hr = IDirectSound_Release (s->dsound);
991	if (FAILED (hr)) {
992	dsound_logerr (hr, "Could not release DirectSound\n");
993	}
994	s->dsound = NULL;
995
996	if (!s->dsound_capture) {
997	return;
998	}
999
1000	hr = IDirectSoundCapture_Release (s->dsound_capture);
1001	if (FAILED (hr)) {
1002	dsound_logerr (hr, "Could not release DirectSoundCapture\n");
1003	}
1004	s->dsound_capture = NULL;
1005	}
1006
1007	static void *dsound_audio_init (void)
1008	{
1009	int err;
1010	HRESULT hr;
1011	dsound *s = &glob_dsound;
1012
1013	hr = CoInitializeEx (NULL, COINIT_MULTITHREADED);
1014	if (FAILED (hr)) {
1015	#ifndef VBOX
1016	dsound_logerr (hr, "Could not initialize COM\n");
1017	#else
1018	LogRel(("DSound: Could not initialize COM\n"));
1019	dsound_log_hresult(hr);
1020	#endif
1021	return NULL;
1022	}
1023
1024	hr = CoCreateInstance (
1025	&CLSID_DirectSound,
1026	NULL,
1027	CLSCTX_ALL,
1028	&IID_IDirectSound,
1029	(void **) &s->dsound
1030	);
1031	if (FAILED (hr)) {
1032	#ifndef VBOX
1033	dsound_logerr (hr, "Could not create DirectSound instance\n");
1034	#else
1035	LogRel(("DSound: Could not create DirectSound instance\n"));
1036	dsound_log_hresult(hr);
1037	#endif
1038	return NULL;
1039	}
1040
1041	hr = IDirectSound_Initialize (s->dsound, NULL);
1042	if (FAILED (hr)) {
1043	#ifndef VBOX
1044	dsound_logerr (hr, "Could not initialize DirectSound\n");
1045	#else
1046	LogRel(("DSound: Could not initialize DirectSound\n"));
1047	dsound_log_hresult(hr);
1048	#endif
1049
1050	hr = IDirectSound_Release (s->dsound);
1051	if (FAILED (hr)) {
1052	dsound_logerr (hr, "Could not release DirectSound\n");
1053	}
1054	s->dsound = NULL;
1055	return NULL;
1056	}
1057
1058	hr = CoCreateInstance (
1059	&CLSID_DirectSoundCapture,
1060	NULL,
1061	CLSCTX_ALL,
1062	&IID_IDirectSoundCapture,
1063	(void **) &s->dsound_capture
1064	);
1065	if (FAILED (hr)) {
1066	#ifndef VBOX
1067	dsound_logerr (hr, "Could not create DirectSoundCapture instance\n");
1068	#else
1069	LogRel(("DSound: Could not create DirectSoundCapture instance\n"));
1070	dsound_log_hresult(hr);
1071	#endif
1072	}
1073	else {
1074	hr = IDirectSoundCapture_Initialize (s->dsound_capture, NULL);
1075	if (FAILED (hr)) {
1076	#ifndef VBOX
1077	dsound_logerr (hr, "Could not initialize DirectSoundCapture\n");
1078	#else
1079	LogRel(("DSound: Could not initialize DirectSoundCapture\n"));
1080	dsound_log_hresult(hr);
1081	#endif
1082
1083	hr = IDirectSoundCapture_Release (s->dsound_capture);
1084	if (FAILED (hr)) {
1085	dsound_logerr (hr,
1086	"Could not release DirectSoundCapture\n");
1087	}
1088	s->dsound_capture = NULL;
1089	}
1090	}
1091
1092	err = dsound_open (s);
1093	if (err) {
1094	dsound_audio_fini (s);
1095	return NULL;
1096	}
1097
1098	return s;
1099	}
1100
1101	static struct audio_option dsound_options[] = {
1102	{"LOCK_RETRIES", AUD_OPT_INT, &conf.lock_retries,
1103	"Number of times to attempt locking the buffer", NULL, 0},
1104	{"RESTOURE_RETRIES", AUD_OPT_INT, &conf.restore_retries,
1105	"Number of times to attempt restoring the buffer", NULL, 0},
1106	{"GETSTATUS_RETRIES", AUD_OPT_INT, &conf.getstatus_retries,
1107	"Number of times to attempt getting status of the buffer", NULL, 0},
1108	{"SET_PRIMARY", AUD_OPT_BOOL, &conf.set_primary,
1109	"Set the parameters of primary buffer", NULL, 0},
1110	{"LATENCY_MILLIS", AUD_OPT_INT, &conf.latency_millis,
1111	"(undocumented)", NULL, 0},
1112	{"PRIMARY_FREQ", AUD_OPT_INT, &conf.settings.freq,
1113	"Primary buffer frequency", NULL, 0},
1114	{"PRIMARY_CHANNELS", AUD_OPT_INT, &conf.settings.nchannels,
1115	"Primary buffer number of channels (1 - mono, 2 - stereo)", NULL, 0},
1116	{"PRIMARY_FMT", AUD_OPT_FMT, &conf.settings.fmt,
1117	"Primary buffer format", NULL, 0},
1118	{"BUFSIZE_OUT", AUD_OPT_INT, &conf.bufsize_out,
1119	"(undocumented)", NULL, 0},
1120	{"BUFSIZE_IN", AUD_OPT_INT, &conf.bufsize_in,
1121	"(undocumented)", NULL, 0},
1122	{NULL, 0, NULL, NULL, NULL, 0}
1123	};
1124
1125	static struct audio_pcm_ops dsound_pcm_ops = {
1126	dsound_init_out,
1127	dsound_fini_out,
1128	dsound_run_out,
1129	dsound_write,
1130	dsound_ctl_out,
1131
1132	dsound_init_in,
1133	dsound_fini_in,
1134	dsound_run_in,
1135	dsound_read,
1136	dsound_ctl_in
1137	};
1138
1139	struct audio_driver dsound_audio_driver = {
1140	INIT_FIELD (name = ) "dsound",
1141	INIT_FIELD (descr = )
1142	"DirectSound http://wikipedia.org/wiki/DirectSound",
1143	INIT_FIELD (options = ) dsound_options,
1144	INIT_FIELD (init = ) dsound_audio_init,
1145	INIT_FIELD (fini = ) dsound_audio_fini,
1146	INIT_FIELD (pcm_ops = ) &dsound_pcm_ops,
1147	INIT_FIELD (can_be_default = ) 1,
1148	INIT_FIELD (max_voices_out = ) INT_MAX,
1149	INIT_FIELD (max_voices_in = ) 1,
1150	INIT_FIELD (voice_size_out = ) sizeof (DSoundVoiceOut),
1151	INIT_FIELD (voice_size_in = ) sizeof (DSoundVoiceIn)
1152	};

注意: 瀏覽 TracBrowser 來幫助您使用儲存庫瀏覽器

source: vbox/trunk/src/VBox/Devices/Audio/dsoundaudio.c@ 35353

以其他格式下載: