1 /* IDirectMusicInstrument Implementation
3 * Copyright (C) 2003 Rok Mandeljc
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
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
13 * GNU Library General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 #include "wine/debug.h"
26 #include "dmusic_private.h"
28 WINE_DEFAULT_DEBUG_CHANNEL(dmusic
);
30 /* IDirectMusicInstrument IUnknown parts follow: */
31 HRESULT WINAPI
IDirectMusicInstrumentImpl_QueryInterface (LPDIRECTMUSICINSTRUMENT iface
, REFIID riid
, LPVOID
*ppobj
)
33 ICOM_THIS(IDirectMusicInstrumentImpl
,iface
);
35 if (IsEqualGUID(riid
, &IID_IUnknown
) || IsEqualGUID(riid
, &IID_IDirectMusicInstrument
))
37 IDirectMusicInstrumentImpl_AddRef(iface
);
41 WARN("(%p)->(%s,%p),not found\n",This
,debugstr_guid(riid
),ppobj
);
45 ULONG WINAPI
IDirectMusicInstrumentImpl_AddRef (LPDIRECTMUSICINSTRUMENT iface
)
47 ICOM_THIS(IDirectMusicInstrumentImpl
,iface
);
48 TRACE("(%p) : AddRef from %ld\n", This
, This
->ref
);
52 ULONG WINAPI
IDirectMusicInstrumentImpl_Release (LPDIRECTMUSICINSTRUMENT iface
)
54 ICOM_THIS(IDirectMusicInstrumentImpl
,iface
);
55 ULONG ref
= --This
->ref
;
56 TRACE("(%p) : ReleaseRef to %ld\n", This
, This
->ref
);
59 HeapFree(GetProcessHeap(), 0, This
);
64 /* IDirectMusicInstrument Interface follow: */
65 HRESULT WINAPI
IDirectMusicInstrumentImpl_GetPatch (LPDIRECTMUSICINSTRUMENT iface
, DWORD
* pdwPatch
)
67 ICOM_THIS(IDirectMusicInstrumentImpl
,iface
);
69 TRACE("(%p, %p)\n", This
, pdwPatch
);
70 *pdwPatch
= This
->patch
;
75 HRESULT WINAPI
IDirectMusicInstrumentImpl_SetPatch (LPDIRECTMUSICINSTRUMENT iface
, DWORD dwPatch
)
77 ICOM_THIS(IDirectMusicInstrumentImpl
,iface
);
79 TRACE("(%p, %ld)\n", This
, dwPatch
);
80 This
->patch
= dwPatch
;
85 ICOM_VTABLE(IDirectMusicInstrument
) DirectMusicInstrument_Vtbl
=
87 ICOM_MSVTABLE_COMPAT_DummyRTTIVALUE
88 IDirectMusicInstrumentImpl_QueryInterface
,
89 IDirectMusicInstrumentImpl_AddRef
,
90 IDirectMusicInstrumentImpl_Release
,
91 IDirectMusicInstrumentImpl_GetPatch
,
92 IDirectMusicInstrumentImpl_SetPatch
95 /* for ClassFactory */
96 HRESULT WINAPI
DMUSIC_CreateDirectMusicInstrument (LPCGUID lpcGUID
, LPDIRECTMUSICINSTRUMENT
* ppDMInstr
, LPUNKNOWN pUnkOuter
)
98 if (IsEqualGUID (lpcGUID
, &IID_IDirectMusicInstrument
))
101 return E_NOINTERFACE
;
103 WARN("No interface found\n");
105 return E_NOINTERFACE
;