reactos/dll/directx/wine/dmusic/buffer.c

   1 /*
   2  * IDirectMusicBuffer Implementation
   3  *
   4  * Copyright (C) 2003-2004 Rok Mandeljc
   5  * Copyright (C) 2012 Christian Costa
   6  *
   7  * This program is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "dmusic_private.h"
  23 #include <dmksctrl.h>
  24
  25 static inline IDirectMusicBufferImpl *impl_from_IDirectMusicBuffer(IDirectMusicBuffer *iface)
  26 {
  27     return CONTAINING_RECORD(iface, IDirectMusicBufferImpl, IDirectMusicBuffer_iface);
  28 }
  29
  30 /* IDirectMusicBufferImpl IUnknown part: */
  31 static HRESULT WINAPI IDirectMusicBufferImpl_QueryInterface(LPDIRECTMUSICBUFFER iface, REFIID riid, LPVOID *ret_iface)
  32 {
  33     TRACE("(%p)->(%s, %p)\n", iface, debugstr_dmguid(riid), ret_iface);
  34
  35     if (IsEqualIID(riid, &IID_IUnknown) ||
  36         IsEqualIID(riid, &IID_IDirectMusicBuffer))
  37     {
  38         IDirectMusicBuffer_AddRef(iface);
  39         *ret_iface = iface;
  40         return S_OK;
  41     }
  42
  43     *ret_iface = NULL;
  44
  45     WARN("(%p)->(%s, %p): not found\n", iface, debugstr_dmguid(riid), ret_iface);
  46
  47     return E_NOINTERFACE;
  48 }
  49
  50 static ULONG WINAPI IDirectMusicBufferImpl_AddRef(LPDIRECTMUSICBUFFER iface)
  51 {
  52     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
  53     ULONG ref = InterlockedIncrement(&This->ref);
  54
  55     TRACE("(%p)->(): new ref = %u\n", iface, ref);
  56
  57     DMUSIC_LockModule();
  58
  59     return ref;
  60 }
  61
  62 static ULONG WINAPI IDirectMusicBufferImpl_Release(LPDIRECTMUSICBUFFER iface)
  63 {
  64     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
  65     ULONG ref = InterlockedDecrement(&This->ref);
  66
  67     TRACE("(%p)->(): new ref = %u\n", iface, ref);
  68
  69     if (!ref) {
  70         HeapFree(GetProcessHeap(), 0, This->data);
  71         HeapFree(GetProcessHeap(), 0, This);
  72     }
  73
  74     DMUSIC_UnlockModule();
  75
  76     return ref;
  77 }
  78
  79 /* IDirectMusicBufferImpl IDirectMusicBuffer part: */
  80 static HRESULT WINAPI IDirectMusicBufferImpl_Flush(LPDIRECTMUSICBUFFER iface)
  81 {
  82     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
  83
  84     TRACE("(%p)->()\n", iface);
  85
  86     This->write_pos = 0;
  87
  88     return S_OK;
  89 }
  90
  91 static HRESULT WINAPI IDirectMusicBufferImpl_TotalTime(LPDIRECTMUSICBUFFER iface, LPREFERENCE_TIME prtTime)
  92 {
  93     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
  94
  95     FIXME("(%p, %p): stub\n", This, prtTime);
  96
  97     return S_OK;
  98 }
  99
 100 static HRESULT WINAPI IDirectMusicBufferImpl_PackStructured(LPDIRECTMUSICBUFFER iface, REFERENCE_TIME ref_time, DWORD channel_group, DWORD channel_message)
 101 {
 102     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 103     DWORD new_write_pos = This->write_pos + sizeof(DMUS_EVENTHEADER) + sizeof(DWORD);
 104     DMUS_EVENTHEADER header;
 105
 106     TRACE("(%p)->(0x%s, %u, 0x%x)\n", iface, wine_dbgstr_longlong(ref_time), channel_group, channel_message);
 107
 108     if (new_write_pos > This->size)
 109         return DMUS_E_BUFFER_FULL;
 110
 111     /* Channel_message 0xZZYYXX (3 bytes) is a midi message where XX = status byte, YY = byte 1 and ZZ = byte 2 */
 112
 113     if (!(channel_message & 0x80))
 114     {
 115         /* Status byte MSB is always set */
 116         return DMUS_E_INVALID_EVENT;
 117     }
 118
 119     if (!This->write_pos)
 120         This->start_time = ref_time;
 121
 122     header.cbEvent = 3; /* Midi message takes 4 bytes space but only 3 are relevant */
 123     header.dwChannelGroup = channel_group;
 124     header.rtDelta = ref_time - This->start_time;
 125     header.dwFlags = DMUS_EVENT_STRUCTURED;
 126
 127     memcpy(This->data + This->write_pos, &header, sizeof(header));
 128     *(DWORD*)(This->data + This->write_pos + sizeof(header)) = channel_message;
 129     This->write_pos = new_write_pos;
 130
 131     return S_OK;
 132 }
 133
 134 static HRESULT WINAPI IDirectMusicBufferImpl_PackUnstructured(LPDIRECTMUSICBUFFER iface, REFERENCE_TIME rt, DWORD dwChannelGroup, DWORD cb, LPBYTE lpb)
 135 {
 136     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 137
 138     FIXME("(%p, 0x%s, %d, %d, %p): stub\n", This, wine_dbgstr_longlong(rt), dwChannelGroup, cb, lpb);
 139
 140     return S_OK;
 141 }
 142
 143 static HRESULT WINAPI IDirectMusicBufferImpl_ResetReadPtr(LPDIRECTMUSICBUFFER iface)
 144 {
 145     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 146
 147     FIXME("(%p): stub\n", This);
 148
 149     return S_OK;
 150 }
 151
 152 static HRESULT WINAPI IDirectMusicBufferImpl_GetNextEvent(LPDIRECTMUSICBUFFER iface, LPREFERENCE_TIME prt, LPDWORD pdwChannelGroup, LPDWORD pdwLength, LPBYTE* ppData)
 153 {
 154     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 155
 156     FIXME("(%p, %p, %p, %p, %p): stub\n", This, prt, pdwChannelGroup, pdwLength, ppData);
 157
 158     return S_OK;
 159 }
 160
 161 static HRESULT WINAPI IDirectMusicBufferImpl_GetRawBufferPtr(LPDIRECTMUSICBUFFER iface, LPBYTE* data)
 162 {
 163     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 164
 165     TRACE("(%p)->(%p)\n", iface, data);
 166
 167     if (!data)
 168         return E_POINTER;
 169
 170     *data = This->data;
 171
 172     return S_OK;
 173 }
 174
 175 static HRESULT WINAPI IDirectMusicBufferImpl_GetStartTime(LPDIRECTMUSICBUFFER iface, LPREFERENCE_TIME ref_time)
 176 {
 177     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 178
 179     TRACE("(%p)->(%p)\n", iface, ref_time);
 180
 181     if (!ref_time)
 182         return E_POINTER;
 183     if (!This->write_pos)
 184         return DMUS_E_BUFFER_EMPTY;
 185
 186     *ref_time = This->start_time;
 187
 188     return S_OK;
 189 }
 190
 191 static HRESULT WINAPI IDirectMusicBufferImpl_GetUsedBytes(LPDIRECTMUSICBUFFER iface, LPDWORD used_bytes)
 192 {
 193     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 194
 195     TRACE("(%p)->(%p)\n", iface, used_bytes);
 196
 197     if (!used_bytes)
 198         return E_POINTER;
 199
 200     *used_bytes = This->write_pos;
 201
 202     return S_OK;
 203 }
 204
 205 static HRESULT WINAPI IDirectMusicBufferImpl_GetMaxBytes(LPDIRECTMUSICBUFFER iface, LPDWORD max_bytes)
 206 {
 207     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 208
 209     TRACE("(%p)->(%p)\n", iface, max_bytes);
 210
 211     if (!max_bytes)
 212         return E_POINTER;
 213
 214     *max_bytes = This->size;
 215
 216     return S_OK;
 217 }
 218
 219 static HRESULT WINAPI IDirectMusicBufferImpl_GetBufferFormat(LPDIRECTMUSICBUFFER iface, LPGUID format)
 220 {
 221     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 222
 223     TRACE("(%p)->(%p)\n", iface, format);
 224
 225     if (!format)
 226         return E_POINTER;
 227
 228     *format = This->format;
 229     return S_OK;
 230 }
 231
 232 static HRESULT WINAPI IDirectMusicBufferImpl_SetStartTime(LPDIRECTMUSICBUFFER iface, REFERENCE_TIME ref_time)
 233 {
 234     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 235
 236     TRACE("(%p)->(0x%s)\n", This, wine_dbgstr_longlong(ref_time));
 237
 238     This->start_time = ref_time;
 239
 240     return S_OK;
 241 }
 242
 243 static HRESULT WINAPI IDirectMusicBufferImpl_SetUsedBytes(LPDIRECTMUSICBUFFER iface, DWORD used_bytes)
 244 {
 245     IDirectMusicBufferImpl *This = impl_from_IDirectMusicBuffer(iface);
 246
 247     TRACE("(%p)->(%u)\n", iface, used_bytes);
 248
 249     if (used_bytes > This->size)
 250         return DMUS_E_BUFFER_FULL;
 251
 252     This->write_pos = used_bytes;
 253
 254     return S_OK;
 255 }
 256
 257 static const IDirectMusicBufferVtbl DirectMusicBuffer_Vtbl = {
 258         IDirectMusicBufferImpl_QueryInterface,
 259         IDirectMusicBufferImpl_AddRef,
 260         IDirectMusicBufferImpl_Release,
 261         IDirectMusicBufferImpl_Flush,
 262         IDirectMusicBufferImpl_TotalTime,
 263         IDirectMusicBufferImpl_PackStructured,
 264         IDirectMusicBufferImpl_PackUnstructured,
 265         IDirectMusicBufferImpl_ResetReadPtr,
 266         IDirectMusicBufferImpl_GetNextEvent,
 267         IDirectMusicBufferImpl_GetRawBufferPtr,
 268         IDirectMusicBufferImpl_GetStartTime,
 269         IDirectMusicBufferImpl_GetUsedBytes,
 270         IDirectMusicBufferImpl_GetMaxBytes,
 271         IDirectMusicBufferImpl_GetBufferFormat,
 272         IDirectMusicBufferImpl_SetStartTime,
 273         IDirectMusicBufferImpl_SetUsedBytes
 274 };
 275
 276 HRESULT DMUSIC_CreateDirectMusicBufferImpl(LPDMUS_BUFFERDESC desc, LPVOID* ret_iface)
 277 {
 278     IDirectMusicBufferImpl* dmbuffer;
 279     HRESULT hr;
 280
 281     TRACE("(%p, %p)\n", desc, ret_iface);
 282
 283     *ret_iface = NULL;
 284
 285     dmbuffer = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IDirectMusicBufferImpl));
 286     if (!dmbuffer)
 287         return E_OUTOFMEMORY;
 288
 289     dmbuffer->IDirectMusicBuffer_iface.lpVtbl = &DirectMusicBuffer_Vtbl;
 290     dmbuffer->ref = 0; /* Will be inited by QueryInterface */
 291
 292     if (IsEqualGUID(&desc->guidBufferFormat, &GUID_NULL))
 293         dmbuffer->format = KSDATAFORMAT_SUBTYPE_MIDI;
 294     else
 295         dmbuffer->format = desc->guidBufferFormat;
 296     dmbuffer->size = (desc->cbBuffer + 3) & ~3; /* Buffer size must be multiple of 4 bytes */
 297
 298     dmbuffer->data = HeapAlloc(GetProcessHeap(), 0, dmbuffer->size);
 299     if (!dmbuffer->data) {
 300         HeapFree(GetProcessHeap(), 0, dmbuffer);
 301         return E_OUTOFMEMORY;
 302     }
 303
 304     hr = IDirectMusicBufferImpl_QueryInterface((LPDIRECTMUSICBUFFER)dmbuffer, &IID_IDirectMusicBuffer, ret_iface);
 305     if (FAILED(hr))
 306     {
 307         HeapFree(GetProcessHeap(), 0, dmbuffer->data);
 308         HeapFree(GetProcessHeap(), 0, dmbuffer);
 309     }
 310
 311     return hr;
 312 }