| /* -*- tab-width: 8; c-basic-offset: 4 -*- */ |
| /* |
| * Sample Wine Driver for Advanced Linux Sound System (ALSA) |
| * Based on version <final> of the ALSA API |
| * |
| * Copyright 2002 Eric Pouech |
| * 2002 Marco Pietrobono |
| * 2003 Christian Costa : WaveIn support |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| |
| /* unless someone makes a wineserver kernel module, Unix pipes are faster than win32 events */ |
| #define USE_PIPE_SYNC |
| |
| #include "config.h" |
| #include "wine/port.h" |
| |
| #include <stdlib.h> |
| #include <stdarg.h> |
| #include <stdio.h> |
| #include <string.h> |
| #ifdef HAVE_UNISTD_H |
| # include <unistd.h> |
| #endif |
| #include <errno.h> |
| #include <limits.h> |
| #include <fcntl.h> |
| #ifdef HAVE_SYS_IOCTL_H |
| # include <sys/ioctl.h> |
| #endif |
| #ifdef HAVE_SYS_MMAN_H |
| # include <sys/mman.h> |
| #endif |
| #include "windef.h" |
| #include "winbase.h" |
| #include "wingdi.h" |
| #include "winerror.h" |
| #include "winuser.h" |
| #include "winnls.h" |
| #include "winreg.h" |
| #include "mmddk.h" |
| #include "mmreg.h" |
| #include "dsound.h" |
| #include "dsdriver.h" |
| #include "ks.h" |
| #include "ksguid.h" |
| #include "ksmedia.h" |
| #define ALSA_PCM_NEW_HW_PARAMS_API |
| #define ALSA_PCM_NEW_SW_PARAMS_API |
| #include "alsa.h" |
| #include "wine/library.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(wave); |
| |
| |
| #if defined(HAVE_ALSA) && ((SND_LIB_MAJOR == 0 && SND_LIB_MINOR >= 9) || SND_LIB_MAJOR >= 1) |
| |
| /* internal ALSALIB functions */ |
| snd_pcm_uframes_t _snd_pcm_mmap_hw_ptr(snd_pcm_t *pcm); |
| |
| |
| #define MAX_WAVEOUTDRV (1) |
| #define MAX_WAVEINDRV (1) |
| |
| /* state diagram for waveOut writing: |
| * |
| * +---------+-------------+---------------+---------------------------------+ |
| * | state | function | event | new state | |
| * +---------+-------------+---------------+---------------------------------+ |
| * | | open() | | STOPPED | |
| * | PAUSED | write() | | PAUSED | |
| * | STOPPED | write() | <thrd create> | PLAYING | |
| * | PLAYING | write() | HEADER | PLAYING | |
| * | (other) | write() | <error> | | |
| * | (any) | pause() | PAUSING | PAUSED | |
| * | PAUSED | restart() | RESTARTING | PLAYING (if no thrd => STOPPED) | |
| * | (any) | reset() | RESETTING | STOPPED | |
| * | (any) | close() | CLOSING | CLOSED | |
| * +---------+-------------+---------------+---------------------------------+ |
| */ |
| |
| /* states of the playing device */ |
| #define WINE_WS_PLAYING 0 |
| #define WINE_WS_PAUSED 1 |
| #define WINE_WS_STOPPED 2 |
| #define WINE_WS_CLOSED 3 |
| |
| /* events to be send to device */ |
| enum win_wm_message { |
| WINE_WM_PAUSING = WM_USER + 1, WINE_WM_RESTARTING, WINE_WM_RESETTING, WINE_WM_HEADER, |
| WINE_WM_UPDATE, WINE_WM_BREAKLOOP, WINE_WM_CLOSING, WINE_WM_STARTING, WINE_WM_STOPPING |
| }; |
| |
| #ifdef USE_PIPE_SYNC |
| #define SIGNAL_OMR(omr) do { int x = 0; write((omr)->msg_pipe[1], &x, sizeof(x)); } while (0) |
| #define CLEAR_OMR(omr) do { int x = 0; read((omr)->msg_pipe[0], &x, sizeof(x)); } while (0) |
| #define RESET_OMR(omr) do { } while (0) |
| #define WAIT_OMR(omr, sleep) \ |
| do { struct pollfd pfd; pfd.fd = (omr)->msg_pipe[0]; \ |
| pfd.events = POLLIN; poll(&pfd, 1, sleep); } while (0) |
| #else |
| #define SIGNAL_OMR(omr) do { SetEvent((omr)->msg_event); } while (0) |
| #define CLEAR_OMR(omr) do { } while (0) |
| #define RESET_OMR(omr) do { ResetEvent((omr)->msg_event); } while (0) |
| #define WAIT_OMR(omr, sleep) \ |
| do { WaitForSingleObject((omr)->msg_event, sleep); } while (0) |
| #endif |
| |
| typedef struct { |
| enum win_wm_message msg; /* message identifier */ |
| DWORD param; /* parameter for this message */ |
| HANDLE hEvent; /* if message is synchronous, handle of event for synchro */ |
| } ALSA_MSG; |
| |
| /* implement an in-process message ring for better performance |
| * (compared to passing thru the server) |
| * this ring will be used by the input (resp output) record (resp playback) routine |
| */ |
| #define ALSA_RING_BUFFER_INCREMENT 64 |
| typedef struct { |
| ALSA_MSG * messages; |
| int ring_buffer_size; |
| int msg_tosave; |
| int msg_toget; |
| #ifdef USE_PIPE_SYNC |
| int msg_pipe[2]; |
| #else |
| HANDLE msg_event; |
| #endif |
| CRITICAL_SECTION msg_crst; |
| } ALSA_MSG_RING; |
| |
| typedef struct { |
| /* Windows information */ |
| volatile int state; /* one of the WINE_WS_ manifest constants */ |
| WAVEOPENDESC waveDesc; |
| WORD wFlags; |
| WAVEFORMATPCMEX format; |
| WAVEOUTCAPSA caps; |
| |
| /* ALSA information (ALSA 0.9/1.x uses two different devices for playback/capture) */ |
| char* device; |
| char interface_name[64]; |
| snd_pcm_t* p_handle; /* handle to ALSA playback device */ |
| snd_pcm_t* c_handle; /* handle to ALSA capture device */ |
| snd_pcm_hw_params_t * hw_params; /* ALSA Hw params */ |
| |
| snd_ctl_t * ctl; /* control handle for the playback volume */ |
| snd_ctl_elem_id_t * playback_eid; /* element id of the playback volume control */ |
| snd_ctl_elem_value_t * playback_evalue; /* element value of the playback volume control */ |
| snd_ctl_elem_info_t * playback_einfo; /* element info of the playback volume control */ |
| |
| snd_pcm_sframes_t (*write)(snd_pcm_t *, const void *, snd_pcm_uframes_t ); |
| |
| struct pollfd *ufds; |
| int count; |
| |
| DWORD dwBufferSize; /* size of whole ALSA buffer in bytes */ |
| LPWAVEHDR lpQueuePtr; /* start of queued WAVEHDRs (waiting to be notified) */ |
| LPWAVEHDR lpPlayPtr; /* start of not yet fully played buffers */ |
| DWORD dwPartialOffset; /* Offset of not yet written bytes in lpPlayPtr */ |
| |
| LPWAVEHDR lpLoopPtr; /* pointer of first buffer in loop, if any */ |
| DWORD dwLoops; /* private copy of loop counter */ |
| |
| DWORD dwPlayedTotal; /* number of bytes actually played since opening */ |
| DWORD dwWrittenTotal; /* number of bytes written to ALSA buffer since opening */ |
| |
| /* synchronization stuff */ |
| HANDLE hStartUpEvent; |
| HANDLE hThread; |
| DWORD dwThreadID; |
| ALSA_MSG_RING msgRing; |
| |
| /* DirectSound stuff */ |
| DSDRIVERDESC ds_desc; |
| } WINE_WAVEOUT; |
| |
| typedef struct { |
| /* Windows information */ |
| volatile int state; /* one of the WINE_WS_ manifest constants */ |
| WAVEOPENDESC waveDesc; |
| WORD wFlags; |
| WAVEFORMATPCMEX format; |
| WAVEOUTCAPSA caps; |
| |
| /* ALSA information (ALSA 0.9/1.x uses two different devices for playback/capture) */ |
| char* device; |
| char interface_name[64]; |
| snd_pcm_t* p_handle; /* handle to ALSA playback device */ |
| snd_pcm_t* c_handle; /* handle to ALSA capture device */ |
| snd_pcm_hw_params_t * hw_params; /* ALSA Hw params */ |
| |
| snd_ctl_t * ctl; /* control handle for the playback volume */ |
| snd_ctl_elem_id_t * playback_eid; /* element id of the playback volume control */ |
| snd_ctl_elem_value_t * playback_evalue; /* element value of the playback volume control */ |
| snd_ctl_elem_info_t * playback_einfo; /* element info of the playback volume control */ |
| |
| snd_pcm_sframes_t (*read)(snd_pcm_t *, void *, snd_pcm_uframes_t ); |
| |
| struct pollfd *ufds; |
| int count; |
| |
| DWORD dwPeriodSize; /* size of OSS buffer period */ |
| DWORD dwBufferSize; /* size of whole ALSA buffer in bytes */ |
| LPWAVEHDR lpQueuePtr; /* start of queued WAVEHDRs (waiting to be notified) */ |
| LPWAVEHDR lpPlayPtr; /* start of not yet fully played buffers */ |
| |
| LPWAVEHDR lpLoopPtr; /* pointer of first buffer in loop, if any */ |
| DWORD dwLoops; /* private copy of loop counter */ |
| |
| /*DWORD dwPlayedTotal; */ |
| DWORD dwTotalRecorded; |
| |
| /* synchronization stuff */ |
| HANDLE hStartUpEvent; |
| HANDLE hThread; |
| DWORD dwThreadID; |
| ALSA_MSG_RING msgRing; |
| |
| /* DirectSound stuff */ |
| DSDRIVERDESC ds_desc; |
| } WINE_WAVEIN; |
| |
| static WINE_WAVEOUT WOutDev [MAX_WAVEOUTDRV]; |
| static DWORD ALSA_WodNumDevs; |
| static WINE_WAVEIN WInDev [MAX_WAVEINDRV]; |
| static DWORD ALSA_WidNumDevs; |
| |
| static DWORD wodDsCreate(UINT wDevID, PIDSDRIVER* drv); |
| static DWORD wodDsDesc(UINT wDevID, PDSDRIVERDESC desc); |
| |
| /* These strings used only for tracing */ |
| static const char * getCmdString(enum win_wm_message msg) |
| { |
| static char unknown[32]; |
| #define MSG_TO_STR(x) case x: return #x |
| switch(msg) { |
| MSG_TO_STR(WINE_WM_PAUSING); |
| MSG_TO_STR(WINE_WM_RESTARTING); |
| MSG_TO_STR(WINE_WM_RESETTING); |
| MSG_TO_STR(WINE_WM_HEADER); |
| MSG_TO_STR(WINE_WM_UPDATE); |
| MSG_TO_STR(WINE_WM_BREAKLOOP); |
| MSG_TO_STR(WINE_WM_CLOSING); |
| MSG_TO_STR(WINE_WM_STARTING); |
| MSG_TO_STR(WINE_WM_STOPPING); |
| } |
| #undef MSG_TO_STR |
| sprintf(unknown, "UNKNOWN(0x%08x)", msg); |
| return unknown; |
| } |
| |
| static DWORD bytes_to_mmtime(LPMMTIME lpTime, DWORD position, |
| WAVEFORMATPCMEX* format) |
| { |
| TRACE("wType=%04X wBitsPerSample=%u nSamplesPerSec=%lu nChannels=%u nAvgBytesPerSec=%lu\n", |
| lpTime->wType, format->Format.wBitsPerSample, format->Format.nSamplesPerSec, |
| format->Format.nChannels, format->Format.nAvgBytesPerSec); |
| TRACE("Position in bytes=%lu\n", position); |
| |
| switch (lpTime->wType) { |
| case TIME_SAMPLES: |
| lpTime->u.sample = position / (format->Format.wBitsPerSample / 8 * format->Format.nChannels); |
| TRACE("TIME_SAMPLES=%lu\n", lpTime->u.sample); |
| break; |
| case TIME_MS: |
| lpTime->u.ms = 1000.0 * position / (format->Format.wBitsPerSample / 8 * format->Format.nChannels * format->Format.nSamplesPerSec); |
| TRACE("TIME_MS=%lu\n", lpTime->u.ms); |
| break; |
| case TIME_SMPTE: |
| position = position / (format->Format.wBitsPerSample / 8 * format->Format.nChannels); |
| lpTime->u.smpte.sec = position / format->Format.nSamplesPerSec; |
| position -= lpTime->u.smpte.sec * format->Format.nSamplesPerSec; |
| lpTime->u.smpte.min = lpTime->u.smpte.sec / 60; |
| lpTime->u.smpte.sec -= 60 * lpTime->u.smpte.min; |
| lpTime->u.smpte.hour = lpTime->u.smpte.min / 60; |
| lpTime->u.smpte.min -= 60 * lpTime->u.smpte.hour; |
| lpTime->u.smpte.fps = 30; |
| lpTime->u.smpte.frame = position * lpTime->u.smpte.fps / format->Format.nSamplesPerSec; |
| position -= lpTime->u.smpte.frame * format->Format.nSamplesPerSec / lpTime->u.smpte.fps; |
| if (position != 0) |
| { |
| /* Round up */ |
| lpTime->u.smpte.frame++; |
| } |
| TRACE("TIME_SMPTE=%02u:%02u:%02u:%02u\n", |
| lpTime->u.smpte.hour, lpTime->u.smpte.min, |
| lpTime->u.smpte.sec, lpTime->u.smpte.frame); |
| break; |
| default: |
| FIXME("Format %d not supported ! use TIME_BYTES !\n", lpTime->wType); |
| lpTime->wType = TIME_BYTES; |
| /* fall through */ |
| case TIME_BYTES: |
| lpTime->u.cb = position; |
| TRACE("TIME_BYTES=%lu\n", lpTime->u.cb); |
| break; |
| } |
| return MMSYSERR_NOERROR; |
| } |
| |
| static BOOL supportedFormat(LPWAVEFORMATEX wf) |
| { |
| TRACE("(%p)\n",wf); |
| |
| if (wf->nSamplesPerSec<DSBFREQUENCY_MIN||wf->nSamplesPerSec>DSBFREQUENCY_MAX) |
| return FALSE; |
| |
| if (wf->wFormatTag == WAVE_FORMAT_PCM) { |
| if (wf->nChannels==1||wf->nChannels==2) { |
| if (wf->wBitsPerSample==8||wf->wBitsPerSample==16) |
| return TRUE; |
| } |
| } else if (wf->wFormatTag == WAVE_FORMAT_EXTENSIBLE) { |
| WAVEFORMATEXTENSIBLE * wfex = (WAVEFORMATEXTENSIBLE *)wf; |
| |
| if (wf->cbSize == 22 && |
| (IsEqualGUID(&wfex->SubFormat, &KSDATAFORMAT_SUBTYPE_PCM) || |
| IsEqualGUID(&wfex->SubFormat, &KSDATAFORMAT_SUBTYPE_IEEE_FLOAT))) { |
| if (wf->nChannels>=1 && wf->nChannels<=6) { |
| if (wf->wBitsPerSample==wfex->Samples.wValidBitsPerSample) { |
| if (wf->wBitsPerSample==8||wf->wBitsPerSample==16|| |
| wf->wBitsPerSample==24||wf->wBitsPerSample==32) { |
| return TRUE; |
| } |
| } else |
| WARN("wBitsPerSample != wValidBitsPerSample not supported yet\n"); |
| } |
| } else |
| WARN("only KSDATAFORMAT_SUBTYPE_PCM and KSDATAFORMAT_SUBTYPE_IEEE_FLOAT " |
| "supported\n"); |
| } else if (wf->wFormatTag == WAVE_FORMAT_MULAW || wf->wFormatTag == WAVE_FORMAT_ALAW) { |
| if (wf->wBitsPerSample==8) |
| return TRUE; |
| else |
| ERR("WAVE_FORMAT_MULAW and WAVE_FORMAT_ALAW wBitsPerSample must = 8\n"); |
| |
| } else if (wf->wFormatTag == WAVE_FORMAT_ADPCM) { |
| if (wf->wBitsPerSample==4) |
| return TRUE; |
| else |
| ERR("WAVE_FORMAT_ADPCM wBitsPerSample must = 4\n"); |
| } else |
| WARN("only WAVE_FORMAT_PCM and WAVE_FORMAT_EXTENSIBLE supported\n"); |
| |
| return FALSE; |
| } |
| |
| static void copy_format(LPWAVEFORMATEX wf1, LPWAVEFORMATPCMEX wf2) |
| { |
| ZeroMemory(wf2, sizeof(wf2)); |
| if (wf1->wFormatTag == WAVE_FORMAT_PCM) |
| memcpy(wf2, wf1, sizeof(PCMWAVEFORMAT)); |
| else if (wf1->wFormatTag == WAVE_FORMAT_EXTENSIBLE) |
| memcpy(wf2, wf1, sizeof(WAVEFORMATPCMEX)); |
| else |
| memcpy(wf2, wf1, sizeof(WAVEFORMATEX) + wf1->cbSize); |
| } |
| |
| /*======================================================================* |
| * Low level WAVE implementation * |
| *======================================================================*/ |
| |
| /************************************************************************** |
| * ALSA_InitializeVolumeCtl [internal] |
| * |
| * used to initialize the PCM Volume Control |
| */ |
| static int ALSA_InitializeVolumeCtl(WINE_WAVEOUT * wwo) |
| { |
| snd_ctl_t * ctl = NULL; |
| snd_ctl_card_info_t * cardinfo; |
| snd_ctl_elem_list_t * elemlist; |
| snd_ctl_elem_id_t * e_id; |
| snd_ctl_elem_info_t * einfo; |
| snd_hctl_t * hctl = NULL; |
| snd_hctl_elem_t * elem; |
| int nCtrls; |
| int i; |
| |
| snd_ctl_card_info_alloca(&cardinfo); |
| memset(cardinfo,0,snd_ctl_card_info_sizeof()); |
| |
| snd_ctl_elem_list_alloca(&elemlist); |
| memset(elemlist,0,snd_ctl_elem_list_sizeof()); |
| |
| snd_ctl_elem_id_alloca(&e_id); |
| memset(e_id,0,snd_ctl_elem_id_sizeof()); |
| |
| snd_ctl_elem_info_alloca(&einfo); |
| memset(einfo,0,snd_ctl_elem_info_sizeof()); |
| |
| #define EXIT_ON_ERROR(f,txt) do \ |
| { \ |
| int err; \ |
| if ( (err = (f) ) < 0) \ |
| { \ |
| ERR(txt ": %s\n", snd_strerror(err)); \ |
| if (hctl) \ |
| snd_hctl_close(hctl); \ |
| if (ctl) \ |
| snd_ctl_close(ctl); \ |
| return -1; \ |
| } \ |
| } while(0) |
| |
| EXIT_ON_ERROR( snd_ctl_open(&ctl,"hw",0) , "ctl open failed" ); |
| EXIT_ON_ERROR( snd_ctl_card_info(ctl, cardinfo), "card info failed"); |
| EXIT_ON_ERROR( snd_ctl_elem_list(ctl, elemlist), "elem list failed"); |
| |
| nCtrls = snd_ctl_elem_list_get_count(elemlist); |
| |
| EXIT_ON_ERROR( snd_hctl_open(&hctl,"hw",0), "hctl open failed"); |
| EXIT_ON_ERROR( snd_hctl_load(hctl), "hctl load failed" ); |
| |
| elem=snd_hctl_first_elem(hctl); |
| for ( i= 0; i<nCtrls; i++) { |
| |
| memset(e_id,0,snd_ctl_elem_id_sizeof()); |
| |
| snd_hctl_elem_get_id(elem,e_id); |
| /* |
| TRACE("ctl: #%d '%s'%d\n", |
| snd_ctl_elem_id_get_numid(e_id), |
| snd_ctl_elem_id_get_name(e_id), |
| snd_ctl_elem_id_get_index(e_id)); |
| */ |
| if ( !strcmp("PCM Playback Volume", snd_ctl_elem_id_get_name(e_id)) ) |
| { |
| EXIT_ON_ERROR( snd_hctl_elem_info(elem,einfo), "hctl elem info failed" ); |
| |
| /* few sanity checks... you'll never know... */ |
| if ( snd_ctl_elem_info_get_type(einfo) != SND_CTL_ELEM_TYPE_INTEGER ) |
| WARN("playback volume control is not an integer\n"); |
| if ( !snd_ctl_elem_info_is_readable(einfo) ) |
| WARN("playback volume control is readable\n"); |
| if ( !snd_ctl_elem_info_is_writable(einfo) ) |
| WARN("playback volume control is readable\n"); |
| |
| TRACE(" ctrl range: min=%ld max=%ld step=%ld\n", |
| snd_ctl_elem_info_get_min(einfo), |
| snd_ctl_elem_info_get_max(einfo), |
| snd_ctl_elem_info_get_step(einfo)); |
| |
| EXIT_ON_ERROR( snd_ctl_elem_id_malloc(&wwo->playback_eid), "elem id malloc failed" ); |
| EXIT_ON_ERROR( snd_ctl_elem_info_malloc(&wwo->playback_einfo), "elem info malloc failed" ); |
| EXIT_ON_ERROR( snd_ctl_elem_value_malloc(&wwo->playback_evalue), "elem value malloc failed" ); |
| |
| /* ok, now we can safely save these objects for later */ |
| snd_ctl_elem_id_copy(wwo->playback_eid, e_id); |
| snd_ctl_elem_info_copy(wwo->playback_einfo, einfo); |
| snd_ctl_elem_value_set_id(wwo->playback_evalue, wwo->playback_eid); |
| wwo->ctl = ctl; |
| } |
| |
| elem=snd_hctl_elem_next(elem); |
| } |
| snd_hctl_close(hctl); |
| #undef EXIT_ON_ERROR |
| return 0; |
| } |
| |
| /************************************************************************** |
| * ALSA_XRUNRecovery [internal] |
| * |
| * used to recovery from XRUN errors (buffer underflow/overflow) |
| */ |
| static int ALSA_XRUNRecovery(WINE_WAVEOUT * wwo, int err) |
| { |
| if (err == -EPIPE) { /* under-run */ |
| err = snd_pcm_prepare(wwo->p_handle); |
| if (err < 0) |
| ERR( "underrun recovery failed. prepare failed: %s\n", snd_strerror(err)); |
| return 0; |
| } else if (err == -ESTRPIPE) { |
| while ((err = snd_pcm_resume(wwo->p_handle)) == -EAGAIN) |
| sleep(1); /* wait until the suspend flag is released */ |
| if (err < 0) { |
| err = snd_pcm_prepare(wwo->p_handle); |
| if (err < 0) |
| ERR("recovery from suspend failed, prepare failed: %s\n", snd_strerror(err)); |
| } |
| return 0; |
| } |
| return err; |
| } |
| |
| /************************************************************************** |
| * ALSA_TraceParameters [internal] |
| * |
| * used to trace format changes, hw and sw parameters |
| */ |
| static void ALSA_TraceParameters(snd_pcm_hw_params_t * hw_params, snd_pcm_sw_params_t * sw, int full) |
| { |
| int err; |
| snd_pcm_format_t format; |
| snd_pcm_access_t access; |
| |
| err = snd_pcm_hw_params_get_access(hw_params, &access); |
| err = snd_pcm_hw_params_get_format(hw_params, &format); |
| |
| #define X(x) ((x)? "true" : "false") |
| if (full) |
| TRACE("FLAGS: sampleres=%s overrng=%s pause=%s resume=%s syncstart=%s batch=%s block=%s double=%s " |
| "halfd=%s joint=%s \n", |
| X(snd_pcm_hw_params_can_mmap_sample_resolution(hw_params)), |
| X(snd_pcm_hw_params_can_overrange(hw_params)), |
| X(snd_pcm_hw_params_can_pause(hw_params)), |
| X(snd_pcm_hw_params_can_resume(hw_params)), |
| X(snd_pcm_hw_params_can_sync_start(hw_params)), |
| X(snd_pcm_hw_params_is_batch(hw_params)), |
| X(snd_pcm_hw_params_is_block_transfer(hw_params)), |
| X(snd_pcm_hw_params_is_double(hw_params)), |
| X(snd_pcm_hw_params_is_half_duplex(hw_params)), |
| X(snd_pcm_hw_params_is_joint_duplex(hw_params))); |
| #undef X |
| |
| if (access >= 0) |
| TRACE("access=%s\n", snd_pcm_access_name(access)); |
| else |
| { |
| snd_pcm_access_mask_t * acmask; |
| snd_pcm_access_mask_alloca(&acmask); |
| snd_pcm_hw_params_get_access_mask(hw_params, acmask); |
| for ( access = SND_PCM_ACCESS_MMAP_INTERLEAVED; access <= SND_PCM_ACCESS_LAST; access++) |
| if (snd_pcm_access_mask_test(acmask, access)) |
| TRACE("access=%s\n", snd_pcm_access_name(access)); |
| } |
| |
| if (format >= 0) |
| { |
| TRACE("format=%s\n", snd_pcm_format_name(format)); |
| |
| } |
| else |
| { |
| snd_pcm_format_mask_t * fmask; |
| |
| snd_pcm_format_mask_alloca(&fmask); |
| snd_pcm_hw_params_get_format_mask(hw_params, fmask); |
| for ( format = SND_PCM_FORMAT_S8; format <= SND_PCM_FORMAT_LAST ; format++) |
| if ( snd_pcm_format_mask_test(fmask, format) ) |
| TRACE("format=%s\n", snd_pcm_format_name(format)); |
| } |
| |
| do { |
| int err=0; |
| unsigned int val=0; |
| err = snd_pcm_hw_params_get_channels(hw_params, &val); |
| if (err<0) { |
| unsigned int min = 0; |
| unsigned int max = 0; |
| err = snd_pcm_hw_params_get_channels_min(hw_params, &min), |
| err = snd_pcm_hw_params_get_channels_max(hw_params, &max); |
| TRACE("channels_min=%u, channels_min_max=%u\n", min, max); |
| } else { |
| TRACE("channels_min=%d\n", val); |
| } |
| } while(0); |
| do { |
| int err=0; |
| snd_pcm_uframes_t val=0; |
| err = snd_pcm_hw_params_get_buffer_size(hw_params, &val); |
| if (err<0) { |
| snd_pcm_uframes_t min = 0; |
| snd_pcm_uframes_t max = 0; |
| err = snd_pcm_hw_params_get_buffer_size_min(hw_params, &min), |
| err = snd_pcm_hw_params_get_buffer_size_max(hw_params, &max); |
| TRACE("buffer_size_min=%lu, buffer_size_min_max=%lu\n", min, max); |
| } else { |
| TRACE("buffer_size_min=%lu\n", val); |
| } |
| } while(0); |
| |
| #define X(x) do { \ |
| int err=0; \ |
| int dir=0; \ |
| unsigned int val=0; \ |
| err = snd_pcm_hw_params_get_##x(hw_params,&val, &dir); \ |
| if (err<0) { \ |
| unsigned int min = 0; \ |
| unsigned int max = 0; \ |
| err = snd_pcm_hw_params_get_##x##_min(hw_params, &min, &dir); \ |
| err = snd_pcm_hw_params_get_##x##_max(hw_params, &max, &dir); \ |
| TRACE(#x "_min=%u " #x "_max=%u\n", min, max); \ |
| } else \ |
| TRACE(#x "=%d\n", val); \ |
| } while(0) |
| |
| X(rate); |
| X(buffer_time); |
| X(periods); |
| do { |
| int err=0; |
| int dir=0; |
| snd_pcm_uframes_t val=0; |
| err = snd_pcm_hw_params_get_period_size(hw_params, &val, &dir); |
| if (err<0) { |
| snd_pcm_uframes_t min = 0; |
| snd_pcm_uframes_t max = 0; |
| err = snd_pcm_hw_params_get_period_size_min(hw_params, &min, &dir), |
| err = snd_pcm_hw_params_get_period_size_max(hw_params, &max, &dir); |
| TRACE("period_size_min=%lu, period_size_min_max=%lu\n", min, max); |
| } else { |
| TRACE("period_size_min=%lu\n", val); |
| } |
| } while(0); |
| |
| X(period_time); |
| X(tick_time); |
| #undef X |
| |
| if (!sw) |
| return; |
| |
| |
| } |
| |
| /* return a string duplicated on the win32 process heap, free with HeapFree */ |
| static char* ALSA_strdup(char *s) { |
| char *result = HeapAlloc(GetProcessHeap(), 0, strlen(s)+1); |
| strcpy(result, s); |
| return result; |
| } |
| |
| /****************************************************************** |
| * ALSA_GetDeviceFromReg |
| * |
| * Returns either "default" or reads the registry so the user can |
| * override the playback/record device used. |
| */ |
| char *ALSA_GetDeviceFromReg(char *value) |
| { |
| DWORD res; |
| DWORD type; |
| HKEY playbackKey = 0; |
| char *result = NULL; |
| DWORD resultSize; |
| |
| res = RegOpenKeyExA(HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\ALSA", 0, KEY_QUERY_VALUE, &playbackKey); |
| if (res != ERROR_SUCCESS) goto end; |
| |
| res = RegQueryValueExA(playbackKey, value, NULL, &type, NULL, &resultSize); |
| if (res != ERROR_SUCCESS) goto end; |
| |
| if (type != REG_SZ) { |
| ERR("Registry key [HKEY_LOCAL_MACHINE\\Software\\Wine\\Wine\\ALSA\\%s] must be a string\n", value); |
| goto end; |
| } |
| |
| result = HeapAlloc(GetProcessHeap(), 0, resultSize); |
| res = RegQueryValueExA(playbackKey, value, NULL, NULL, result, &resultSize); |
| |
| end: |
| if (!result) result = ALSA_strdup("default"); |
| if (playbackKey) RegCloseKey(playbackKey); |
| return result; |
| } |
| |
| /****************************************************************** |
| * ALSA_WaveInit |
| * |
| * Initialize internal structures from ALSA information |
| */ |
| LONG ALSA_WaveInit(void) |
| { |
| snd_pcm_t* h; |
| snd_pcm_info_t * info; |
| snd_pcm_hw_params_t * hw_params; |
| unsigned int ratemin=0; |
| unsigned int ratemax=0; |
| unsigned int chmin=0; |
| unsigned int chmax=0; |
| int dir=0; |
| int err=0; |
| WINE_WAVEOUT* wwo; |
| WINE_WAVEIN* wwi; |
| |
| wwo = &WOutDev[0]; |
| |
| /* FIXME: use better values */ |
| wwo->device = ALSA_GetDeviceFromReg("PlaybackDevice"); |
| TRACE("using waveout device \"%s\"\n", wwo->device); |
| |
| snprintf(wwo->interface_name, sizeof(wwo->interface_name), "winealsa: %s", wwo->device); |
| |
| wwo->caps.wMid = 0x0002; |
| wwo->caps.wPid = 0x0104; |
| strcpy(wwo->caps.szPname, "SB16 Wave Out"); |
| wwo->caps.vDriverVersion = 0x0100; |
| wwo->caps.dwFormats = 0x00000000; |
| wwo->caps.dwSupport = WAVECAPS_VOLUME; |
| strcpy(wwo->ds_desc.szDesc, "WineALSA DirectSound Driver"); |
| strcpy(wwo->ds_desc.szDrvName, "winealsa.drv"); |
| |
| if (!wine_dlopen("libasound.so.2", RTLD_LAZY|RTLD_GLOBAL, NULL, 0)) |
| { |
| ERR("Error: ALSA lib needs to be loaded with flags RTLD_LAZY and RTLD_GLOBAL.\n"); |
| return -1; |
| } |
| |
| snd_pcm_info_alloca(&info); |
| snd_pcm_hw_params_alloca(&hw_params); |
| |
| #define EXIT_ON_ERROR(f,txt) do { int err; if ( (err = (f) ) < 0) { ERR(txt ": %s\n", snd_strerror(err)); if (h) snd_pcm_close(h); return -1; } } while(0) |
| |
| h = NULL; |
| ALSA_WodNumDevs = 0; |
| EXIT_ON_ERROR( snd_pcm_open(&h, wwo->device, SND_PCM_STREAM_PLAYBACK, SND_PCM_NONBLOCK) , "open pcm" ); |
| if (!h) return -1; |
| ALSA_WodNumDevs++; |
| |
| EXIT_ON_ERROR( snd_pcm_info(h, info) , "pcm info" ); |
| |
| TRACE("dev=%d id=%s name=%s subdev=%d subdev_name=%s subdev_avail=%d subdev_num=%d stream=%s subclass=%s \n", |
| snd_pcm_info_get_device(info), |
| snd_pcm_info_get_id(info), |
| snd_pcm_info_get_name(info), |
| snd_pcm_info_get_subdevice(info), |
| snd_pcm_info_get_subdevice_name(info), |
| snd_pcm_info_get_subdevices_avail(info), |
| snd_pcm_info_get_subdevices_count(info), |
| snd_pcm_stream_name(snd_pcm_info_get_stream(info)), |
| (snd_pcm_info_get_subclass(info) == SND_PCM_SUBCLASS_GENERIC_MIX ? "GENERIC MIX": "MULTI MIX")); |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_any(h, hw_params) , "pcm hw params" ); |
| #undef EXIT_ON_ERROR |
| |
| err = snd_pcm_hw_params_get_rate_min(hw_params, &ratemin, &dir); |
| err = snd_pcm_hw_params_get_rate_max(hw_params, &ratemax, &dir); |
| err = snd_pcm_hw_params_get_channels_min(hw_params, &chmin); |
| err = snd_pcm_hw_params_get_channels_max(hw_params, &chmax); |
| if (TRACE_ON(wave)) |
| ALSA_TraceParameters(hw_params, NULL, TRUE); |
| |
| { |
| snd_pcm_format_mask_t * fmask; |
| |
| snd_pcm_format_mask_alloca(&fmask); |
| snd_pcm_hw_params_get_format_mask(hw_params, fmask); |
| |
| #define X(r,v) \ |
| if ( (r) >= ratemin && ( (r) <= ratemax || ratemax == -1) ) \ |
| { \ |
| if (snd_pcm_format_mask_test( fmask, SND_PCM_FORMAT_U8)) \ |
| { \ |
| if (chmin <= 1 && 1 <= chmax) \ |
| wwo->caps.dwFormats |= WAVE_FORMAT_##v##M08; \ |
| if (chmin <= 2 && 2 <= chmax) \ |
| wwo->caps.dwFormats |= WAVE_FORMAT_##v##S08; \ |
| } \ |
| if (snd_pcm_format_mask_test( fmask, SND_PCM_FORMAT_S16_LE)) \ |
| { \ |
| if (chmin <= 1 && 1 <= chmax) \ |
| wwo->caps.dwFormats |= WAVE_FORMAT_##v##M16; \ |
| if (chmin <= 2 && 2 <= chmax) \ |
| wwo->caps.dwFormats |= WAVE_FORMAT_##v##S16; \ |
| } \ |
| } |
| X(11025,1); |
| X(22050,2); |
| X(44100,4); |
| X(48000,48); |
| X(96000,96); |
| #undef X |
| } |
| |
| if ( chmin > 1) FIXME("-\n"); |
| wwo->caps.wChannels = chmax; |
| if (chmin <= 2 && 2 <= chmax) |
| wwo->caps.dwSupport |= WAVECAPS_LRVOLUME; |
| |
| /* FIXME: always true ? */ |
| wwo->caps.dwSupport |= WAVECAPS_SAMPLEACCURATE; |
| |
| { |
| snd_pcm_access_mask_t * acmask; |
| snd_pcm_access_mask_alloca(&acmask); |
| snd_pcm_hw_params_get_access_mask(hw_params, acmask); |
| |
| /* FIXME: NONITERLEAVED and COMPLEX are not supported right now */ |
| if ( snd_pcm_access_mask_test( acmask, SND_PCM_ACCESS_MMAP_INTERLEAVED ) ) |
| wwo->caps.dwSupport |= WAVECAPS_DIRECTSOUND; |
| } |
| |
| TRACE("Configured with dwFmts=%08lx dwSupport=%08lx\n", |
| wwo->caps.dwFormats, wwo->caps.dwSupport); |
| |
| snd_pcm_close(h); |
| |
| ALSA_InitializeVolumeCtl(wwo); |
| |
| wwi = &WInDev[0]; |
| |
| /* FIXME: use better values */ |
| wwi->device = ALSA_GetDeviceFromReg("RecordDevice"); |
| TRACE("using wavein device \"%s\"\n", wwi->device); |
| |
| snprintf(wwi->interface_name, sizeof(wwi->interface_name), "winealsa: %s", wwi->device); |
| |
| wwi->caps.wMid = 0x0002; |
| wwi->caps.wPid = 0x0104; |
| strcpy(wwi->caps.szPname, "SB16 Wave In"); |
| wwi->caps.vDriverVersion = 0x0100; |
| wwi->caps.dwFormats = 0x00000000; |
| wwi->caps.dwSupport = WAVECAPS_VOLUME; |
| strcpy(wwi->ds_desc.szDesc, "WineALSA DirectSound Driver"); |
| strcpy(wwi->ds_desc.szDrvName, "winealsa.drv"); |
| |
| snd_pcm_info_alloca(&info); |
| snd_pcm_hw_params_alloca(&hw_params); |
| |
| #define EXIT_ON_ERROR(f,txt) do { int err; if ( (err = (f) ) < 0) { ERR(txt ": %s\n", snd_strerror(err)); if (h) snd_pcm_close(h); return -1; } } while(0) |
| |
| h = NULL; |
| ALSA_WidNumDevs = 0; |
| EXIT_ON_ERROR( snd_pcm_open(&h, wwi->device, SND_PCM_STREAM_CAPTURE, SND_PCM_NONBLOCK) , "open pcm" ); |
| if (!h) return -1; |
| ALSA_WidNumDevs++; |
| |
| EXIT_ON_ERROR( snd_pcm_info(h, info) , "pcm info" ); |
| |
| TRACE("dev=%d id=%s name=%s subdev=%d subdev_name=%s subdev_avail=%d subdev_num=%d stream=%s subclass=%s \n", |
| snd_pcm_info_get_device(info), |
| snd_pcm_info_get_id(info), |
| snd_pcm_info_get_name(info), |
| snd_pcm_info_get_subdevice(info), |
| snd_pcm_info_get_subdevice_name(info), |
| snd_pcm_info_get_subdevices_avail(info), |
| snd_pcm_info_get_subdevices_count(info), |
| snd_pcm_stream_name(snd_pcm_info_get_stream(info)), |
| (snd_pcm_info_get_subclass(info) == SND_PCM_SUBCLASS_GENERIC_MIX ? "GENERIC MIX": "MULTI MIX")); |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_any(h, hw_params) , "pcm hw params" ); |
| #undef EXIT_ON_ERROR |
| err = snd_pcm_hw_params_get_rate_min(hw_params, &ratemin, &dir); |
| err = snd_pcm_hw_params_get_rate_max(hw_params, &ratemax, &dir); |
| err = snd_pcm_hw_params_get_channels_min(hw_params, &chmin); |
| err = snd_pcm_hw_params_get_channels_max(hw_params, &chmax); |
| |
| if (TRACE_ON(wave)) |
| ALSA_TraceParameters(hw_params, NULL, TRUE); |
| |
| { |
| snd_pcm_format_mask_t * fmask; |
| |
| snd_pcm_format_mask_alloca(&fmask); |
| snd_pcm_hw_params_get_format_mask(hw_params, fmask); |
| |
| #define X(r,v) \ |
| if ( (r) >= ratemin && ( (r) <= ratemax || ratemax == -1) ) \ |
| { \ |
| if (snd_pcm_format_mask_test( fmask, SND_PCM_FORMAT_U8)) \ |
| { \ |
| if (chmin <= 1 && 1 <= chmax) \ |
| wwi->caps.dwFormats |= WAVE_FORMAT_##v##M08; \ |
| if (chmin <= 2 && 2 <= chmax) \ |
| wwi->caps.dwFormats |= WAVE_FORMAT_##v##S08; \ |
| } \ |
| if (snd_pcm_format_mask_test( fmask, SND_PCM_FORMAT_S16_LE)) \ |
| { \ |
| if (chmin <= 1 && 1 <= chmax) \ |
| wwi->caps.dwFormats |= WAVE_FORMAT_##v##M16; \ |
| if (chmin <= 2 && 2 <= chmax) \ |
| wwi->caps.dwFormats |= WAVE_FORMAT_##v##S16; \ |
| } \ |
| } |
| X(11025,1); |
| X(22050,2); |
| X(44100,4); |
| X(48000,48); |
| X(96000,96); |
| #undef X |
| } |
| |
| if ( chmin > 1) FIXME("-\n"); |
| wwi->caps.wChannels = chmax; |
| if (chmin <= 2 && 2 <= chmax) |
| wwi->caps.dwSupport |= WAVECAPS_LRVOLUME; |
| |
| /* FIXME: always true ? */ |
| wwi->caps.dwSupport |= WAVECAPS_SAMPLEACCURATE; |
| |
| { |
| snd_pcm_access_mask_t * acmask; |
| snd_pcm_access_mask_alloca(&acmask); |
| snd_pcm_hw_params_get_access_mask(hw_params, acmask); |
| |
| /* FIXME: NONITERLEAVED and COMPLEX are not supported right now */ |
| if ( snd_pcm_access_mask_test( acmask, SND_PCM_ACCESS_MMAP_INTERLEAVED ) ) { |
| #if 0 |
| wwi->caps.dwSupport |= WAVECAPS_DIRECTSOUND; |
| #endif |
| } |
| } |
| |
| TRACE("Configured with dwFmts=%08lx dwSupport=%08lx\n", |
| wwi->caps.dwFormats, wwi->caps.dwSupport); |
| |
| snd_pcm_close(h); |
| |
| return 0; |
| } |
| |
| /****************************************************************** |
| * ALSA_InitRingMessage |
| * |
| * Initialize the ring of messages for passing between driver's caller and playback/record |
| * thread |
| */ |
| static int ALSA_InitRingMessage(ALSA_MSG_RING* omr) |
| { |
| omr->msg_toget = 0; |
| omr->msg_tosave = 0; |
| #ifdef USE_PIPE_SYNC |
| if (pipe(omr->msg_pipe) < 0) { |
| omr->msg_pipe[0] = -1; |
| omr->msg_pipe[1] = -1; |
| ERR("could not create pipe, error=%s\n", strerror(errno)); |
| } |
| #else |
| omr->msg_event = CreateEventA(NULL, FALSE, FALSE, NULL); |
| #endif |
| omr->ring_buffer_size = ALSA_RING_BUFFER_INCREMENT; |
| omr->messages = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,omr->ring_buffer_size * sizeof(ALSA_MSG)); |
| |
| InitializeCriticalSection(&omr->msg_crst); |
| return 0; |
| } |
| |
| /****************************************************************** |
| * ALSA_DestroyRingMessage |
| * |
| */ |
| static int ALSA_DestroyRingMessage(ALSA_MSG_RING* omr) |
| { |
| #ifdef USE_PIPE_SYNC |
| close(omr->msg_pipe[0]); |
| close(omr->msg_pipe[1]); |
| #else |
| CloseHandle(omr->msg_event); |
| #endif |
| HeapFree(GetProcessHeap(),0,omr->messages); |
| DeleteCriticalSection(&omr->msg_crst); |
| return 0; |
| } |
| |
| /****************************************************************** |
| * ALSA_AddRingMessage |
| * |
| * Inserts a new message into the ring (should be called from DriverProc derivated routines) |
| */ |
| static int ALSA_AddRingMessage(ALSA_MSG_RING* omr, enum win_wm_message msg, DWORD param, BOOL wait) |
| { |
| HANDLE hEvent = INVALID_HANDLE_VALUE; |
| |
| EnterCriticalSection(&omr->msg_crst); |
| if ((omr->msg_toget == ((omr->msg_tosave + 1) % omr->ring_buffer_size))) |
| { |
| int old_ring_buffer_size = omr->ring_buffer_size; |
| omr->ring_buffer_size += ALSA_RING_BUFFER_INCREMENT; |
| TRACE("omr->ring_buffer_size=%d\n",omr->ring_buffer_size); |
| omr->messages = HeapReAlloc(GetProcessHeap(),0,omr->messages, omr->ring_buffer_size * sizeof(ALSA_MSG)); |
| /* Now we need to rearrange the ring buffer so that the new |
| buffers just allocated are in between omr->msg_tosave and |
| omr->msg_toget. |
| */ |
| if (omr->msg_tosave < omr->msg_toget) |
| { |
| memmove(&(omr->messages[omr->msg_toget + ALSA_RING_BUFFER_INCREMENT]), |
| &(omr->messages[omr->msg_toget]), |
| sizeof(ALSA_MSG)*(old_ring_buffer_size - omr->msg_toget) |
| ); |
| omr->msg_toget += ALSA_RING_BUFFER_INCREMENT; |
| } |
| } |
| if (wait) |
| { |
| hEvent = CreateEventA(NULL, FALSE, FALSE, NULL); |
| if (hEvent == INVALID_HANDLE_VALUE) |
| { |
| ERR("can't create event !?\n"); |
| LeaveCriticalSection(&omr->msg_crst); |
| return 0; |
| } |
| if (omr->msg_toget != omr->msg_tosave && omr->messages[omr->msg_toget].msg != WINE_WM_HEADER) |
| FIXME("two fast messages in the queue!!!! toget = %d(%s), tosave=%d(%s)\n", |
| omr->msg_toget,getCmdString(omr->messages[omr->msg_toget].msg), |
| omr->msg_tosave,getCmdString(omr->messages[omr->msg_tosave].msg)); |
| |
| /* fast messages have to be added at the start of the queue */ |
| omr->msg_toget = (omr->msg_toget + omr->ring_buffer_size - 1) % omr->ring_buffer_size; |
| |
| omr->messages[omr->msg_toget].msg = msg; |
| omr->messages[omr->msg_toget].param = param; |
| omr->messages[omr->msg_toget].hEvent = hEvent; |
| } |
| else |
| { |
| omr->messages[omr->msg_tosave].msg = msg; |
| omr->messages[omr->msg_tosave].param = param; |
| omr->messages[omr->msg_tosave].hEvent = INVALID_HANDLE_VALUE; |
| omr->msg_tosave = (omr->msg_tosave + 1) % omr->ring_buffer_size; |
| } |
| LeaveCriticalSection(&omr->msg_crst); |
| /* signal a new message */ |
| SIGNAL_OMR(omr); |
| if (wait) |
| { |
| /* wait for playback/record thread to have processed the message */ |
| WaitForSingleObject(hEvent, INFINITE); |
| CloseHandle(hEvent); |
| } |
| return 1; |
| } |
| |
| /****************************************************************** |
| * ALSA_RetrieveRingMessage |
| * |
| * Get a message from the ring. Should be called by the playback/record thread. |
| */ |
| static int ALSA_RetrieveRingMessage(ALSA_MSG_RING* omr, |
| enum win_wm_message *msg, DWORD *param, HANDLE *hEvent) |
| { |
| EnterCriticalSection(&omr->msg_crst); |
| |
| if (omr->msg_toget == omr->msg_tosave) /* buffer empty ? */ |
| { |
| LeaveCriticalSection(&omr->msg_crst); |
| return 0; |
| } |
| |
| *msg = omr->messages[omr->msg_toget].msg; |
| omr->messages[omr->msg_toget].msg = 0; |
| *param = omr->messages[omr->msg_toget].param; |
| *hEvent = omr->messages[omr->msg_toget].hEvent; |
| omr->msg_toget = (omr->msg_toget + 1) % omr->ring_buffer_size; |
| CLEAR_OMR(omr); |
| LeaveCriticalSection(&omr->msg_crst); |
| return 1; |
| } |
| |
| /****************************************************************** |
| * ALSA_PeekRingMessage |
| * |
| * Peek at a message from the ring but do not remove it. |
| * Should be called by the playback/record thread. |
| */ |
| static int ALSA_PeekRingMessage(ALSA_MSG_RING* omr, |
| enum win_wm_message *msg, |
| DWORD *param, HANDLE *hEvent) |
| { |
| EnterCriticalSection(&omr->msg_crst); |
| |
| if (omr->msg_toget == omr->msg_tosave) /* buffer empty ? */ |
| { |
| LeaveCriticalSection(&omr->msg_crst); |
| return 0; |
| } |
| |
| *msg = omr->messages[omr->msg_toget].msg; |
| *param = omr->messages[omr->msg_toget].param; |
| *hEvent = omr->messages[omr->msg_toget].hEvent; |
| LeaveCriticalSection(&omr->msg_crst); |
| return 1; |
| } |
| |
| /*======================================================================* |
| * Low level WAVE OUT implementation * |
| *======================================================================*/ |
| |
| /************************************************************************** |
| * wodNotifyClient [internal] |
| */ |
| static DWORD wodNotifyClient(WINE_WAVEOUT* wwo, WORD wMsg, DWORD dwParam1, DWORD dwParam2) |
| { |
| TRACE("wMsg = 0x%04x dwParm1 = %04lX dwParam2 = %04lX\n", wMsg, dwParam1, dwParam2); |
| |
| switch (wMsg) { |
| case WOM_OPEN: |
| case WOM_CLOSE: |
| case WOM_DONE: |
| if (wwo->wFlags != DCB_NULL && |
| !DriverCallback(wwo->waveDesc.dwCallback, wwo->wFlags, (HDRVR)wwo->waveDesc.hWave, |
| wMsg, wwo->waveDesc.dwInstance, dwParam1, dwParam2)) { |
| WARN("can't notify client !\n"); |
| return MMSYSERR_ERROR; |
| } |
| break; |
| default: |
| FIXME("Unknown callback message %u\n", wMsg); |
| return MMSYSERR_INVALPARAM; |
| } |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodUpdatePlayedTotal [internal] |
| * |
| */ |
| static BOOL wodUpdatePlayedTotal(WINE_WAVEOUT* wwo, snd_pcm_status_t* ps) |
| { |
| snd_pcm_sframes_t delay = 0; |
| snd_pcm_delay(wwo->p_handle, &delay); |
| if (snd_pcm_state(wwo->p_handle) != SND_PCM_STATE_RUNNING) |
| delay=0; |
| wwo->dwPlayedTotal = wwo->dwWrittenTotal - snd_pcm_frames_to_bytes(wwo->p_handle, delay); |
| return TRUE; |
| } |
| |
| /************************************************************************** |
| * wodPlayer_BeginWaveHdr [internal] |
| * |
| * Makes the specified lpWaveHdr the currently playing wave header. |
| * If the specified wave header is a begin loop and we're not already in |
| * a loop, setup the loop. |
| */ |
| static void wodPlayer_BeginWaveHdr(WINE_WAVEOUT* wwo, LPWAVEHDR lpWaveHdr) |
| { |
| wwo->lpPlayPtr = lpWaveHdr; |
| |
| if (!lpWaveHdr) return; |
| |
| if (lpWaveHdr->dwFlags & WHDR_BEGINLOOP) { |
| if (wwo->lpLoopPtr) { |
| WARN("Already in a loop. Discarding loop on this header (%p)\n", lpWaveHdr); |
| } else { |
| TRACE("Starting loop (%ldx) with %p\n", lpWaveHdr->dwLoops, lpWaveHdr); |
| wwo->lpLoopPtr = lpWaveHdr; |
| /* Windows does not touch WAVEHDR.dwLoops, |
| * so we need to make an internal copy */ |
| wwo->dwLoops = lpWaveHdr->dwLoops; |
| } |
| } |
| wwo->dwPartialOffset = 0; |
| } |
| |
| /************************************************************************** |
| * wodPlayer_PlayPtrNext [internal] |
| * |
| * Advance the play pointer to the next waveheader, looping if required. |
| */ |
| static LPWAVEHDR wodPlayer_PlayPtrNext(WINE_WAVEOUT* wwo) |
| { |
| LPWAVEHDR lpWaveHdr = wwo->lpPlayPtr; |
| |
| wwo->dwPartialOffset = 0; |
| if ((lpWaveHdr->dwFlags & WHDR_ENDLOOP) && wwo->lpLoopPtr) { |
| /* We're at the end of a loop, loop if required */ |
| if (--wwo->dwLoops > 0) { |
| wwo->lpPlayPtr = wwo->lpLoopPtr; |
| } else { |
| /* Handle overlapping loops correctly */ |
| if (wwo->lpLoopPtr != lpWaveHdr && (lpWaveHdr->dwFlags & WHDR_BEGINLOOP)) { |
| FIXME("Correctly handled case ? (ending loop buffer also starts a new loop)\n"); |
| /* shall we consider the END flag for the closing loop or for |
| * the opening one or for both ??? |
| * code assumes for closing loop only |
| */ |
| } else { |
| lpWaveHdr = lpWaveHdr->lpNext; |
| } |
| wwo->lpLoopPtr = NULL; |
| wodPlayer_BeginWaveHdr(wwo, lpWaveHdr); |
| } |
| } else { |
| /* We're not in a loop. Advance to the next wave header */ |
| wodPlayer_BeginWaveHdr(wwo, lpWaveHdr = lpWaveHdr->lpNext); |
| } |
| |
| return lpWaveHdr; |
| } |
| |
| /************************************************************************** |
| * wodPlayer_DSPWait [internal] |
| * Returns the number of milliseconds to wait for the DSP buffer to play a |
| * period |
| */ |
| static DWORD wodPlayer_DSPWait(const WINE_WAVEOUT *wwo) |
| { |
| /* time for one period to be played */ |
| unsigned int val=0; |
| int dir=0; |
| int err=0; |
| err = snd_pcm_hw_params_get_period_time(wwo->hw_params, &val, &dir); |
| return val / 1000; |
| } |
| |
| /************************************************************************** |
| * wodPlayer_NotifyWait [internal] |
| * Returns the number of milliseconds to wait before attempting to notify |
| * completion of the specified wavehdr. |
| * This is based on the number of bytes remaining to be written in the |
| * wave. |
| */ |
| static DWORD wodPlayer_NotifyWait(const WINE_WAVEOUT* wwo, LPWAVEHDR lpWaveHdr) |
| { |
| DWORD dwMillis; |
| |
| if (lpWaveHdr->reserved < wwo->dwPlayedTotal) { |
| dwMillis = 1; |
| } else { |
| dwMillis = (lpWaveHdr->reserved - wwo->dwPlayedTotal) * 1000 / wwo->format.Format.nAvgBytesPerSec; |
| if (!dwMillis) dwMillis = 1; |
| } |
| |
| return dwMillis; |
| } |
| |
| |
| /************************************************************************** |
| * wodPlayer_WriteMaxFrags [internal] |
| * Writes the maximum number of frames possible to the DSP and returns |
| * the number of frames written. |
| */ |
| static int wodPlayer_WriteMaxFrags(WINE_WAVEOUT* wwo, DWORD* frames) |
| { |
| /* Only attempt to write to free frames */ |
| LPWAVEHDR lpWaveHdr = wwo->lpPlayPtr; |
| DWORD dwLength = snd_pcm_bytes_to_frames(wwo->p_handle, lpWaveHdr->dwBufferLength - wwo->dwPartialOffset); |
| int toWrite = min(dwLength, *frames); |
| int written; |
| |
| TRACE("Writing wavehdr %p.%lu[%lu]\n", lpWaveHdr, wwo->dwPartialOffset, lpWaveHdr->dwBufferLength); |
| |
| written = (wwo->write)(wwo->p_handle, lpWaveHdr->lpData + wwo->dwPartialOffset, toWrite); |
| if ( written < 0) |
| { |
| /* XRUN occurred. let's try to recover */ |
| ALSA_XRUNRecovery(wwo, written); |
| written = (wwo->write)(wwo->p_handle, lpWaveHdr->lpData + wwo->dwPartialOffset, toWrite); |
| } |
| if (written <= 0) |
| { |
| /* still in error */ |
| ERR("Error in writing wavehdr. Reason: %s\n", snd_strerror(written)); |
| return written; |
| } |
| |
| wwo->dwPartialOffset += snd_pcm_frames_to_bytes(wwo->p_handle, written); |
| if ( wwo->dwPartialOffset >= lpWaveHdr->dwBufferLength) { |
| /* this will be used to check if the given wave header has been fully played or not... */ |
| wwo->dwPartialOffset = lpWaveHdr->dwBufferLength; |
| /* If we wrote all current wavehdr, skip to the next one */ |
| wodPlayer_PlayPtrNext(wwo); |
| } |
| *frames -= written; |
| wwo->dwWrittenTotal += snd_pcm_frames_to_bytes(wwo->p_handle, written); |
| |
| return written; |
| } |
| |
| |
| /************************************************************************** |
| * wodPlayer_NotifyCompletions [internal] |
| * |
| * Notifies and remove from queue all wavehdrs which have been played to |
| * the speaker (ie. they have cleared the ALSA buffer). If force is true, |
| * we notify all wavehdrs and remove them all from the queue even if they |
| * are unplayed or part of a loop. |
| */ |
| static DWORD wodPlayer_NotifyCompletions(WINE_WAVEOUT* wwo, BOOL force) |
| { |
| LPWAVEHDR lpWaveHdr; |
| |
| /* Start from lpQueuePtr and keep notifying until: |
| * - we hit an unwritten wavehdr |
| * - we hit the beginning of a running loop |
| * - we hit a wavehdr which hasn't finished playing |
| */ |
| #if 0 |
| while ((lpWaveHdr = wwo->lpQueuePtr) && |
| (force || |
| (lpWaveHdr != wwo->lpPlayPtr && |
| lpWaveHdr != wwo->lpLoopPtr && |
| lpWaveHdr->reserved <= wwo->dwPlayedTotal))) { |
| |
| wwo->lpQueuePtr = lpWaveHdr->lpNext; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| wodNotifyClient(wwo, WOM_DONE, (DWORD)lpWaveHdr, 0); |
| } |
| #else |
| for (;;) |
| { |
| lpWaveHdr = wwo->lpQueuePtr; |
| if (!lpWaveHdr) {TRACE("Empty queue\n"); break;} |
| if (!force) |
| { |
| if (lpWaveHdr == wwo->lpPlayPtr) {TRACE("play %p\n", lpWaveHdr); break;} |
| if (lpWaveHdr == wwo->lpLoopPtr) {TRACE("loop %p\n", lpWaveHdr); break;} |
| if (lpWaveHdr->reserved > wwo->dwPlayedTotal){TRACE("still playing %p (%lu/%lu)\n", lpWaveHdr, lpWaveHdr->reserved, wwo->dwPlayedTotal);break;} |
| } |
| wwo->lpQueuePtr = lpWaveHdr->lpNext; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| wodNotifyClient(wwo, WOM_DONE, (DWORD)lpWaveHdr, 0); |
| } |
| #endif |
| return (lpWaveHdr && lpWaveHdr != wwo->lpPlayPtr && lpWaveHdr != wwo->lpLoopPtr) ? |
| wodPlayer_NotifyWait(wwo, lpWaveHdr) : INFINITE; |
| } |
| |
| |
| void wait_for_poll(snd_pcm_t *handle, struct pollfd *ufds, unsigned int count) |
| { |
| unsigned short revents; |
| |
| if (snd_pcm_state(handle) != SND_PCM_STATE_RUNNING) |
| return; |
| |
| while (1) { |
| poll(ufds, count, -1); |
| snd_pcm_poll_descriptors_revents(handle, ufds, count, &revents); |
| |
| if (revents & POLLERR) |
| return; |
| |
| /*if (revents & POLLOUT) |
| return 0;*/ |
| } |
| } |
| |
| |
| /************************************************************************** |
| * wodPlayer_Reset [internal] |
| * |
| * wodPlayer helper. Resets current output stream. |
| */ |
| static void wodPlayer_Reset(WINE_WAVEOUT* wwo) |
| { |
| enum win_wm_message msg; |
| DWORD param; |
| HANDLE ev; |
| int err; |
| |
| /* flush all possible output */ |
| wait_for_poll(wwo->p_handle, wwo->ufds, wwo->count); |
| |
| wodUpdatePlayedTotal(wwo, NULL); |
| /* updates current notify list */ |
| wodPlayer_NotifyCompletions(wwo, FALSE); |
| |
| if ( (err = snd_pcm_drop(wwo->p_handle)) < 0) { |
| FIXME("flush: %s\n", snd_strerror(err)); |
| wwo->hThread = 0; |
| wwo->state = WINE_WS_STOPPED; |
| ExitThread(-1); |
| } |
| if ( (err = snd_pcm_prepare(wwo->p_handle)) < 0 ) |
| ERR("pcm prepare failed: %s\n", snd_strerror(err)); |
| |
| /* remove any buffer */ |
| wodPlayer_NotifyCompletions(wwo, TRUE); |
| |
| wwo->lpPlayPtr = wwo->lpQueuePtr = wwo->lpLoopPtr = NULL; |
| wwo->state = WINE_WS_STOPPED; |
| wwo->dwPlayedTotal = wwo->dwWrittenTotal = 0; |
| /* Clear partial wavehdr */ |
| wwo->dwPartialOffset = 0; |
| |
| /* remove any existing message in the ring */ |
| EnterCriticalSection(&wwo->msgRing.msg_crst); |
| /* return all pending headers in queue */ |
| while (ALSA_RetrieveRingMessage(&wwo->msgRing, &msg, ¶m, &ev)) |
| { |
| if (msg != WINE_WM_HEADER) |
| { |
| FIXME("shouldn't have headers left\n"); |
| SetEvent(ev); |
| continue; |
| } |
| ((LPWAVEHDR)param)->dwFlags &= ~WHDR_INQUEUE; |
| ((LPWAVEHDR)param)->dwFlags |= WHDR_DONE; |
| |
| wodNotifyClient(wwo, WOM_DONE, param, 0); |
| } |
| RESET_OMR(&wwo->msgRing); |
| LeaveCriticalSection(&wwo->msgRing.msg_crst); |
| } |
| |
| /************************************************************************** |
| * wodPlayer_ProcessMessages [internal] |
| */ |
| static void wodPlayer_ProcessMessages(WINE_WAVEOUT* wwo) |
| { |
| LPWAVEHDR lpWaveHdr; |
| enum win_wm_message msg; |
| DWORD param; |
| HANDLE ev; |
| int err; |
| |
| while (ALSA_RetrieveRingMessage(&wwo->msgRing, &msg, ¶m, &ev)) { |
| TRACE("Received %s %lx\n", getCmdString(msg), param); |
| |
| switch (msg) { |
| case WINE_WM_PAUSING: |
| if ( snd_pcm_state(wwo->p_handle) == SND_PCM_STATE_RUNNING ) |
| { |
| err = snd_pcm_pause(wwo->p_handle, 1); |
| if ( err < 0 ) |
| ERR("pcm_pause failed: %s\n", snd_strerror(err)); |
| } |
| wwo->state = WINE_WS_PAUSED; |
| SetEvent(ev); |
| break; |
| case WINE_WM_RESTARTING: |
| if (wwo->state == WINE_WS_PAUSED) |
| { |
| if ( snd_pcm_state(wwo->p_handle) == SND_PCM_STATE_PAUSED ) |
| { |
| err = snd_pcm_pause(wwo->p_handle, 0); |
| if ( err < 0 ) |
| ERR("pcm_pause failed: %s\n", snd_strerror(err)); |
| } |
| wwo->state = WINE_WS_PLAYING; |
| } |
| SetEvent(ev); |
| break; |
| case WINE_WM_HEADER: |
| lpWaveHdr = (LPWAVEHDR)param; |
| |
| /* insert buffer at the end of queue */ |
| { |
| LPWAVEHDR* wh; |
| for (wh = &(wwo->lpQueuePtr); *wh; wh = &((*wh)->lpNext)); |
| *wh = lpWaveHdr; |
| } |
| if (!wwo->lpPlayPtr) |
| wodPlayer_BeginWaveHdr(wwo,lpWaveHdr); |
| if (wwo->state == WINE_WS_STOPPED) |
| wwo->state = WINE_WS_PLAYING; |
| break; |
| case WINE_WM_RESETTING: |
| wodPlayer_Reset(wwo); |
| SetEvent(ev); |
| break; |
| case WINE_WM_UPDATE: |
| wodUpdatePlayedTotal(wwo, NULL); |
| SetEvent(ev); |
| break; |
| case WINE_WM_BREAKLOOP: |
| if (wwo->state == WINE_WS_PLAYING && wwo->lpLoopPtr != NULL) { |
| /* ensure exit at end of current loop */ |
| wwo->dwLoops = 1; |
| } |
| SetEvent(ev); |
| break; |
| case WINE_WM_CLOSING: |
| /* sanity check: this should not happen since the device must have been reset before */ |
| if (wwo->lpQueuePtr || wwo->lpPlayPtr) ERR("out of sync\n"); |
| wwo->hThread = 0; |
| wwo->state = WINE_WS_CLOSED; |
| SetEvent(ev); |
| ExitThread(0); |
| /* shouldn't go here */ |
| default: |
| FIXME("unknown message %d\n", msg); |
| break; |
| } |
| } |
| } |
| |
| /************************************************************************** |
| * wodPlayer_FeedDSP [internal] |
| * Feed as much sound data as we can into the DSP and return the number of |
| * milliseconds before it will be necessary to feed the DSP again. |
| */ |
| static DWORD wodPlayer_FeedDSP(WINE_WAVEOUT* wwo) |
| { |
| DWORD availInQ; |
| |
| wodUpdatePlayedTotal(wwo, NULL); |
| availInQ = snd_pcm_avail_update(wwo->p_handle); |
| |
| #if 0 |
| /* input queue empty and output buffer with less than one fragment to play */ |
| if (!wwo->lpPlayPtr && wwo->dwBufferSize < availInQ + wwo->dwFragmentSize) { |
| TRACE("Run out of wavehdr:s...\n"); |
| return INFINITE; |
| } |
| #endif |
| |
| /* no more room... no need to try to feed */ |
| if (availInQ > 0) { |
| /* Feed from partial wavehdr */ |
| if (wwo->lpPlayPtr && wwo->dwPartialOffset != 0) { |
| wodPlayer_WriteMaxFrags(wwo, &availInQ); |
| } |
| |
| /* Feed wavehdrs until we run out of wavehdrs or DSP space */ |
| if (wwo->dwPartialOffset == 0 && wwo->lpPlayPtr) { |
| do { |
| TRACE("Setting time to elapse for %p to %lu\n", |
| wwo->lpPlayPtr, wwo->dwWrittenTotal + wwo->lpPlayPtr->dwBufferLength); |
| /* note the value that dwPlayedTotal will return when this wave finishes playing */ |
| wwo->lpPlayPtr->reserved = wwo->dwWrittenTotal + wwo->lpPlayPtr->dwBufferLength; |
| } while (wodPlayer_WriteMaxFrags(wwo, &availInQ) && wwo->lpPlayPtr && availInQ > 0); |
| } |
| } |
| |
| return wodPlayer_DSPWait(wwo); |
| } |
| |
| /************************************************************************** |
| * wodPlayer [internal] |
| */ |
| static DWORD CALLBACK wodPlayer(LPVOID pmt) |
| { |
| WORD uDevID = (DWORD)pmt; |
| WINE_WAVEOUT* wwo = (WINE_WAVEOUT*)&WOutDev[uDevID]; |
| DWORD dwNextFeedTime = INFINITE; /* Time before DSP needs feeding */ |
| DWORD dwNextNotifyTime = INFINITE; /* Time before next wave completion */ |
| DWORD dwSleepTime; |
| |
| wwo->state = WINE_WS_STOPPED; |
| SetEvent(wwo->hStartUpEvent); |
| |
| for (;;) { |
| /** Wait for the shortest time before an action is required. If there |
| * are no pending actions, wait forever for a command. |
| */ |
| dwSleepTime = min(dwNextFeedTime, dwNextNotifyTime); |
| TRACE("waiting %lums (%lu,%lu)\n", dwSleepTime, dwNextFeedTime, dwNextNotifyTime); |
| WAIT_OMR(&wwo->msgRing, dwSleepTime); |
| wodPlayer_ProcessMessages(wwo); |
| if (wwo->state == WINE_WS_PLAYING) { |
| dwNextFeedTime = wodPlayer_FeedDSP(wwo); |
| dwNextNotifyTime = wodPlayer_NotifyCompletions(wwo, FALSE); |
| if (dwNextFeedTime == INFINITE) { |
| /* FeedDSP ran out of data, but before giving up, */ |
| /* check that a notification didn't give us more */ |
| wodPlayer_ProcessMessages(wwo); |
| if (wwo->lpPlayPtr) { |
| TRACE("recovering\n"); |
| dwNextFeedTime = wodPlayer_FeedDSP(wwo); |
| } |
| } |
| } else { |
| dwNextFeedTime = dwNextNotifyTime = INFINITE; |
| } |
| } |
| } |
| |
| /************************************************************************** |
| * wodGetDevCaps [internal] |
| */ |
| static DWORD wodGetDevCaps(WORD wDevID, LPWAVEOUTCAPSA lpCaps, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %lu);\n", wDevID, lpCaps, dwSize); |
| |
| if (lpCaps == NULL) return MMSYSERR_NOTENABLED; |
| |
| if (wDevID >= MAX_WAVEOUTDRV) { |
| TRACE("MAX_WAVOUTDRV reached !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| memcpy(lpCaps, &WOutDev[wDevID].caps, min(dwSize, sizeof(*lpCaps))); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodOpen [internal] |
| */ |
| static DWORD wodOpen(WORD wDevID, LPWAVEOPENDESC lpDesc, DWORD dwFlags) |
| { |
| WINE_WAVEOUT* wwo; |
| snd_pcm_hw_params_t * hw_params; |
| snd_pcm_sw_params_t * sw_params; |
| snd_pcm_access_t access; |
| snd_pcm_format_t format = -1; |
| unsigned int rate; |
| unsigned int buffer_time = 500000; |
| unsigned int period_time = 10000; |
| snd_pcm_uframes_t buffer_size; |
| snd_pcm_uframes_t period_size; |
| int flags; |
| snd_pcm_t * pcm; |
| int err=0; |
| int dir=0; |
| |
| snd_pcm_hw_params_alloca(&hw_params); |
| snd_pcm_sw_params_alloca(&sw_params); |
| |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpDesc, dwFlags); |
| if (lpDesc == NULL) { |
| WARN("Invalid Parameter !\n"); |
| return MMSYSERR_INVALPARAM; |
| } |
| if (wDevID >= MAX_WAVEOUTDRV) { |
| TRACE("MAX_WAVOUTDRV reached !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| /* only PCM format is supported so far... */ |
| if (!supportedFormat(lpDesc->lpFormat)) { |
| WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n", |
| lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels, |
| lpDesc->lpFormat->nSamplesPerSec); |
| return WAVERR_BADFORMAT; |
| } |
| |
| if (dwFlags & WAVE_FORMAT_QUERY) { |
| TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n", |
| lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels, |
| lpDesc->lpFormat->nSamplesPerSec); |
| return MMSYSERR_NOERROR; |
| } |
| |
| wwo = &WOutDev[wDevID]; |
| |
| if ((dwFlags & WAVE_DIRECTSOUND) && !(wwo->caps.dwSupport & WAVECAPS_DIRECTSOUND)) |
| /* not supported, ignore it */ |
| dwFlags &= ~WAVE_DIRECTSOUND; |
| |
| wwo->p_handle = 0; |
| flags = SND_PCM_NONBLOCK; |
| if ( dwFlags & WAVE_DIRECTSOUND ) |
| flags |= SND_PCM_ASYNC; |
| |
| if ( (err = snd_pcm_open(&pcm, wwo->device, SND_PCM_STREAM_PLAYBACK, flags)) < 0) |
| { |
| ERR("Error open: %s\n", snd_strerror(err)); |
| return MMSYSERR_NOTENABLED; |
| } |
| |
| wwo->wFlags = HIWORD(dwFlags & CALLBACK_TYPEMASK); |
| |
| memcpy(&wwo->waveDesc, lpDesc, sizeof(WAVEOPENDESC)); |
| copy_format(lpDesc->lpFormat, &wwo->format); |
| |
| if (wwo->format.Format.wBitsPerSample == 0) { |
| WARN("Resetting zeroed wBitsPerSample\n"); |
| wwo->format.Format.wBitsPerSample = 8 * |
| (wwo->format.Format.nAvgBytesPerSec / |
| wwo->format.Format.nSamplesPerSec) / |
| wwo->format.Format.nChannels; |
| } |
| |
| snd_pcm_hw_params_any(pcm, hw_params); |
| |
| #define EXIT_ON_ERROR(f,e,txt) do \ |
| { \ |
| int err; \ |
| if ( (err = (f) ) < 0) \ |
| { \ |
| ERR(txt ": %s\n", snd_strerror(err)); \ |
| snd_pcm_close(pcm); \ |
| return e; \ |
| } \ |
| } while(0) |
| |
| access = SND_PCM_ACCESS_MMAP_INTERLEAVED; |
| if ( ( err = snd_pcm_hw_params_set_access(pcm, hw_params, access ) ) < 0) { |
| WARN("mmap not available. switching to standard write.\n"); |
| access = SND_PCM_ACCESS_RW_INTERLEAVED; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_access(pcm, hw_params, access ), MMSYSERR_INVALPARAM, "unable to set access for playback"); |
| wwo->write = snd_pcm_writei; |
| } |
| else |
| wwo->write = snd_pcm_mmap_writei; |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_channels(pcm, hw_params, wwo->format.Format.nChannels), MMSYSERR_INVALPARAM, "unable to set required channels"); |
| |
| if ((wwo->format.Format.wFormatTag == WAVE_FORMAT_PCM) || |
| ((wwo->format.Format.wFormatTag == WAVE_FORMAT_EXTENSIBLE) && |
| IsEqualGUID(&wwo->format.SubFormat, &KSDATAFORMAT_SUBTYPE_PCM))) { |
| format = (wwo->format.Format.wBitsPerSample == 8) ? SND_PCM_FORMAT_U8 : |
| (wwo->format.Format.wBitsPerSample == 16) ? SND_PCM_FORMAT_S16_LE : |
| (wwo->format.Format.wBitsPerSample == 24) ? SND_PCM_FORMAT_S24_LE : |
| (wwo->format.Format.wBitsPerSample == 32) ? SND_PCM_FORMAT_S32_LE : -1; |
| } else if ((wwo->format.Format.wFormatTag == WAVE_FORMAT_EXTENSIBLE) && |
| IsEqualGUID(&wwo->format.SubFormat, &KSDATAFORMAT_SUBTYPE_IEEE_FLOAT)){ |
| format = (wwo->format.Format.wBitsPerSample == 32) ? SND_PCM_FORMAT_FLOAT_LE : -1; |
| } else if (wwo->format.Format.wFormatTag == WAVE_FORMAT_MULAW) { |
| FIXME("unimplemented format: WAVE_FORMAT_MULAW\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else if (wwo->format.Format.wFormatTag == WAVE_FORMAT_ALAW) { |
| FIXME("unimplemented format: WAVE_FORMAT_ALAW\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else if (wwo->format.Format.wFormatTag == WAVE_FORMAT_ADPCM) { |
| FIXME("unimplemented format: WAVE_FORMAT_ADPCM\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else { |
| ERR("invalid format: %0x04x\n", wwo->format.Format.wFormatTag); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_format(pcm, hw_params, format), MMSYSERR_INVALPARAM, "unable to set required format"); |
| |
| rate = wwo->format.Format.nSamplesPerSec; |
| dir=0; |
| err = snd_pcm_hw_params_set_rate_near(pcm, hw_params, &rate, &dir); |
| if (err < 0) { |
| ERR("Rate %ld Hz not available for playback: %s\n", wwo->format.Format.nSamplesPerSec, snd_strerror(rate)); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| if (rate != wwo->format.Format.nSamplesPerSec) { |
| ERR("Rate doesn't match (requested %ld Hz, got %d Hz)\n", wwo->format.Format.nSamplesPerSec, rate); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| dir=0; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_buffer_time_near(pcm, hw_params, &buffer_time, &dir), MMSYSERR_INVALPARAM, "unable to set buffer time"); |
| dir=0; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_period_time_near(pcm, hw_params, &period_time, &dir), MMSYSERR_INVALPARAM, "unable to set period time"); |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params(pcm, hw_params), MMSYSERR_INVALPARAM, "unable to set hw params for playback"); |
| |
| err = snd_pcm_hw_params_get_period_size(hw_params, &period_size, &dir); |
| err = snd_pcm_hw_params_get_buffer_size(hw_params, &buffer_size); |
| |
| snd_pcm_sw_params_current(pcm, sw_params); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_start_threshold(pcm, sw_params, dwFlags & WAVE_DIRECTSOUND ? INT_MAX : 1 ), MMSYSERR_ERROR, "unable to set start threshold"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_silence_size(pcm, sw_params, 0), MMSYSERR_ERROR, "unable to set silence size"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_avail_min(pcm, sw_params, period_size), MMSYSERR_ERROR, "unable to set avail min"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_xfer_align(pcm, sw_params, 1), MMSYSERR_ERROR, "unable to set xfer align"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_silence_threshold(pcm, sw_params, 0), MMSYSERR_ERROR, "unable to set silence threshold"); |
| EXIT_ON_ERROR( snd_pcm_sw_params(pcm, sw_params), MMSYSERR_ERROR, "unable to set sw params for playback"); |
| #undef EXIT_ON_ERROR |
| |
| snd_pcm_prepare(pcm); |
| |
| if (TRACE_ON(wave)) |
| ALSA_TraceParameters(hw_params, sw_params, FALSE); |
| |
| /* now, we can save all required data for later use... */ |
| if ( wwo->hw_params ) |
| snd_pcm_hw_params_free(wwo->hw_params); |
| snd_pcm_hw_params_malloc(&(wwo->hw_params)); |
| snd_pcm_hw_params_copy(wwo->hw_params, hw_params); |
| |
| wwo->dwBufferSize = buffer_size; |
| wwo->lpQueuePtr = wwo->lpPlayPtr = wwo->lpLoopPtr = NULL; |
| wwo->p_handle = pcm; |
| wwo->dwPlayedTotal = wwo->dwWrittenTotal = 0; |
| wwo->dwPartialOffset = 0; |
| |
| ALSA_InitRingMessage(&wwo->msgRing); |
| |
| wwo->count = snd_pcm_poll_descriptors_count (wwo->p_handle); |
| if (wwo->count <= 0) { |
| ERR("Invalid poll descriptors count\n"); |
| return MMSYSERR_ERROR; |
| } |
| |
| wwo->ufds = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY, sizeof(struct pollfd) * wwo->count); |
| if (wwo->ufds == NULL) { |
| ERR("No enough memory\n"); |
| return MMSYSERR_NOMEM; |
| } |
| if ((err = snd_pcm_poll_descriptors(wwo->p_handle, wwo->ufds, wwo->count)) < 0) { |
| ERR("Unable to obtain poll descriptors for playback: %s\n", snd_strerror(err)); |
| return MMSYSERR_ERROR; |
| } |
| |
| if (!(dwFlags & WAVE_DIRECTSOUND)) { |
| wwo->hStartUpEvent = CreateEventA(NULL, FALSE, FALSE, NULL); |
| wwo->hThread = CreateThread(NULL, 0, wodPlayer, (LPVOID)(DWORD)wDevID, 0, &(wwo->dwThreadID)); |
| WaitForSingleObject(wwo->hStartUpEvent, INFINITE); |
| CloseHandle(wwo->hStartUpEvent); |
| } else { |
| wwo->hThread = INVALID_HANDLE_VALUE; |
| wwo->dwThreadID = 0; |
| } |
| wwo->hStartUpEvent = INVALID_HANDLE_VALUE; |
| |
| TRACE("handle=%08lx \n", (DWORD)wwo->p_handle); |
| /* if (wwo->dwFragmentSize % wwo->format.Format.nBlockAlign) |
| ERR("Fragment doesn't contain an integral number of data blocks\n"); |
| */ |
| TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%lu, nSamplesPerSec=%lu, nChannels=%u nBlockAlign=%u!\n", |
| wwo->format.Format.wBitsPerSample, wwo->format.Format.nAvgBytesPerSec, |
| wwo->format.Format.nSamplesPerSec, wwo->format.Format.nChannels, |
| wwo->format.Format.nBlockAlign); |
| |
| return wodNotifyClient(wwo, WOM_OPEN, 0L, 0L); |
| } |
| |
| |
| /************************************************************************** |
| * wodClose [internal] |
| */ |
| static DWORD wodClose(WORD wDevID) |
| { |
| DWORD ret = MMSYSERR_NOERROR; |
| WINE_WAVEOUT* wwo; |
| |
| TRACE("(%u);\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| wwo = &WOutDev[wDevID]; |
| if (wwo->lpQueuePtr) { |
| WARN("buffers still playing !\n"); |
| ret = WAVERR_STILLPLAYING; |
| } else { |
| if (wwo->hThread != INVALID_HANDLE_VALUE) { |
| ALSA_AddRingMessage(&wwo->msgRing, WINE_WM_CLOSING, 0, TRUE); |
| } |
| ALSA_DestroyRingMessage(&wwo->msgRing); |
| |
| snd_pcm_hw_params_free(wwo->hw_params); |
| wwo->hw_params = NULL; |
| |
| snd_pcm_close(wwo->p_handle); |
| wwo->p_handle = NULL; |
| |
| ret = wodNotifyClient(wwo, WOM_CLOSE, 0L, 0L); |
| } |
| |
| HeapFree(GetProcessHeap(), 0, wwo->ufds); |
| return ret; |
| } |
| |
| |
| /************************************************************************** |
| * wodWrite [internal] |
| * |
| */ |
| static DWORD wodWrite(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| /* first, do the sanity checks... */ |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad dev ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->lpData == NULL || !(lpWaveHdr->dwFlags & WHDR_PREPARED)) |
| return WAVERR_UNPREPARED; |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_DONE; |
| lpWaveHdr->dwFlags |= WHDR_INQUEUE; |
| lpWaveHdr->lpNext = 0; |
| |
| ALSA_AddRingMessage(&WOutDev[wDevID].msgRing, WINE_WM_HEADER, (DWORD)lpWaveHdr, FALSE); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodPrepare [internal] |
| */ |
| static DWORD wodPrepare(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| if (wDevID >= MAX_WAVEOUTDRV) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags |= WHDR_PREPARED; |
| lpWaveHdr->dwFlags &= ~WHDR_DONE; |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodUnprepare [internal] |
| */ |
| static DWORD wodUnprepare(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| if (wDevID >= MAX_WAVEOUTDRV) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_PREPARED; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodPause [internal] |
| */ |
| static DWORD wodPause(WORD wDevID) |
| { |
| TRACE("(%u);!\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| ALSA_AddRingMessage(&WOutDev[wDevID].msgRing, WINE_WM_PAUSING, 0, TRUE); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodRestart [internal] |
| */ |
| static DWORD wodRestart(WORD wDevID) |
| { |
| TRACE("(%u);\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (WOutDev[wDevID].state == WINE_WS_PAUSED) { |
| ALSA_AddRingMessage(&WOutDev[wDevID].msgRing, WINE_WM_RESTARTING, 0, TRUE); |
| } |
| |
| /* FIXME: is NotifyClient with WOM_DONE right ? (Comet Busters 1.3.3 needs this notification) */ |
| /* FIXME: Myst crashes with this ... hmm -MM |
| return wodNotifyClient(wwo, WOM_DONE, 0L, 0L); |
| */ |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodReset [internal] |
| */ |
| static DWORD wodReset(WORD wDevID) |
| { |
| TRACE("(%u);\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| ALSA_AddRingMessage(&WOutDev[wDevID].msgRing, WINE_WM_RESETTING, 0, TRUE); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodGetPosition [internal] |
| */ |
| static DWORD wodGetPosition(WORD wDevID, LPMMTIME lpTime, DWORD uSize) |
| { |
| WINE_WAVEOUT* wwo; |
| |
| TRACE("(%u, %p, %lu);\n", wDevID, lpTime, uSize); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpTime == NULL) return MMSYSERR_INVALPARAM; |
| |
| wwo = &WOutDev[wDevID]; |
| ALSA_AddRingMessage(&wwo->msgRing, WINE_WM_UPDATE, 0, TRUE); |
| |
| return bytes_to_mmtime(lpTime, wwo->dwPlayedTotal, &wwo->format); |
| } |
| |
| /************************************************************************** |
| * wodBreakLoop [internal] |
| */ |
| static DWORD wodBreakLoop(WORD wDevID) |
| { |
| TRACE("(%u);\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| ALSA_AddRingMessage(&WOutDev[wDevID].msgRing, WINE_WM_BREAKLOOP, 0, TRUE); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodGetVolume [internal] |
| */ |
| static DWORD wodGetVolume(WORD wDevID, LPDWORD lpdwVol) |
| { |
| WORD left, right; |
| WINE_WAVEOUT* wwo; |
| int count; |
| long min, max; |
| |
| TRACE("(%u, %p);\n", wDevID, lpdwVol); |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| wwo = &WOutDev[wDevID]; |
| count = snd_ctl_elem_info_get_count(wwo->playback_einfo); |
| min = snd_ctl_elem_info_get_min(wwo->playback_einfo); |
| max = snd_ctl_elem_info_get_max(wwo->playback_einfo); |
| |
| #define VOLUME_ALSA_TO_WIN(x) (((x)-min) * 65536 /(max-min)) |
| if (lpdwVol == NULL) |
| return MMSYSERR_NOTENABLED; |
| |
| switch (count) |
| { |
| case 2: |
| left = VOLUME_ALSA_TO_WIN(snd_ctl_elem_value_get_integer(wwo->playback_evalue, 0)); |
| right = VOLUME_ALSA_TO_WIN(snd_ctl_elem_value_get_integer(wwo->playback_evalue, 1)); |
| break; |
| case 1: |
| left = right = VOLUME_ALSA_TO_WIN(snd_ctl_elem_value_get_integer(wwo->playback_evalue, 0)); |
| break; |
| default: |
| WARN("%d channels mixer not supported\n", count); |
| return MMSYSERR_NOERROR; |
| } |
| #undef VOLUME_ALSA_TO_WIN |
| |
| TRACE("left=%d right=%d !\n", left, right); |
| *lpdwVol = MAKELONG( left, right ); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodSetVolume [internal] |
| */ |
| static DWORD wodSetVolume(WORD wDevID, DWORD dwParam) |
| { |
| WORD left, right; |
| WINE_WAVEOUT* wwo; |
| int count, err; |
| long min, max; |
| |
| TRACE("(%u, %08lX);\n", wDevID, dwParam); |
| if (wDevID >= MAX_WAVEOUTDRV || WOutDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| wwo = &WOutDev[wDevID]; |
| count=snd_ctl_elem_info_get_count(wwo->playback_einfo); |
| min = snd_ctl_elem_info_get_min(wwo->playback_einfo); |
| max = snd_ctl_elem_info_get_max(wwo->playback_einfo); |
| |
| left = LOWORD(dwParam); |
| right = HIWORD(dwParam); |
| |
| #define VOLUME_WIN_TO_ALSA(x) ( (((x) * (max-min)) / 65536) + min ) |
| switch (count) |
| { |
| case 2: |
| snd_ctl_elem_value_set_integer(wwo->playback_evalue, 0, VOLUME_WIN_TO_ALSA(left)); |
| snd_ctl_elem_value_set_integer(wwo->playback_evalue, 1, VOLUME_WIN_TO_ALSA(right)); |
| break; |
| case 1: |
| snd_ctl_elem_value_set_integer(wwo->playback_evalue, 0, VOLUME_WIN_TO_ALSA(left)); |
| break; |
| default: |
| WARN("%d channels mixer not supported\n", count); |
| } |
| #undef VOLUME_WIN_TO_ALSA |
| if ( (err = snd_ctl_elem_write(wwo->ctl, wwo->playback_evalue)) < 0) |
| { |
| ERR("error writing snd_ctl_elem_value: %s\n", snd_strerror(err)); |
| } |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodGetNumDevs [internal] |
| */ |
| static DWORD wodGetNumDevs(void) |
| { |
| return ALSA_WodNumDevs; |
| } |
| |
| /************************************************************************** |
| * wodDevInterfaceSize [internal] |
| */ |
| static DWORD wodDevInterfaceSize(UINT wDevID, LPDWORD dwParam1) |
| { |
| TRACE("(%u, %p)\n", wDevID, dwParam1); |
| |
| *dwParam1 = MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1, |
| NULL, 0 ) * sizeof(WCHAR); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * wodDevInterface [internal] |
| */ |
| static DWORD wodDevInterface(UINT wDevID, PWCHAR dwParam1, DWORD dwParam2) |
| { |
| if (dwParam2 >= MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1, |
| NULL, 0 ) * sizeof(WCHAR)) |
| { |
| MultiByteToWideChar(CP_ACP, 0, WOutDev[wDevID].interface_name, -1, |
| dwParam1, dwParam2 / sizeof(WCHAR)); |
| return MMSYSERR_NOERROR; |
| } |
| return MMSYSERR_INVALPARAM; |
| } |
| |
| /************************************************************************** |
| * wodMessage (WINEALSA.@) |
| */ |
| DWORD WINAPI ALSA_wodMessage(UINT wDevID, UINT wMsg, DWORD dwUser, |
| DWORD dwParam1, DWORD dwParam2) |
| { |
| TRACE("(%u, %04X, %08lX, %08lX, %08lX);\n", |
| wDevID, wMsg, dwUser, dwParam1, dwParam2); |
| |
| switch (wMsg) { |
| case DRVM_INIT: |
| case DRVM_EXIT: |
| case DRVM_ENABLE: |
| case DRVM_DISABLE: |
| /* FIXME: Pretend this is supported */ |
| return 0; |
| case WODM_OPEN: return wodOpen (wDevID, (LPWAVEOPENDESC)dwParam1, dwParam2); |
| case WODM_CLOSE: return wodClose (wDevID); |
| case WODM_GETDEVCAPS: return wodGetDevCaps (wDevID, (LPWAVEOUTCAPSA)dwParam1, dwParam2); |
| case WODM_GETNUMDEVS: return wodGetNumDevs (); |
| case WODM_GETPITCH: return MMSYSERR_NOTSUPPORTED; |
| case WODM_SETPITCH: return MMSYSERR_NOTSUPPORTED; |
| case WODM_GETPLAYBACKRATE: return MMSYSERR_NOTSUPPORTED; |
| case WODM_SETPLAYBACKRATE: return MMSYSERR_NOTSUPPORTED; |
| case WODM_WRITE: return wodWrite (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WODM_PAUSE: return wodPause (wDevID); |
| case WODM_GETPOS: return wodGetPosition (wDevID, (LPMMTIME)dwParam1, dwParam2); |
| case WODM_BREAKLOOP: return wodBreakLoop (wDevID); |
| case WODM_PREPARE: return wodPrepare (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WODM_UNPREPARE: return wodUnprepare (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WODM_GETVOLUME: return wodGetVolume (wDevID, (LPDWORD)dwParam1); |
| case WODM_SETVOLUME: return wodSetVolume (wDevID, dwParam1); |
| case WODM_RESTART: return wodRestart (wDevID); |
| case WODM_RESET: return wodReset (wDevID); |
| case DRV_QUERYDEVICEINTERFACESIZE: return wodDevInterfaceSize (wDevID, (LPDWORD)dwParam1); |
| case DRV_QUERYDEVICEINTERFACE: return wodDevInterface (wDevID, (PWCHAR)dwParam1, dwParam2); |
| case DRV_QUERYDSOUNDIFACE: return wodDsCreate (wDevID, (PIDSDRIVER*)dwParam1); |
| case DRV_QUERYDSOUNDDESC: return wodDsDesc (wDevID, (PDSDRIVERDESC)dwParam1); |
| |
| default: |
| FIXME("unknown message %d!\n", wMsg); |
| } |
| return MMSYSERR_NOTSUPPORTED; |
| } |
| |
| /*======================================================================* |
| * Low level DSOUND implementation * |
| *======================================================================*/ |
| |
| typedef struct IDsDriverImpl IDsDriverImpl; |
| typedef struct IDsDriverBufferImpl IDsDriverBufferImpl; |
| |
| struct IDsDriverImpl |
| { |
| /* IUnknown fields */ |
| IDsDriverVtbl *lpVtbl; |
| DWORD ref; |
| /* IDsDriverImpl fields */ |
| UINT wDevID; |
| IDsDriverBufferImpl*primary; |
| }; |
| |
| struct IDsDriverBufferImpl |
| { |
| /* IUnknown fields */ |
| IDsDriverBufferVtbl *lpVtbl; |
| DWORD ref; |
| /* IDsDriverBufferImpl fields */ |
| IDsDriverImpl* drv; |
| |
| CRITICAL_SECTION mmap_crst; |
| LPVOID mmap_buffer; |
| DWORD mmap_buflen_bytes; |
| snd_pcm_uframes_t mmap_buflen_frames; |
| snd_pcm_channel_area_t * mmap_areas; |
| snd_async_handler_t * mmap_async_handler; |
| }; |
| |
| static void DSDB_CheckXRUN(IDsDriverBufferImpl* pdbi) |
| { |
| WINE_WAVEOUT * wwo = &(WOutDev[pdbi->drv->wDevID]); |
| snd_pcm_state_t state = snd_pcm_state(wwo->p_handle); |
| |
| if ( state == SND_PCM_STATE_XRUN ) |
| { |
| int err = snd_pcm_prepare(wwo->p_handle); |
| TRACE("xrun occurred\n"); |
| if ( err < 0 ) |
| ERR("recovery from xrun failed, prepare failed: %s\n", snd_strerror(err)); |
| } |
| else if ( state == SND_PCM_STATE_SUSPENDED ) |
| { |
| int err = snd_pcm_resume(wwo->p_handle); |
| TRACE("recovery from suspension occurred\n"); |
| if (err < 0 && err != -EAGAIN){ |
| err = snd_pcm_prepare(wwo->p_handle); |
| if (err < 0) |
| ERR("recovery from suspend failed, prepare failed: %s\n", snd_strerror(err)); |
| } |
| } |
| } |
| |
| static void DSDB_MMAPCopy(IDsDriverBufferImpl* pdbi) |
| { |
| WINE_WAVEOUT * wwo = &(WOutDev[pdbi->drv->wDevID]); |
| unsigned int channels; |
| snd_pcm_format_t format; |
| snd_pcm_uframes_t period_size; |
| snd_pcm_sframes_t avail; |
| int err; |
| int dir=0; |
| |
| if ( !pdbi->mmap_buffer || !wwo->hw_params || !wwo->p_handle) |
| return; |
| |
| err = snd_pcm_hw_params_get_channels(wwo->hw_params, &channels); |
| err = snd_pcm_hw_params_get_format(wwo->hw_params, &format); |
| dir=0; |
| err = snd_pcm_hw_params_get_period_size(wwo->hw_params, &period_size, &dir); |
| avail = snd_pcm_avail_update(wwo->p_handle); |
| |
| DSDB_CheckXRUN(pdbi); |
| |
| TRACE("avail=%d format=%s channels=%d\n", (int)avail, snd_pcm_format_name(format), channels ); |
| |
| while (avail >= period_size) |
| { |
| const snd_pcm_channel_area_t *areas; |
| snd_pcm_uframes_t ofs; |
| snd_pcm_uframes_t frames; |
| int err; |
| |
| frames = avail / period_size * period_size; /* round down to a multiple of period_size */ |
| |
| EnterCriticalSection(&pdbi->mmap_crst); |
| |
| snd_pcm_mmap_begin(wwo->p_handle, &areas, &ofs, &frames); |
| snd_pcm_areas_copy(areas, ofs, pdbi->mmap_areas, ofs, channels, frames, format); |
| err = snd_pcm_mmap_commit(wwo->p_handle, ofs, frames); |
| |
| LeaveCriticalSection(&pdbi->mmap_crst); |
| |
| if ( err != (snd_pcm_sframes_t) frames) |
| ERR("mmap partially failed.\n"); |
| |
| avail = snd_pcm_avail_update(wwo->p_handle); |
| } |
| } |
| |
| static void DSDB_PCMCallback(snd_async_handler_t *ahandler) |
| { |
| /* snd_pcm_t * handle = snd_async_handler_get_pcm(ahandler); */ |
| IDsDriverBufferImpl* pdbi = snd_async_handler_get_callback_private(ahandler); |
| TRACE("callback called\n"); |
| DSDB_MMAPCopy(pdbi); |
| } |
| |
| static int DSDB_CreateMMAP(IDsDriverBufferImpl* pdbi) |
| { |
| WINE_WAVEOUT * wwo = &(WOutDev[pdbi->drv->wDevID]); |
| snd_pcm_format_t format; |
| snd_pcm_uframes_t frames; |
| unsigned int channels; |
| unsigned int bits_per_sample; |
| unsigned int bits_per_frame; |
| snd_pcm_channel_area_t * a; |
| unsigned int c; |
| int err; |
| |
| err = snd_pcm_hw_params_get_format(wwo->hw_params, &format); |
| err = snd_pcm_hw_params_get_buffer_size(wwo->hw_params, &frames); |
| err = snd_pcm_hw_params_get_channels(wwo->hw_params, &channels); |
| bits_per_sample = snd_pcm_format_physical_width(format); |
| bits_per_frame = bits_per_sample * channels; |
| |
| |
| if (TRACE_ON(wave)) |
| ALSA_TraceParameters(wwo->hw_params, NULL, FALSE); |
| |
| TRACE("format=%s frames=%ld channels=%d bits_per_sample=%d bits_per_frame=%d\n", |
| snd_pcm_format_name(format), frames, channels, bits_per_sample, bits_per_frame); |
| |
| pdbi->mmap_buflen_frames = frames; |
| pdbi->mmap_buflen_bytes = snd_pcm_frames_to_bytes( wwo->p_handle, frames ); |
| pdbi->mmap_buffer = HeapAlloc(GetProcessHeap(),0,pdbi->mmap_buflen_bytes); |
| if (!pdbi->mmap_buffer) |
| return DSERR_OUTOFMEMORY; |
| |
| snd_pcm_format_set_silence(format, pdbi->mmap_buffer, frames ); |
| |
| TRACE("created mmap buffer of %ld frames (%ld bytes) at %p\n", |
| frames, pdbi->mmap_buflen_bytes, pdbi->mmap_buffer); |
| |
| pdbi->mmap_areas = HeapAlloc(GetProcessHeap(),0,channels*sizeof(snd_pcm_channel_area_t)); |
| if (!pdbi->mmap_areas) |
| return DSERR_OUTOFMEMORY; |
| |
| a = pdbi->mmap_areas; |
| for (c = 0; c < channels; c++, a++) |
| { |
| a->addr = pdbi->mmap_buffer; |
| a->first = bits_per_sample * c; |
| a->step = bits_per_frame; |
| TRACE("Area %d: addr=%p first=%d step=%d\n", c, a->addr, a->first, a->step); |
| } |
| |
| InitializeCriticalSection(&pdbi->mmap_crst); |
| |
| err = snd_async_add_pcm_handler(&pdbi->mmap_async_handler, wwo->p_handle, DSDB_PCMCallback, pdbi); |
| if ( err < 0 ) |
| { |
| ERR("add_pcm_handler failed. reason: %s\n", snd_strerror(err)); |
| return DSERR_GENERIC; |
| } |
| |
| return DS_OK; |
| } |
| |
| static void DSDB_DestroyMMAP(IDsDriverBufferImpl* pdbi) |
| { |
| TRACE("mmap buffer %p destroyed\n", pdbi->mmap_buffer); |
| HeapFree(GetProcessHeap(), 0, pdbi->mmap_areas); |
| HeapFree(GetProcessHeap(), 0, pdbi->mmap_buffer); |
| pdbi->mmap_areas = NULL; |
| pdbi->mmap_buffer = NULL; |
| DeleteCriticalSection(&pdbi->mmap_crst); |
| } |
| |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_QueryInterface(PIDSDRIVERBUFFER iface, REFIID riid, LPVOID *ppobj) |
| { |
| /* IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; */ |
| FIXME("(): stub!\n"); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static ULONG WINAPI IDsDriverBufferImpl_AddRef(PIDSDRIVERBUFFER iface) |
| { |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| TRACE("(%p)\n",iface); |
| return ++This->ref; |
| } |
| |
| static ULONG WINAPI IDsDriverBufferImpl_Release(PIDSDRIVERBUFFER iface) |
| { |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| TRACE("(%p)\n",iface); |
| if (--This->ref) |
| return This->ref; |
| if (This == This->drv->primary) |
| This->drv->primary = NULL; |
| DSDB_DestroyMMAP(This); |
| HeapFree(GetProcessHeap(), 0, This); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_Lock(PIDSDRIVERBUFFER iface, |
| LPVOID*ppvAudio1,LPDWORD pdwLen1, |
| LPVOID*ppvAudio2,LPDWORD pdwLen2, |
| DWORD dwWritePosition,DWORD dwWriteLen, |
| DWORD dwFlags) |
| { |
| /* IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; */ |
| TRACE("(%p)\n",iface); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_Unlock(PIDSDRIVERBUFFER iface, |
| LPVOID pvAudio1,DWORD dwLen1, |
| LPVOID pvAudio2,DWORD dwLen2) |
| { |
| /* IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; */ |
| TRACE("(%p)\n",iface); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_SetFormat(PIDSDRIVERBUFFER iface, |
| LPWAVEFORMATEX pwfx) |
| { |
| /* IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; */ |
| TRACE("(%p,%p)\n",iface,pwfx); |
| return DSERR_BUFFERLOST; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_SetFrequency(PIDSDRIVERBUFFER iface, DWORD dwFreq) |
| { |
| /* IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; */ |
| TRACE("(%p,%ld): stub\n",iface,dwFreq); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_SetVolumePan(PIDSDRIVERBUFFER iface, PDSVOLUMEPAN pVolPan) |
| { |
| DWORD vol; |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| TRACE("(%p,%p)\n",iface,pVolPan); |
| vol = pVolPan->dwTotalLeftAmpFactor | (pVolPan->dwTotalRightAmpFactor << 16); |
| |
| if (wodSetVolume(This->drv->wDevID, vol) != MMSYSERR_NOERROR) { |
| WARN("wodSetVolume failed\n"); |
| return DSERR_INVALIDPARAM; |
| } |
| |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_SetPosition(PIDSDRIVERBUFFER iface, DWORD dwNewPos) |
| { |
| /* IDsDriverImpl *This = (IDsDriverImpl *)iface; */ |
| TRACE("(%p,%ld): stub\n",iface,dwNewPos); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_GetPosition(PIDSDRIVERBUFFER iface, |
| LPDWORD lpdwPlay, LPDWORD lpdwWrite) |
| { |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| WINE_WAVEOUT * wwo = &(WOutDev[This->drv->wDevID]); |
| snd_pcm_uframes_t hw_ptr; |
| snd_pcm_uframes_t period_size; |
| int dir; |
| int err; |
| |
| if (wwo->hw_params == NULL) return DSERR_GENERIC; |
| |
| dir=0; |
| err = snd_pcm_hw_params_get_period_size(wwo->hw_params, &period_size, &dir); |
| |
| if (wwo->p_handle == NULL) return DSERR_GENERIC; |
| /** we need to track down buffer underruns */ |
| DSDB_CheckXRUN(This); |
| |
| EnterCriticalSection(&This->mmap_crst); |
| /* FIXME: snd_pcm_mmap_hw_ptr() should not be accessed by a user app. */ |
| /* It will NOT return what why want anyway. */ |
| hw_ptr = _snd_pcm_mmap_hw_ptr(wwo->p_handle); |
| if (lpdwPlay) |
| *lpdwPlay = snd_pcm_frames_to_bytes(wwo->p_handle, hw_ptr/ period_size * period_size) % This->mmap_buflen_bytes; |
| if (lpdwWrite) |
| *lpdwWrite = snd_pcm_frames_to_bytes(wwo->p_handle, (hw_ptr / period_size + 1) * period_size ) % This->mmap_buflen_bytes; |
| LeaveCriticalSection(&This->mmap_crst); |
| |
| TRACE("hw_ptr=0x%08x, playpos=%ld, writepos=%ld\n", (unsigned int)hw_ptr, lpdwPlay?*lpdwPlay:-1, lpdwWrite?*lpdwWrite:-1); |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_Play(PIDSDRIVERBUFFER iface, DWORD dwRes1, DWORD dwRes2, DWORD dwFlags) |
| { |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| WINE_WAVEOUT * wwo = &(WOutDev[This->drv->wDevID]); |
| snd_pcm_state_t state; |
| int err; |
| |
| TRACE("(%p,%lx,%lx,%lx)\n",iface,dwRes1,dwRes2,dwFlags); |
| |
| if (wwo->p_handle == NULL) return DSERR_GENERIC; |
| |
| state = snd_pcm_state(wwo->p_handle); |
| if ( state == SND_PCM_STATE_SETUP ) |
| { |
| err = snd_pcm_prepare(wwo->p_handle); |
| state = snd_pcm_state(wwo->p_handle); |
| } |
| if ( state == SND_PCM_STATE_PREPARED ) |
| { |
| DSDB_MMAPCopy(This); |
| err = snd_pcm_start(wwo->p_handle); |
| } |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverBufferImpl_Stop(PIDSDRIVERBUFFER iface) |
| { |
| IDsDriverBufferImpl *This = (IDsDriverBufferImpl *)iface; |
| WINE_WAVEOUT * wwo = &(WOutDev[This->drv->wDevID]); |
| int err; |
| DWORD play; |
| DWORD write; |
| |
| TRACE("(%p)\n",iface); |
| |
| if (wwo->p_handle == NULL) return DSERR_GENERIC; |
| |
| /* ring buffer wrap up detection */ |
| IDsDriverBufferImpl_GetPosition(iface, &play, &write); |
| if ( play > write) |
| { |
| TRACE("writepos wrapper up\n"); |
| return DS_OK; |
| } |
| |
| if ( ( err = snd_pcm_drop(wwo->p_handle)) < 0 ) |
| { |
| ERR("error while stopping pcm: %s\n", snd_strerror(err)); |
| return DSERR_GENERIC; |
| } |
| return DS_OK; |
| } |
| |
| static IDsDriverBufferVtbl dsdbvt = |
| { |
| IDsDriverBufferImpl_QueryInterface, |
| IDsDriverBufferImpl_AddRef, |
| IDsDriverBufferImpl_Release, |
| IDsDriverBufferImpl_Lock, |
| IDsDriverBufferImpl_Unlock, |
| IDsDriverBufferImpl_SetFormat, |
| IDsDriverBufferImpl_SetFrequency, |
| IDsDriverBufferImpl_SetVolumePan, |
| IDsDriverBufferImpl_SetPosition, |
| IDsDriverBufferImpl_GetPosition, |
| IDsDriverBufferImpl_Play, |
| IDsDriverBufferImpl_Stop |
| }; |
| |
| static HRESULT WINAPI IDsDriverImpl_QueryInterface(PIDSDRIVER iface, REFIID riid, LPVOID *ppobj) |
| { |
| /* IDsDriverImpl *This = (IDsDriverImpl *)iface; */ |
| FIXME("(%p): stub!\n",iface); |
| return DSERR_UNSUPPORTED; |
| } |
| |
| static ULONG WINAPI IDsDriverImpl_AddRef(PIDSDRIVER iface) |
| { |
| IDsDriverImpl *This = (IDsDriverImpl *)iface; |
| TRACE("(%p)\n",iface); |
| This->ref++; |
| return This->ref; |
| } |
| |
| static ULONG WINAPI IDsDriverImpl_Release(PIDSDRIVER iface) |
| { |
| IDsDriverImpl *This = (IDsDriverImpl *)iface; |
| TRACE("(%p)\n",iface); |
| if (--This->ref) |
| return This->ref; |
| HeapFree(GetProcessHeap(),0,This); |
| return 0; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_GetDriverDesc(PIDSDRIVER iface, PDSDRIVERDESC pDesc) |
| { |
| IDsDriverImpl *This = (IDsDriverImpl *)iface; |
| TRACE("(%p,%p)\n",iface,pDesc); |
| memcpy(pDesc, &(WOutDev[This->wDevID].ds_desc), sizeof(DSDRIVERDESC)); |
| pDesc->dwFlags = DSDDESC_DOMMSYSTEMOPEN | DSDDESC_DOMMSYSTEMSETFORMAT | |
| DSDDESC_USESYSTEMMEMORY | DSDDESC_DONTNEEDPRIMARYLOCK; |
| pDesc->dnDevNode = WOutDev[This->wDevID].waveDesc.dnDevNode; |
| pDesc->wVxdId = 0; |
| pDesc->wReserved = 0; |
| pDesc->ulDeviceNum = This->wDevID; |
| pDesc->dwHeapType = DSDHEAP_NOHEAP; |
| pDesc->pvDirectDrawHeap = NULL; |
| pDesc->dwMemStartAddress = 0; |
| pDesc->dwMemEndAddress = 0; |
| pDesc->dwMemAllocExtra = 0; |
| pDesc->pvReserved1 = NULL; |
| pDesc->pvReserved2 = NULL; |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_Open(PIDSDRIVER iface) |
| { |
| /* IDsDriverImpl *This = (IDsDriverImpl *)iface; */ |
| TRACE("(%p)\n",iface); |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_Close(PIDSDRIVER iface) |
| { |
| /* IDsDriverImpl *This = (IDsDriverImpl *)iface; */ |
| TRACE("(%p)\n",iface); |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_GetCaps(PIDSDRIVER iface, PDSDRIVERCAPS pCaps) |
| { |
| IDsDriverImpl *This = (IDsDriverImpl *)iface; |
| TRACE("(%p,%p)\n",iface,pCaps); |
| memset(pCaps, 0, sizeof(*pCaps)); |
| |
| pCaps->dwFlags = DSCAPS_PRIMARYMONO; |
| if ( WOutDev[This->wDevID].caps.wChannels == 2 ) |
| pCaps->dwFlags |= DSCAPS_PRIMARYSTEREO; |
| |
| if ( WOutDev[This->wDevID].caps.dwFormats & (WAVE_FORMAT_1S08 | WAVE_FORMAT_2S08 | WAVE_FORMAT_4S08 ) ) |
| pCaps->dwFlags |= DSCAPS_PRIMARY8BIT; |
| |
| if ( WOutDev[This->wDevID].caps.dwFormats & (WAVE_FORMAT_1S16 | WAVE_FORMAT_2S16 | WAVE_FORMAT_4S16)) |
| pCaps->dwFlags |= DSCAPS_PRIMARY16BIT; |
| |
| pCaps->dwPrimaryBuffers = 1; |
| TRACE("caps=0x%X\n",(unsigned int)pCaps->dwFlags); |
| pCaps->dwMinSecondarySampleRate = DSBFREQUENCY_MIN; |
| pCaps->dwMaxSecondarySampleRate = DSBFREQUENCY_MAX; |
| |
| /* the other fields only apply to secondary buffers, which we don't support |
| * (unless we want to mess with wavetable synthesizers and MIDI) */ |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_CreateSoundBuffer(PIDSDRIVER iface, |
| LPWAVEFORMATEX pwfx, |
| DWORD dwFlags, DWORD dwCardAddress, |
| LPDWORD pdwcbBufferSize, |
| LPBYTE *ppbBuffer, |
| LPVOID *ppvObj) |
| { |
| IDsDriverImpl *This = (IDsDriverImpl *)iface; |
| IDsDriverBufferImpl** ippdsdb = (IDsDriverBufferImpl**)ppvObj; |
| int err; |
| |
| TRACE("(%p,%p,%lx,%lx)\n",iface,pwfx,dwFlags,dwCardAddress); |
| /* we only support primary buffers */ |
| if (!(dwFlags & DSBCAPS_PRIMARYBUFFER)) |
| return DSERR_UNSUPPORTED; |
| if (This->primary) |
| return DSERR_ALLOCATED; |
| if (dwFlags & (DSBCAPS_CTRLFREQUENCY | DSBCAPS_CTRLPAN)) |
| return DSERR_CONTROLUNAVAIL; |
| |
| *ippdsdb = (IDsDriverBufferImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDsDriverBufferImpl)); |
| if (*ippdsdb == NULL) |
| return DSERR_OUTOFMEMORY; |
| (*ippdsdb)->lpVtbl = &dsdbvt; |
| (*ippdsdb)->ref = 1; |
| (*ippdsdb)->drv = This; |
| |
| err = DSDB_CreateMMAP((*ippdsdb)); |
| if ( err != DS_OK ) |
| { |
| HeapFree(GetProcessHeap(), 0, *ippdsdb); |
| *ippdsdb = NULL; |
| return err; |
| } |
| *ppbBuffer = (*ippdsdb)->mmap_buffer; |
| *pdwcbBufferSize = (*ippdsdb)->mmap_buflen_bytes; |
| |
| This->primary = *ippdsdb; |
| |
| /* buffer is ready to go */ |
| TRACE("buffer created at %p\n", *ippdsdb); |
| return DS_OK; |
| } |
| |
| static HRESULT WINAPI IDsDriverImpl_DuplicateSoundBuffer(PIDSDRIVER iface, |
| PIDSDRIVERBUFFER pBuffer, |
| LPVOID *ppvObj) |
| { |
| /* IDsDriverImpl *This = (IDsDriverImpl *)iface; */ |
| TRACE("(%p,%p): stub\n",iface,pBuffer); |
| return DSERR_INVALIDCALL; |
| } |
| |
| static IDsDriverVtbl dsdvt = |
| { |
| IDsDriverImpl_QueryInterface, |
| IDsDriverImpl_AddRef, |
| IDsDriverImpl_Release, |
| IDsDriverImpl_GetDriverDesc, |
| IDsDriverImpl_Open, |
| IDsDriverImpl_Close, |
| IDsDriverImpl_GetCaps, |
| IDsDriverImpl_CreateSoundBuffer, |
| IDsDriverImpl_DuplicateSoundBuffer |
| }; |
| |
| static DWORD wodDsCreate(UINT wDevID, PIDSDRIVER* drv) |
| { |
| IDsDriverImpl** idrv = (IDsDriverImpl**)drv; |
| |
| TRACE("driver created\n"); |
| |
| /* the HAL isn't much better than the HEL if we can't do mmap() */ |
| if (!(WOutDev[wDevID].caps.dwSupport & WAVECAPS_DIRECTSOUND)) { |
| ERR("DirectSound flag not set\n"); |
| MESSAGE("This sound card's driver does not support direct access\n"); |
| MESSAGE("The (slower) DirectSound HEL mode will be used instead.\n"); |
| return MMSYSERR_NOTSUPPORTED; |
| } |
| |
| *idrv = (IDsDriverImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IDsDriverImpl)); |
| if (!*idrv) |
| return MMSYSERR_NOMEM; |
| (*idrv)->lpVtbl = &dsdvt; |
| (*idrv)->ref = 1; |
| |
| (*idrv)->wDevID = wDevID; |
| (*idrv)->primary = NULL; |
| return MMSYSERR_NOERROR; |
| } |
| |
| static DWORD wodDsDesc(UINT wDevID, PDSDRIVERDESC desc) |
| { |
| memcpy(desc, &(WOutDev[wDevID].ds_desc), sizeof(DSDRIVERDESC)); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /*======================================================================* |
| * Low level WAVE IN implementation * |
| *======================================================================*/ |
| |
| /************************************************************************** |
| * widNotifyClient [internal] |
| */ |
| static DWORD widNotifyClient(WINE_WAVEIN* wwi, WORD wMsg, DWORD dwParam1, DWORD dwParam2) |
| { |
| TRACE("wMsg = 0x%04x dwParm1 = %04lX dwParam2 = %04lX\n", wMsg, dwParam1, dwParam2); |
| |
| switch (wMsg) { |
| case WIM_OPEN: |
| case WIM_CLOSE: |
| case WIM_DATA: |
| if (wwi->wFlags != DCB_NULL && |
| !DriverCallback(wwi->waveDesc.dwCallback, wwi->wFlags, (HDRVR)wwi->waveDesc.hWave, |
| wMsg, wwi->waveDesc.dwInstance, dwParam1, dwParam2)) { |
| WARN("can't notify client !\n"); |
| return MMSYSERR_ERROR; |
| } |
| break; |
| default: |
| FIXME("Unknown callback message %u\n", wMsg); |
| return MMSYSERR_INVALPARAM; |
| } |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widGetDevCaps [internal] |
| */ |
| static DWORD widGetDevCaps(WORD wDevID, LPWAVEOUTCAPSA lpCaps, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %lu);\n", wDevID, lpCaps, dwSize); |
| |
| if (lpCaps == NULL) return MMSYSERR_NOTENABLED; |
| |
| if (wDevID >= MAX_WAVEINDRV) { |
| TRACE("MAX_WAVOUTDRV reached !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| memcpy(lpCaps, &WInDev[wDevID].caps, min(dwSize, sizeof(*lpCaps))); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widRecorder_ReadHeaders [internal] |
| */ |
| static void widRecorder_ReadHeaders(WINE_WAVEIN * wwi) |
| { |
| enum win_wm_message tmp_msg; |
| DWORD tmp_param; |
| HANDLE tmp_ev; |
| WAVEHDR* lpWaveHdr; |
| |
| while (ALSA_RetrieveRingMessage(&wwi->msgRing, &tmp_msg, &tmp_param, &tmp_ev)) { |
| if (tmp_msg == WINE_WM_HEADER) { |
| LPWAVEHDR* wh; |
| lpWaveHdr = (LPWAVEHDR)tmp_param; |
| lpWaveHdr->lpNext = 0; |
| |
| if (wwi->lpQueuePtr == 0) |
| wwi->lpQueuePtr = lpWaveHdr; |
| else { |
| for (wh = &(wwi->lpQueuePtr); *wh; wh = &((*wh)->lpNext)); |
| *wh = lpWaveHdr; |
| } |
| } else { |
| ERR("should only have headers left\n"); |
| } |
| } |
| } |
| |
| /************************************************************************** |
| * widRecorder [internal] |
| */ |
| static DWORD CALLBACK widRecorder(LPVOID pmt) |
| { |
| WORD uDevID = (DWORD)pmt; |
| WINE_WAVEIN* wwi = (WINE_WAVEIN*)&WInDev[uDevID]; |
| WAVEHDR* lpWaveHdr; |
| DWORD dwSleepTime; |
| DWORD bytesRead; |
| LPVOID buffer = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, wwi->dwPeriodSize); |
| char *pOffset = buffer; |
| enum win_wm_message msg; |
| DWORD param; |
| HANDLE ev; |
| DWORD frames_per_period; |
| |
| wwi->state = WINE_WS_STOPPED; |
| wwi->dwTotalRecorded = 0; |
| wwi->lpQueuePtr = NULL; |
| |
| SetEvent(wwi->hStartUpEvent); |
| |
| /* make sleep time to be # of ms to output a period */ |
| dwSleepTime = (1024/*wwi-dwPeriodSize => overrun!*/ * 1000) / wwi->format.Format.nAvgBytesPerSec; |
| frames_per_period = snd_pcm_bytes_to_frames(wwi->p_handle, wwi->dwPeriodSize); |
| TRACE("sleeptime=%ld ms\n", dwSleepTime); |
| |
| for (;;) { |
| /* wait for dwSleepTime or an event in thread's queue */ |
| /* FIXME: could improve wait time depending on queue state, |
| * ie, number of queued fragments |
| */ |
| if (wwi->lpQueuePtr != NULL && wwi->state == WINE_WS_PLAYING) |
| { |
| int periods; |
| DWORD frames; |
| DWORD bytes; |
| DWORD read; |
| |
| lpWaveHdr = wwi->lpQueuePtr; |
| /* read all the fragments accumulated so far */ |
| frames = snd_pcm_avail_update(wwi->p_handle); |
| bytes = snd_pcm_frames_to_bytes(wwi->p_handle, frames); |
| TRACE("frames = %ld bytes = %ld\n", frames, bytes); |
| periods = bytes / wwi->dwPeriodSize; |
| while ((periods > 0) && (wwi->lpQueuePtr)) |
| { |
| periods--; |
| bytes = wwi->dwPeriodSize; |
| TRACE("bytes = %ld\n",bytes); |
| if (lpWaveHdr->dwBufferLength - lpWaveHdr->dwBytesRecorded >= wwi->dwPeriodSize) |
| { |
| /* directly read fragment in wavehdr */ |
| read = wwi->read(wwi->p_handle, lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded, frames_per_period); |
| bytesRead = snd_pcm_frames_to_bytes(wwi->p_handle, read); |
| |
| TRACE("bytesRead=%ld (direct)\n", bytesRead); |
| if (bytesRead != (DWORD) -1) |
| { |
| /* update number of bytes recorded in current buffer and by this device */ |
| lpWaveHdr->dwBytesRecorded += bytesRead; |
| wwi->dwTotalRecorded += bytesRead; |
| |
| /* buffer is full. notify client */ |
| if (lpWaveHdr->dwBytesRecorded == lpWaveHdr->dwBufferLength) |
| { |
| /* must copy the value of next waveHdr, because we have no idea of what |
| * will be done with the content of lpWaveHdr in callback |
| */ |
| LPWAVEHDR lpNext = lpWaveHdr->lpNext; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| wwi->lpQueuePtr = lpNext; |
| widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0); |
| lpWaveHdr = lpNext; |
| } |
| } else { |
| TRACE("read(%s, %p, %ld) failed (%s)\n", wwi->device, |
| lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded, |
| frames_per_period, strerror(errno)); |
| } |
| } |
| else |
| { |
| /* read the fragment in a local buffer */ |
| read = wwi->read(wwi->p_handle, buffer, frames_per_period); |
| bytesRead = snd_pcm_frames_to_bytes(wwi->p_handle, read); |
| pOffset = buffer; |
| |
| TRACE("bytesRead=%ld (local)\n", bytesRead); |
| |
| if (bytesRead == (DWORD) -1) { |
| TRACE("read(%s, %p, %ld) failed (%s)\n", wwi->device, |
| buffer, frames_per_period, strerror(errno)); |
| continue; |
| } |
| |
| /* copy data in client buffers */ |
| while (bytesRead != (DWORD) -1 && bytesRead > 0) |
| { |
| DWORD dwToCopy = min (bytesRead, lpWaveHdr->dwBufferLength - lpWaveHdr->dwBytesRecorded); |
| |
| memcpy(lpWaveHdr->lpData + lpWaveHdr->dwBytesRecorded, |
| pOffset, |
| dwToCopy); |
| |
| /* update number of bytes recorded in current buffer and by this device */ |
| lpWaveHdr->dwBytesRecorded += dwToCopy; |
| wwi->dwTotalRecorded += dwToCopy; |
| bytesRead -= dwToCopy; |
| pOffset += dwToCopy; |
| |
| /* client buffer is full. notify client */ |
| if (lpWaveHdr->dwBytesRecorded == lpWaveHdr->dwBufferLength) |
| { |
| /* must copy the value of next waveHdr, because we have no idea of what |
| * will be done with the content of lpWaveHdr in callback |
| */ |
| LPWAVEHDR lpNext = lpWaveHdr->lpNext; |
| TRACE("lpNext=%p\n", lpNext); |
| |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| wwi->lpQueuePtr = lpNext; |
| widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0); |
| |
| lpWaveHdr = lpNext; |
| if (!lpNext && bytesRead) { |
| /* before we give up, check for more header messages */ |
| while (ALSA_PeekRingMessage(&wwi->msgRing, &msg, ¶m, &ev)) |
| { |
| if (msg == WINE_WM_HEADER) { |
| LPWAVEHDR hdr; |
| ALSA_RetrieveRingMessage(&wwi->msgRing, &msg, ¶m, &ev); |
| hdr = ((LPWAVEHDR)param); |
| TRACE("msg = %s, hdr = %p, ev = %p\n", getCmdString(msg), hdr, ev); |
| hdr->lpNext = 0; |
| if (lpWaveHdr == 0) { |
| /* new head of queue */ |
| wwi->lpQueuePtr = lpWaveHdr = hdr; |
| } else { |
| /* insert buffer at the end of queue */ |
| LPWAVEHDR* wh; |
| for (wh = &(wwi->lpQueuePtr); *wh; wh = &((*wh)->lpNext)); |
| *wh = hdr; |
| } |
| } else |
| break; |
| } |
| |
| if (lpWaveHdr == 0) { |
| /* no more buffer to copy data to, but we did read more. |
| * what hasn't been copied will be dropped |
| */ |
| WARN("buffer under run! %lu bytes dropped.\n", bytesRead); |
| wwi->lpQueuePtr = NULL; |
| break; |
| } |
| } |
| } |
| } |
| } |
| } |
| } |
| |
| WAIT_OMR(&wwi->msgRing, dwSleepTime); |
| |
| while (ALSA_RetrieveRingMessage(&wwi->msgRing, &msg, ¶m, &ev)) |
| { |
| TRACE("msg=%s param=0x%lx\n", getCmdString(msg), param); |
| switch (msg) { |
| case WINE_WM_PAUSING: |
| wwi->state = WINE_WS_PAUSED; |
| /*FIXME("Device should stop recording\n");*/ |
| SetEvent(ev); |
| break; |
| case WINE_WM_STARTING: |
| wwi->state = WINE_WS_PLAYING; |
| snd_pcm_start(wwi->p_handle); |
| SetEvent(ev); |
| break; |
| case WINE_WM_HEADER: |
| lpWaveHdr = (LPWAVEHDR)param; |
| lpWaveHdr->lpNext = 0; |
| |
| /* insert buffer at the end of queue */ |
| { |
| LPWAVEHDR* wh; |
| for (wh = &(wwi->lpQueuePtr); *wh; wh = &((*wh)->lpNext)); |
| *wh = lpWaveHdr; |
| } |
| break; |
| case WINE_WM_STOPPING: |
| if (wwi->state != WINE_WS_STOPPED) |
| { |
| snd_pcm_drain(wwi->p_handle); |
| |
| /* read any headers in queue */ |
| widRecorder_ReadHeaders(wwi); |
| |
| /* return current buffer to app */ |
| lpWaveHdr = wwi->lpQueuePtr; |
| if (lpWaveHdr) |
| { |
| LPWAVEHDR lpNext = lpWaveHdr->lpNext; |
| TRACE("stop %p %p\n", lpWaveHdr, lpWaveHdr->lpNext); |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| wwi->lpQueuePtr = lpNext; |
| widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0); |
| } |
| } |
| wwi->state = WINE_WS_STOPPED; |
| SetEvent(ev); |
| break; |
| case WINE_WM_RESETTING: |
| if (wwi->state != WINE_WS_STOPPED) |
| { |
| snd_pcm_drain(wwi->p_handle); |
| } |
| wwi->state = WINE_WS_STOPPED; |
| wwi->dwTotalRecorded = 0; |
| |
| /* read any headers in queue */ |
| widRecorder_ReadHeaders(wwi); |
| |
| /* return all buffers to the app */ |
| for (lpWaveHdr = wwi->lpQueuePtr; lpWaveHdr; lpWaveHdr = lpWaveHdr->lpNext) { |
| TRACE("reset %p %p\n", lpWaveHdr, lpWaveHdr->lpNext); |
| lpWaveHdr->dwFlags &= ~WHDR_INQUEUE; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| wwi->lpQueuePtr = lpWaveHdr->lpNext; |
| widNotifyClient(wwi, WIM_DATA, (DWORD)lpWaveHdr, 0); |
| } |
| |
| wwi->lpQueuePtr = NULL; |
| SetEvent(ev); |
| break; |
| case WINE_WM_CLOSING: |
| wwi->hThread = 0; |
| wwi->state = WINE_WS_CLOSED; |
| SetEvent(ev); |
| HeapFree(GetProcessHeap(), 0, buffer); |
| ExitThread(0); |
| /* shouldn't go here */ |
| case WINE_WM_UPDATE: |
| SetEvent(ev); |
| break; |
| |
| default: |
| FIXME("unknown message %d\n", msg); |
| break; |
| } |
| } |
| } |
| ExitThread(0); |
| /* just for not generating compilation warnings... should never be executed */ |
| return 0; |
| } |
| |
| /************************************************************************** |
| * widOpen [internal] |
| */ |
| static DWORD widOpen(WORD wDevID, LPWAVEOPENDESC lpDesc, DWORD dwFlags) |
| { |
| WINE_WAVEIN* wwi; |
| snd_pcm_hw_params_t * hw_params; |
| snd_pcm_sw_params_t * sw_params; |
| snd_pcm_access_t access; |
| snd_pcm_format_t format; |
| unsigned int rate; |
| unsigned int buffer_time = 500000; |
| unsigned int period_time = 10000; |
| snd_pcm_uframes_t buffer_size; |
| snd_pcm_uframes_t period_size; |
| int flags; |
| snd_pcm_t * pcm; |
| int err; |
| int dir; |
| |
| snd_pcm_hw_params_alloca(&hw_params); |
| snd_pcm_sw_params_alloca(&sw_params); |
| |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpDesc, dwFlags); |
| if (lpDesc == NULL) { |
| WARN("Invalid Parameter !\n"); |
| return MMSYSERR_INVALPARAM; |
| } |
| if (wDevID >= MAX_WAVEOUTDRV) { |
| TRACE("MAX_WAVOUTDRV reached !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| /* only PCM format is supported so far... */ |
| if (!supportedFormat(lpDesc->lpFormat)) { |
| WARN("Bad format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n", |
| lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels, |
| lpDesc->lpFormat->nSamplesPerSec); |
| return WAVERR_BADFORMAT; |
| } |
| |
| if (dwFlags & WAVE_FORMAT_QUERY) { |
| TRACE("Query format: tag=%04X nChannels=%d nSamplesPerSec=%ld !\n", |
| lpDesc->lpFormat->wFormatTag, lpDesc->lpFormat->nChannels, |
| lpDesc->lpFormat->nSamplesPerSec); |
| return MMSYSERR_NOERROR; |
| } |
| |
| wwi = &WInDev[wDevID]; |
| |
| if ((dwFlags & WAVE_DIRECTSOUND) && !(wwi->caps.dwSupport & WAVECAPS_DIRECTSOUND)) |
| /* not supported, ignore it */ |
| dwFlags &= ~WAVE_DIRECTSOUND; |
| |
| wwi->p_handle = 0; |
| flags = SND_PCM_NONBLOCK; |
| if ( dwFlags & WAVE_DIRECTSOUND ) |
| flags |= SND_PCM_ASYNC; |
| |
| if ( (err=snd_pcm_open(&pcm, wwi->device, SND_PCM_STREAM_CAPTURE, dwFlags)) < 0 ) |
| { |
| ERR("Error open: %s\n", snd_strerror(err)); |
| return MMSYSERR_NOTENABLED; |
| } |
| |
| wwi->wFlags = HIWORD(dwFlags & CALLBACK_TYPEMASK); |
| |
| memcpy(&wwi->waveDesc, lpDesc, sizeof(WAVEOPENDESC)); |
| copy_format(lpDesc->lpFormat, &wwi->format); |
| |
| if (wwi->format.Format.wBitsPerSample == 0) { |
| WARN("Resetting zeroed wBitsPerSample\n"); |
| wwi->format.Format.wBitsPerSample = 8 * |
| (wwi->format.Format.nAvgBytesPerSec / |
| wwi->format.Format.nSamplesPerSec) / |
| wwi->format.Format.nChannels; |
| } |
| |
| snd_pcm_hw_params_any(pcm, hw_params); |
| |
| #define EXIT_ON_ERROR(f,e,txt) do \ |
| { \ |
| int err; \ |
| if ( (err = (f) ) < 0) \ |
| { \ |
| ERR(txt ": %s\n", snd_strerror(err)); \ |
| snd_pcm_close(pcm); \ |
| return e; \ |
| } \ |
| } while(0) |
| |
| access = SND_PCM_ACCESS_MMAP_INTERLEAVED; |
| if ( ( err = snd_pcm_hw_params_set_access(pcm, hw_params, access ) ) < 0) { |
| WARN("mmap not available. switching to standard write.\n"); |
| access = SND_PCM_ACCESS_RW_INTERLEAVED; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_access(pcm, hw_params, access ), MMSYSERR_INVALPARAM, "unable to set access for playback"); |
| wwi->read = snd_pcm_readi; |
| } |
| else |
| wwi->read = snd_pcm_mmap_readi; |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_channels(pcm, hw_params, wwi->format.Format.nChannels), MMSYSERR_INVALPARAM, "unable to set required channels"); |
| |
| if ((wwi->format.Format.wFormatTag == WAVE_FORMAT_PCM) || |
| ((wwi->format.Format.wFormatTag == WAVE_FORMAT_EXTENSIBLE) && |
| IsEqualGUID(&wwi->format.SubFormat, &KSDATAFORMAT_SUBTYPE_PCM))) { |
| format = (wwi->format.Format.wBitsPerSample == 8) ? SND_PCM_FORMAT_U8 : |
| (wwi->format.Format.wBitsPerSample == 16) ? SND_PCM_FORMAT_S16_LE : |
| (wwi->format.Format.wBitsPerSample == 24) ? SND_PCM_FORMAT_S24_LE : |
| (wwi->format.Format.wBitsPerSample == 32) ? SND_PCM_FORMAT_S32_LE : -1; |
| } else if ((wwi->format.Format.wFormatTag == WAVE_FORMAT_EXTENSIBLE) && |
| IsEqualGUID(&wwi->format.SubFormat, &KSDATAFORMAT_SUBTYPE_IEEE_FLOAT)){ |
| format = (wwi->format.Format.wBitsPerSample == 32) ? SND_PCM_FORMAT_FLOAT_LE : -1; |
| } else if (wwi->format.Format.wFormatTag == WAVE_FORMAT_MULAW) { |
| FIXME("unimplemented format: WAVE_FORMAT_MULAW\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else if (wwi->format.Format.wFormatTag == WAVE_FORMAT_ALAW) { |
| FIXME("unimplemented format: WAVE_FORMAT_ALAW\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else if (wwi->format.Format.wFormatTag == WAVE_FORMAT_ADPCM) { |
| FIXME("unimplemented format: WAVE_FORMAT_ADPCM\n"); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } else { |
| ERR("invalid format: %0x04x\n", wwi->format.Format.wFormatTag); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_format(pcm, hw_params, format), MMSYSERR_INVALPARAM, "unable to set required format"); |
| |
| rate = wwi->format.Format.nSamplesPerSec; |
| dir = 0; |
| err = snd_pcm_hw_params_set_rate_near(pcm, hw_params, &rate, &dir); |
| if (err < 0) { |
| ERR("Rate %ld Hz not available for playback: %s\n", wwi->format.Format.nSamplesPerSec, snd_strerror(rate)); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| if (rate != wwi->format.Format.nSamplesPerSec) { |
| ERR("Rate doesn't match (requested %ld Hz, got %d Hz)\n", wwi->format.Format.nSamplesPerSec, rate); |
| snd_pcm_close(pcm); |
| return WAVERR_BADFORMAT; |
| } |
| |
| dir=0; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_buffer_time_near(pcm, hw_params, &buffer_time, &dir), MMSYSERR_INVALPARAM, "unable to set buffer time"); |
| dir=0; |
| EXIT_ON_ERROR( snd_pcm_hw_params_set_period_time_near(pcm, hw_params, &period_time, &dir), MMSYSERR_INVALPARAM, "unable to set period time"); |
| |
| EXIT_ON_ERROR( snd_pcm_hw_params(pcm, hw_params), MMSYSERR_INVALPARAM, "unable to set hw params for playback"); |
| |
| dir=0; |
| err = snd_pcm_hw_params_get_period_size(hw_params, &period_size, &dir); |
| err = snd_pcm_hw_params_get_buffer_size(hw_params, &buffer_size); |
| |
| snd_pcm_sw_params_current(pcm, sw_params); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_start_threshold(pcm, sw_params, dwFlags & WAVE_DIRECTSOUND ? INT_MAX : 1 ), MMSYSERR_ERROR, "unable to set start threshold"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_silence_size(pcm, sw_params, 0), MMSYSERR_ERROR, "unable to set silence size"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_avail_min(pcm, sw_params, period_size), MMSYSERR_ERROR, "unable to set avail min"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_xfer_align(pcm, sw_params, 1), MMSYSERR_ERROR, "unable to set xfer align"); |
| EXIT_ON_ERROR( snd_pcm_sw_params_set_silence_threshold(pcm, sw_params, 0), MMSYSERR_ERROR, "unable to set silence threshold"); |
| EXIT_ON_ERROR( snd_pcm_sw_params(pcm, sw_params), MMSYSERR_ERROR, "unable to set sw params for playback"); |
| #undef EXIT_ON_ERROR |
| |
| snd_pcm_prepare(pcm); |
| |
| if (TRACE_ON(wave)) |
| ALSA_TraceParameters(hw_params, sw_params, FALSE); |
| |
| /* now, we can save all required data for later use... */ |
| if ( wwi->hw_params ) |
| snd_pcm_hw_params_free(wwi->hw_params); |
| snd_pcm_hw_params_malloc(&(wwi->hw_params)); |
| snd_pcm_hw_params_copy(wwi->hw_params, hw_params); |
| |
| wwi->dwBufferSize = buffer_size; |
| wwi->lpQueuePtr = wwi->lpPlayPtr = wwi->lpLoopPtr = NULL; |
| wwi->p_handle = pcm; |
| |
| ALSA_InitRingMessage(&wwi->msgRing); |
| |
| wwi->count = snd_pcm_poll_descriptors_count (wwi->p_handle); |
| if (wwi->count <= 0) { |
| ERR("Invalid poll descriptors count\n"); |
| return MMSYSERR_ERROR; |
| } |
| |
| wwi->ufds = HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY, sizeof(struct pollfd) * wwi->count); |
| if (wwi->ufds == NULL) { |
| ERR("No enough memory\n"); |
| return MMSYSERR_NOMEM; |
| } |
| if ((err = snd_pcm_poll_descriptors(wwi->p_handle, wwi->ufds, wwi->count)) < 0) { |
| ERR("Unable to obtain poll descriptors for playback: %s\n", snd_strerror(err)); |
| return MMSYSERR_ERROR; |
| } |
| |
| wwi->dwPeriodSize = period_size; |
| /*if (wwi->dwFragmentSize % wwi->format.Format.nBlockAlign) |
| ERR("Fragment doesn't contain an integral number of data blocks\n"); |
| */ |
| TRACE("dwPeriodSize=%lu\n", wwi->dwPeriodSize); |
| TRACE("wBitsPerSample=%u, nAvgBytesPerSec=%lu, nSamplesPerSec=%lu, nChannels=%u nBlockAlign=%u!\n", |
| wwi->format.Format.wBitsPerSample, wwi->format.Format.nAvgBytesPerSec, |
| wwi->format.Format.nSamplesPerSec, wwi->format.Format.nChannels, |
| wwi->format.Format.nBlockAlign); |
| |
| if (!(dwFlags & WAVE_DIRECTSOUND)) { |
| wwi->hStartUpEvent = CreateEventA(NULL, FALSE, FALSE, NULL); |
| wwi->hThread = CreateThread(NULL, 0, widRecorder, (LPVOID)(DWORD)wDevID, 0, &(wwi->dwThreadID)); |
| WaitForSingleObject(wwi->hStartUpEvent, INFINITE); |
| CloseHandle(wwi->hStartUpEvent); |
| } else { |
| wwi->hThread = INVALID_HANDLE_VALUE; |
| wwi->dwThreadID = 0; |
| } |
| wwi->hStartUpEvent = INVALID_HANDLE_VALUE; |
| |
| return widNotifyClient(wwi, WIM_OPEN, 0L, 0L); |
| } |
| |
| |
| /************************************************************************** |
| * widClose [internal] |
| */ |
| static DWORD widClose(WORD wDevID) |
| { |
| DWORD ret = MMSYSERR_NOERROR; |
| WINE_WAVEIN* wwi; |
| |
| TRACE("(%u);\n", wDevID); |
| |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].p_handle == NULL) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| wwi = &WInDev[wDevID]; |
| if (wwi->lpQueuePtr) { |
| WARN("buffers still playing !\n"); |
| ret = WAVERR_STILLPLAYING; |
| } else { |
| if (wwi->hThread != INVALID_HANDLE_VALUE) { |
| ALSA_AddRingMessage(&wwi->msgRing, WINE_WM_CLOSING, 0, TRUE); |
| } |
| ALSA_DestroyRingMessage(&wwi->msgRing); |
| |
| snd_pcm_hw_params_free(wwi->hw_params); |
| wwi->hw_params = NULL; |
| |
| snd_pcm_close(wwi->p_handle); |
| wwi->p_handle = NULL; |
| |
| ret = widNotifyClient(wwi, WIM_CLOSE, 0L, 0L); |
| } |
| |
| HeapFree(GetProcessHeap(), 0, wwi->ufds); |
| return ret; |
| } |
| |
| /************************************************************************** |
| * widAddBuffer [internal] |
| * |
| */ |
| static DWORD widAddBuffer(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| /* first, do the sanity checks... */ |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].p_handle == NULL) { |
| WARN("bad dev ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->lpData == NULL || !(lpWaveHdr->dwFlags & WHDR_PREPARED)) |
| return WAVERR_UNPREPARED; |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_DONE; |
| lpWaveHdr->dwFlags |= WHDR_INQUEUE; |
| lpWaveHdr->lpNext = 0; |
| |
| ALSA_AddRingMessage(&WInDev[wDevID].msgRing, WINE_WM_HEADER, (DWORD)lpWaveHdr, FALSE); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widPrepare [internal] |
| */ |
| static DWORD widPrepare(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| if (wDevID >= MAX_WAVEINDRV) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags |= WHDR_PREPARED; |
| lpWaveHdr->dwFlags &= ~WHDR_DONE; |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widUnprepare [internal] |
| */ |
| static DWORD widUnprepare(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| if (wDevID >= MAX_WAVEINDRV) { |
| WARN("bad device ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| if (lpWaveHdr->dwFlags & WHDR_INQUEUE) |
| return WAVERR_STILLPLAYING; |
| |
| lpWaveHdr->dwFlags &= ~WHDR_PREPARED; |
| lpWaveHdr->dwFlags |= WHDR_DONE; |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widStart [internal] |
| * |
| */ |
| static DWORD widStart(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| /* first, do the sanity checks... */ |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].p_handle == NULL) { |
| WARN("bad dev ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| ALSA_AddRingMessage(&WInDev[wDevID].msgRing, WINE_WM_STARTING, 0, TRUE); |
| |
| Sleep(500); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widStop [internal] |
| * |
| */ |
| static DWORD widStop(WORD wDevID, LPWAVEHDR lpWaveHdr, DWORD dwSize) |
| { |
| TRACE("(%u, %p, %08lX);\n", wDevID, lpWaveHdr, dwSize); |
| |
| /* first, do the sanity checks... */ |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].p_handle == NULL) { |
| WARN("bad dev ID !\n"); |
| return MMSYSERR_BADDEVICEID; |
| } |
| |
| ALSA_AddRingMessage(&WInDev[wDevID].msgRing, WINE_WM_STOPPING, 0, TRUE); |
| |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widReset [internal] |
| */ |
| static DWORD widReset(WORD wDevID) |
| { |
| TRACE("(%u);\n", wDevID); |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) { |
| WARN("can't reset !\n"); |
| return MMSYSERR_INVALHANDLE; |
| } |
| ALSA_AddRingMessage(&WInDev[wDevID].msgRing, WINE_WM_RESETTING, 0, TRUE); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widGetPosition [internal] |
| */ |
| static DWORD widGetPosition(WORD wDevID, LPMMTIME lpTime, DWORD uSize) |
| { |
| WINE_WAVEIN* wwi; |
| |
| TRACE("(%u, %p, %lu);\n", wDevID, lpTime, uSize); |
| |
| if (wDevID >= MAX_WAVEINDRV || WInDev[wDevID].state == WINE_WS_CLOSED) { |
| WARN("can't get pos !\n"); |
| return MMSYSERR_INVALHANDLE; |
| } |
| |
| if (lpTime == NULL) { |
| WARN("invalid parameter: lpTime = NULL\n"); |
| return MMSYSERR_INVALPARAM; |
| } |
| |
| wwi = &WInDev[wDevID]; |
| ALSA_AddRingMessage(&wwi->msgRing, WINE_WM_UPDATE, 0, TRUE); |
| |
| return bytes_to_mmtime(lpTime, wwi->dwTotalRecorded, &wwi->format); |
| } |
| |
| /************************************************************************** |
| * widGetNumDevs [internal] |
| */ |
| static DWORD widGetNumDevs(void) |
| { |
| return ALSA_WidNumDevs; |
| } |
| |
| /************************************************************************** |
| * widDevInterfaceSize [internal] |
| */ |
| static DWORD widDevInterfaceSize(UINT wDevID, LPDWORD dwParam1) |
| { |
| TRACE("(%u, %p)\n", wDevID, dwParam1); |
| |
| *dwParam1 = MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1, |
| NULL, 0 ) * sizeof(WCHAR); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widDevInterface [internal] |
| */ |
| static DWORD widDevInterface(UINT wDevID, PWCHAR dwParam1, DWORD dwParam2) |
| { |
| if (dwParam2 >= MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1, |
| NULL, 0 ) * sizeof(WCHAR)) |
| { |
| MultiByteToWideChar(CP_ACP, 0, WInDev[wDevID].interface_name, -1, |
| dwParam1, dwParam2 / sizeof(WCHAR)); |
| return MMSYSERR_NOERROR; |
| } |
| return MMSYSERR_INVALPARAM; |
| } |
| |
| /************************************************************************** |
| * widDsCreate [internal] |
| */ |
| static DWORD widDsCreate(UINT wDevID, PIDSCDRIVER* drv) |
| { |
| TRACE("(%d,%p)\n",wDevID,drv); |
| |
| /* the HAL isn't much better than the HEL if we can't do mmap() */ |
| FIXME("DirectSoundCapture not implemented\n"); |
| MESSAGE("The (slower) DirectSound HEL mode will be used instead.\n"); |
| return MMSYSERR_NOTSUPPORTED; |
| } |
| |
| /************************************************************************** |
| * widDsDesc [internal] |
| */ |
| static DWORD widDsDesc(UINT wDevID, PDSDRIVERDESC desc) |
| { |
| memcpy(desc, &(WInDev[wDevID].ds_desc), sizeof(DSDRIVERDESC)); |
| return MMSYSERR_NOERROR; |
| } |
| |
| /************************************************************************** |
| * widMessage (WINEALSA.@) |
| */ |
| DWORD WINAPI ALSA_widMessage(UINT wDevID, UINT wMsg, DWORD dwUser, |
| DWORD dwParam1, DWORD dwParam2) |
| { |
| TRACE("(%u, %04X, %08lX, %08lX, %08lX);\n", |
| wDevID, wMsg, dwUser, dwParam1, dwParam2); |
| |
| switch (wMsg) { |
| case DRVM_INIT: |
| case DRVM_EXIT: |
| case DRVM_ENABLE: |
| case DRVM_DISABLE: |
| /* FIXME: Pretend this is supported */ |
| return 0; |
| case WIDM_OPEN: return widOpen (wDevID, (LPWAVEOPENDESC)dwParam1, dwParam2); |
| case WIDM_CLOSE: return widClose (wDevID); |
| case WIDM_ADDBUFFER: return widAddBuffer (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WIDM_PREPARE: return widPrepare (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WIDM_UNPREPARE: return widUnprepare (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WIDM_GETDEVCAPS: return widGetDevCaps (wDevID, (LPWAVEOUTCAPSA)dwParam1, dwParam2); |
| case WIDM_GETNUMDEVS: return widGetNumDevs (); |
| case WIDM_GETPOS: return widGetPosition (wDevID, (LPMMTIME)dwParam1, dwParam2); |
| case WIDM_RESET: return widReset (wDevID); |
| case WIDM_START: return widStart (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case WIDM_STOP: return widStop (wDevID, (LPWAVEHDR)dwParam1, dwParam2); |
| case DRV_QUERYDEVICEINTERFACESIZE: return widDevInterfaceSize (wDevID, (LPDWORD)dwParam1); |
| case DRV_QUERYDEVICEINTERFACE: return widDevInterface (wDevID, (PWCHAR)dwParam1, dwParam2); |
| case DRV_QUERYDSOUNDIFACE: return widDsCreate (wDevID, (PIDSCDRIVER*)dwParam1); |
| case DRV_QUERYDSOUNDDESC: return widDsDesc (wDevID, (PDSDRIVERDESC)dwParam1); |
| default: |
| FIXME("unknown message %d!\n", wMsg); |
| } |
| return MMSYSERR_NOTSUPPORTED; |
| } |
| |
| #endif |
| |
| #if !(defined(HAVE_ALSA) && ((SND_LIB_MAJOR == 0 && SND_LIB_MINOR >= 9) || SND_LIB_MAJOR >= 1)) |
| |
| /************************************************************************** |
| * widMessage (WINEALSA.@) |
| */ |
| DWORD WINAPI ALSA_widMessage(WORD wDevID, WORD wMsg, DWORD dwUser, |
| DWORD dwParam1, DWORD dwParam2) |
| { |
| FIXME("(%u, %04X, %08lX, %08lX, %08lX):stub\n", wDevID, wMsg, dwUser, dwParam1, dwParam2); |
| return MMSYSERR_NOTENABLED; |
| } |
| |
| #endif |
| |
| #ifndef HAVE_ALSA |
| |
| /************************************************************************** |
| * wodMessage (WINEALSA.@) |
| */ |
| DWORD WINAPI ALSA_wodMessage(WORD wDevID, WORD wMsg, DWORD dwUser, |
| DWORD dwParam1, DWORD dwParam2) |
| { |
| FIXME("(%u, %04X, %08lX, %08lX, %08lX):stub\n", wDevID, wMsg, dwUser, dwParam1, dwParam2); |
| return MMSYSERR_NOTENABLED; |
| } |
| |
| #endif /* HAVE_ALSA */ |