git.oblomov.eu Git - wine/blob - dlls/winejack.drv/audio.c

   1 /*
   2  * Wine Driver for jack Sound Server
   3  *   http://jackit.sourceforge.net
   4  *
   5  * Copyright 1994 Martin Ayotte
   6  * Copyright 1999 Eric Pouech (async playing in waveOut/waveIn)
   7  * Copyright 2000 Eric Pouech (loops in waveOut)
   8  * Copyright 2002 Chris Morgan (jack version of this file)
   9  *
  10  * This library is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU Lesser General Public
  12  * License as published by the Free Software Foundation; either
  13  * version 2.1 of the License, or (at your option) any later version.
  14  *
  15  * This library is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  * Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public
  21  * License along with this library; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  23  */
  24
  25 /*
  26  * TODO:
  27  *  implement audio stream resampling for any arbitrary frequenty
  28  *    right now we use the winmm layer to do resampling although it would
  29  *    be nice to have a full set of algorithms to choose from based on cpu
  30  *    time
  31  *
  32  * FIXME:
  33  *  pause in waveOut during loop is not handled correctly
  34  */
  35
  36 #include "config.h"
  37
  38 #include <stdlib.h>
  39 #include <stdarg.h>
  40 #include <stdio.h>
  41 #include <string.h>
  42 #ifdef HAVE_UNISTD_H
  43 # include <unistd.h>
  44 #endif
  45 #include <fcntl.h>
  46 #include "windef.h"
  47 #include "winbase.h"
  48 #include "winnls.h"
  49 #include "wingdi.h"
  50 #include "winerror.h"
  51 #include "mmddk.h"
  52 #include "dsound.h"
  53 #include "dsdriver.h"
  54 #include "jack.h"
  55 #include "wine/unicode.h"
  56 #include "wine/library.h"
  57 #include "wine/debug.h"
  58
  59 #ifdef HAVE_JACK_JACK_H
  60 #include <jack/jack.h>
  61 #endif
  62
  63
  64 WINE_DEFAULT_DEBUG_CHANNEL(wave);
  65
  66 #ifdef SONAME_LIBJACK
  67
  68 #define MAKE_FUNCPTR(f) static typeof(f) * fp_##f = NULL;
  69
  70 /* Function pointers for dynamic loading of libjack */
  71 /* these are prefixed with "fp_", ie. "fp_jack_client_new" */
  72 MAKE_FUNCPTR(jack_activate);
  73 MAKE_FUNCPTR(jack_connect);
  74 MAKE_FUNCPTR(jack_client_new);
  75 MAKE_FUNCPTR(jack_client_close);
  76 MAKE_FUNCPTR(jack_deactivate);
  77 MAKE_FUNCPTR(jack_set_process_callback);
  78 MAKE_FUNCPTR(jack_set_buffer_size_callback);
  79 MAKE_FUNCPTR(jack_set_sample_rate_callback);
  80 MAKE_FUNCPTR(jack_on_shutdown);
  81 MAKE_FUNCPTR(jack_get_sample_rate);
  82 MAKE_FUNCPTR(jack_port_register);
  83 MAKE_FUNCPTR(jack_port_get_buffer);
  84 MAKE_FUNCPTR(jack_get_ports);
  85 MAKE_FUNCPTR(jack_port_name);
  86 MAKE_FUNCPTR(jack_get_buffer_size);
  87 #undef MAKE_FUNCPTR
  88
  89 /* define the below to work around a bug in jack where closing a port */
  90 /* takes a very long time, so to get around this we actually don't */
  91 /* close the port when the device is closed but instead mark the */
  92 /* corresponding device as unused */
  93 #define JACK_CLOSE_HACK    1
  94
  95 typedef jack_default_audio_sample_t sample_t;
  96 typedef jack_nframes_t nframes_t;
  97
  98 /* only allow 10 output devices through this driver, this ought to be adequate */
  99 #define MAX_WAVEOUTDRV  (10)
 100 #define MAX_WAVEINDRV   (10)
 101
 102 /* state diagram for waveOut writing:
 103  *
 104  * +---------+-------------+---------------+---------------------------------+
 105  * |  state  |  function   |     event     |            new state            |
 106  * +---------+-------------+---------------+---------------------------------+
 107  * |         | open()      |               | STOPPED                         |
 108  * | PAUSED  | write()     |               | PAUSED                          |
 109  * | STOPPED | write()     | <thrd create> | PLAYING                         |
 110  * | PLAYING | write()     | HEADER        | PLAYING                         |
 111  * | (other) | write()     | <error>       |                                 |
 112  * | (any)   | pause()     | PAUSING       | PAUSED                          |
 113  * | PAUSED  | restart()   | RESTARTING    | PLAYING (if no thrd => STOPPED) |
 114  * | (any)   | reset()     | RESETTING     | STOPPED                         |
 115  * | (any)   | close()     | CLOSING       | CLOSED                          |
 116  * +---------+-------------+---------------+---------------------------------+
 117  */
 118
 119 /* states of the playing device */
 120 #define WINE_WS_PLAYING   0
 121 #define WINE_WS_PAUSED    1
 122 #define WINE_WS_STOPPED   2
 123 #define WINE_WS_CLOSED    3
 124
 125 typedef struct {
 126     volatile int      state;      /* one of the WINE_WS_ manifest constants */
 127     WAVEOPENDESC      waveDesc;
 128     WORD              wFlags;
 129     PCMWAVEFORMAT     format;
 130     WAVEOUTCAPSW      caps;
 131     WORD              wDevID;
 132     char              interface_name[32];
 133
 134     jack_port_t*      out_port_l;   /* ports for left and right channels */
 135     jack_port_t*      out_port_r;
 136     jack_client_t*    client;
 137     long              sample_rate;        /* jack server sample rate */
 138
 139 #if JACK_CLOSE_HACK
 140     BOOL              in_use; /* TRUE if this device is in use */
 141 #endif
 142
 143     char*             sound_buffer;
 144     unsigned long     buffer_size;
 145
 146     DWORD             volume_left;
 147     DWORD             volume_right;
 148
 149     LPWAVEHDR         lpQueuePtr;   /* start of queued WAVEHDRs (waiting to be notified) */
 150     LPWAVEHDR         lpPlayPtr;    /* start of not yet fully played buffers */
 151     DWORD             dwPartialOffset;  /* Offset of not yet written bytes in lpPlayPtr */
 152
 153     LPWAVEHDR         lpLoopPtr;    /* pointer of first buffer in loop, if any */
 154     DWORD             dwLoops;      /* private copy of loop counter */
 155
 156     DWORD             dwPlayedTotal;    /* number of bytes actually played since opening */
 157     DWORD             dwWrittenTotal;   /* number of bytes written to jack since opening */
 158
 159     DWORD             bytesInJack; /* bytes that we wrote during the previous JACK_Callback() */
 160     DWORD             tickCountMS; /* time in MS of last JACK_Callback() */
 161
 162     /* synchronization stuff */
 163     CRITICAL_SECTION    access_crst;
 164 } WINE_WAVEOUT;
 165
 166 typedef struct {
 167     volatile int    state;
 168     WAVEOPENDESC    waveDesc;
 169     WORD            wFlags;
 170     PCMWAVEFORMAT   format;
 171     LPWAVEHDR       lpQueuePtr;
 172     DWORD           dwTotalRecorded;
 173     WAVEINCAPSW     caps;
 174     BOOL            bTriggerSupport;
 175     WORD              wDevID;
 176     char              interface_name[32];
 177
 178     jack_port_t*      in_port_l;   /* ports for left and right channels */
 179     jack_port_t*      in_port_r;
 180     jack_client_t*    client;
 181     long              sample_rate;        /* jack server sample rate */
 182
 183 #if JACK_CLOSE_HACK
 184     BOOL              in_use; /* TRUE if this device is in use */
 185 #endif
 186
 187     char*             sound_buffer;
 188     unsigned long     buffer_size;
 189
 190     /* synchronization stuff */
 191     CRITICAL_SECTION    access_crst;
 192 } WINE_WAVEIN;
 193
 194 static WINE_WAVEOUT WOutDev   [MAX_WAVEOUTDRV];
 195 static WINE_WAVEIN  WInDev    [MAX_WAVEINDRV ];
 196
 197 static DWORD wodDsCreate(UINT wDevID, PIDSDRIVER* drv);
 198 static DWORD wodDsDesc(UINT wDevID, PDSDRIVERDESC desc);
 199
 200 static LPWAVEHDR wodHelper_PlayPtrNext(WINE_WAVEOUT* wwo);
 201 static DWORD wodHelper_NotifyCompletions(WINE_WAVEOUT* wwo, BOOL force);
 202
 203 static int JACK_OpenWaveOutDevice(WINE_WAVEOUT* wwo);
 204 static int JACK_OpenWaveInDevice(WINE_WAVEIN* wwi, WORD nChannels);
 205
 206 #if JACK_CLOSE_HACK
 207 static void     JACK_CloseWaveOutDevice(WINE_WAVEOUT* wwo, BOOL close_client);
 208 #else
 209 static void     JACK_CloseWaveOutDevice(WINE_WAVEOUT* wwo);
 210 #endif
 211
 212 #if JACK_CLOSE_HACK
 213 static void     JACK_CloseWaveInDevice(WINE_WAVEIN* wwi, BOOL close_client);
 214 #else
 215 static void     JACK_CloseWaveInDevice(WINE_WAVEIN* wwi);
 216 #endif
 217
 218 static DWORD bytes_to_mmtime(LPMMTIME lpTime, DWORD position,
 219                              PCMWAVEFORMAT* format)
 220 {
 221     TRACE("wType=%04X wBitsPerSample=%u nSamplesPerSec=%u nChannels=%u nAvgBytesPerSec=%u\n",
 222           lpTime->wType, format->wBitsPerSample, format->wf.nSamplesPerSec,
 223           format->wf.nChannels, format->wf.nAvgBytesPerSec);
 224     TRACE("Position in bytes=%u\n", position);
 225
 226     switch (lpTime->wType) {
 227     case TIME_SAMPLES:
 228         lpTime->u.sample = position / (format->wBitsPerSample / 8 * format->wf.nChannels);
 229         TRACE("TIME_SAMPLES=%u\n", lpTime->u.sample);
 230         break;
 231     case TIME_MS:
 232         lpTime->u.ms = 1000.0 * position / (format->wBitsPerSample / 8 * format->wf.nChannels * format->wf.nSamplesPerSec);
 233         TRACE("TIME_MS=%u\n", lpTime->u.ms);
 234         break;
 235     case TIME_SMPTE:
 236         lpTime->u.smpte.fps = 30;
 237         position = position / (format->wBitsPerSample / 8 * format->wf.nChannels);
 238         position += (format->wf.nSamplesPerSec / lpTime->u.smpte.fps) - 1; /* round up */
 239         lpTime->u.smpte.sec = position / format->wf.nSamplesPerSec;
 240         position -= lpTime->u.smpte.sec * format->wf.nSamplesPerSec;
 241         lpTime->u.smpte.min = lpTime->u.smpte.sec / 60;
 242         lpTime->u.smpte.sec -= 60 * lpTime->u.smpte.min;
 243         lpTime->u.smpte.hour = lpTime->u.smpte.min / 60;
 244         lpTime->u.smpte.min -= 60 * lpTime->u.smpte.hour;
 245         lpTime->u.smpte.fps = 30;
 246         lpTime->u.smpte.frame = position * lpTime->u.smpte.fps / format->wf.nSamplesPerSec;
 247         TRACE("TIME_SMPTE=%02u:%02u:%02u:%02u\n",
 248               lpTime->u.smpte.hour, lpTime->u.smpte.min,
 249               lpTime->u.smpte.sec, lpTime->u.smpte.frame);
 250         break;
 251     default:
 252         WARN("Format %d not supported, using TIME_BYTES !\n", lpTime->wType);
 253         lpTime->wType = TIME_BYTES;
 254         /* fall through */
 255     case TIME_BYTES:
 256         lpTime->u.cb = position;
 257         TRACE("TIME_BYTES=%u\n", lpTime->u.cb);
 258         break;
 259     }
 260     return MMSYSERR_NOERROR;
 261 }
 262
 263
 264 /*======================================================================*
 265  *                  Low level WAVE implementation                       *
 266  *======================================================================*/
 267
 268 #define SAMPLE_MAX_16BIT  32767.0f
 269
 270 /* Alsaplayer function that applies volume changes to a buffer */
 271 /* (C) Andy Lo A Foe */
 272 /* Length is in terms of 32 bit samples */
 273 void volume_effect32(void *buffer, int length, int left, int right)
 274 {
 275         short *data = (short *)buffer;
 276         int i, v;
 277
 278         if (right == -1) right = left;
 279
 280         for(i = 0; i < length; i++) {
 281                 v = (int) ((*(data) * left) / 100);
 282                 *(data++) = (v>32767) ? 32767 : ((v<-32768) ? -32768 : v);
 283                 v = (int) ((*(data) * right) / 100);
 284                 *(data++) = (v>32767) ? 32767 : ((v<-32768) ? -32768 : v);
 285         }
 286 }
 287
 288 /* move 16 bit mono/stereo to 16 bit stereo */
 289 void sample_move_d16_d16(short *dst, short *src,
 290                   unsigned long nsamples, int nChannels)
 291 {
 292   while(nsamples--)
 293   {
 294     *dst = *src;
 295     dst++;
 296
 297     if(nChannels == 2) src++;
 298
 299     *dst = *src;
 300     dst++;
 301
 302     src++;
 303   }
 304 }
 305
 306 /* convert from 16 bit to floating point */
 307 /* allow for copying of stereo data with alternating left/right */
 308 /* channels to a buffer that will hold a single channel stream */
 309 /* nsamples is in terms of 16bit samples */
 310 /* src_skip is in terms of 16bit samples */
 311 void sample_move_d16_s16 (sample_t *dst, short *src,
 312                         unsigned long nsamples, unsigned long src_skip)
 313 {
 314   /* ALERT: signed sign-extension portability !!! */
 315   while (nsamples--)
 316   {
 317     *dst = (*src) / SAMPLE_MAX_16BIT;
 318     dst++;
 319     src += src_skip;
 320   }
 321 }
 322
 323 /* convert from floating point to 16 bit */
 324 /* allow for copying of a buffer that will hold a single channel stream */
 325 /* to stereo data with alternating left/right channels */
 326 /* nsamples is in terms of float samples */
 327 /* dst_skip is in terms of 16bit samples */
 328 void sample_move_s16_d16 (short *dst, sample_t *src,
 329                         unsigned long nsamples, unsigned long dst_skip)
 330 {
 331   /* ALERT: signed sign-extension portability !!! */
 332   while (nsamples--)
 333   {
 334       *dst = (*src) * SAMPLE_MAX_16BIT;
 335 /*      TRACE("src=(%.8f,%p) dst=(%d,%p)\n",*src,src,*dst,dst); */
 336       dst += dst_skip;
 337       src++;
 338   }
 339 }
 340
 341
 342 /* fill dst buffer with nsamples worth of silence */
 343 void sample_silence_dS (sample_t *dst, unsigned long nsamples)
 344 {
 345   /* ALERT: signed sign-extension portability !!! */
 346   while (nsamples--)
 347   {
 348     *dst = 0;
 349     dst++;
 350   }
 351 }
 352
 353 /******************************************************************
 354  *    JACK_callback_wwo
 355  */
 356 /* everytime the jack server wants something from us it calls this
 357 function, so we either deliver it some sound to play or deliver it nothing
 358 to play */
 359 int JACK_callback_wwo (nframes_t nframes, void *arg)
 360 {
 361   sample_t* out_l;
 362   sample_t* out_r;
 363   WINE_WAVEOUT* wwo = (WINE_WAVEOUT*)arg;
 364
 365   TRACE("wDevID: %u, nframes %u state=%u\n", wwo->wDevID, nframes,wwo->state);
 366
 367   if(!wwo->client)
 368     ERR("client is closed, this is weird...\n");
 369
 370   out_l = (sample_t *) fp_jack_port_get_buffer(wwo->out_port_l, nframes);
 371   out_r = (sample_t *) fp_jack_port_get_buffer(wwo->out_port_r, nframes);
 372
 373   if(wwo->state == WINE_WS_PLAYING)
 374   {
 375     DWORD jackFramesAvailable = nframes;
 376     DWORD outputFramesAvailable;
 377     DWORD numFramesToWrite;
 378
 379     long written = 0;
 380     char* buffer;
 381
 382 #if JACK_CLOSE_HACK
 383     if(wwo->in_use == FALSE)
 384     {
 385       /* output silence if nothing is being outputted */
 386       sample_silence_dS(out_l, nframes);
 387       sample_silence_dS(out_r, nframes);
 388
 389       return 0;
 390     }
 391 #endif
 392
 393     TRACE("wwo.state == WINE_WS_PLAYING\n");
 394
 395     /* see if our sound_buffer is large enough to hold the number of frames jack requested */
 396     /* Note: sound_buffer is always filled with 16-bit stereo data, even for mono mode */
 397     if(wwo->buffer_size < (nframes * sizeof(short) * 2))
 398     {
 399       ERR("for some reason JACK_BufSize() didn't allocate enough memory\n");
 400       ERR("allocated %ld bytes, need %d bytes\n", wwo->buffer_size, (nframes * sizeof(short) * 2));
 401       return 0;
 402     }
 403
 404     /* while we have jackFramesAvailable and a wave header to be played */
 405     while(jackFramesAvailable && wwo->lpPlayPtr)
 406     {
 407       /* find the amount of audio to be played at this time */
 408       outputFramesAvailable = (wwo->lpPlayPtr->dwBufferLength - wwo->dwPartialOffset) / wwo->format.wf.nBlockAlign;
 409
 410       numFramesToWrite = min(jackFramesAvailable, outputFramesAvailable);
 411       TRACE("dwBufferLength=(%d) dwPartialOffset=(%d)\n",wwo->lpPlayPtr->dwBufferLength,wwo->dwPartialOffset);
 412       TRACE("outputFramesAvailable == %d, jackFramesAvailable == %d\n", outputFramesAvailable, jackFramesAvailable);
 413
 414       buffer = wwo->lpPlayPtr->lpData + wwo->dwPartialOffset;
 415
 416       /* convert from mono to stereo if necessary */
 417       /* otherwise just memcpy to the output buffer */
 418
 419       if(wwo->format.wf.nChannels == 1)
 420       {
 421         sample_move_d16_d16((short*)wwo->sound_buffer + ((nframes - jackFramesAvailable) * sizeof(short)),
 422                             (short*)buffer, numFramesToWrite, wwo->format.wf.nChannels);
 423       } else /* just copy the memory over */
 424       {
 425         memcpy(wwo->sound_buffer + ((nframes - jackFramesAvailable) * wwo->format.wf.nBlockAlign),
 426                buffer, numFramesToWrite * wwo->format.wf.nBlockAlign);
 427       }
 428
 429       /* advance to the next wave header if possible, or advance pointer */
 430       /* inside of the current header if we haven't completed it */
 431       if(numFramesToWrite == outputFramesAvailable)
 432       {
 433         wodHelper_PlayPtrNext(wwo);            /* we wrote the whole waveheader, skip to the next one*/
 434       }
 435       else
 436       {
 437         wwo->dwPartialOffset+=(numFramesToWrite * wwo->format.wf.nBlockAlign); /* else advance by the bytes we took in to write */
 438       }
 439
 440       written+=(numFramesToWrite * wwo->format.wf.nBlockAlign); /* add on what we wrote */
 441       jackFramesAvailable-=numFramesToWrite; /* take away what was written in terms of output bytes */
 442     }
 443
 444     wwo->tickCountMS = GetTickCount();    /* record the current time */
 445     wwo->dwWrittenTotal+=written; /* update states on wave device */
 446     wwo->dwPlayedTotal+=wwo->bytesInJack; /* we must have finished with the last bytes or we wouldn't be back inside of this callback again... */
 447     wwo->bytesInJack = written; /* record the bytes inside of jack */
 448
 449     /* Now that we have finished filling the buffer either until it is full or until */
 450     /* we have run out of application sound data to process, apply volume and output */
 451     /* the audio to the jack server */
 452
 453     /* apply volume to the buffer */
 454     volume_effect32(wwo->sound_buffer, (nframes - jackFramesAvailable), wwo->volume_left, wwo->volume_right);
 455
 456     /* convert from stereo 16 bit to single channel 32 bit float */
 457     /* for each jack server channel */
 458     /* NOTE: we skip over two sample since we want to only get either the left or right channel */
 459     sample_move_d16_s16(out_l, (short*)wwo->sound_buffer,     (nframes - jackFramesAvailable), 2);
 460     sample_move_d16_s16(out_r, (short*)wwo->sound_buffer + 1, (nframes - jackFramesAvailable), 2);
 461
 462     /* see if we still have jackBytesLeft here, if we do that means that we
 463     ran out of wave data to play and had a buffer underrun, fill in
 464     the rest of the space with zero bytes */
 465     if(jackFramesAvailable)
 466     {
 467       ERR("buffer underrun of %d frames\n", jackFramesAvailable);
 468       sample_silence_dS(out_l + (nframes - jackFramesAvailable), jackFramesAvailable);
 469       sample_silence_dS(out_r + (nframes - jackFramesAvailable), jackFramesAvailable);
 470     }
 471   }
 472   else if(wwo->state == WINE_WS_PAUSED ||
 473     wwo->state == WINE_WS_STOPPED ||
 474     wwo->state == WINE_WS_CLOSED)
 475   {
 476       /* output silence if nothing is being outputted */
 477       sample_silence_dS(out_l, nframes);
 478       sample_silence_dS(out_r, nframes);
 479   }
 480
 481   /* notify the client of completed wave headers */
 482   EnterCriticalSection(&wwo->access_crst);
 483   wodHelper_NotifyCompletions(wwo, FALSE);
 484   LeaveCriticalSection(&wwo->access_crst);
 485
 486   return 0;
 487 }
 488
 489 /******************************************************************
 490  *              JACK_bufsize_wwo
 491  *
 492  *              Called whenever the jack server changes the max number
 493  *              of frames passed to JACK_callback
 494  */
 495 int JACK_bufsize_wwo (nframes_t nframes, void *arg)
 496 {
 497   WINE_WAVEOUT* wwo = (WINE_WAVEOUT*)arg;
 498   DWORD buffer_required;
 499   TRACE("wDevID=%d\n",wwo->wDevID);
 500   TRACE("the maximum buffer size is now %u frames\n", nframes);
 501
 502   /* make sure the callback routine has adequate memory */
 503     /* see if our buffer is large enough for the data we are writing */
 504     /* ie. Buffer_size < (bytes we already wrote + bytes we are going to write in this loop) */
 505   EnterCriticalSection(&wwo->access_crst);
 506
 507   /* wwo->sound_buffer is always filled with 16-bit stereo data, even for mono streams */
 508   buffer_required = nframes * sizeof(short) * 2;
 509   TRACE("wwo->buffer_size (%ld) buffer_required (%d).\n", wwo->buffer_size,buffer_required);
 510   if(wwo->buffer_size < buffer_required)
 511   {
 512     TRACE("expanding buffer from wwo->buffer_size == %ld, to %d\n",
 513       wwo->buffer_size, buffer_required);
 514     TRACE("GetProcessHeap() == %p\n", GetProcessHeap());
 515     wwo->buffer_size = buffer_required;
 516
 517     if (wwo->sound_buffer)
 518       wwo->sound_buffer = HeapReAlloc(GetProcessHeap(), 0, wwo->sound_buffer, wwo->buffer_size);
 519     else
 520       wwo->sound_buffer = HeapAlloc(GetProcessHeap(), 0, wwo->buffer_size);
 521
 522     /* if we don't have a buffer then error out */
 523     if(!wwo->sound_buffer)
 524     {
 525         ERR("error allocating sound_buffer memory\n");
 526         LeaveCriticalSection(&wwo->access_crst);
 527         return 0;
 528     }
 529   }
 530
 531   LeaveCriticalSection(&wwo->access_crst);
 532
 533   TRACE("ending\n");
 534
 535   return 0;
 536 }
 537 /******************************************************************
 538  *              JACK_bufsize_wwi
 539  *
 540  *              Called whenever the jack server changes the max number
 541  *              of frames passed to JACK_callback
 542  */
 543 int JACK_bufsize_wwi (nframes_t nframes, void *arg)
 544 {
 545   TRACE("the maximum buffer size is now %u frames\n", nframes);
 546   return 0;
 547 }
 548
 549 /******************************************************************
 550  *              JACK_srate
 551  */
 552 int JACK_srate (nframes_t nframes, void *arg)
 553 {
 554   TRACE("the sample rate is now %u/sec\n", nframes);
 555   return 0;
 556 }
 557
 558
 559 /******************************************************************
 560  *              JACK_shutdown_wwo
 561  */
 562 /* if this is called then jack shut down... handle this appropriately */
 563 void JACK_shutdown_wwo(void* arg)
 564 {
 565   WINE_WAVEOUT* wwo = (WINE_WAVEOUT*)arg;
 566
 567   wwo->client = 0; /* reset client */
 568
 569   TRACE("trying to reconnect after sleeping for a short while...\n");
 570
 571   /* lets see if we can't reestablish the connection */
 572   Sleep(750); /* pause for a short period of time */
 573   if(!JACK_OpenWaveOutDevice(wwo))
 574   {
 575     ERR("unable to reconnect with jack...\n");
 576   }
 577 }
 578
 579 /******************************************************************
 580  *              JACK_shutdown_wwi
 581  */
 582 /* if this is called then jack shut down... handle this appropriately */
 583 void JACK_shutdown_wwi(void* arg)
 584 {
 585   WINE_WAVEIN* wwi = (WINE_WAVEIN*)arg;
 586
 587   wwi->client = 0; /* reset client */
 588
 589   TRACE("trying to reconnect after sleeping for a short while...\n");
 590
 591   /* lets see if we can't reestablish the connection */
 592   Sleep(750); /* pause for a short period of time */
 593   if(!JACK_OpenWaveInDevice(wwi,wwi->format.wf.nChannels))
 594   {
 595     ERR("unable to reconnect with jack...\n");
 596   }
 597 }
 598
 599
 600 /******************************************************************
 601  *              JACK_OpenWaveOutDevice
 602  */
 603 static int JACK_OpenWaveOutDevice(WINE_WAVEOUT* wwo)
 604 {
 605   const char** ports;
 606   int i;
 607   char client_name[64];
 608   jack_port_t* out_port_l;
 609   jack_port_t* out_port_r;
 610   jack_client_t* client;
 611   int failed = 0;
 612
 613   TRACE("creating jack client and setting up callbacks\n");
 614
 615 #if JACK_CLOSE_HACK
 616   /* see if this device is already open */
 617         if(wwo->client)
 618         {
 619           /* if this device is already in use then it is bad for us to be in here */
 620           if(wwo->in_use)
 621             return 0;
 622
 623           TRACE("using existing client\n");
 624           wwo->in_use = TRUE;
 625           return 1;
 626         }
 627 #endif
 628
 629         /* zero out the buffer pointer and the size of the buffer */
 630         wwo->sound_buffer = 0;
 631         wwo->buffer_size = 0;
 632
 633         /* try to become a client of the JACK server */
 634         snprintf(client_name, sizeof(client_name), "wine_jack_out_%d", wwo->wDevID);
 635         TRACE("client name '%s'\n", client_name);
 636         if ((client = fp_jack_client_new (client_name)) == 0)
 637         {
 638                 /* jack has problems with shutting down clients, so lets */
 639                 /* wait a short while and try once more before we give up */
 640                 Sleep(250);
 641                 if ((client = fp_jack_client_new (client_name)) == 0)
 642                 {
 643                   ERR("jack server not running?\n");
 644                   return 0;
 645                 }
 646         }
 647
 648         /* tell the JACK server to call `JACK_callback_wwo()' whenever
 649            there is work to be done. */
 650         fp_jack_set_process_callback (client, JACK_callback_wwo, wwo);
 651
 652         /* tell the JACK server to call `JACK_bufsize_wwo()' whenever
 653            the maximum number of frames that will be passed
 654            to `JACK_Callback()' changes */
 655         fp_jack_set_buffer_size_callback (client, JACK_bufsize_wwo, wwo);
 656
 657         /* tell the JACK server to call `srate()' whenever
 658            the sample rate of the system changes. */
 659         fp_jack_set_sample_rate_callback (client, JACK_srate, wwo);
 660
 661         /* tell the JACK server to call `jack_shutdown()' if
 662            it ever shuts down, either entirely, or if it
 663            just decides to stop calling us. */
 664         fp_jack_on_shutdown (client, JACK_shutdown_wwo, wwo);
 665
 666         /* display the current sample rate. once the client is activated
 667            (see below), you should rely on your own sample rate
 668            callback (see above) for this value. */
 669         wwo->sample_rate = fp_jack_get_sample_rate(client);
 670         TRACE("engine sample rate: %lu\n", wwo->sample_rate);
 671
 672         /* create the left and right channel output ports */
 673         /* jack's ports are all mono so for stereo you need two */
 674         out_port_l = fp_jack_port_register (client, "out_l",
 675                          JACK_DEFAULT_AUDIO_TYPE, JackPortIsOutput, 0);
 676
 677         out_port_r = fp_jack_port_register (client, "out_r",
 678                          JACK_DEFAULT_AUDIO_TYPE, JackPortIsOutput, 0);
 679
 680         TRACE("Created ports. (%p) (%p)\n",out_port_l, out_port_r);
 681
 682         /* save away important values to the WINE_WAVEOUT struct */
 683         wwo->client = client;
 684         wwo->out_port_l = out_port_l;
 685         wwo->out_port_r = out_port_r;
 686
 687 #if JACK_CLOSE_HACK
 688         wwo->in_use = TRUE; /* mark this device as in use since it now is ;-) */
 689 #endif
 690
 691         /* set initial buffer size */
 692         JACK_bufsize_wwo (fp_jack_get_buffer_size(client),wwo);
 693
 694         /* tell the JACK server that we are ready to roll */
 695         if (fp_jack_activate (client))
 696         {
 697           ERR( "cannot activate client\n");
 698           return 0;
 699         }
 700
 701         TRACE("jack activate.\n");
 702         /* figure out what the ports that we want to output on are */
 703         /* NOTE: we do this instead of using stuff like "alsa_pcm:playback_X" because */
 704         /*   this way works if names are changed */
 705         ports = fp_jack_get_ports(client, NULL, NULL, JackPortIsPhysical|JackPortIsInput);
 706
 707         /* display a trace of the output ports we found */
 708         for(i = 0; ports[i]; i++)
 709         {
 710           TRACE("ports[%d] = '%s'\n", i, ports[i]);
 711         }
 712
 713         if(!ports)
 714         {
 715           ERR("jack_get_ports() failed to find 'JackPortIsPhysical|JackPortIsInput'\n");
 716         }
 717
 718         /* connect the ports. Note: you can't do this before
 719            the client is activated (this may change in the future).
 720         */
 721         /* we want to connect to two ports so we have stereo output ;-) */
 722
 723         if(fp_jack_connect(client, fp_jack_port_name(out_port_l), ports[0]))
 724         {
 725           ERR ("cannot connect to output port %d('%s')\n", 0, ports[0]);
 726           failed = 1;
 727         }
 728
 729         if(fp_jack_connect(client, fp_jack_port_name(out_port_r), ports[1]))
 730         {
 731           ERR ("cannot connect to output port %d('%s')\n", 1, ports[1]);
 732           failed = 1;
 733         }
 734
 735         free(ports); /* free the returned array of ports */
 736
 737         /* if something failed we need to shut the client down and return 0 */
 738         if(failed)
 739         {
 740 #if JACK_CLOSE_HACK
 741           JACK_CloseWaveOutDevice(wwo, TRUE);
 742 #else
 743           JACK_CloseWaveOutDevice(wwo);
 744 #endif
 745           return 0;
 746         }
 747
 748         return 1; /* return success */
 749 }
 750
 751 /******************************************************************
 752  *              JACK_CloseWaveOutDevice
 753  *
 754  *      Close the connection to the server cleanly.
 755  *  If close_client is TRUE we close the client for this device instead of
 756  *    just marking the device as in_use(JACK_CLOSE_HACK only)
 757  */
 758 #if JACK_CLOSE_HACK
 759 static void     JACK_CloseWaveOutDevice(WINE_WAVEOUT* wwo, BOOL close_client)
 760 #else
 761 static void     JACK_CloseWaveOutDevice(WINE_WAVEOUT* wwo)
 762 #endif
 763 {
 764 #if JACK_CLOSE_HACK
 765   TRACE("wDevID: %d, close_client (wwo): %d\n", wwo->wDevID, close_client);
 766 #else
 767   TRACE("wDevID: %d\n", wwo->wDevID);
 768 #endif
 769
 770 #if JACK_CLOSE_HACK
 771   if(close_client)
 772   {
 773 #endif
 774     fp_jack_deactivate(wwo->client); /* supposed to help the jack_client_close() to succeed */
 775     fp_jack_client_close (wwo->client);
 776
 777     EnterCriticalSection(&wwo->access_crst);
 778     wwo->client = 0; /* reset client */
 779     HeapFree(GetProcessHeap(), 0, wwo->sound_buffer); /* free buffer memory */
 780     wwo->sound_buffer = 0;
 781     wwo->buffer_size = 0; /* zero out size of the buffer */
 782     LeaveCriticalSection(&wwo->access_crst);
 783 #if JACK_CLOSE_HACK
 784   } else
 785   {
 786     EnterCriticalSection(&wwo->access_crst);
 787     TRACE("setting in_use to FALSE\n");
 788     wwo->in_use = FALSE;
 789     LeaveCriticalSection(&wwo->access_crst);
 790   }
 791 #endif
 792 }
 793
 794 /******************************************************************
 795  *              JACK_CloseWaveInDevice
 796  *
 797  *      Close the connection to the server cleanly.
 798  *  If close_client is TRUE we close the client for this device instead of
 799  *    just marking the device as in_use(JACK_CLOSE_HACK only)
 800  */
 801 #if JACK_CLOSE_HACK
 802 static void     JACK_CloseWaveInDevice(WINE_WAVEIN* wwi, BOOL close_client)
 803 #else
 804 static void     JACK_CloseWaveInDevice(WINE_WAVEIN* wwi)
 805 #endif
 806 {
 807 #if JACK_CLOSE_HACK
 808   TRACE("wDevID: %d, close_client (wwi): %d\n", wwi->wDevID, close_client);
 809 #else
 810   TRACE("wDevID: %d\n", wwi->wDevID);
 811 #endif
 812
 813 #if JACK_CLOSE_HACK
 814   if(close_client)
 815   {
 816 #endif
 817     fp_jack_deactivate(wwi->client); /* supposed to help the jack_client_close() to succeed */
 818     fp_jack_client_close (wwi->client);
 819
 820     EnterCriticalSection(&wwi->access_crst);
 821     wwi->client = 0; /* reset client */
 822     HeapFree(GetProcessHeap(), 0, wwi->sound_buffer); /* free buffer memory */
 823     wwi->sound_buffer = 0;
 824     wwi->buffer_size = 0; /* zero out size of the buffer */
 825     LeaveCriticalSection(&wwi->access_crst);
 826 #if JACK_CLOSE_HACK
 827   } else
 828   {
 829     EnterCriticalSection(&wwi->access_crst);
 830     TRACE("setting in_use to FALSE\n");
 831     wwi->in_use = FALSE;
 832     LeaveCriticalSection(&wwi->access_crst);
 833   }
 834 #endif
 835 }
 836
 837 /******************************************************************
 838  *              JACK_WaveRelease
 839  *
 840  *
 841  */
 842 LONG    JACK_WaveRelease(void)
 843 {
 844   int iDevice;
 845
 846   TRACE("closing all open waveout devices\n");
 847
 848   /* close all open output devices */
 849   for(iDevice = 0; iDevice < MAX_WAVEOUTDRV; iDevice++)
 850   {
 851     TRACE("iDevice == %d\n", iDevice);
 852     if(WOutDev[iDevice].client)
 853     {
 854 #if JACK_CLOSE_HACK
 855       JACK_CloseWaveOutDevice(&WOutDev[iDevice], TRUE); /* close the device, FORCE the client to close */
 856 #else
 857       JACK_CloseWaveOutDevice(&WOutDev[iDevice]); /* close the device, FORCE the client to close */
 858 #endif
 859       DeleteCriticalSection(&(WOutDev[iDevice].access_crst)); /* delete the critical section */
 860     }
 861   }
 862
 863   TRACE("closing all open wavein devices\n");
 864
 865   /* close all open input devices */
 866   for(iDevice = 0; iDevice < MAX_WAVEINDRV; iDevice++)
 867   {
 868     TRACE("iDevice == %d\n", iDevice);
 869     if(WInDev[iDevice].client)
 870     {
 871 #if JACK_CLOSE_HACK
 872       JACK_CloseWaveInDevice(&WInDev[iDevice], TRUE); /* close the device, FORCE the client to close */
 873 #else
 874       JACK_CloseWaveInDevice(&WInDev[iDevice]); /* close the device, FORCE the client to close */
 875 #endif
 876       DeleteCriticalSection(&(WInDev[iDevice].access_crst)); /* delete the critical section */
 877     }
 878   }
 879
 880   TRACE("returning 1\n");
 881
 882   return 1;
 883 }
 884
 885 /******************************************************************
 886  *              JACK_WaveInit
 887  *
 888  * Initialize internal structures from JACK server info
 889  */
 890 LONG JACK_WaveInit(void)
 891 {
 892     int i;
 893     CHAR szPname[MAXPNAMELEN];
 894
 895     TRACE("called\n");
 896
 897     /* setup function pointers */
 898 #define LOAD_FUNCPTR(f) if((fp_##f = wine_dlsym(jackhandle, #f, NULL, 0)) == NULL) goto sym_not_found;
 899     LOAD_FUNCPTR(jack_activate);
 900     LOAD_FUNCPTR(jack_connect);
 901     LOAD_FUNCPTR(jack_client_new);
 902     LOAD_FUNCPTR(jack_client_close);
 903     LOAD_FUNCPTR(jack_deactivate);
 904     LOAD_FUNCPTR(jack_set_process_callback);
 905     LOAD_FUNCPTR(jack_set_buffer_size_callback);
 906     LOAD_FUNCPTR(jack_set_sample_rate_callback);
 907     LOAD_FUNCPTR(jack_on_shutdown);
 908     LOAD_FUNCPTR(jack_get_sample_rate);
 909     LOAD_FUNCPTR(jack_port_register);
 910     LOAD_FUNCPTR(jack_port_get_buffer);
 911     LOAD_FUNCPTR(jack_get_ports);
 912     LOAD_FUNCPTR(jack_port_name);
 913     LOAD_FUNCPTR(jack_get_buffer_size);
 914 #undef LOAD_FUNCPTR
 915
 916     /* start with output device */
 917
 918     for (i = 0; i < MAX_WAVEOUTDRV; ++i)
 919     {
 920       WOutDev[i].client = 0; /* initialize the client to 0 */
 921
 922 #if JACK_CLOSE_HACK
 923       WOutDev[i].in_use = FALSE;
 924       WInDev[i].in_use  = FALSE;
 925 #endif
 926
 927       memset(&WOutDev[i].caps, 0, sizeof(WOutDev[i].caps));
 928
 929       WOutDev[i].caps.wMid = 0x00FF;    /* Manufac ID */
 930       WOutDev[i].caps.wPid = 0x0001;    /* Product ID */
 931       snprintf(szPname, sizeof(szPname), "JACK WaveOut %d", i);
 932       MultiByteToWideChar(CP_ACP, 0, szPname, -1, WOutDev[i].caps.szPname, sizeof(WOutDev[i].caps.szPname)/sizeof(WCHAR));
 933       snprintf(WOutDev[i].interface_name, sizeof(WOutDev[i].interface_name), "winejack: %d", i);
 934
 935       WOutDev[i].caps.vDriverVersion = 0x0100;
 936       WOutDev[i].caps.dwFormats = 0x00000000;
 937       WOutDev[i].caps.dwSupport = WAVECAPS_VOLUME;
 938
 939       WOutDev[i].caps.wChannels = 2;
 940       WOutDev[i].caps.dwSupport |= WAVECAPS_LRVOLUME;
 941
 942 /* NOTE: we don't support any 8 bit modes so note that */
 943 /*      WOutDev[i].caps.dwFormats |= WAVE_FORMAT_4M08;
 944       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_4S08; */
 945       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_4S16;
 946       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_4M16;
 947 /*      WOutDev[i].caps.dwFormats |= WAVE_FORMAT_2M08;
 948       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_2S08; */
 949       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_2M16;
 950       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_2S16;
 951 /*      WOutDev[i].caps.dwFormats |= WAVE_FORMAT_1M08;
 952       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_1S08;*/
 953       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_1M16;
 954       WOutDev[i].caps.dwFormats |= WAVE_FORMAT_1S16;
 955     }
 956
 957     /* then do input device */
 958     for (i = 0; i < MAX_WAVEINDRV; ++i)
 959     {
 960         /* TODO: we should initialize read stuff here */
 961         memset(&WInDev[i].caps, 0, sizeof(WInDev[i].caps));
 962
 963         WInDev[i].caps.wMid = 0x00FF;
 964         WInDev[i].caps.wPid = 0x0001;
 965         snprintf(szPname, sizeof(szPname), "JACK WaveIn %d", i);
 966         MultiByteToWideChar(CP_ACP, 0, szPname, -1, WInDev[i].caps.szPname, sizeof(WInDev[i].caps.szPname)/sizeof(WCHAR));
 967         snprintf(WInDev[i].interface_name, sizeof(WInDev[i].interface_name), "winejack: %d", i);
 968
 969         WInDev[i].caps.vDriverVersion = 0x0100;
 970
 971         WInDev[i].caps.wChannels = 0x2;
 972         /* NOTE: we don't support any 8 bit modes so note that */
 973 /*      WInDev[i].caps.dwFormats |= WAVE_FORMAT_4M08;
 974         WInDev[i].caps.dwFormats |= WAVE_FORMAT_4S08; */
 975         WInDev[i].caps.dwFormats |= WAVE_FORMAT_4S16;
 976         WInDev[i].caps.dwFormats |= WAVE_FORMAT_4M16;
 977 /*      WInDev[i].caps.dwFormats |= WAVE_FORMAT_2M08;
 978         WInDev[i].caps.dwFormats |= WAVE_FORMAT_2S08; */
 979         WInDev[i].caps.dwFormats |= WAVE_FORMAT_2M16;
 980         WInDev[i].caps.dwFormats |= WAVE_FORMAT_2S16;
 981 /*      WInDev[i].caps.dwFormats |= WAVE_FORMAT_1M08;
 982         WInDev[i].caps.dwFormats |= WAVE_FORMAT_1S08;*/
 983         WInDev[i].caps.dwFormats |= WAVE_FORMAT_1M16;
 984         WInDev[i].caps.dwFormats |= WAVE_FORMAT_1S16;
 985         WInDev[i].caps.wReserved1 = 0;
 986     }
 987
 988     return 1;           /* return success */
 989
 990 /* error path for function pointer loading errors */
 991 sym_not_found:
 992     WINE_MESSAGE(
 993       "Wine cannot find certain functions that it needs inside the jack"
 994       "library.  To enable Wine to use the jack audio server please "
 995       "install libjack\n");
 996     wine_dlclose(jackhandle, NULL, 0);
 997     jackhandle = NULL;
 998     return FALSE;
 999 }
