dlls/dmusic/buffer.c

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