audio/dsoundaudio.c

   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 #include "qemu/osdep.h"
  30 #include "qemu-common.h"
  31 #include "audio.h"
  32
  33 #define AUDIO_CAP "dsound"
  34 #include "audio_int.h"
  35 #include "qemu/host-utils.h"
  36
  37 #include <windows.h>
  38 #include <mmsystem.h>
  39 #include <objbase.h>
  40 #include <dsound.h>
  41
  42 #include "audio_win_int.h"
  43
  44 /* #define DEBUG_DSOUND */
  45
  46 typedef struct {
  47     LPDIRECTSOUND dsound;
  48     LPDIRECTSOUNDCAPTURE dsound_capture;
  49     struct audsettings settings;
  50     Audiodev *dev;
  51 } dsound;
  52
  53 typedef struct {
  54     HWVoiceOut hw;
  55     LPDIRECTSOUNDBUFFER dsound_buffer;
  56     DWORD old_pos;
  57     int first_time;
  58     dsound *s;
  59 #ifdef DEBUG_DSOUND
  60     DWORD old_ppos;
  61     DWORD played;
  62     DWORD mixed;
  63 #endif
  64 } DSoundVoiceOut;
  65
  66 typedef struct {
  67     HWVoiceIn hw;
  68     int first_time;
  69     LPDIRECTSOUNDCAPTUREBUFFER dsound_capture_buffer;
  70     dsound *s;
  71 } DSoundVoiceIn;
  72
  73 static void dsound_log_hresult (HRESULT hr)
  74 {
  75     const char *str = "BUG";
  76
  77     switch (hr) {
  78     case DS_OK:
  79         str = "The method succeeded";
  80         break;
  81 #ifdef DS_NO_VIRTUALIZATION
  82     case DS_NO_VIRTUALIZATION:
  83         str = "The buffer was created, but another 3D algorithm was substituted";
  84         break;
  85 #endif
  86 #ifdef DS_INCOMPLETE
  87     case DS_INCOMPLETE:
  88         str = "The method succeeded, but not all the optional effects were obtained";
  89         break;
  90 #endif
  91 #ifdef DSERR_ACCESSDENIED
  92     case DSERR_ACCESSDENIED:
  93         str = "The request failed because access was denied";
  94         break;
  95 #endif
  96 #ifdef DSERR_ALLOCATED
  97     case DSERR_ALLOCATED:
  98         str = "The request failed because resources, such as a priority level, were already in use by another caller";
  99         break;
 100 #endif
 101 #ifdef DSERR_ALREADYINITIALIZED
 102     case DSERR_ALREADYINITIALIZED:
 103         str = "The object is already initialized";
 104         break;
 105 #endif
 106 #ifdef DSERR_BADFORMAT
 107     case DSERR_BADFORMAT:
 108         str = "The specified wave format is not supported";
 109         break;
 110 #endif
 111 #ifdef DSERR_BADSENDBUFFERGUID
 112     case DSERR_BADSENDBUFFERGUID:
 113         str = "The GUID specified in an audiopath file does not match a valid mix-in buffer";
 114         break;
 115 #endif
 116 #ifdef DSERR_BUFFERLOST
 117     case DSERR_BUFFERLOST:
 118         str = "The buffer memory has been lost and must be restored";
 119         break;
 120 #endif
 121 #ifdef DSERR_BUFFERTOOSMALL
 122     case DSERR_BUFFERTOOSMALL:
 123         str = "The buffer size is not great enough to enable effects processing";
 124         break;
 125 #endif
 126 #ifdef DSERR_CONTROLUNAVAIL
 127     case DSERR_CONTROLUNAVAIL:
 128         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";
 129         break;
 130 #endif
 131 #ifdef DSERR_DS8_REQUIRED
 132     case DSERR_DS8_REQUIRED:
 133         str = "A DirectSound object of class CLSID_DirectSound8 or later is required for the requested functionality. For more information, see IDirectSound8 Interface";
 134         break;
 135 #endif
 136 #ifdef DSERR_FXUNAVAILABLE
 137     case DSERR_FXUNAVAILABLE:
 138         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";
 139         break;
 140 #endif
 141 #ifdef DSERR_GENERIC
 142     case DSERR_GENERIC :
 143         str = "An undetermined error occurred inside the DirectSound subsystem";
 144         break;
 145 #endif
 146 #ifdef DSERR_INVALIDCALL
 147     case DSERR_INVALIDCALL:
 148         str = "This function is not valid for the current state of this object";
 149         break;
 150 #endif
 151 #ifdef DSERR_INVALIDPARAM
 152     case DSERR_INVALIDPARAM:
 153         str = "An invalid parameter was passed to the returning function";
 154         break;
 155 #endif
 156 #ifdef DSERR_NOAGGREGATION
 157     case DSERR_NOAGGREGATION:
 158         str = "The object does not support aggregation";
 159         break;
 160 #endif
 161 #ifdef DSERR_NODRIVER
 162     case DSERR_NODRIVER:
 163         str = "No sound driver is available for use, or the given GUID is not a valid DirectSound device ID";
 164         break;
 165 #endif
 166 #ifdef DSERR_NOINTERFACE
 167     case DSERR_NOINTERFACE:
 168         str = "The requested COM interface is not available";
 169         break;
 170 #endif
 171 #ifdef DSERR_OBJECTNOTFOUND
 172     case DSERR_OBJECTNOTFOUND:
 173         str = "The requested object was not found";
 174         break;
 175 #endif
 176 #ifdef DSERR_OTHERAPPHASPRIO
 177     case DSERR_OTHERAPPHASPRIO:
 178         str = "Another application has a higher priority level, preventing this call from succeeding";
 179         break;
 180 #endif
 181 #ifdef DSERR_OUTOFMEMORY
 182     case DSERR_OUTOFMEMORY:
 183         str = "The DirectSound subsystem could not allocate sufficient memory to complete the caller's request";
 184         break;
 185 #endif
 186 #ifdef DSERR_PRIOLEVELNEEDED
 187     case DSERR_PRIOLEVELNEEDED:
 188         str = "A cooperative level of DSSCL_PRIORITY or higher is required";
 189         break;
 190 #endif
 191 #ifdef DSERR_SENDLOOP
 192     case DSERR_SENDLOOP:
 193         str = "A circular loop of send effects was detected";
 194         break;
 195 #endif
 196 #ifdef DSERR_UNINITIALIZED
 197     case DSERR_UNINITIALIZED:
 198         str = "The Initialize method has not been called or has not been called successfully before other methods were called";
 199         break;
 200 #endif
 201 #ifdef DSERR_UNSUPPORTED
 202     case DSERR_UNSUPPORTED:
 203         str = "The function called is not supported at this time";
 204         break;
 205 #endif
 206     default:
 207         AUD_log (AUDIO_CAP, "Reason: Unknown (HRESULT %#lx)\n", hr);
 208         return;
 209     }
 210
 211     AUD_log (AUDIO_CAP, "Reason: %s\n", str);
 212 }
 213
 214 static void GCC_FMT_ATTR (2, 3) dsound_logerr (
 215     HRESULT hr,
 216     const char *fmt,
 217     ...
 218     )
 219 {
 220     va_list ap;
 221
 222     va_start (ap, fmt);
 223     AUD_vlog (AUDIO_CAP, fmt, ap);
 224     va_end (ap);
 225
 226     dsound_log_hresult (hr);
 227 }
 228
 229 static void GCC_FMT_ATTR (3, 4) dsound_logerr2 (
 230     HRESULT hr,
 231     const char *typ,
 232     const char *fmt,
 233     ...
 234     )
 235 {
 236     va_list ap;
 237
 238     AUD_log (AUDIO_CAP, "Could not initialize %s\n", typ);
 239     va_start (ap, fmt);
 240     AUD_vlog (AUDIO_CAP, fmt, ap);
 241     va_end (ap);
 242
 243     dsound_log_hresult (hr);
 244 }
 245
 246 static uint64_t usecs_to_bytes(struct audio_pcm_info *info, uint32_t usecs)
 247 {
 248     return muldiv64(usecs, info->bytes_per_second, 1000000);
 249 }
 250
 251 #ifdef DEBUG_DSOUND
 252 static void print_wave_format (WAVEFORMATEX *wfx)
 253 {
 254     dolog ("tag             = %d\n", wfx->wFormatTag);
 255     dolog ("nChannels       = %d\n", wfx->nChannels);
 256     dolog ("nSamplesPerSec  = %ld\n", wfx->nSamplesPerSec);
 257     dolog ("nAvgBytesPerSec = %ld\n", wfx->nAvgBytesPerSec);
 258     dolog ("nBlockAlign     = %d\n", wfx->nBlockAlign);
 259     dolog ("wBitsPerSample  = %d\n", wfx->wBitsPerSample);
 260     dolog ("cbSize          = %d\n", wfx->cbSize);
 261 }
 262 #endif
 263
 264 static int dsound_restore_out (LPDIRECTSOUNDBUFFER dsb, dsound *s)
 265 {
 266     HRESULT hr;
 267
 268     hr = IDirectSoundBuffer_Restore (dsb);
 269
 270     if (hr != DS_OK) {
 271         dsound_logerr (hr, "Could not restore playback buffer\n");
 272         return -1;
 273     }
 274     return 0;
 275 }
 276
 277 #include "dsound_template.h"
 278 #define DSBTYPE_IN
 279 #include "dsound_template.h"
 280 #undef DSBTYPE_IN
 281
 282 static int dsound_get_status_out (LPDIRECTSOUNDBUFFER dsb, DWORD *statusp,
 283                                   dsound *s)
 284 {
 285     HRESULT hr;
 286
 287     hr = IDirectSoundBuffer_GetStatus (dsb, statusp);
 288     if (FAILED (hr)) {
 289         dsound_logerr (hr, "Could not get playback buffer status\n");
 290         return -1;
 291     }
 292
 293     if (*statusp & DSERR_BUFFERLOST) {
 294         dsound_restore_out(dsb, s);
 295         return -1;
 296     }
 297
 298     return 0;
 299 }
 300
 301 static int dsound_get_status_in (LPDIRECTSOUNDCAPTUREBUFFER dscb,
 302                                  DWORD *statusp)
 303 {
 304     HRESULT hr;
 305
 306     hr = IDirectSoundCaptureBuffer_GetStatus (dscb, statusp);
 307     if (FAILED (hr)) {
 308         dsound_logerr (hr, "Could not get capture buffer status\n");
 309         return -1;
 310     }
 311
 312     return 0;
 313 }
 314
 315 static void dsound_write_sample (HWVoiceOut *hw, uint8_t *dst, int dst_len)
 316 {
 317     int src_len1 = dst_len;
 318     int src_len2 = 0;
 319     int pos = hw->rpos + dst_len;
 320     struct st_sample *src1 = hw->mix_buf + hw->rpos;
 321     struct st_sample *src2 = NULL;
 322
 323     if (pos > hw->samples) {
 324         src_len1 = hw->samples - hw->rpos;
 325         src2 = hw->mix_buf;
 326         src_len2 = dst_len - src_len1;
 327         pos = src_len2;
 328     }
 329
 330     if (src_len1) {
 331         hw->clip (dst, src1, src_len1);
 332     }
 333
 334     if (src_len2) {
 335         dst = advance (dst, src_len1 << hw->info.shift);
 336         hw->clip (dst, src2, src_len2);
 337     }
 338
 339     hw->rpos = pos % hw->samples;
 340 }
 341
 342 static void dsound_clear_sample (HWVoiceOut *hw, LPDIRECTSOUNDBUFFER dsb,
 343                                  dsound *s)
 344 {
 345     int err;
 346     LPVOID p1, p2;
 347     DWORD blen1, blen2, len1, len2;
 348
 349     err = dsound_lock_out (
 350         dsb,
 351         &hw->info,
 352         0,
 353         hw->samples << hw->info.shift,
 354         &p1, &p2,
 355         &blen1, &blen2,
 356         1,
 357         s
 358         );
 359     if (err) {
 360         return;
 361     }
 362
 363     len1 = blen1 >> hw->info.shift;
 364     len2 = blen2 >> hw->info.shift;
 365
 366 #ifdef DEBUG_DSOUND
 367     dolog ("clear %p,%ld,%ld %p,%ld,%ld\n",
 368            p1, blen1, len1,
 369            p2, blen2, len2);
 370 #endif
 371
 372     if (p1 && len1) {
 373         audio_pcm_info_clear_buf (&hw->info, p1, len1);
 374     }
 375
 376     if (p2 && len2) {
 377         audio_pcm_info_clear_buf (&hw->info, p2, len2);
 378     }
 379
 380     dsound_unlock_out (dsb, p1, p2, blen1, blen2);
 381 }
 382
 383 static int dsound_open (dsound *s)
 384 {
 385     HRESULT hr;
 386     HWND hwnd;
 387
 388     hwnd = GetForegroundWindow ();
 389     hr = IDirectSound_SetCooperativeLevel (
 390         s->dsound,
 391         hwnd,
 392         DSSCL_PRIORITY
 393         );
 394
 395     if (FAILED (hr)) {
 396         dsound_logerr (hr, "Could not set cooperative level for window %p\n",
 397                        hwnd);
 398         return -1;
 399     }
 400
 401     return 0;
 402 }
 403
 404 static int dsound_ctl_out (HWVoiceOut *hw, int cmd, ...)
 405 {
 406     HRESULT hr;
 407     DWORD status;
 408     DSoundVoiceOut *ds = (DSoundVoiceOut *) hw;
 409     LPDIRECTSOUNDBUFFER dsb = ds->dsound_buffer;
 410     dsound *s = ds->s;
 411
 412     if (!dsb) {
 413         dolog ("Attempt to control voice without a buffer\n");
 414         return 0;
 415     }
 416
 417     switch (cmd) {
 418     case VOICE_ENABLE:
 419         if (dsound_get_status_out (dsb, &status, s)) {
 420             return -1;
 421         }
 422
 423         if (status & DSBSTATUS_PLAYING) {
 424             dolog ("warning: Voice is already playing\n");
 425             return 0;
 426         }
 427
 428         dsound_clear_sample (hw, dsb, s);
 429
 430         hr = IDirectSoundBuffer_Play (dsb, 0, 0, DSBPLAY_LOOPING);
 431         if (FAILED (hr)) {
 432             dsound_logerr (hr, "Could not start playing buffer\n");
 433             return -1;
 434         }
 435         break;
 436
 437     case VOICE_DISABLE:
 438         if (dsound_get_status_out (dsb, &status, s)) {
 439             return -1;
 440         }
 441
 442         if (status & DSBSTATUS_PLAYING) {
 443             hr = IDirectSoundBuffer_Stop (dsb);
 444             if (FAILED (hr)) {
 445                 dsound_logerr (hr, "Could not stop playing buffer\n");
 446                 return -1;
 447             }
 448         }
 449         else {
 450             dolog ("warning: Voice is not playing\n");
 451         }
 452         break;
 453     }
 454     return 0;
 455 }
 456
 457 static int dsound_write (SWVoiceOut *sw, void *buf, int len)
 458 {
 459     return audio_pcm_sw_write (sw, buf, len);
 460 }
 461
 462 static int dsound_run_out (HWVoiceOut *hw, int live)
 463 {
 464     int err;
 465     HRESULT hr;
 466     DSoundVoiceOut *ds = (DSoundVoiceOut *) hw;
 467     LPDIRECTSOUNDBUFFER dsb = ds->dsound_buffer;
 468     int len, hwshift;
 469     DWORD blen1, blen2;
 470     DWORD len1, len2;
 471     DWORD decr;
 472     DWORD wpos, ppos, old_pos;
 473     LPVOID p1, p2;
 474     int bufsize;
 475     dsound *s = ds->s;
 476     AudiodevDsoundOptions *dso = &s->dev->u.dsound;
 477
 478     if (!dsb) {
 479         dolog ("Attempt to run empty with playback buffer\n");
 480         return 0;
 481     }
 482
 483     hwshift = hw->info.shift;
 484     bufsize = hw->samples << hwshift;
 485
 486     hr = IDirectSoundBuffer_GetCurrentPosition (
 487         dsb,
 488         &ppos,
 489         ds->first_time ? &wpos : NULL
 490         );
 491     if (FAILED (hr)) {
 492         dsound_logerr (hr, "Could not get playback buffer position\n");
 493         return 0;
 494     }
 495
 496     len = live << hwshift;
 497
 498     if (ds->first_time) {
 499         if (dso->latency) {
 500             DWORD cur_blat;
 501
 502             cur_blat = audio_ring_dist (wpos, ppos, bufsize);
 503             ds->first_time = 0;
 504             old_pos = wpos;
 505             old_pos +=
 506                 usecs_to_bytes(&hw->info, dso->latency) - cur_blat;
 507             old_pos %= bufsize;
 508             old_pos &= ~hw->info.align;
 509         }
 510         else {
 511             old_pos = wpos;
 512         }
 513 #ifdef DEBUG_DSOUND
 514         ds->played = 0;
 515         ds->mixed = 0;
 516 #endif
 517     }
 518     else {
 519         if (ds->old_pos == ppos) {
 520 #ifdef DEBUG_DSOUND
 521             dolog ("old_pos == ppos\n");
 522 #endif
 523             return 0;
 524         }
 525
 526 #ifdef DEBUG_DSOUND
 527         ds->played += audio_ring_dist (ds->old_pos, ppos, hw->bufsize);
 528 #endif
 529         old_pos = ds->old_pos;
 530     }
 531
 532     if ((old_pos < ppos) && ((old_pos + len) > ppos)) {
 533         len = ppos - old_pos;
 534     }
 535     else {
 536         if ((old_pos > ppos) && ((old_pos + len) > (ppos + bufsize))) {
 537             len = bufsize - old_pos + ppos;
 538         }
 539     }
 540
 541     if (audio_bug(__func__, len < 0 || len > bufsize)) {
 542         dolog ("len=%d bufsize=%d old_pos=%ld ppos=%ld\n",
 543                len, bufsize, old_pos, ppos);
 544         return 0;
 545     }
 546
 547     len &= ~hw->info.align;
 548     if (!len) {
 549         return 0;
 550     }
 551
 552 #ifdef DEBUG_DSOUND
 553     ds->old_ppos = ppos;
 554 #endif
 555     err = dsound_lock_out (
 556         dsb,
 557         &hw->info,
 558         old_pos,
 559         len,
 560         &p1, &p2,
 561         &blen1, &blen2,
 562         0,
 563         s
 564         );
 565     if (err) {
 566         return 0;
 567     }
 568
 569     len1 = blen1 >> hwshift;
 570     len2 = blen2 >> hwshift;
 571     decr = len1 + len2;
 572
 573     if (p1 && len1) {
 574         dsound_write_sample (hw, p1, len1);
 575     }
 576
 577     if (p2 && len2) {
 578         dsound_write_sample (hw, p2, len2);
 579     }
 580
 581     dsound_unlock_out (dsb, p1, p2, blen1, blen2);
 582     ds->old_pos = (old_pos + (decr << hwshift)) % bufsize;
 583
 584 #ifdef DEBUG_DSOUND
 585     ds->mixed += decr << hwshift;
 586
 587     dolog ("played %lu mixed %lu diff %ld sec %f\n",
 588            ds->played,
 589            ds->mixed,
 590            ds->mixed - ds->played,
 591            abs (ds->mixed - ds->played) / (double) hw->info.bytes_per_second);
 592 #endif
 593     return decr;
 594 }
 595
 596 static int dsound_ctl_in (HWVoiceIn *hw, int cmd, ...)
 597 {
 598     HRESULT hr;
 599     DWORD status;
 600     DSoundVoiceIn *ds = (DSoundVoiceIn *) hw;
 601     LPDIRECTSOUNDCAPTUREBUFFER dscb = ds->dsound_capture_buffer;
 602
 603     if (!dscb) {
 604         dolog ("Attempt to control capture voice without a buffer\n");
 605         return -1;
 606     }
 607
 608     switch (cmd) {
 609     case VOICE_ENABLE:
 610         if (dsound_get_status_in (dscb, &status)) {
 611             return -1;
 612         }
 613
 614         if (status & DSCBSTATUS_CAPTURING) {
 615             dolog ("warning: Voice is already capturing\n");
 616             return 0;
 617         }
 618
 619         /* clear ?? */
 620
 621         hr = IDirectSoundCaptureBuffer_Start (dscb, DSCBSTART_LOOPING);
 622         if (FAILED (hr)) {
 623             dsound_logerr (hr, "Could not start capturing\n");
 624             return -1;
 625         }
 626         break;
 627
 628     case VOICE_DISABLE:
 629         if (dsound_get_status_in (dscb, &status)) {
 630             return -1;
 631         }
 632
 633         if (status & DSCBSTATUS_CAPTURING) {
 634             hr = IDirectSoundCaptureBuffer_Stop (dscb);
 635             if (FAILED (hr)) {
 636                 dsound_logerr (hr, "Could not stop capturing\n");
 637                 return -1;
 638             }
 639         }
 640         else {
 641             dolog ("warning: Voice is not capturing\n");
 642         }
 643         break;
 644     }
 645     return 0;
 646 }
 647
 648 static int dsound_read (SWVoiceIn *sw, void *buf, int len)
 649 {
 650     return audio_pcm_sw_read (sw, buf, len);
 651 }
 652
 653 static int dsound_run_in (HWVoiceIn *hw)
 654 {
 655     int err;
 656     HRESULT hr;
 657     DSoundVoiceIn *ds = (DSoundVoiceIn *) hw;
 658     LPDIRECTSOUNDCAPTUREBUFFER dscb = ds->dsound_capture_buffer;
 659     int live, len, dead;
 660     DWORD blen1, blen2;
 661     DWORD len1, len2;
 662     DWORD decr;
 663     DWORD cpos, rpos;
 664     LPVOID p1, p2;
 665     int hwshift;
 666     dsound *s = ds->s;
 667
 668     if (!dscb) {
 669         dolog ("Attempt to run without capture buffer\n");
 670         return 0;
 671     }
 672
 673     hwshift = hw->info.shift;
 674
 675     live = audio_pcm_hw_get_live_in (hw);
 676     dead = hw->samples - live;
 677     if (!dead) {
 678         return 0;
 679     }
 680
 681     hr = IDirectSoundCaptureBuffer_GetCurrentPosition (
 682         dscb,
 683         &cpos,
 684         ds->first_time ? &rpos : NULL
 685         );
 686     if (FAILED (hr)) {
 687         dsound_logerr (hr, "Could not get capture buffer position\n");
 688         return 0;
 689     }
 690
 691     if (ds->first_time) {
 692         ds->first_time = 0;
 693         if (rpos & hw->info.align) {
 694             ldebug ("warning: Misaligned capture read position %ld(%d)\n",
 695                     rpos, hw->info.align);
 696         }
 697         hw->wpos = rpos >> hwshift;
 698     }
 699
 700     if (cpos & hw->info.align) {
 701         ldebug ("warning: Misaligned capture position %ld(%d)\n",
 702                 cpos, hw->info.align);
 703     }
 704     cpos >>= hwshift;
 705
 706     len = audio_ring_dist (cpos, hw->wpos, hw->samples);
 707     if (!len) {
 708         return 0;
 709     }
 710     len = audio_MIN (len, dead);
 711
 712     err = dsound_lock_in (
 713         dscb,
 714         &hw->info,
 715         hw->wpos << hwshift,
 716         len << hwshift,
 717         &p1,
 718         &p2,
 719         &blen1,
 720         &blen2,
 721         0,
 722         s
 723         );
 724     if (err) {
 725         return 0;
 726     }
 727
 728     len1 = blen1 >> hwshift;
 729     len2 = blen2 >> hwshift;
 730     decr = len1 + len2;
 731
 732     if (p1 && len1) {
 733         hw->conv (hw->conv_buf + hw->wpos, p1, len1);
 734     }
 735
 736     if (p2 && len2) {
 737         hw->conv (hw->conv_buf, p2, len2);
 738     }
 739
 740     dsound_unlock_in (dscb, p1, p2, blen1, blen2);
 741     hw->wpos = (hw->wpos + decr) % hw->samples;
 742     return decr;
 743 }
 744
 745 static void dsound_audio_fini (void *opaque)
 746 {
 747     HRESULT hr;
 748     dsound *s = opaque;
 749
 750     if (!s->dsound) {
 751         g_free(s);
 752         return;
 753     }
 754
 755     hr = IDirectSound_Release (s->dsound);
 756     if (FAILED (hr)) {
 757         dsound_logerr (hr, "Could not release DirectSound\n");
 758     }
 759     s->dsound = NULL;
 760
 761     if (!s->dsound_capture) {
 762         g_free(s);
 763         return;
 764     }
 765
 766     hr = IDirectSoundCapture_Release (s->dsound_capture);
 767     if (FAILED (hr)) {
 768         dsound_logerr (hr, "Could not release DirectSoundCapture\n");
 769     }
 770     s->dsound_capture = NULL;
 771
 772     g_free(s);
 773 }
 774
 775 static void *dsound_audio_init(Audiodev *dev)
 776 {
 777     int err;
 778     HRESULT hr;
 779     dsound *s = g_malloc0(sizeof(dsound));
 780     AudiodevDsoundOptions *dso;
 781
 782     assert(dev->driver == AUDIODEV_DRIVER_DSOUND);
 783     s->dev = dev;
 784     dso = &dev->u.dsound;
 785
 786     if (!dso->has_latency) {
 787         dso->has_latency = true;
 788         dso->latency = 10000; /* 10 ms */
 789     }
 790
 791     hr = CoInitialize (NULL);
 792     if (FAILED (hr)) {
 793         dsound_logerr (hr, "Could not initialize COM\n");
 794         g_free(s);
 795         return NULL;
 796     }
 797
 798     hr = CoCreateInstance (
 799         &CLSID_DirectSound,
 800         NULL,
 801         CLSCTX_ALL,
 802         &IID_IDirectSound,
 803         (void **) &s->dsound
 804         );
 805     if (FAILED (hr)) {
 806         dsound_logerr (hr, "Could not create DirectSound instance\n");
 807         g_free(s);
 808         return NULL;
 809     }
 810
 811     hr = IDirectSound_Initialize (s->dsound, NULL);
 812     if (FAILED (hr)) {
 813         dsound_logerr (hr, "Could not initialize DirectSound\n");
 814
 815         hr = IDirectSound_Release (s->dsound);
 816         if (FAILED (hr)) {
 817             dsound_logerr (hr, "Could not release DirectSound\n");
 818         }
 819         g_free(s);
 820         return NULL;
 821     }
 822
 823     hr = CoCreateInstance (
 824         &CLSID_DirectSoundCapture,
 825         NULL,
 826         CLSCTX_ALL,
 827         &IID_IDirectSoundCapture,
 828         (void **) &s->dsound_capture
 829         );
 830     if (FAILED (hr)) {
 831         dsound_logerr (hr, "Could not create DirectSoundCapture instance\n");
 832     }
 833     else {
 834         hr = IDirectSoundCapture_Initialize (s->dsound_capture, NULL);
 835         if (FAILED (hr)) {
 836             dsound_logerr (hr, "Could not initialize DirectSoundCapture\n");
 837
 838             hr = IDirectSoundCapture_Release (s->dsound_capture);
 839             if (FAILED (hr)) {
 840                 dsound_logerr (hr, "Could not release DirectSoundCapture\n");
 841             }
 842             s->dsound_capture = NULL;
 843         }
 844     }
 845
 846     err = dsound_open (s);
 847     if (err) {
 848         dsound_audio_fini (s);
 849         return NULL;
 850     }
 851
 852     return s;
 853 }
 854
 855 static struct audio_pcm_ops dsound_pcm_ops = {
 856     .init_out = dsound_init_out,
 857     .fini_out = dsound_fini_out,
 858     .run_out  = dsound_run_out,
 859     .write    = dsound_write,
 860     .ctl_out  = dsound_ctl_out,
 861
 862     .init_in  = dsound_init_in,
 863     .fini_in  = dsound_fini_in,
 864     .run_in   = dsound_run_in,
 865     .read     = dsound_read,
 866     .ctl_in   = dsound_ctl_in
 867 };
 868
 869 static struct audio_driver dsound_audio_driver = {
 870     .name           = "dsound",
 871     .descr          = "DirectSound http://wikipedia.org/wiki/DirectSound",
 872     .init           = dsound_audio_init,
 873     .fini           = dsound_audio_fini,
 874     .pcm_ops        = &dsound_pcm_ops,
 875     .can_be_default = 1,
 876     .max_voices_out = INT_MAX,
 877     .max_voices_in  = 1,
 878     .voice_size_out = sizeof (DSoundVoiceOut),
 879     .voice_size_in  = sizeof (DSoundVoiceIn)
 880 };
 881
 882 static void register_audio_dsound(void)
 883 {
 884     audio_driver_register(&dsound_audio_driver);
 885 }
 886 type_init(register_audio_dsound);