1000
1001 /*======================================================================*
1002  *                  Low level WAVE OUT implementation                   *
1003  *======================================================================*/
1004
1005 /**************************************************************************
1006  *                      wodNotifyClient                 [internal]
1007  */
1008 static DWORD wodNotifyClient(WINE_WAVEOUT* wwo, WORD wMsg, DWORD dwParam1, DWORD dwParam2)
1009 {
1010     TRACE("wMsg = 0x%04x dwParm1 = %04X dwParam2 = %04X\n", wMsg, dwParam1, dwParam2);
1011
1012     switch (wMsg) {
1013     case WOM_OPEN:
1014     case WOM_CLOSE:
1015     case WOM_DONE:
1016       if (wwo->wFlags != DCB_NULL &&
1017         !DriverCallback(wwo->waveDesc.dwCallback, wwo->wFlags,
1018           (HDRVR)wwo->waveDesc.hWave, wMsg, wwo->waveDesc.dwInstance,
1019           dwParam1, dwParam2))
1020       {
1021         WARN("can't notify client !\n");
1022         return MMSYSERR_ERROR;
1023       }
1024     break;
1025     default:
1026       FIXME("Unknown callback message %u\n", wMsg);
1027         return MMSYSERR_INVALPARAM;
1028     }
1029     return MMSYSERR_NOERROR;
1030 }
1031
1032 /**************************************************************************
1033  *                              wodHelper_BeginWaveHdr          [internal]
1034  *
1035  * Makes the specified lpWaveHdr the currently playing wave header.
1036  * If the specified wave header is a begin loop and we're not already in
1037  * a loop, setup the loop.
1038  */
1039 static void wodHelper_BeginWaveHdr(WINE_WAVEOUT* wwo, LPWAVEHDR lpWaveHdr)
1040 {
1041     EnterCriticalSection(&wwo->access_crst);
1042
1043     wwo->lpPlayPtr = lpWaveHdr;
1044
1045     if (!lpWaveHdr)
1046     {
1047        LeaveCriticalSection(&wwo->access_crst);
1048        return;
1049     }
1050
1051     if (lpWaveHdr->dwFlags & WHDR_BEGINLOOP)
1052     {
1053       if (wwo->lpLoopPtr)
1054       {
1055         WARN("Already in a loop. Discarding loop on this header (%p)\n", lpWaveHdr);
1056         TRACE("Already in a loop. Discarding loop on this header (%p)\n", lpWaveHdr);
1057       } else
1058       {
1059         TRACE("Starting loop (%dx) with %p\n", lpWaveHdr->dwLoops, lpWaveHdr);
1060         wwo->lpLoopPtr = lpWaveHdr;
1061         /* Windows does not touch WAVEHDR.dwLoops,
1062          * so we need to make an internal copy */
1063         wwo->dwLoops = lpWaveHdr->dwLoops;
1064       }
1065     }
1066     wwo->dwPartialOffset = 0;
1067
1068     LeaveCriticalSection(&wwo->access_crst);
1069 }
1070
1071
1072 /**************************************************************************
1073  *                              wodHelper_PlayPtrNext           [internal]
1074  *
1075  * Advance the play pointer to the next waveheader, looping if required.
1076  */
1077 static LPWAVEHDR wodHelper_PlayPtrNext(WINE_WAVEOUT* wwo)
1078 {
1079   LPWAVEHDR lpWaveHdr;
1080
1081   EnterCriticalSection(&wwo->access_crst);
1082
1083   lpWaveHdr = wwo->lpPlayPtr;
1084
1085   wwo->dwPartialOffset = 0;
1086   if ((lpWaveHdr->dwFlags & WHDR_ENDLOOP) && wwo->lpLoopPtr)
1087   {
1088     /* We're at the end of a loop, loop if required */
1089     if (--wwo->dwLoops > 0)
1090     {
1091       wwo->lpPlayPtr = wwo->lpLoopPtr;
1092     } else
1093     {
1094       /* Handle overlapping loops correctly */
1095       if (wwo->lpLoopPtr != lpWaveHdr && (lpWaveHdr->dwFlags & WHDR_BEGINLOOP)) {
1096         FIXME("Correctly handled case ? (ending loop buffer also starts a new loop)\n");
1097         /* shall we consider the END flag for the closing loop or for
1098          * the opening one or for both ???
1099          * code assumes for closing loop only
1100          */
1101       } else
1102       {
1103         lpWaveHdr = lpWaveHdr->lpNext;
1104       }
1105       wwo->lpLoopPtr = NULL;
1106       wodHelper_BeginWaveHdr(wwo, lpWaveHdr);
1107     }
1108   } else
1109   {
1110      /* We're not in a loop.  Advance to the next wave header */
1111     TRACE("not inside of a loop, advancing to next wave header\n");
1112     wodHelper_BeginWaveHdr(wwo, lpWaveHdr = lpWaveHdr->lpNext);
1113   }
1114
1115   LeaveCriticalSection(&wwo->access_crst);
1116
1117   return lpWaveHdr;
1118 }
1119
1120 /* if force is TRUE then notify the client that all the headers were completed */
1121 static DWORD wodHelper_NotifyCompletions(WINE_WAVEOUT* wwo, BOOL force)
1122 {
1123   LPWAVEHDR             lpWaveHdr;
1124   DWORD retval;
1125
1126   TRACE("called\n");
1127
1128   EnterCriticalSection(&wwo->access_crst);
1129
1130   /* Start from lpQueuePtr and keep notifying until:
1131    * - we hit an unwritten wavehdr
1132    * - we hit the beginning of a running loop
1133    * - we hit a wavehdr which hasn't finished playing
1134    */
1135   while ((lpWaveHdr = wwo->lpQueuePtr) &&
1136            (force ||
1137             (lpWaveHdr != wwo->lpPlayPtr &&
1138              lpWaveHdr != wwo->lpLoopPtr)))
1139   {
1140     wwo->lpQueuePtr = lpWaveHdr->lpNext;
1141
1142     lpWaveHdr->dwFlags &= ~WHDR_INQUEUE;
1143     lpWaveHdr->dwFlags |= WHDR_DONE;
1144     TRACE("notifying client: lpWaveHdr=(%p) lpPlayPtr=(%p) dwFlags=(%d)\n",
1145           lpWaveHdr, wwo->lpPlayPtr, lpWaveHdr->dwFlags);
1146
1147     wodNotifyClient(wwo, WOM_DONE, (DWORD)lpWaveHdr, 0);
1148   }
1149   TRACE("Not notifying client: lpWaveHdr=(%p) lpPlayPtr=(%p) lpLoopPtr=(%p)\n",
1150         lpWaveHdr, wwo->lpPlayPtr, wwo->lpLoopPtr);
1151   retval = (lpWaveHdr && lpWaveHdr != wwo->lpPlayPtr && lpWaveHdr !=
1152               wwo->lpLoopPtr) ? 0 : INFINITE;
1153
1154   LeaveCriticalSection(&wwo->access_crst);
1155
1156   return retval;
1157 }
1158
1159 /**************************************************************************
1160  *                              wodHelper_Reset                 [internal]
1161  *
1162  * Resets current output stream.
1163  */
1164 static  void  wodHelper_Reset(WINE_WAVEOUT* wwo, BOOL reset)
1165 {
1166     EnterCriticalSection(&wwo->access_crst);
1167
1168     /* updates current notify list */
1169     wodHelper_NotifyCompletions(wwo, FALSE);
1170
1171     if (reset)
1172     {
1173         /* remove all wave headers and notify client that all headers were completed */
1174         wodHelper_NotifyCompletions(wwo, TRUE);
1175
1176         wwo->lpPlayPtr = wwo->lpQueuePtr = wwo->lpLoopPtr = NULL;
1177         wwo->state = WINE_WS_STOPPED;
1178         wwo->dwPlayedTotal = wwo->dwWrittenTotal = wwo->bytesInJack = 0;
1179
1180         wwo->dwPartialOffset = 0;        /* Clear partial wavehdr */
1181     } else
1182     {
1183         if (wwo->lpLoopPtr)
1184         {
1185             /* complicated case, not handled yet (could imply modifying the loop counter) */
1186             FIXME("Pausing while in loop isn't correctly handled yet, except strange results\n");
1187             wwo->lpPlayPtr = wwo->lpLoopPtr;
1188             wwo->dwPartialOffset = 0;
1189             wwo->dwWrittenTotal = wwo->dwPlayedTotal; /* this is wrong !!! */
1190         } else
1191         {
1192             LPWAVEHDR   ptr;
1193             DWORD       sz = wwo->dwPartialOffset;
1194
1195             /* reset all the data as if we had written only up to lpPlayedTotal bytes */
1196             /* compute the max size playable from lpQueuePtr */
1197             for (ptr = wwo->lpQueuePtr; ptr != wwo->lpPlayPtr; ptr = ptr->lpNext)
1198             {
1199                 sz += ptr->dwBufferLength;
1200             }
1201
1202             /* because the reset lpPlayPtr will be lpQueuePtr */
1203             if (wwo->dwWrittenTotal > wwo->dwPlayedTotal + sz) ERR("doh\n");
1204             wwo->dwPartialOffset = sz - (wwo->dwWrittenTotal - wwo->dwPlayedTotal);
1205             wwo->dwWrittenTotal = wwo->dwPlayedTotal;
1206             wwo->lpPlayPtr = wwo->lpQueuePtr;
1207         }
1208
1209         wwo->state = WINE_WS_PAUSED;
1210     }
1211
1212     LeaveCriticalSection(&wwo->access_crst);
1213 }
1214
1215 /**************************************************************************
1216  *                      wodGetDevCaps                           [internal]
1217  */
1218 static DWORD wodGetDevCaps(WORD wDevID, LPWAVEOUTCAPSW lpCaps, DWORD dwSize)
1219 {
1220     TRACE("(%u, %p, %u);\n", wDevID, lpCaps, dwSize);
1221
1222     if (lpCaps == NULL) return MMSYSERR_NOTENABLED;
1223
1224     if (wDevID >= MAX_WAVEOUTDRV)
1225     {
1226       TRACE("MAX_WAVOUTDRV reached !\n");
1227       return MMSYSERR_BADDEVICEID;
1228     }
1229
1230     TRACE("dwSupport=(0x%x), dwFormats=(0x%x)\n", WOutDev[wDevID].caps.dwSupport, WOutDev[wDevID].caps.dwFormats);
1231     memcpy(lpCaps, &WOutDev[wDevID].caps, min(dwSize, sizeof(*lpCaps)));
1232     return MMSYSERR_NOERROR;
1233 }
1234
1235 /**************************************************************************
1236  *                              wodOpen                         [internal]
1237  *
1238  * NOTE: doesn't it seem like there is a race condition if you try to open
1239  * the same device twice?
1240  */
1241 static DWORD wodOpen(WORD wDevID, LPWAVEOPENDESC lpDesc, DWORD dwFlags)
1242 {
1243     WINE_WAVEOUT*       wwo;
1244     DWORD retval;
1245
1246     TRACE("(%u, %p, %08X);\n", wDevID, lpDesc, dwFlags);
1247     if (lpDesc == NULL)
1248     {
1249       WARN("Invalid Parameter !\n");
1250       return MMSYSERR_INVALPARAM;
1251     }
1252     if (wDevID >= MAX_WAVEOUTDRV) {
1253       TRACE("MAX_WAVOUTDRV reached !\n");
1254       return MMSYSERR_BADDEVICEID;
1255     }
1256
1257 #if JACK_CLOSE_HACK
1258     if(WOutDev[wDevID].client && WOutDev[wDevID].in_use)
1259 #else
1260     if(WOutDev[wDevID].client)
1261 #endif
1262     {
1263       TRACE("device %d already allocated\n", wDevID);
1264       return MMSYSERR_ALLOCATED;
1265     }
1266
1267     /* Only the PCM format is supported so far...
1268      * Also we only support 16 bit mode.
1269      */
1270     if (lpDesc->lpFormat->wFormatTag != WAVE_FORMAT_PCM ||
1271       lpDesc->lpFormat->nChannels == 0 ||
1272       lpDesc->lpFormat->nSamplesPerSec == 0 ||
1273       lpDesc->lpFormat->wBitsPerSample != 16)
1274     {
1275       WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%d wBitsPerSample=%d !\n",
1276        lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels,
1277        lpDesc->lpFormat->nSamplesPerSec, lpDesc->lpFormat->wBitsPerSample);
1278       return WAVERR_BADFORMAT;
1279     }
1280
1281     if (dwFlags & WAVE_FORMAT_QUERY)
1282     {
1283       TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%d !\n",
1284        lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels,
1285        lpDesc->lpFormat->nSamplesPerSec);
1286       return MMSYSERR_NOERROR;
1287     }
1288
1289     wwo = &WOutDev[wDevID];
1290     wwo->wDevID = wDevID;
1291
1292     /* Set things up before we call JACK_OpenWaveOutDevice because */
1293     /* we will start getting callbacks before JACK_OpenWaveOutDevice */
1294     /* even returns and we want to be initialized before then */
1295     wwo->state = WINE_WS_STOPPED; /* start in a stopped state */
1296     wwo->dwPlayedTotal = 0; /* zero out these totals */
1297     wwo->dwWrittenTotal = 0;
1298     wwo->bytesInJack = 0;
1299     wwo->tickCountMS = 0;
1300
1301     /* Initialize volume to full level */
1302     wwo->volume_left = 100;
1303     wwo->volume_right = 100;
1304
1305     InitializeCriticalSection(&wwo->access_crst); /* initialize the critical section */
1306     EnterCriticalSection(&wwo->access_crst);
1307
1308     dwFlags &= ~WAVE_DIRECTSOUND;  /* direct sound not supported, ignore the flag */
1309
1310
1311     wwo->waveDesc = *lpDesc;
1312     memcpy(&wwo->format,   lpDesc->lpFormat, sizeof(PCMWAVEFORMAT));
1313
1314     /* open up jack ports for this device */
1315     if (!JACK_OpenWaveOutDevice(&WOutDev[wDevID]))
1316     {
1317       ERR("JACK_OpenWaveOutDevice(%d) failed\n", wDevID);
1318       LeaveCriticalSection(&wwo->access_crst);
1319       DeleteCriticalSection(&wwo->access_crst); /* delete the critical section so we can initialize it again from wodOpen() */
1320       return MMSYSERR_ERROR;            /* return unspecified error */
1321     }
1322
1323     LeaveCriticalSection(&wwo->access_crst);
1324
1325     /* display the current wave format */
1326     TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%u, nSamplesPerSec=%u, nChannels=%u nBlockAlign=%u!\n",
1327     wwo->format.wBitsPerSample, wwo->format.wf.nAvgBytesPerSec,
1328     wwo->format.wf.nSamplesPerSec, wwo->format.wf.nChannels,
1329     wwo->format.wf.nBlockAlign);
1330
1331     /* make sure that we have the same sample rate in our audio stream */
1332     /* as we do in the jack server */
1333     if(wwo->format.wf.nSamplesPerSec != wwo->sample_rate)
1334     {
1335       TRACE("error: jack server sample rate is '%ld', wave sample rate is '%d'\n",
1336          wwo->sample_rate, wwo->format.wf.nSamplesPerSec);
1337
1338 #if JACK_CLOSE_HACK
1339       JACK_CloseWaveOutDevice(wwo, FALSE); /* close this device, don't force the client to close */
1340 #else
1341       JACK_CloseWaveOutDevice(wwo); /* close this device */
1342 #endif
1343       DeleteCriticalSection(&wwo->access_crst); /* delete the critical section so we can initialize it again from wodOpen() */
1344       return WAVERR_BADFORMAT;
1345     }
1346
1347     /* check for an invalid number of bits per sample */
1348     if (wwo->format.wBitsPerSample == 0)
1349     {
1350       WARN("Resetting zeroed wBitsPerSample\n");
1351       wwo->format.wBitsPerSample = 8 *
1352       (wwo->format.wf.nAvgBytesPerSec /
1353        wwo->format.wf.nSamplesPerSec) /
1354        wwo->format.wf.nChannels;
1355     }
1356
1357     EnterCriticalSection(&wwo->access_crst);
1358     retval = wodNotifyClient(wwo, WOM_OPEN, 0L, 0L);
1359     LeaveCriticalSection(&wwo->access_crst);
1360
1361     return retval;
1362 }
1363
1364 /**************************************************************************
1365  *                              wodClose                        [internal]
1366  */
1367 static DWORD wodClose(WORD wDevID)
1368 {
1369     DWORD               ret = MMSYSERR_NOERROR;
1370     WINE_WAVEOUT*       wwo;
1371
1372     TRACE("(%u);\n", wDevID);
1373
1374     if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1375     {
1376       WARN("bad device ID !\n");
1377       return MMSYSERR_BADDEVICEID;
1378     }
1379
1380     wwo = &WOutDev[wDevID];
1381     if (wwo->lpQueuePtr)
1382     {
1383       WARN("buffers still playing !\n");
1384       ret = WAVERR_STILLPLAYING;
1385     } else
1386     {
1387       /* sanity check: this should not happen since the device must have been reset before */
1388       if (wwo->lpQueuePtr || wwo->lpPlayPtr) ERR("out of sync\n");
1389
1390       wwo->state = WINE_WS_CLOSED; /* mark the device as closed */
1391
1392 #if JACK_CLOSE_HACK
1393       JACK_CloseWaveOutDevice(wwo, FALSE); /* close the jack device, DO NOT force the client to close */
1394 #else
1395       JACK_CloseWaveOutDevice(wwo); /* close the jack device */
1396 #endif
1397       DeleteCriticalSection(&wwo->access_crst); /* delete the critical section so we can initialize it again from wodOpen() */
1398
1399       ret = wodNotifyClient(wwo, WOM_CLOSE, 0L, 0L);
1400     }
1401
1402     return ret;
1403 }
1404
1405
1406 /**************************************************************************
1407  *                              wodWrite                        [internal]
1408  *
1409  */
1410 static DWORD wodWrite(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize)
1411 {
1412     LPWAVEHDR*wh;
1413     WINE_WAVEOUT *wwo;
1414
1415     TRACE("(%u, %p, %08X);\n", wDevID, lpWaveHdr, dwSize);
1416
1417     /* first, do the sanity checks... */
1418     if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1419     {
1420       WARN("bad dev ID !\n");
1421       return MMSYSERR_BADDEVICEID;
1422     }
1423
1424     wwo = &WOutDev[wDevID];
1425
1426     if (lpWaveHdr->lpData == NULL || !(lpWaveHdr->dwFlags & WHDR_PREPARED))
1427     {
1428       TRACE("unprepared\n");
1429       return WAVERR_UNPREPARED;
1430     }
1431
1432     if (lpWaveHdr->dwFlags & WHDR_INQUEUE)
1433     {
1434       TRACE("still playing\n");
1435       return WAVERR_STILLPLAYING;
1436     }
1437
1438     lpWaveHdr->dwFlags &= ~WHDR_DONE;
1439     lpWaveHdr->dwFlags |= WHDR_INQUEUE;
1440     lpWaveHdr->lpNext = 0;
1441
1442     EnterCriticalSection(&wwo->access_crst);
1443
1444     /* insert buffer at the end of queue */
1445     for (wh = &(wwo->lpQueuePtr); *wh; wh = &((*wh)->lpNext));
1446     *wh = lpWaveHdr;
1447
1448     if (!wwo->lpPlayPtr)
1449       wodHelper_BeginWaveHdr(wwo,lpWaveHdr);
1450     if (wwo->state == WINE_WS_STOPPED)
1451       wwo->state = WINE_WS_PLAYING;
1452     LeaveCriticalSection(&wwo->access_crst);
1453
1454     return MMSYSERR_NOERROR;
1455 }
1456
1457 /**************************************************************************
1458  *                      wodPause                                [internal]
1459  */
1460 static DWORD wodPause(WORD wDevID)
1461 {
1462   TRACE("(%u);!\n", wDevID);
1463
1464   if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1465   {
1466     WARN("bad device ID !\n");
1467     return MMSYSERR_BADDEVICEID;
1468   }
1469
1470   TRACE("[3-PAUSING]\n");
1471
1472   EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1473   wodHelper_Reset(&WOutDev[wDevID], FALSE);
1474   LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1475
1476   return MMSYSERR_NOERROR;
1477 }
1478
1479 /**************************************************************************
1480  *                      wodRestart                              [internal]
1481  */
1482 static DWORD wodRestart(WORD wDevID)
1483 {
1484     TRACE("(%u);\n", wDevID);
1485
1486     if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1487     {
1488       WARN("bad device ID !\n");
1489       return MMSYSERR_BADDEVICEID;
1490     }
1491
1492     if (WOutDev[wDevID].state == WINE_WS_PAUSED)
1493     {
1494       EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1495       WOutDev[wDevID].state = WINE_WS_PLAYING;
1496       LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1497     }
1498
1499     return MMSYSERR_NOERROR;
1500 }
1501
1502 /**************************************************************************
1503  *                      wodReset                                [internal]
1504  */
1505 static DWORD wodReset(WORD wDevID)
1506 {
1507     TRACE("(%u);\n", wDevID);
1508
1509     if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1510     {
1511       WARN("bad device ID !\n");
1512       return MMSYSERR_BADDEVICEID;
1513     }
1514
1515     EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1516     wodHelper_Reset(&WOutDev[wDevID], TRUE);
1517     LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1518
1519     return MMSYSERR_NOERROR;
1520 }
1521
1522 /**************************************************************************
1523  *                              wodGetPosition                  [internal]
1524  */
1525 static DWORD wodGetPosition(WORD wDevID, LPMMTIME lpTime, DWORD uSize)
1526 {
1527     DWORD               val;
1528     WINE_WAVEOUT*       wwo;
1529     DWORD elapsedMS;
1530
1531     TRACE("(%u, %p, %u);\n", wDevID, lpTime, uSize);
1532
1533     if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1534     {
1535       WARN("bad device ID !\n");
1536       return MMSYSERR_BADDEVICEID;
1537     }
1538
1539     /* if null pointer to time structure return error */
1540     if (lpTime == NULL) return MMSYSERR_INVALPARAM;
1541
1542     wwo = &WOutDev[wDevID];
1543
1544     EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1545     val = wwo->dwPlayedTotal;
1546     elapsedMS = GetTickCount() - wwo->tickCountMS;
1547     LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1548
1549     /* account for the bytes played since the last JACK_Callback() */
1550     val+=((elapsedMS * wwo->format.wf.nAvgBytesPerSec) / 1000);
1551
1552     return bytes_to_mmtime(lpTime, val, &wwo->format);
1553 }
1554
1555 /**************************************************************************
1556  *                              wodBreakLoop                    [internal]
1557  */
1558 static DWORD wodBreakLoop(WORD wDevID)
1559 {
1560   TRACE("(%u);\n", wDevID);
1561
1562   if (wDevID >= MAX_WAVEOUTDRV || !WOutDev[wDevID].client)
1563   {
1564     WARN("bad device ID !\n");
1565     return MMSYSERR_BADDEVICEID;
1566   }
1567
1568   EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1569
1570   if (WOutDev[wDevID].state == WINE_WS_PLAYING && WOutDev[wDevID].lpLoopPtr != NULL)
1571   {
1572     /* ensure exit at end of current loop */
1573     WOutDev[wDevID].dwLoops = 1;
1574   }
1575
1576   LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1577
1578   return MMSYSERR_NOERROR;
1579 }
1580
1581 /**************************************************************************
1582  *                              wodGetVolume                    [internal]
1583  */
1584 static DWORD wodGetVolume(WORD wDevID, LPDWORD lpdwVol)
1585 {
1586   DWORD left, right;
1587
1588   left = WOutDev[wDevID].volume_left;
1589   right = WOutDev[wDevID].volume_right;
1590
1591   TRACE("(%u, %p);\n", wDevID, lpdwVol);
1592
1593   *lpdwVol = ((left * 0xFFFFl) / 100) + (((right * 0xFFFFl) / 100) <<
1594               16);
1595
1596   return MMSYSERR_NOERROR;
1597 }
1598
1599 /**************************************************************************
1600  *                              wodSetVolume                    [internal]
1601  */
1602 static DWORD wodSetVolume(WORD wDevID, DWORD dwParam)
1603 {
1604   DWORD left, right;
1605
1606   left  = (LOWORD(dwParam) * 100) / 0xFFFFl;
1607   right = (HIWORD(dwParam) * 100) / 0xFFFFl;
1608
1609   TRACE("(%u, %08X);\n", wDevID, dwParam);
1610
1611   EnterCriticalSection(&(WOutDev[wDevID].access_crst));
1612
1613   WOutDev[wDevID].volume_left = left;
1614   WOutDev[wDevID].volume_right = right;
1615
1616   LeaveCriticalSection(&(WOutDev[wDevID].access_crst));
1617
1618   return MMSYSERR_NOERROR;
1619 }
1620
1621 /**************************************************************************
1622  *                              wodGetNumDevs                   [internal]
1623  */
1624 static DWORD wodGetNumDevs(void)
1625 {
1626   return MAX_WAVEOUTDRV;
1627 }
1628
1629 /**************************************************************************
1630  *                              wodDevInterfaceSize             [internal]
1631  */
1632 static DWORD wodDevInterfaceSize(UINT wDevID, LPDWORD dwParam1)
1633 {
1634     TRACE("(%u, %p)\n", wDevID, dwParam1);
1635
1636     *dwParam1 = MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1,
1637                                     NULL, 0 ) * sizeof(WCHAR);
1638     return MMSYSERR_NOERROR;
1639 }
1640
1641 /**************************************************************************
1642  *                              wodDevInterface                 [internal]
1643  */
1644 static DWORD wodDevInterface(UINT wDevID, PWCHAR dwParam1, DWORD dwParam2)
1645 {
1646     if (dwParam2 >= MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1,
1647                                         NULL, 0 ) * sizeof(WCHAR))
1648     {
1649         MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1,
1650                             dwParam1, dwParam2 / sizeof(WCHAR));
1651         return MMSYSERR_NOERROR;
1652     }
1653     return MMSYSERR_INVALPARAM;
1654 }
1655
1656 /**************************************************************************
1657  *                              wodMessage (WINEJACK.7)
1658  */
1659 DWORD WINAPI JACK_wodMessage(UINT wDevID, UINT wMsg, DWORD dwUser,
1660                             DWORD dwParam1, DWORD dwParam2)
1661 {
1662   TRACE("(%u, %04X, %08X, %08X, %08X);\n",
1663   wDevID, wMsg, dwUser, dwParam1, dwParam2);
1664
1665   switch (wMsg) {
1666   case DRVM_INIT:
1667   case DRVM_EXIT:
1668   case DRVM_ENABLE:
1669   case DRVM_DISABLE:
1670     /* FIXME: Pretend this is supported */
1671     return 0;
1672   case WODM_OPEN:             return wodOpen(wDevID, (LPWAVEOPENDESC)dwParam1,  dwParam2);
1673   case WODM_CLOSE:            return wodClose(wDevID);
1674   case WODM_WRITE:            return wodWrite(wDevID, (LPWAVEHDR)dwParam1,              dwParam2);
1675   case WODM_PAUSE:            return wodPause(wDevID);
1676   case WODM_GETPOS:           return wodGetPosition(wDevID, (LPMMTIME)dwParam1,                 dwParam2);
1677   case WODM_BREAKLOOP:        return wodBreakLoop(wDevID);
1678   case WODM_PREPARE:          return MMSYSERR_NOTSUPPORTED;
1679   case WODM_UNPREPARE:        return MMSYSERR_NOTSUPPORTED;
1680   case WODM_GETDEVCAPS:       return wodGetDevCaps(wDevID, (LPWAVEOUTCAPSW)dwParam1,    dwParam2);
1681   case WODM_GETNUMDEVS:       return wodGetNumDevs();
1682   case WODM_GETPITCH:         return MMSYSERR_NOTSUPPORTED;
1683   case WODM_SETPITCH:         return MMSYSERR_NOTSUPPORTED;
1684   case WODM_GETPLAYBACKRATE:    return MMSYSERR_NOTSUPPORTED;
1685   case WODM_SETPLAYBACKRATE:    return MMSYSERR_NOTSUPPORTED;
1686   case WODM_GETVOLUME:        return wodGetVolume(wDevID, (LPDWORD)dwParam1);
1687   case WODM_SETVOLUME:        return wodSetVolume(wDevID, dwParam1);
1688   case WODM_RESTART:          return wodRestart(wDevID);
1689   case WODM_RESET:            return wodReset(wDevID);
1690
1691   case DRV_QUERYDEVICEINTERFACESIZE: return wodDevInterfaceSize       (wDevID, (LPDWORD)dwParam1);
1692   case DRV_QUERYDEVICEINTERFACE:     return wodDevInterface           (wDevID, (PWCHAR)dwParam1, dwParam2);
1693   case DRV_QUERYDSOUNDIFACE:    return wodDsCreate(wDevID, (PIDSDRIVER*)dwParam1);
1694   case DRV_QUERYDSOUNDDESC:     return wodDsDesc(wDevID, (PDSDRIVERDESC)dwParam1);
1695   default:
1696     FIXME("unknown message %d!\n", wMsg);
1697     }
1698     return MMSYSERR_NOTSUPPORTED;
1699 }
1700
1701 /*======================================================================*
1702  *                  Low level DSOUND implementation                     *
1703  *======================================================================*/
1704
1705 typedef struct IDsDriverImpl IDsDriverImpl;
1706 typedef struct IDsDriverBufferImpl IDsDriverBufferImpl;
1707
1708 struct IDsDriverImpl
1709 {
1710     /* IUnknown fields */
1711     const IDsDriverVtbl *lpVtbl;
1712     DWORD               ref;
1713     /* IDsDriverImpl fields */
1714     UINT                wDevID;
1715     IDsDriverBufferImpl*primary;
1716 };
1717
1718 struct IDsDriverBufferImpl
1719 {
1720     /* IUnknown fields */
1721     const IDsDriverBufferVtbl *lpVtbl;
1722     DWORD ref;
1723     /* IDsDriverBufferImpl fields */
1724     IDsDriverImpl* drv;
1725     DWORD buflen;
1726 };
1727
1728 static DWORD wodDsCreate(UINT wDevID, PIDSDRIVER* drv)
1729 {
1730     /* we can't perform memory mapping as we don't have a file stream
1731       interface with jack like we do with oss */
1732     MESSAGE("This sound card's driver does not support direct access\n");
1733     MESSAGE("The (slower) DirectSound HEL mode will be used instead.\n");
1734     return MMSYSERR_NOTSUPPORTED;
1735 }
1736
1737 static DWORD wodDsDesc(UINT wDevID, PDSDRIVERDESC desc)
1738 {
1739     memset(desc, 0, sizeof(*desc));
1740     strcpy(desc->szDesc, "Wine jack DirectSound Driver");
1741     strcpy(desc->szDrvname, "winejack.drv");
1742     return MMSYSERR_NOERROR;
1743 }
1744
1745 /*======================================================================*
1746  *                  Low level WAVE IN implementation                    *
1747  *======================================================================*/
1748
1749 /**************************************************************************
1750  *                      widNotifyClient                 [internal]
1751  */
1752 static DWORD widNotifyClient(WINE_WAVEIN* wwi, WORD wMsg, DWORD dwParam1, DWORD dwParam2)
1753 {
1754     TRACE("wMsg = 0x%04x dwParm1 = %04X dwParam2 = %04X\n", wMsg, dwParam1, dwParam2);
1755
1756     switch (wMsg) {
1757     case WIM_OPEN:
1758     case WIM_CLOSE:
1759     case WIM_DATA:
1760       if (wwi->wFlags != DCB_NULL &&
1761         !DriverCallback(wwi->waveDesc.dwCallback, wwi->wFlags,
1762           (HDRVR)wwi->waveDesc.hWave, wMsg, wwi->waveDesc.dwInstance,
1763           dwParam1, dwParam2))
1764       {
1765         WARN("can't notify client !\n");
1766         return MMSYSERR_ERROR;
1767       }
1768     break;
1769     default:
1770       FIXME("Unknown callback message %u\n", wMsg);
1771         return MMSYSERR_INVALPARAM;
1772     }
1773     return MMSYSERR_NOERROR;
1774 }
1775
1776 /******************************************************************
1777  *    JACK_callback_wwi
1778  */
1779 /* everytime the jack server wants something from us it calls this
1780    function */
1781 int JACK_callback_wwi (nframes_t nframes, void *arg)
1782 {
1783     sample_t* in_l;
1784     sample_t* in_r = 0;
1785     WINE_WAVEIN* wwi = (WINE_WAVEIN*)arg;
1786
1787     TRACE("wDevID: %u, nframes %u\n", wwi->wDevID, nframes);
1788
1789     if(!wwi->client)
1790         ERR("client is closed, this is weird...\n");
1791
1792     in_l = (sample_t *) fp_jack_port_get_buffer(wwi->in_port_l, nframes);
1793
1794     if (wwi->in_port_r)
1795       in_r = (sample_t *) fp_jack_port_get_buffer(wwi->in_port_r, nframes);
1796
1797     EnterCriticalSection(&wwi->access_crst);
1798
1799     if((wwi->lpQueuePtr != NULL) && (wwi->state == WINE_WS_PLAYING))
1800     {
1801         LPWAVEHDR lpWaveHdr = wwi->lpQueuePtr;
1802         nframes_t jackFramesLeft = nframes;
1803
1804 #if JACK_CLOSE_HACK
1805         if(wwi->in_use == FALSE)
1806         {
1807             /* do nothing if nothing is being recorded */
1808             LeaveCriticalSection(&wwi->access_crst);
1809             return 0;
1810         }
1811 #endif
1812
1813         TRACE("wwi.state == WINE_WS_PLAYING\n");
1814
1815         while (lpWaveHdr && jackFramesLeft)
1816         {
1817             DWORD waveHdrFramesLeft = (lpWaveHdr->dwBufferLength - lpWaveHdr->dwBytesRecorded) / (sizeof(short) * wwi->format.wf.nChannels);
1818             DWORD numFrames = min (jackFramesLeft, waveHdrFramesLeft);
1819
1820             TRACE ("dwBufferLength=(%u) dwBytesRecorded=(%d)\n",   lpWaveHdr->dwBufferLength, lpWaveHdr->dwBytesRecorded);
1821             TRACE ("jackFramesLeft=(%u) waveHdrFramesLeft=(%u)\n", jackFramesLeft, waveHdrFramesLeft);
1822
1823             if (!in_r) {
1824               /* mono */
1825               sample_move_s16_d16((short *)((char *)lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded), in_l+(nframes-jackFramesLeft), numFrames, 1);
1826             } else {
1827               /* stereo */
1828               sample_move_s16_d16((short *)((char *)lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded),
1829                                   in_l+(nframes-jackFramesLeft), numFrames, 2);
1830               sample_move_s16_d16((short *)((char *)lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded + sizeof(short)),
1831                                   in_r+(nframes-jackFramesLeft), numFrames, 2);
1832             }
1833
1834             lpWaveHdr->dwBytesRecorded += (numFrames * sizeof(short) * wwi->format.wf.nChannels );
1835             jackFramesLeft -= numFrames;
1836
1837             if (lpWaveHdr->dwBytesRecorded >= lpWaveHdr->dwBufferLength)
1838             {
1839                 /* must copy the value of next waveHdr, because we have no idea of what
1840                  * will be done with the content of lpWaveHdr in callback
1841                  */
1842                 LPWAVEHDR       lpNext = lpWaveHdr->lpNext;
1843
1844                 lpWaveHdr->dwFlags &= ~WHDR_INQUEUE;
1845                 lpWaveHdr->dwFlags |=  WHDR_DONE;
1846
1847                 TRACE("WaveHdr full. dwBytesRecorded=(%u) dwFlags=(0x%x)\n",lpWaveHdr->dwBytesRecorded,lpWaveHdr->dwFlags);
1848
1849                 widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0);
1850
1851                 lpWaveHdr = wwi->lpQueuePtr = lpNext;
1852             }
1853         }
1854         TRACE ("jackFramesLeft=(%u) lpWaveHdr=(%p)\n", jackFramesLeft, lpWaveHdr);
1855         if (jackFramesLeft > 0) { WARN("Record buffer ran out of WaveHdrs\n"); }
1856     }
1857
1858     LeaveCriticalSection(&wwi->access_crst);
1859
1860     return 0;
1861 }
1862
1863 /******************************************************************
1864  *              JACK_OpenWaveInDevice
1865  */
1866 static int JACK_OpenWaveInDevice(WINE_WAVEIN* wwi, WORD nChannels)
1867 {
1868   const char** ports;
1869   int i;
1870   char client_name[64];
1871   jack_port_t* in_port_l;
1872   jack_port_t* in_port_r = 0;
1873   jack_client_t* client;
1874   int failed = 0;
1875
1876   TRACE("creating jack client and setting up callbacks\n");
1877
1878   if ((nChannels == 0) || (nChannels > 2)) {
1879     ERR ("nChannels = (%d), but we only support mono or stereo.\n", nChannels);
1880     return 0;
1881   }
1882
1883 #if JACK_CLOSE_HACK
1884   /* see if this device is already open */
1885         if(wwi->client)
1886         {
1887           /* if this device is already in use then it is bad for us to be in here */
1888           if(wwi->in_use)
1889             return 0;
1890
1891           TRACE("using existing client\n");
1892           wwi->in_use = TRUE;
1893           return 1;
1894         }
1895 #endif
1896
1897         /* zero out the buffer pointer and the size of the buffer */
1898         wwi->sound_buffer = 0;
1899         wwi->buffer_size = 0;
1900
1901         /* try to become a client of the JACK server */
1902         snprintf(client_name, sizeof(client_name), "wine_jack_in_%d", wwi->wDevID);
1903         TRACE("client name '%s'\n", client_name);
1904         if ((client = fp_jack_client_new (client_name)) == 0)
1905         {
1906                 /* jack has problems with shutting down clients, so lets */
1907                 /* wait a short while and try once more before we give up */
1908                 Sleep(250);
1909                 if ((client = fp_jack_client_new (client_name)) == 0)
1910                 {
1911                   ERR("jack server not running?\n");
1912                   return 0;
1913                 }
1914         }
1915         wwi->client = client;
1916
1917         /* tell the JACK server to call `JACK_wwi_callback()' whenever
1918            there is work to be done. */
1919         fp_jack_set_process_callback (client, JACK_callback_wwi, wwi);
1920
1921         /* tell the JACK server to call `JACK_bufsize_wwi()' whenever
1922            the maximum number of frames that will be passed
1923            to `JACK_Callback()' changes */
1924         fp_jack_set_buffer_size_callback (client, JACK_bufsize_wwi, wwi);
1925
1926         /* tell the JACK server to call `srate()' whenever
1927            the sample rate of the system changes. */
1928         fp_jack_set_sample_rate_callback (client, JACK_srate, wwi);
1929
1930         /* tell the JACK server to call `jack_shutdown()' if
1931            it ever shuts down, either entirely, or if it
1932            just decides to stop calling us. */
1933         fp_jack_on_shutdown (client, JACK_shutdown_wwi, wwi);
1934
1935         /* display the current sample rate. once the client is activated
1936            (see below), you should rely on your own sample rate
1937            callback (see above) for this value. */
1938         wwi->sample_rate = fp_jack_get_sample_rate(client);
1939         TRACE("engine sample rate: %lu\n", wwi->sample_rate);
1940
1941         /* create the left and right channel output ports */
1942         /* jack's ports are all mono so for stereo you need two */
1943         in_port_l = fp_jack_port_register (client, "in_l",
1944                          JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput, 0);
1945         wwi->in_port_l = in_port_l;
1946         TRACE("Created port. (%p)\n", in_port_l);
1947
1948         if (nChannels == 2)
1949         {
1950           in_port_r = fp_jack_port_register (client, "in_r",
1951                            JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput, 0);
1952           TRACE("Created port. (%p)\n", in_port_r);
1953         }
1954         wwi->in_port_r = in_port_r;
1955
1956 #if JACK_CLOSE_HACK
1957         wwi->in_use = TRUE; /* mark this device as in use since it now is ;-) */
1958 #endif
1959
1960         TRACE("activating client.\n");
1961         /* tell the JACK server that we are ready to roll */
1962         if (fp_jack_activate (client))
1963         {
1964           ERR( "cannot activate client\n");
1965           return 0;
1966         }
1967         TRACE("activated client.\n");
1968         /* figure out what the ports that we want to output on are */
1969         /* NOTE: we do this instead of using stuff like "alsa_pcm:playback_X" because */
1970         /*   this way works if names are changed */
1971         ports = fp_jack_get_ports(client, NULL, NULL, JackPortIsPhysical|JackPortIsOutput);
1972
1973         /* display a trace of the output ports we found */
1974         for(i = 0; ports[i]; i++)
1975         {
1976           TRACE("ports[%d] = '%s'\n", i, ports[i]);
1977         }
1978
1979         if(!ports)
1980         {
1981           ERR("jack_get_ports() failed to find 'JackPortIsPhysical|JackPortIsOutput'\n");
1982         }
1983
1984         /* connect the ports. Note: you can't do this before
1985            the client is activated (this may change in the future).
1986         */
1987         /* we want to connect to two ports so we have stereo input ;-) */
1988
1989         if(fp_jack_connect(client, ports[0], fp_jack_port_name(in_port_l)))
1990         {
1991           ERR ("cannot connect to input port %d('%s')\n", 0, ports[0]);
1992           failed = 1;
1993         }
1994         TRACE("Connected (%s)<->(%s)\n",ports[0],fp_jack_port_name(in_port_l));
1995
1996         if ((nChannels == 2) && in_port_r) {
1997           if(fp_jack_connect(client, ports[1], fp_jack_port_name(in_port_r)))
1998           {
1999             ERR ("cannot connect to input port %d('%s')\n", 1, ports[1]);
2000             failed = 1;
2001           }
2002           TRACE("Connected (%s)<->(%s)\n",ports[1],fp_jack_port_name(in_port_r));
2003         }
2004         free(ports); /* free the returned array of ports */
2005
2006         /* if something failed we need to shut the client down and return 0 */
2007         if(failed)
2008         {
2009 #if JACK_CLOSE_HACK
2010           JACK_CloseWaveInDevice(wwi, TRUE);
2011 #else
2012           JACK_CloseWaveInDevice(wwi);
2013 #endif
2014           return 0;
2015         }
2016
2017         TRACE("return success.\n");
2018         return 1; /* return success */
2019 }
2020
2021 /**************************************************************************
2022  *                      widGetDevCaps                           [internal]
2023  */
2024 static DWORD widGetDevCaps(WORD wDevID, LPWAVEINCAPSW lpCaps, DWORD dwSize)
2025 {
2026     TRACE("(%u, %p, %u);\n", wDevID, lpCaps, dwSize);
2027
2028     if (lpCaps == NULL) return MMSYSERR_NOTENABLED;
2029
2030     if (wDevID >= MAX_WAVEINDRV) {
2031         TRACE("MAX_WAVEINDRV reached !\n");
2032         return MMSYSERR_BADDEVICEID;
2033     }
2034
2035     memcpy(lpCaps, &WInDev[wDevID].caps, min(dwSize, sizeof(*lpCaps)));
2036     return MMSYSERR_NOERROR;
2037 }
2038
2039 /**************************************************************************
2040  *                              widOpen                         [internal]
2041  */
2042 static DWORD widOpen(WORD wDevID, LPWAVEOPENDESC lpDesc, DWORD dwFlags)
2043 {
2044     WINE_WAVEIN*        wwi;
2045     DWORD retval;
2046
2047     TRACE("(%u, %p, %08X);\n", wDevID, lpDesc, dwFlags);
2048     if (lpDesc == NULL)
2049     {
2050         WARN("Invalid Parameter !\n");
2051         return MMSYSERR_INVALPARAM;
2052     }
2053     if (wDevID >= MAX_WAVEINDRV) {
2054         TRACE ("MAX_WAVEINDRV reached !\n");
2055         return MMSYSERR_BADDEVICEID;
2056     }
2057
2058 #if JACK_CLOSE_HACK
2059     if(WInDev[wDevID].client && WOutDev[wDevID].in_use)
2060 #else
2061     if(WInDev[wDevID].client)
2062 #endif
2063     {
2064       TRACE("device %d already allocated\n", wDevID);
2065       return MMSYSERR_ALLOCATED;
2066     }
2067
2068     /* Only the PCM format is supported so far...
2069      * Also we only support 16 bit mode.
2070      */
2071     if (lpDesc->lpFormat->wFormatTag != WAVE_FORMAT_PCM ||
2072       lpDesc->lpFormat->nChannels == 0 ||
2073       lpDesc->lpFormat->nSamplesPerSec == 0 ||
2074       lpDesc->lpFormat->wBitsPerSample!=16)
2075     {
2076       WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%d wBitsPerSample=%d !\n",
2077        lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels,
2078        lpDesc->lpFormat->nSamplesPerSec, lpDesc->lpFormat->wBitsPerSample);
2079       return WAVERR_BADFORMAT;
2080     }
2081
2082     if (dwFlags & WAVE_FORMAT_QUERY)
2083     {
2084       TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%d !\n",
2085        lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels,
2086        lpDesc->lpFormat->nSamplesPerSec);
2087       return MMSYSERR_NOERROR;
2088     }
2089
2090     wwi = &WInDev[wDevID];
2091     wwi->wDevID = wDevID;
2092
2093     /* Set things up before we call JACK_OpenWaveOutDevice because */
2094     /* we will start getting callbacks before JACK_OpenWaveOutDevice */
2095     /* even returns and we want to be initialized before then */
2096     wwi->state = WINE_WS_STOPPED; /* start in a stopped state */
2097
2098     InitializeCriticalSection(&wwi->access_crst); /* initialize the critical section */
2099     EnterCriticalSection(&wwi->access_crst);
2100
2101     /* open up jack ports for this device */
2102     if (!JACK_OpenWaveInDevice(&WInDev[wDevID], lpDesc->lpFormat->nChannels))
2103     {
2104       ERR("JACK_OpenWaveInDevice(%d) failed\n", wDevID);
2105       LeaveCriticalSection(&wwi->access_crst);
2106       DeleteCriticalSection(&wwi->access_crst);
2107       return MMSYSERR_ERROR;            /* return unspecified error */
2108     }
2109
2110     dwFlags &= ~WAVE_DIRECTSOUND;  /* direct sound not supported, ignore the flag */
2111
2112     wwi->wFlags = HIWORD(dwFlags & CALLBACK_TYPEMASK);
2113
2114     wwi->waveDesc = *lpDesc;
2115     memcpy(&wwi->format,   lpDesc->lpFormat, sizeof(PCMWAVEFORMAT));
2116
2117     LeaveCriticalSection(&wwi->access_crst);
2118
2119     /* display the current wave format */
2120     TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%u, nSamplesPerSec=%u, nChannels=%u nBlockAlign=%u!\n",
2121     wwi->format.wBitsPerSample, wwi->format.wf.nAvgBytesPerSec,
2122     wwi->format.wf.nSamplesPerSec, wwi->format.wf.nChannels,
2123     wwi->format.wf.nBlockAlign);
2124
2125     /* make sure that we have the same sample rate in our audio stream */
2126     /* as we do in the jack server */
2127     if(wwi->format.wf.nSamplesPerSec != wwi->sample_rate)
2128     {
2129       TRACE("error: jack server sample rate is '%ld', wave sample rate is '%d'\n",
2130          wwi->sample_rate, wwi->format.wf.nSamplesPerSec);
2131
2132 #if JACK_CLOSE_HACK
2133       JACK_CloseWaveInDevice(wwi, FALSE); /* close this device, don't force the client to close */
2134 #else
2135       JACK_CloseWaveInDevice(wwi); /* close this device */
2136 #endif
2137       DeleteCriticalSection(&wwi->access_crst);
2138       return WAVERR_BADFORMAT;
2139     }
2140
2141     /* check for an invalid number of bits per sample */
2142     if (wwi->format.wBitsPerSample == 0)
2143     {
2144       WARN("Resetting zeroed wBitsPerSample\n");
2145       wwi->format.wBitsPerSample = 8 *
2146       (wwi->format.wf.nAvgBytesPerSec /
2147        wwi->format.wf.nSamplesPerSec) /
2148        wwi->format.wf.nChannels;
2149     }
2150
2151     TRACE("notify client.\n");
2152     EnterCriticalSection(&wwi->access_crst);
2153     retval = widNotifyClient(wwi, WIM_OPEN, 0L, 0L);
2154     LeaveCriticalSection(&wwi->access_crst);
2155
2156     return retval;
2157 }
2158 /**************************************************************************
2159  *                              widClose                        [internal]
2160  */
2161 static DWORD widClose(WORD wDevID)
2162 {
2163     DWORD               ret = MMSYSERR_NOERROR;
2164     WINE_WAVEIN*        wwi;
2165
2166     TRACE("(%u);\n", wDevID);
2167
2168     if (wDevID >= MAX_WAVEINDRV || !WInDev[wDevID].client)
2169     {
2170       WARN("bad device ID !\n");
2171       return MMSYSERR_BADDEVICEID;
2172     }
2173
2174     wwi = &WInDev[wDevID];
2175     if (wwi->lpQueuePtr)
2176     {
2177       WARN("buffers still playing !\n");
2178       ret = WAVERR_STILLPLAYING;
2179     } else
2180     {
2181         /* sanity check: this should not happen since the device must have been reset before */
2182         if (wwi->lpQueuePtr) ERR("out of sync\n");
2183
2184         wwi->state = WINE_WS_CLOSED; /* mark the device as closed */
2185
2186 #if JACK_CLOSE_HACK
2187         JACK_CloseWaveInDevice(wwi, FALSE); /* close the jack device, DO NOT force the client to close */
2188 #else
2189         JACK_CloseWaveInDevice(wwi); /* close the jack device */
2190 #endif
2191         DeleteCriticalSection(&wwi->access_crst); /* delete the critical section so we can initialize it again from wodOpen() */
2192
2193         ret = widNotifyClient(wwi, WIM_CLOSE, 0L, 0L);
2194     }
2195
2196     return ret;
2197 }
2198
2199 /**************************************************************************
2200  *                              widAddBuffer            [internal]
2201  */
2202 static DWORD widAddBuffer(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize)
2203 {
2204     WINE_WAVEIN* wwi = &WInDev[wDevID];
2205
2206     TRACE("(%u, %p, %08X);\n", wDevID, lpWaveHdr, dwSize);
2207
2208     if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) {
2209                                 WARN("can't do it !\n");
2210                                 return MMSYSERR_INVALHANDLE;
2211     }
2212     if (!(lpWaveHdr->dwFlags & WHDR_PREPARED)) {
2213                                 TRACE("never been prepared !\n");
2214                                 return WAVERR_UNPREPARED;
2215     }
2216     if (lpWaveHdr->dwFlags & WHDR_INQUEUE) {
2217                                 TRACE("header already in use !\n");
2218                                 return WAVERR_STILLPLAYING;
2219     }
2220
2221     lpWaveHdr->dwFlags |= WHDR_INQUEUE;
2222     lpWaveHdr->dwFlags &= ~WHDR_DONE;
2223     lpWaveHdr->dwBytesRecorded = 0;
2224     lpWaveHdr->lpNext = NULL;
2225
2226     EnterCriticalSection(&wwi->access_crst);
2227     /* insert buffer at end of queue */
2228     {
2229         LPWAVEHDR* wh;
2230         for (wh = &(wwi->lpQueuePtr); *wh; wh = &((*wh)->lpNext));
2231         *wh=lpWaveHdr;
2232     }
2233     LeaveCriticalSection(&wwi->access_crst);
2234
2235     return MMSYSERR_NOERROR;
2236 }
2237
2238 /**************************************************************************
2239  *                      widStart                                [internal]
2240  */
2241 static DWORD widStart(WORD wDevID)
2242 {
2243     TRACE("(%u);\n", wDevID);
2244     if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) {
2245         WARN("can't start recording !\n");
2246         return MMSYSERR_INVALHANDLE;
2247     }
2248
2249     WInDev[wDevID].state = WINE_WS_PLAYING;
2250     return MMSYSERR_NOERROR;
2251 }
2252
2253 /**************************************************************************
2254  *                      widStop                                 [internal]
2255  */
2256 static DWORD widStop(WORD wDevID)
2257 {
2258     WINE_WAVEIN* wwi = &WInDev[wDevID];
2259
2260     TRACE("(%u);\n", wDevID);
2261     if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) {
2262         WARN("can't stop !\n");
2263         return MMSYSERR_INVALHANDLE;
2264     }
2265
2266     if (wwi->state != WINE_WS_STOPPED)
2267     {
2268         WAVEHDR*                lpWaveHdr;
2269         /* do something here to stop recording ??? */
2270
2271         /* return current buffer to app */
2272         lpWaveHdr = wwi->lpQueuePtr;
2273         if (lpWaveHdr)
2274         {
2275             LPWAVEHDR   lpNext = lpWaveHdr->lpNext;
2276             TRACE("stop %p %p\n", lpWaveHdr, lpWaveHdr->lpNext);
2277             lpWaveHdr->dwFlags &= ~WHDR_INQUEUE;
2278             lpWaveHdr->dwFlags |= WHDR_DONE;
2279             widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0);
2280             wwi->lpQueuePtr = lpNext;
2281         }
2282     }
2283     wwi->state = WINE_WS_STOPPED;
2284
2285     return MMSYSERR_NOERROR;
2286 }
2287
2288 /**************************************************************************
2289  *                      widReset                                [internal]
2290  */
2291 static DWORD widReset(WORD wDevID)
2292 {
2293     WINE_WAVEIN* wwi = &WInDev[wDevID];
2294     WAVEHDR*            lpWaveHdr;
2295
2296     TRACE("(%u);\n", wDevID);
2297     if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) {
2298         WARN("can't reset !\n");
2299         return MMSYSERR_INVALHANDLE;
2300     }
2301
2302     wwi->state = WINE_WS_STOPPED;
2303
2304     /* return all buffers to the app */
2305     for (lpWaveHdr = wwi->lpQueuePtr; lpWaveHdr; lpWaveHdr = lpWaveHdr->lpNext) {
2306         TRACE("reset %p %p\n", lpWaveHdr, lpWaveHdr->lpNext);
2307         lpWaveHdr->dwFlags &= ~WHDR_INQUEUE;
2308         lpWaveHdr->dwFlags |= WHDR_DONE;
2309
2310         widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0);
2311     }
2312     wwi->lpQueuePtr = NULL;
2313
2314     return MMSYSERR_NOERROR;
2315 }
2316
2317 /**************************************************************************
2318  *                              widGetNumDevs                   [internal]
2319  */
2320 static DWORD widGetNumDevs(void)
2321 {
2322   return MAX_WAVEINDRV;
2323 }
2324
2325 /**************************************************************************
2326  *                              widDevInterfaceSize             [internal]
2327  */
2328 static DWORD widDevInterfaceSize(UINT wDevID, LPDWORD dwParam1)
2329 {
2330     TRACE("(%u, %p)\n", wDevID, dwParam1);
2331
2332
2333     *dwParam1 = MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1,
2334                                     NULL, 0 ) * sizeof(WCHAR);
2335     return MMSYSERR_NOERROR;
2336 }
2337
2338 /**************************************************************************
2339  *                              widDevInterface                 [internal]
2340  */
2341 static DWORD widDevInterface(UINT wDevID, PWCHAR dwParam1, DWORD dwParam2)
2342 {
2343     if (dwParam2 >= MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1,
2344                                         NULL, 0 ) * sizeof(WCHAR))
2345     {
2346         MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1,
2347                             dwParam1, dwParam2 / sizeof(WCHAR));
2348         return MMSYSERR_NOERROR;
2349     }
2350     return MMSYSERR_INVALPARAM;
2351 }
2352
2353 /**************************************************************************
2354  *                              widMessage (WINEJACK.6)
2355  */
2356 DWORD WINAPI JACK_widMessage(WORD wDevID, WORD wMsg, DWORD dwUser,
2357                             DWORD dwParam1, DWORD dwParam2)
2358 {
2359   TRACE("(%u, %04X, %08X, %08X, %08X);\n",
2360   wDevID, wMsg, dwUser, dwParam1, dwParam2);
2361
2362     switch (wMsg) {
2363     case DRVM_INIT:
2364     case DRVM_EXIT:
2365     case DRVM_ENABLE:
2366     case DRVM_DISABLE:
2367         /* FIXME: Pretend this is supported */
2368         return 0;
2369     case WIDM_OPEN:             return widOpen          (wDevID, (LPWAVEOPENDESC)dwParam1,      dwParam2);
2370     case WIDM_CLOSE:            return widClose         (wDevID);
2371     case WIDM_ADDBUFFER:        return widAddBuffer     (wDevID, (LPWAVEHDR)dwParam1, dwParam2);
2372     case WIDM_PREPARE:          return MMSYSERR_NOTSUPPORTED;
2373     case WIDM_UNPREPARE:        return MMSYSERR_NOTSUPPORTED;
2374     case WIDM_GETDEVCAPS:       return widGetDevCaps    (wDevID, (LPWAVEINCAPSW)dwParam1,       dwParam2);
2375     case WIDM_GETNUMDEVS:       return widGetNumDevs();
2376     case WIDM_RESET:            return widReset         (wDevID);
2377     case WIDM_START:            return widStart         (wDevID);
2378     case WIDM_STOP:             return widStop          (wDevID);
2379     case DRV_QUERYDEVICEINTERFACESIZE: return widDevInterfaceSize       (wDevID, (LPDWORD)dwParam1);
2380     case DRV_QUERYDEVICEINTERFACE:     return widDevInterface           (wDevID, (PWCHAR)dwParam1, dwParam2);
2381     default:
2382         FIXME("unknown message %d!\n", wMsg);
2383     }
2384
2385   return MMSYSERR_NOTSUPPORTED;
2386 }
2387
2388 #else /* !SONAME_LIBJACK */
2389
2390 /**************************************************************************
2391  *                              widMessage (WINEJACK.6)
2392  */
2393 DWORD WINAPI JACK_widMessage(WORD wDevID, WORD wMsg, DWORD dwUser,
2394                             DWORD dwParam1, DWORD dwParam2)
2395 {
2396   FIXME("(%u, %04X, %08X, %08X, %08X):jack support not compiled into wine\n", wDevID, wMsg, dwUser, dwParam1, dwParam2);
2397   return MMSYSERR_NOTENABLED;
2398 }
2399
2400 /**************************************************************************
2401  *                              wodMessage (WINEJACK.7)
2402  */
2403 DWORD WINAPI JACK_wodMessage(WORD wDevID, WORD wMsg, DWORD dwUser,
2404                             DWORD dwParam1, DWORD dwParam2)
2405 {
2406   FIXME("(%u, %04X, %08X, %08X, %08X):jack support not compiled into wine\n", wDevID, wMsg, dwUser, dwParam1, dwParam2);
2407   return MMSYSERR_NOTENABLED;
2408 }
2409
2410 #endif /* SONAME_LIBJACK */