2015-04-27 22:15:18 +00:00
|
|
|
/*
|
|
|
|
* Base IDirectMusicObject Implementation
|
|
|
|
* Keep in sync with the master in dlls/dmusic/dmobject.c
|
|
|
|
*
|
|
|
|
* Copyright (C) 2003-2004 Rok Mandeljc
|
|
|
|
* Copyright (C) 2014 Michael Stefaniuc
|
|
|
|
*
|
|
|
|
* This program 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 program 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 program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
|
|
*/
|
|
|
|
|
|
|
|
#define COBJMACROS
|
2018-07-15 19:08:43 +00:00
|
|
|
#include <assert.h>
|
2015-04-27 22:15:18 +00:00
|
|
|
#include "objbase.h"
|
|
|
|
#include "dmusici.h"
|
2018-07-15 19:08:43 +00:00
|
|
|
#include "dmusicf.h"
|
2019-12-12 23:29:04 +00:00
|
|
|
#include "dmusics.h"
|
2015-04-27 22:15:18 +00:00
|
|
|
#include "dmobject.h"
|
|
|
|
#include "wine/debug.h"
|
2020-11-30 20:41:01 +00:00
|
|
|
#include "wine/heap.h"
|
2015-04-27 22:15:18 +00:00
|
|
|
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(dmobj);
|
2018-07-15 19:08:43 +00:00
|
|
|
WINE_DECLARE_DEBUG_CHANNEL(dmfile);
|
|
|
|
|
2019-12-12 23:29:04 +00:00
|
|
|
/* Debugging helpers */
|
|
|
|
const char *debugstr_dmguid(const GUID *id) {
|
|
|
|
unsigned int i;
|
|
|
|
#define X(guid) { &guid, #guid }
|
|
|
|
static const struct {
|
|
|
|
const GUID *guid;
|
|
|
|
const char *name;
|
|
|
|
} guids[] = {
|
|
|
|
/* CLSIDs */
|
|
|
|
X(CLSID_AudioVBScript),
|
|
|
|
X(CLSID_DirectMusic),
|
|
|
|
X(CLSID_DirectMusicAudioPathConfig),
|
|
|
|
X(CLSID_DirectMusicAuditionTrack),
|
|
|
|
X(CLSID_DirectMusicBand),
|
|
|
|
X(CLSID_DirectMusicBandTrack),
|
|
|
|
X(CLSID_DirectMusicChordMapTrack),
|
|
|
|
X(CLSID_DirectMusicChordMap),
|
|
|
|
X(CLSID_DirectMusicChordTrack),
|
|
|
|
X(CLSID_DirectMusicCollection),
|
|
|
|
X(CLSID_DirectMusicCommandTrack),
|
|
|
|
X(CLSID_DirectMusicComposer),
|
|
|
|
X(CLSID_DirectMusicContainer),
|
|
|
|
X(CLSID_DirectMusicGraph),
|
|
|
|
X(CLSID_DirectMusicLoader),
|
|
|
|
X(CLSID_DirectMusicLyricsTrack),
|
|
|
|
X(CLSID_DirectMusicMarkerTrack),
|
|
|
|
X(CLSID_DirectMusicMelodyFormulationTrack),
|
|
|
|
X(CLSID_DirectMusicMotifTrack),
|
|
|
|
X(CLSID_DirectMusicMuteTrack),
|
|
|
|
X(CLSID_DirectMusicParamControlTrack),
|
|
|
|
X(CLSID_DirectMusicPatternTrack),
|
|
|
|
X(CLSID_DirectMusicPerformance),
|
|
|
|
X(CLSID_DirectMusicScript),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpSegment),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpPerformance),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpSegmentState),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpAudioPathConfig),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpAudioPath),
|
|
|
|
X(CLSID_DirectMusicScriptAutoImpSong),
|
|
|
|
X(CLSID_DirectMusicScriptSourceCodeLoader),
|
|
|
|
X(CLSID_DirectMusicScriptTrack),
|
|
|
|
X(CLSID_DirectMusicSection),
|
|
|
|
X(CLSID_DirectMusicSegment),
|
|
|
|
X(CLSID_DirectMusicSegmentState),
|
|
|
|
X(CLSID_DirectMusicSegmentTriggerTrack),
|
|
|
|
X(CLSID_DirectMusicSegTriggerTrack),
|
|
|
|
X(CLSID_DirectMusicSeqTrack),
|
|
|
|
X(CLSID_DirectMusicSignPostTrack),
|
|
|
|
X(CLSID_DirectMusicSong),
|
|
|
|
X(CLSID_DirectMusicStyle),
|
|
|
|
X(CLSID_DirectMusicStyleTrack),
|
|
|
|
X(CLSID_DirectMusicSynth),
|
|
|
|
X(CLSID_DirectMusicSynthSink),
|
|
|
|
X(CLSID_DirectMusicSysExTrack),
|
|
|
|
X(CLSID_DirectMusicTemplate),
|
|
|
|
X(CLSID_DirectMusicTempoTrack),
|
|
|
|
X(CLSID_DirectMusicTimeSigTrack),
|
|
|
|
X(CLSID_DirectMusicWaveTrack),
|
|
|
|
X(CLSID_DirectSoundWave),
|
|
|
|
/* IIDs */
|
|
|
|
X(IID_IDirectMusic),
|
|
|
|
X(IID_IDirectMusic2),
|
|
|
|
X(IID_IDirectMusic8),
|
|
|
|
X(IID_IDirectMusicAudioPath),
|
|
|
|
X(IID_IDirectMusicBand),
|
|
|
|
X(IID_IDirectMusicBuffer),
|
|
|
|
X(IID_IDirectMusicChordMap),
|
|
|
|
X(IID_IDirectMusicCollection),
|
|
|
|
X(IID_IDirectMusicComposer),
|
|
|
|
X(IID_IDirectMusicContainer),
|
|
|
|
X(IID_IDirectMusicDownload),
|
|
|
|
X(IID_IDirectMusicDownloadedInstrument),
|
|
|
|
X(IID_IDirectMusicGetLoader),
|
|
|
|
X(IID_IDirectMusicGraph),
|
|
|
|
X(IID_IDirectMusicInstrument),
|
|
|
|
X(IID_IDirectMusicLoader),
|
|
|
|
X(IID_IDirectMusicLoader8),
|
|
|
|
X(IID_IDirectMusicObject),
|
|
|
|
X(IID_IDirectMusicPatternTrack),
|
|
|
|
X(IID_IDirectMusicPerformance),
|
|
|
|
X(IID_IDirectMusicPerformance2),
|
|
|
|
X(IID_IDirectMusicPerformance8),
|
|
|
|
X(IID_IDirectMusicPort),
|
|
|
|
X(IID_IDirectMusicPortDownload),
|
|
|
|
X(IID_IDirectMusicScript),
|
|
|
|
X(IID_IDirectMusicSegment),
|
|
|
|
X(IID_IDirectMusicSegment2),
|
|
|
|
X(IID_IDirectMusicSegment8),
|
|
|
|
X(IID_IDirectMusicSegmentState),
|
|
|
|
X(IID_IDirectMusicSegmentState8),
|
|
|
|
X(IID_IDirectMusicStyle),
|
|
|
|
X(IID_IDirectMusicStyle8),
|
|
|
|
X(IID_IDirectMusicSynth),
|
|
|
|
X(IID_IDirectMusicSynth8),
|
|
|
|
X(IID_IDirectMusicSynthSink),
|
|
|
|
X(IID_IDirectMusicThru),
|
|
|
|
X(IID_IDirectMusicTool),
|
|
|
|
X(IID_IDirectMusicTool8),
|
|
|
|
X(IID_IDirectMusicTrack),
|
|
|
|
X(IID_IDirectMusicTrack8),
|
|
|
|
X(IID_IUnknown),
|
|
|
|
X(IID_IPersistStream),
|
|
|
|
X(IID_IStream),
|
|
|
|
X(IID_IClassFactory),
|
|
|
|
/* GUIDs */
|
|
|
|
X(GUID_DirectMusicAllTypes),
|
|
|
|
X(GUID_NOTIFICATION_CHORD),
|
|
|
|
X(GUID_NOTIFICATION_COMMAND),
|
|
|
|
X(GUID_NOTIFICATION_MEASUREANDBEAT),
|
|
|
|
X(GUID_NOTIFICATION_PERFORMANCE),
|
|
|
|
X(GUID_NOTIFICATION_RECOMPOSE),
|
|
|
|
X(GUID_NOTIFICATION_SEGMENT),
|
|
|
|
X(GUID_BandParam),
|
|
|
|
X(GUID_ChordParam),
|
|
|
|
X(GUID_CommandParam),
|
|
|
|
X(GUID_CommandParam2),
|
|
|
|
X(GUID_CommandParamNext),
|
|
|
|
X(GUID_IDirectMusicBand),
|
|
|
|
X(GUID_IDirectMusicChordMap),
|
|
|
|
X(GUID_IDirectMusicStyle),
|
|
|
|
X(GUID_MuteParam),
|
|
|
|
X(GUID_Play_Marker),
|
|
|
|
X(GUID_RhythmParam),
|
|
|
|
X(GUID_TempoParam),
|
|
|
|
X(GUID_TimeSignature),
|
|
|
|
X(GUID_Valid_Start_Time),
|
|
|
|
X(GUID_Clear_All_Bands),
|
|
|
|
X(GUID_ConnectToDLSCollection),
|
|
|
|
X(GUID_Disable_Auto_Download),
|
|
|
|
X(GUID_DisableTempo),
|
|
|
|
X(GUID_DisableTimeSig),
|
|
|
|
X(GUID_Download),
|
|
|
|
X(GUID_DownloadToAudioPath),
|
|
|
|
X(GUID_Enable_Auto_Download),
|
|
|
|
X(GUID_EnableTempo),
|
|
|
|
X(GUID_EnableTimeSig),
|
|
|
|
X(GUID_IgnoreBankSelectForGM),
|
|
|
|
X(GUID_SeedVariations),
|
|
|
|
X(GUID_StandardMIDIFile),
|
|
|
|
X(GUID_Unload),
|
|
|
|
X(GUID_UnloadFromAudioPath),
|
|
|
|
X(GUID_Variations),
|
|
|
|
X(GUID_PerfMasterTempo),
|
|
|
|
X(GUID_PerfMasterVolume),
|
|
|
|
X(GUID_PerfMasterGrooveLevel),
|
|
|
|
X(GUID_PerfAutoDownload),
|
|
|
|
X(GUID_DefaultGMCollection),
|
|
|
|
X(GUID_Synth_Default),
|
|
|
|
X(GUID_Buffer_Reverb),
|
|
|
|
X(GUID_Buffer_EnvReverb),
|
|
|
|
X(GUID_Buffer_Stereo),
|
|
|
|
X(GUID_Buffer_3D_Dry),
|
|
|
|
X(GUID_Buffer_Mono),
|
|
|
|
X(GUID_DMUS_PROP_GM_Hardware),
|
|
|
|
X(GUID_DMUS_PROP_GS_Capable),
|
|
|
|
X(GUID_DMUS_PROP_GS_Hardware),
|
|
|
|
X(GUID_DMUS_PROP_DLS1),
|
|
|
|
X(GUID_DMUS_PROP_DLS2),
|
|
|
|
X(GUID_DMUS_PROP_Effects),
|
|
|
|
X(GUID_DMUS_PROP_INSTRUMENT2),
|
|
|
|
X(GUID_DMUS_PROP_LegacyCaps),
|
|
|
|
X(GUID_DMUS_PROP_MemorySize),
|
|
|
|
X(GUID_DMUS_PROP_SampleMemorySize),
|
|
|
|
X(GUID_DMUS_PROP_SamplePlaybackRate),
|
|
|
|
X(GUID_DMUS_PROP_SetSynthSink),
|
|
|
|
X(GUID_DMUS_PROP_SinkUsesDSound),
|
|
|
|
X(GUID_DMUS_PROP_SynthSink_DSOUND),
|
|
|
|
X(GUID_DMUS_PROP_SynthSink_WAVE),
|
|
|
|
X(GUID_DMUS_PROP_Volume),
|
|
|
|
X(GUID_DMUS_PROP_WavesReverb),
|
|
|
|
X(GUID_DMUS_PROP_WriteLatency),
|
|
|
|
X(GUID_DMUS_PROP_WritePeriod),
|
|
|
|
X(GUID_DMUS_PROP_XG_Capable),
|
|
|
|
X(GUID_DMUS_PROP_XG_Hardware)
|
|
|
|
};
|
|
|
|
#undef X
|
|
|
|
|
|
|
|
if (!id)
|
|
|
|
return "(null)";
|
2018-07-15 19:08:43 +00:00
|
|
|
|
2019-12-12 23:29:04 +00:00
|
|
|
for (i = 0; i < ARRAY_SIZE(guids); i++)
|
|
|
|
if (IsEqualGUID(id, guids[i].guid))
|
|
|
|
return guids[i].name;
|
|
|
|
|
|
|
|
return debugstr_guid(id);
|
|
|
|
}
|
|
|
|
|
|
|
|
void dump_DMUS_OBJECTDESC(DMUS_OBJECTDESC *desc)
|
2018-07-15 19:08:43 +00:00
|
|
|
{
|
2019-12-12 23:29:04 +00:00
|
|
|
if (!desc || !TRACE_ON(dmfile))
|
|
|
|
return;
|
|
|
|
|
|
|
|
TRACE_(dmfile)("DMUS_OBJECTDESC (%p):", desc);
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE_(dmfile)(" - dwSize = %lu\n", desc->dwSize);
|
2019-12-12 23:29:04 +00:00
|
|
|
|
|
|
|
#define X(flag) if (desc->dwValidData & flag) TRACE_(dmfile)(#flag " ")
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE_(dmfile)(" - dwValidData = %#08lx ( ", desc->dwValidData);
|
2019-12-12 23:29:04 +00:00
|
|
|
X(DMUS_OBJ_OBJECT);
|
|
|
|
X(DMUS_OBJ_CLASS);
|
|
|
|
X(DMUS_OBJ_NAME);
|
|
|
|
X(DMUS_OBJ_CATEGORY);
|
|
|
|
X(DMUS_OBJ_FILENAME);
|
|
|
|
X(DMUS_OBJ_FULLPATH);
|
|
|
|
X(DMUS_OBJ_URL);
|
|
|
|
X(DMUS_OBJ_VERSION);
|
|
|
|
X(DMUS_OBJ_DATE);
|
|
|
|
X(DMUS_OBJ_LOADED);
|
|
|
|
X(DMUS_OBJ_MEMORY);
|
|
|
|
X(DMUS_OBJ_STREAM);
|
|
|
|
TRACE_(dmfile)(")\n");
|
|
|
|
#undef X
|
|
|
|
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_CLASS)
|
|
|
|
TRACE_(dmfile)(" - guidClass = %s\n", debugstr_dmguid(&desc->guidClass));
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_OBJECT)
|
|
|
|
TRACE_(dmfile)(" - guidObject = %s\n", debugstr_guid(&desc->guidObject));
|
|
|
|
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_DATE) {
|
|
|
|
SYSTEMTIME time;
|
|
|
|
FileTimeToSystemTime(&desc->ftDate, &time);
|
|
|
|
TRACE_(dmfile)(" - ftDate = \'%04u-%02u-%02u %02u:%02u:%02u\'\n",
|
|
|
|
time.wYear, time.wMonth, time.wDay, time.wHour, time.wMinute, time.wSecond);
|
|
|
|
}
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_VERSION)
|
|
|
|
TRACE_(dmfile)(" - vVersion = \'%u,%u,%u,%u\'\n",
|
|
|
|
HIWORD(desc->vVersion.dwVersionMS), LOWORD(desc->vVersion.dwVersionMS),
|
|
|
|
HIWORD(desc->vVersion.dwVersionLS), LOWORD(desc->vVersion.dwVersionLS));
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_NAME)
|
|
|
|
TRACE_(dmfile)(" - wszName = %s\n", debugstr_w(desc->wszName));
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_CATEGORY)
|
|
|
|
TRACE_(dmfile)(" - wszCategory = %s\n", debugstr_w(desc->wszCategory));
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_FILENAME)
|
|
|
|
TRACE_(dmfile)(" - wszFileName = %s\n", debugstr_w(desc->wszFileName));
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_MEMORY)
|
|
|
|
TRACE_(dmfile)(" - llMemLength = 0x%s - pbMemData = %p\n",
|
|
|
|
wine_dbgstr_longlong(desc->llMemLength), desc->pbMemData);
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_STREAM)
|
|
|
|
TRACE_(dmfile)(" - pStream = %p\n", desc->pStream);
|
2018-07-15 19:08:43 +00:00
|
|
|
}
|
|
|
|
|
2019-12-12 23:29:04 +00:00
|
|
|
|
|
|
|
/* RIFF format parsing */
|
|
|
|
#define CHUNK_HDR_SIZE (sizeof(FOURCC) + sizeof(DWORD))
|
|
|
|
|
2018-07-15 19:08:43 +00:00
|
|
|
const char *debugstr_chunk(const struct chunk_entry *chunk)
|
|
|
|
{
|
|
|
|
const char *type = "";
|
|
|
|
|
|
|
|
if (!chunk)
|
|
|
|
return "(null)";
|
|
|
|
if (chunk->id == FOURCC_RIFF || chunk->id == FOURCC_LIST)
|
|
|
|
type = wine_dbg_sprintf("type %s, ", debugstr_fourcc(chunk->type));
|
2022-02-09 21:49:21 +00:00
|
|
|
return wine_dbg_sprintf("%s chunk, %ssize %lu", debugstr_fourcc(chunk->id), type, chunk->size);
|
2018-07-15 19:08:43 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static HRESULT stream_read(IStream *stream, void *data, ULONG size)
|
|
|
|
{
|
|
|
|
ULONG read;
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
hr = IStream_Read(stream, data, size, &read);
|
|
|
|
if (FAILED(hr))
|
2022-02-23 19:45:09 +00:00
|
|
|
TRACE_(dmfile)("IStream_Read failed: %#lx\n", hr);
|
2018-07-15 19:08:43 +00:00
|
|
|
else if (!read && read < size) {
|
|
|
|
/* All or nothing: Handle a partial read due to end of stream as an error */
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE_(dmfile)("Short read: %lu < %lu\n", read, size);
|
2018-07-15 19:08:43 +00:00
|
|
|
return E_FAIL;
|
|
|
|
}
|
|
|
|
|
|
|
|
return hr;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT stream_get_chunk(IStream *stream, struct chunk_entry *chunk)
|
|
|
|
{
|
|
|
|
static const LARGE_INTEGER zero;
|
|
|
|
ULONGLONG ck_end = 0, p_end = 0;
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
hr = IStream_Seek(stream, zero, STREAM_SEEK_CUR, &chunk->offset);
|
|
|
|
if (FAILED(hr))
|
|
|
|
return hr;
|
|
|
|
assert(!(chunk->offset.QuadPart & 1));
|
|
|
|
if (chunk->parent) {
|
|
|
|
p_end = chunk->parent->offset.QuadPart + CHUNK_HDR_SIZE + ((chunk->parent->size + 1) & ~1);
|
|
|
|
if (chunk->offset.QuadPart == p_end)
|
|
|
|
return S_FALSE;
|
|
|
|
ck_end = chunk->offset.QuadPart + CHUNK_HDR_SIZE;
|
|
|
|
if (ck_end > p_end) {
|
|
|
|
WARN_(dmfile)("No space for sub-chunk header in parent chunk: ends at offset %s > %s\n",
|
|
|
|
wine_dbgstr_longlong(ck_end), wine_dbgstr_longlong(p_end));
|
|
|
|
return E_FAIL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
hr = stream_read(stream, chunk, CHUNK_HDR_SIZE);
|
|
|
|
if (hr != S_OK)
|
|
|
|
return hr;
|
|
|
|
if (chunk->parent) {
|
|
|
|
ck_end += (chunk->size + 1) & ~1;
|
|
|
|
if (ck_end > p_end) {
|
|
|
|
WARN_(dmfile)("No space for sub-chunk data in parent chunk: ends at offset %s > %s\n",
|
|
|
|
wine_dbgstr_longlong(ck_end), wine_dbgstr_longlong(p_end));
|
|
|
|
return E_FAIL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (chunk->id == FOURCC_LIST || chunk->id == FOURCC_RIFF) {
|
|
|
|
hr = stream_read(stream, &chunk->type, sizeof(FOURCC));
|
|
|
|
if (hr != S_OK)
|
|
|
|
return hr != S_FALSE ? hr : E_FAIL;
|
|
|
|
}
|
|
|
|
|
|
|
|
TRACE_(dmfile)("Returning %s\n", debugstr_chunk(chunk));
|
|
|
|
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
2020-11-30 20:41:01 +00:00
|
|
|
HRESULT stream_skip_chunk(IStream *stream, const struct chunk_entry *chunk)
|
2018-07-15 19:08:43 +00:00
|
|
|
{
|
|
|
|
LARGE_INTEGER end;
|
|
|
|
|
|
|
|
end.QuadPart = (chunk->offset.QuadPart + CHUNK_HDR_SIZE + chunk->size + 1) & ~(ULONGLONG)1;
|
|
|
|
|
|
|
|
return IStream_Seek(stream, end, STREAM_SEEK_SET, NULL);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT stream_next_chunk(IStream *stream, struct chunk_entry *chunk)
|
|
|
|
{
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
if (chunk->id) {
|
|
|
|
hr = stream_skip_chunk(stream, chunk);
|
|
|
|
if (FAILED(hr))
|
|
|
|
return hr;
|
|
|
|
}
|
|
|
|
|
|
|
|
return stream_get_chunk(stream, chunk);
|
|
|
|
}
|
|
|
|
|
2020-11-30 20:41:01 +00:00
|
|
|
/* Reads chunk data of the form:
|
|
|
|
DWORD - size of array element
|
|
|
|
element[] - Array of elements
|
|
|
|
The caller needs to heap_free() the array.
|
|
|
|
*/
|
|
|
|
HRESULT stream_chunk_get_array(IStream *stream, const struct chunk_entry *chunk, void **array,
|
|
|
|
unsigned int *count, DWORD elem_size)
|
|
|
|
{
|
|
|
|
DWORD size;
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
*array = NULL;
|
|
|
|
*count = 0;
|
|
|
|
|
|
|
|
if (chunk->size < sizeof(DWORD)) {
|
|
|
|
WARN_(dmfile)("%s: Too short to read element size\n", debugstr_chunk(chunk));
|
|
|
|
return E_FAIL;
|
|
|
|
}
|
|
|
|
if (FAILED(hr = stream_read(stream, &size, sizeof(DWORD))))
|
|
|
|
return hr;
|
|
|
|
if (size != elem_size) {
|
2022-02-09 21:49:21 +00:00
|
|
|
WARN_(dmfile)("%s: Array element size mismatch: got %lu, expected %lu\n",
|
2020-11-30 20:41:01 +00:00
|
|
|
debugstr_chunk(chunk), size, elem_size);
|
|
|
|
return DMUS_E_UNSUPPORTED_STREAM;
|
|
|
|
}
|
|
|
|
|
|
|
|
*count = (chunk->size - sizeof(DWORD)) / elem_size;
|
|
|
|
size = *count * elem_size;
|
|
|
|
if (!(*array = heap_alloc(size)))
|
|
|
|
return E_OUTOFMEMORY;
|
|
|
|
if (FAILED(hr = stream_read(stream, *array, size))) {
|
|
|
|
heap_free(*array);
|
|
|
|
*array = NULL;
|
|
|
|
return hr;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (chunk->size > size + sizeof(DWORD)) {
|
|
|
|
WARN_(dmfile)("%s: Extraneous data at end of array\n", debugstr_chunk(chunk));
|
|
|
|
stream_skip_chunk(stream, chunk);
|
|
|
|
return S_FALSE;
|
|
|
|
}
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
2018-07-15 19:08:43 +00:00
|
|
|
HRESULT stream_chunk_get_data(IStream *stream, const struct chunk_entry *chunk, void *data,
|
|
|
|
ULONG size)
|
|
|
|
{
|
|
|
|
if (chunk->size != size) {
|
2022-02-09 21:49:21 +00:00
|
|
|
WARN_(dmfile)("Chunk %s (size %lu, offset %s) doesn't contains the expected data size %lu\n",
|
2018-07-15 19:08:43 +00:00
|
|
|
debugstr_fourcc(chunk->id), chunk->size,
|
|
|
|
wine_dbgstr_longlong(chunk->offset.QuadPart), size);
|
|
|
|
return E_FAIL;
|
|
|
|
}
|
|
|
|
return stream_read(stream, data, size);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT stream_chunk_get_wstr(IStream *stream, const struct chunk_entry *chunk, WCHAR *str,
|
|
|
|
ULONG size)
|
|
|
|
{
|
|
|
|
ULONG len;
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
hr = IStream_Read(stream, str, min(chunk->size, size), &len);
|
|
|
|
if (FAILED(hr))
|
|
|
|
return hr;
|
|
|
|
|
|
|
|
/* Don't assume the string is properly zero terminated */
|
|
|
|
str[min(len, size - 1)] = 0;
|
|
|
|
|
|
|
|
if (len < chunk->size)
|
|
|
|
return S_FALSE;
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2015-04-27 22:15:18 +00:00
|
|
|
|
|
|
|
/* Generic IDirectMusicObject methods */
|
|
|
|
static inline struct dmobject *impl_from_IDirectMusicObject(IDirectMusicObject *iface)
|
|
|
|
{
|
|
|
|
return CONTAINING_RECORD(iface, struct dmobject, IDirectMusicObject_iface);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI dmobj_IDirectMusicObject_QueryInterface(IDirectMusicObject *iface, REFIID riid,
|
|
|
|
void **ret_iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IDirectMusicObject(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ret_iface);
|
|
|
|
}
|
|
|
|
|
|
|
|
ULONG WINAPI dmobj_IDirectMusicObject_AddRef(IDirectMusicObject *iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IDirectMusicObject(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
|
|
}
|
|
|
|
|
|
|
|
ULONG WINAPI dmobj_IDirectMusicObject_Release(IDirectMusicObject *iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IDirectMusicObject(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI dmobj_IDirectMusicObject_GetDescriptor(IDirectMusicObject *iface,
|
|
|
|
DMUS_OBJECTDESC *desc)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IDirectMusicObject(iface);
|
|
|
|
|
|
|
|
TRACE("(%p/%p)->(%p)\n", iface, This, desc);
|
|
|
|
|
|
|
|
if (!desc)
|
|
|
|
return E_POINTER;
|
|
|
|
|
|
|
|
memcpy(desc, &This->desc, This->desc.dwSize);
|
|
|
|
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI dmobj_IDirectMusicObject_SetDescriptor(IDirectMusicObject *iface,
|
|
|
|
DMUS_OBJECTDESC *desc)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IDirectMusicObject(iface);
|
|
|
|
HRESULT ret = S_OK;
|
|
|
|
|
|
|
|
TRACE("(%p, %p)\n", iface, desc);
|
|
|
|
|
|
|
|
if (!desc)
|
|
|
|
return E_POINTER;
|
|
|
|
|
|
|
|
/* Immutable property */
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_CLASS)
|
|
|
|
{
|
|
|
|
desc->dwValidData &= ~DMUS_OBJ_CLASS;
|
|
|
|
ret = S_FALSE;
|
|
|
|
}
|
|
|
|
/* Set only valid fields */
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_OBJECT)
|
|
|
|
This->desc.guidObject = desc->guidObject;
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_NAME)
|
|
|
|
lstrcpynW(This->desc.wszName, desc->wszName, DMUS_MAX_NAME);
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_CATEGORY)
|
|
|
|
lstrcpynW(This->desc.wszCategory, desc->wszCategory, DMUS_MAX_CATEGORY);
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_FILENAME)
|
|
|
|
lstrcpynW(This->desc.wszFileName, desc->wszFileName, DMUS_MAX_FILENAME);
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_VERSION)
|
|
|
|
This->desc.vVersion = desc->vVersion;
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_DATE)
|
|
|
|
This->desc.ftDate = desc->ftDate;
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_MEMORY) {
|
|
|
|
This->desc.llMemLength = desc->llMemLength;
|
|
|
|
memcpy(This->desc.pbMemData, desc->pbMemData, desc->llMemLength);
|
|
|
|
}
|
|
|
|
if (desc->dwValidData & DMUS_OBJ_STREAM)
|
|
|
|
IStream_Clone(desc->pStream, &This->desc.pStream);
|
|
|
|
|
|
|
|
This->desc.dwValidData |= desc->dwValidData;
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2018-07-15 19:08:43 +00:00
|
|
|
/* Helper for IDirectMusicObject::ParseDescriptor */
|
|
|
|
static inline void info_get_name(IStream *stream, const struct chunk_entry *info,
|
|
|
|
DMUS_OBJECTDESC *desc)
|
|
|
|
{
|
|
|
|
struct chunk_entry chunk = {.parent = info};
|
|
|
|
char name[DMUS_MAX_NAME];
|
|
|
|
ULONG len;
|
|
|
|
HRESULT hr = E_FAIL;
|
|
|
|
|
|
|
|
while (stream_next_chunk(stream, &chunk) == S_OK)
|
|
|
|
if (chunk.id == mmioFOURCC('I','N','A','M'))
|
|
|
|
hr = IStream_Read(stream, name, min(chunk.size, sizeof(name)), &len);
|
|
|
|
|
|
|
|
if (SUCCEEDED(hr)) {
|
|
|
|
len = MultiByteToWideChar(CP_ACP, 0, name, len, desc->wszName, sizeof(desc->wszName));
|
|
|
|
desc->wszName[min(len, sizeof(desc->wszName) - 1)] = 0;
|
|
|
|
desc->dwValidData |= DMUS_OBJ_NAME;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static inline void unfo_get_name(IStream *stream, const struct chunk_entry *unfo,
|
|
|
|
DMUS_OBJECTDESC *desc, BOOL inam)
|
|
|
|
{
|
|
|
|
struct chunk_entry chunk = {.parent = unfo};
|
|
|
|
|
|
|
|
while (stream_next_chunk(stream, &chunk) == S_OK)
|
|
|
|
if (chunk.id == DMUS_FOURCC_UNAM_CHUNK || (inam && chunk.id == mmioFOURCC('I','N','A','M')))
|
|
|
|
if (stream_chunk_get_wstr(stream, &chunk, desc->wszName, sizeof(desc->wszName)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_NAME;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT dmobj_parsedescriptor(IStream *stream, const struct chunk_entry *riff,
|
|
|
|
DMUS_OBJECTDESC *desc, DWORD supported)
|
|
|
|
{
|
|
|
|
struct chunk_entry chunk = {.parent = riff};
|
|
|
|
HRESULT hr;
|
|
|
|
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE("Looking for %#lx in %p: %s\n", supported, stream, debugstr_chunk(riff));
|
2018-07-15 19:08:43 +00:00
|
|
|
|
|
|
|
desc->dwValidData = 0;
|
|
|
|
desc->dwSize = sizeof(*desc);
|
|
|
|
|
|
|
|
while ((hr = stream_next_chunk(stream, &chunk)) == S_OK) {
|
|
|
|
switch (chunk.id) {
|
2020-11-30 20:41:01 +00:00
|
|
|
case DMUS_FOURCC_CATEGORY_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_CATEGORY) && stream_chunk_get_wstr(stream, &chunk,
|
|
|
|
desc->wszCategory, sizeof(desc->wszCategory)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_CATEGORY;
|
|
|
|
break;
|
|
|
|
case DMUS_FOURCC_DATE_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_DATE) && stream_chunk_get_data(stream, &chunk,
|
|
|
|
&desc->ftDate, sizeof(desc->ftDate)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_DATE;
|
|
|
|
break;
|
|
|
|
case DMUS_FOURCC_FILE_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_FILENAME) && stream_chunk_get_wstr(stream, &chunk,
|
|
|
|
desc->wszFileName, sizeof(desc->wszFileName)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_FILENAME;
|
|
|
|
break;
|
2018-07-15 19:08:43 +00:00
|
|
|
case DMUS_FOURCC_GUID_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_OBJECT) && stream_chunk_get_data(stream, &chunk,
|
|
|
|
&desc->guidObject, sizeof(desc->guidObject)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_OBJECT;
|
|
|
|
break;
|
2020-11-30 20:41:01 +00:00
|
|
|
case DMUS_FOURCC_NAME_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_NAME) && stream_chunk_get_wstr(stream, &chunk,
|
|
|
|
desc->wszName, sizeof(desc->wszName)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_NAME;
|
2018-07-15 19:08:43 +00:00
|
|
|
break;
|
|
|
|
case DMUS_FOURCC_VERSION_CHUNK:
|
|
|
|
if ((supported & DMUS_OBJ_VERSION) && stream_chunk_get_data(stream, &chunk,
|
|
|
|
&desc->vVersion, sizeof(desc->vVersion)) == S_OK)
|
|
|
|
desc->dwValidData |= DMUS_OBJ_VERSION;
|
|
|
|
break;
|
|
|
|
case FOURCC_LIST:
|
|
|
|
if (chunk.type == DMUS_FOURCC_UNFO_LIST && (supported & DMUS_OBJ_NAME))
|
|
|
|
unfo_get_name(stream, &chunk, desc, supported & DMUS_OBJ_NAME_INAM);
|
|
|
|
else if (chunk.type == DMUS_FOURCC_INFO_LIST && (supported & DMUS_OBJ_NAME_INFO))
|
|
|
|
info_get_name(stream, &chunk, desc);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE("Found %#lx\n", desc->dwValidData);
|
2018-07-15 19:08:43 +00:00
|
|
|
|
|
|
|
return hr;
|
|
|
|
}
|
|
|
|
|
2020-11-30 20:41:01 +00:00
|
|
|
HRESULT dmobj_parsereference(IStream *stream, const struct chunk_entry *list,
|
|
|
|
IDirectMusicObject **dmobj)
|
|
|
|
{
|
|
|
|
struct chunk_entry chunk = {.parent = list};
|
|
|
|
IDirectMusicGetLoader *getloader;
|
|
|
|
IDirectMusicLoader *loader;
|
|
|
|
DMUS_OBJECTDESC desc;
|
|
|
|
DMUS_IO_REFERENCE reference;
|
|
|
|
HRESULT hr;
|
|
|
|
|
|
|
|
if (FAILED(hr = stream_next_chunk(stream, &chunk)))
|
|
|
|
return hr;
|
|
|
|
if (chunk.id != DMUS_FOURCC_REF_CHUNK)
|
|
|
|
return DMUS_E_UNSUPPORTED_STREAM;
|
|
|
|
|
|
|
|
if (FAILED(hr = stream_chunk_get_data(stream, &chunk, &reference, sizeof(reference)))) {
|
|
|
|
WARN("Failed to read data of %s\n", debugstr_chunk(&chunk));
|
|
|
|
return hr;
|
|
|
|
}
|
2022-02-09 21:49:21 +00:00
|
|
|
TRACE("REFERENCE guidClassID %s, dwValidData %#lx\n", debugstr_dmguid(&reference.guidClassID),
|
2020-11-30 20:41:01 +00:00
|
|
|
reference.dwValidData);
|
|
|
|
|
|
|
|
if (FAILED(hr = dmobj_parsedescriptor(stream, list, &desc, reference.dwValidData)))
|
|
|
|
return hr;
|
|
|
|
desc.guidClass = reference.guidClassID;
|
|
|
|
desc.dwValidData |= DMUS_OBJ_CLASS;
|
|
|
|
dump_DMUS_OBJECTDESC(&desc);
|
|
|
|
|
|
|
|
if (FAILED(hr = IStream_QueryInterface(stream, &IID_IDirectMusicGetLoader, (void**)&getloader)))
|
|
|
|
return hr;
|
|
|
|
hr = IDirectMusicGetLoader_GetLoader(getloader, &loader);
|
|
|
|
IDirectMusicGetLoader_Release(getloader);
|
|
|
|
if (FAILED(hr))
|
|
|
|
return hr;
|
|
|
|
|
|
|
|
hr = IDirectMusicLoader_GetObject(loader, &desc, &IID_IDirectMusicObject, (void**)dmobj);
|
|
|
|
IDirectMusicLoader_Release(loader);
|
|
|
|
|
|
|
|
return hr;
|
|
|
|
}
|
|
|
|
|
2015-04-27 22:15:18 +00:00
|
|
|
/* Generic IPersistStream methods */
|
|
|
|
static inline struct dmobject *impl_from_IPersistStream(IPersistStream *iface)
|
|
|
|
{
|
|
|
|
return CONTAINING_RECORD(iface, struct dmobject, IPersistStream_iface);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI dmobj_IPersistStream_QueryInterface(IPersistStream *iface, REFIID riid,
|
|
|
|
void **ret_iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IPersistStream(iface);
|
|
|
|
return IUnknown_QueryInterface(This->outer_unk, riid, ret_iface);
|
|
|
|
}
|
|
|
|
|
|
|
|
ULONG WINAPI dmobj_IPersistStream_AddRef(IPersistStream *iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IPersistStream(iface);
|
|
|
|
return IUnknown_AddRef(This->outer_unk);
|
|
|
|
}
|
|
|
|
|
|
|
|
ULONG WINAPI dmobj_IPersistStream_Release(IPersistStream *iface)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IPersistStream(iface);
|
|
|
|
return IUnknown_Release(This->outer_unk);
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI dmobj_IPersistStream_GetClassID(IPersistStream *iface, CLSID *class)
|
|
|
|
{
|
|
|
|
struct dmobject *This = impl_from_IPersistStream(iface);
|
|
|
|
|
|
|
|
TRACE("(%p, %p)\n", This, class);
|
|
|
|
|
|
|
|
if (!class)
|
|
|
|
return E_POINTER;
|
|
|
|
|
|
|
|
*class = This->desc.guidClass;
|
|
|
|
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* IPersistStream methods not implemented in native */
|
|
|
|
HRESULT WINAPI unimpl_IPersistStream_GetClassID(IPersistStream *iface, CLSID *class)
|
|
|
|
{
|
|
|
|
TRACE("(%p, %p): method not implemented\n", iface, class);
|
|
|
|
return E_NOTIMPL;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI unimpl_IPersistStream_IsDirty(IPersistStream *iface)
|
|
|
|
{
|
|
|
|
TRACE("(%p): method not implemented, always returning S_FALSE\n", iface);
|
|
|
|
return S_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI unimpl_IPersistStream_Save(IPersistStream *iface, IStream *stream,
|
|
|
|
BOOL clear_dirty)
|
|
|
|
{
|
|
|
|
TRACE("(%p, %p, %d): method not implemented\n", iface, stream, clear_dirty);
|
|
|
|
return E_NOTIMPL;
|
|
|
|
}
|
|
|
|
|
|
|
|
HRESULT WINAPI unimpl_IPersistStream_GetSizeMax(IPersistStream *iface, ULARGE_INTEGER *size)
|
|
|
|
{
|
|
|
|
TRACE("(%p, %p): method not implemented\n", iface, size);
|
|
|
|
return E_NOTIMPL;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void dmobject_init(struct dmobject *dmobj, const GUID *class, IUnknown *outer_unk)
|
|
|
|
{
|
|
|
|
dmobj->outer_unk = outer_unk;
|
|
|
|
dmobj->desc.dwSize = sizeof(dmobj->desc);
|
|
|
|
dmobj->desc.dwValidData = DMUS_OBJ_CLASS;
|
|
|
|
dmobj->desc.guidClass = *class;
|
|
|
|
}
|