Jacek Caban : jscript: Added IActiveScriptProperty stub implementation.
Alexandre Julliard
julliard at winehq.org
Wed Mar 19 07:28:23 CDT 2008
Module: wine
Branch: master
Commit: 9ff3c3955d4dbe48d5160ae769c17a83f6c8f84b
URL: http://source.winehq.org/git/wine.git/?a=commit;h=9ff3c3955d4dbe48d5160ae769c17a83f6c8f84b
Author: Jacek Caban <jacek at codeweavers.com>
Date: Wed Mar 19 11:31:54 2008 +0100
jscript: Added IActiveScriptProperty stub implementation.
---
dlls/jscript/jscript.c | 52 ++++++++++++++++++++++++++++++++++++++++++++++++
1 files changed, 52 insertions(+), 0 deletions(-)
diff --git a/dlls/jscript/jscript.c b/dlls/jscript/jscript.c
index c128906..21ffeff 100644
--- a/dlls/jscript/jscript.c
+++ b/dlls/jscript/jscript.c
@@ -26,12 +26,14 @@ WINE_DEFAULT_DEBUG_CHANNEL(jscript);
typedef struct {
const IActiveScriptVtbl *lpIActiveScriptVtbl;
const IActiveScriptParseVtbl *lpIActiveScriptParseVtbl;
+ const IActiveScriptPropertyVtbl *lpIActiveScriptPropertyVtbl;
LONG ref;
} JScript;
#define ACTSCRIPT(x) ((IActiveScript*) &(x)->lpIActiveScriptVtbl)
#define ASPARSE(x) ((IActiveScriptParse*) &(x)->lpIActiveScriptParseVtbl)
+#define ACTSCPPROP(x) ((IActiveScriptProperty*) &(x)->lpIActiveScriptPropertyVtbl)
#define ACTSCRIPT_THIS(iface) DEFINE_THIS(JScript, IActiveScript, iface)
@@ -50,6 +52,9 @@ static HRESULT WINAPI JScript_QueryInterface(IActiveScript *iface, REFIID riid,
}else if(IsEqualGUID(riid, &IID_IActiveScriptParse)) {
TRACE("(%p)->(IID_IActiveScriptParse %p)\n", This, ppv);
*ppv = ASPARSE(This);
+ }else if(IsEqualGUID(riid, &IID_IActiveScriptProperty)) {
+ TRACE("(%p)->(IID_IActiveScriptProperty %p)\n", This, ppv);
+ *ppv = ACTSCPPROP(This);
}
if(*ppv) {
@@ -269,6 +274,52 @@ static const IActiveScriptParseVtbl JScriptParseVtbl = {
JScriptParse_ParseScriptText
};
+#define ACTSCPPROP_THIS(iface) DEFINE_THIS(JScript, IActiveScriptProperty, iface)
+
+static HRESULT WINAPI JScriptProperty_QueryInterface(IActiveScriptProperty *iface, REFIID riid, void **ppv)
+{
+ JScript *This = ACTSCPPROP_THIS(iface);
+ return IActiveScript_QueryInterface(ACTSCRIPT(This), riid, ppv);
+}
+
+static ULONG WINAPI JScriptProperty_AddRef(IActiveScriptProperty *iface)
+{
+ JScript *This = ACTSCPPROP_THIS(iface);
+ return IActiveScript_AddRef(ACTSCRIPT(This));
+}
+
+static ULONG WINAPI JScriptProperty_Release(IActiveScriptProperty *iface)
+{
+ JScript *This = ACTSCPPROP_THIS(iface);
+ return IActiveScript_Release(ACTSCRIPT(This));
+}
+
+static HRESULT WINAPI JScriptProperty_GetProperty(IActiveScriptProperty *iface, DWORD dwProperty,
+ VARIANT *pvarIndex, VARIANT *pvarValue)
+{
+ JScript *This = ACTSCPPROP_THIS(iface);
+ FIXME("(%p)->(%x %p %p)\n", This, dwProperty, pvarIndex, pvarValue);
+ return E_NOTIMPL;
+}
+
+static HRESULT WINAPI JScriptProperty_SetProperty(IActiveScriptProperty *iface, DWORD dwProperty,
+ VARIANT *pvarIndex, VARIANT *pvarValue)
+{
+ JScript *This = ACTSCPPROP_THIS(iface);
+ FIXME("(%p)->(%x %p %p)\n", This, dwProperty, pvarIndex, pvarValue);
+ return E_NOTIMPL;
+}
+
+#undef ACTSCPPROP_THIS
+
+static const IActiveScriptPropertyVtbl JScriptPropertyVtbl = {
+ JScriptProperty_QueryInterface,
+ JScriptProperty_AddRef,
+ JScriptProperty_Release,
+ JScriptProperty_GetProperty,
+ JScriptProperty_SetProperty
+};
+
HRESULT WINAPI JScriptFactory_CreateInstance(IClassFactory *iface, IUnknown *pUnkOuter,
REFIID riid, void **ppv)
{
@@ -281,6 +332,7 @@ HRESULT WINAPI JScriptFactory_CreateInstance(IClassFactory *iface, IUnknown *pUn
ret->lpIActiveScriptVtbl = &JScriptVtbl;
ret->lpIActiveScriptParseVtbl = &JScriptParseVtbl;
+ ret->lpIActiveScriptPropertyVtbl = &JScriptPropertyVtbl;
ret->ref = 1;
hres = IActiveScript_QueryInterface(ACTSCRIPT(ret), riid, ppv);
More information about the wine-cvs
mailing list