dispex.c File Reference

#include <assert.h>
#include "jscript.h"
#include "engine.h"
#include "wine/debug.h"

Include dependency graph for dispex.c:

Go to the source code of this file.

Classes
struct	_dispex_prop_t
struct	gc_stack_chunk
struct	gc_ctx
struct	typeinfo_func
struct	ScriptTypeInfo
struct	HostObject

Macros
#define	FDEX_VERSION_MASK   0xf0000000
#define	GOLDEN_RATIO   0x9E3779B9U

Enumerations
enum	prop_type_t {   PROP_JSVAL , PROP_BUILTIN , PROP_PROTREF , PROP_ACCESSOR ,   PROP_DELETED , PROP_EXTERN }

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (jscript)
static void	fix_protref_prop (jsdisp_t *jsdisp, dispex_prop_t *prop)
static DISPID	prop_to_id (jsdisp_t *This, dispex_prop_t *prop)
static dispex_prop_t *	get_prop (jsdisp_t *This, DISPID id)
static BOOL	is_function_prop (dispex_prop_t *prop)
static DWORD	get_flags (jsdisp_t *This, dispex_prop_t *prop)
static const builtin_prop_t *	find_builtin_prop (jsdisp_t *This, const WCHAR *name, BOOL case_insens)
static unsigned	string_hash (const WCHAR *name)
static unsigned	get_props_idx (jsdisp_t *This, unsigned hash)
static HRESULT	resize_props (jsdisp_t *This)
static dispex_prop_t *	alloc_prop (jsdisp_t *This, const WCHAR *name, prop_type_t type, DWORD flags)
static dispex_prop_t *	alloc_protref (jsdisp_t *This, const WCHAR *name, DWORD ref)
static dispex_prop_t *	lookup_dispex_prop (jsdisp_t *obj, unsigned hash, const WCHAR *name, BOOL case_insens)
static HRESULT	update_external_prop (jsdisp_t *obj, const WCHAR *name, dispex_prop_t *prop, const struct property_info *desc, dispex_prop_t **ret)
static HRESULT	find_external_prop (jsdisp_t *This, const WCHAR *name, BOOL case_insens, dispex_prop_t *prop, dispex_prop_t **ret)
static HRESULT	find_prop_name (jsdisp_t *This, unsigned hash, const WCHAR *name, BOOL case_insens, dispex_prop_t *prop, dispex_prop_t **ret)
static HRESULT	find_prop_name_prot (jsdisp_t *This, unsigned hash, const WCHAR *name, BOOL case_insens, dispex_prop_t *own_prop, dispex_prop_t **ret)
static HRESULT	ensure_prop_name (jsdisp_t *This, const WCHAR *name, DWORD create_flags, BOOL case_insens, dispex_prop_t **ret)
HRESULT	jsdisp_index_lookup (jsdisp_t *obj, const WCHAR *name, unsigned length, struct property_info *desc)
HRESULT	jsdisp_next_index (jsdisp_t *obj, unsigned length, unsigned id, struct property_info *desc)
static IDispatch *	get_this (DISPPARAMS *dp)
static HRESULT	convert_params (script_ctx_t *ctx, const DISPPARAMS *dp, jsval_t *buf, unsigned *argc, jsval_t **ret)
static HRESULT	prop_get (jsdisp_t *This, IDispatch *jsthis, dispex_prop_t *prop, jsval_t *r)
static HRESULT	prop_put (jsdisp_t *This, dispex_prop_t *prop, jsval_t val)
static HRESULT	invoke_prop_func (jsdisp_t *This, IDispatch *jsthis, dispex_prop_t *prop, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r, IServiceProvider *caller)
HRESULT	builtin_set_const (script_ctx_t *ctx, jsdisp_t *jsthis, jsval_t value)
static HRESULT	fill_props (jsdisp_t *obj)
static HRESULT	fill_protrefs (jsdisp_t *This)
static void	unlink_jsdisp (jsdisp_t *jsdisp)
static HRESULT	gc_stack_push (struct gc_ctx *gc_ctx, jsdisp_t *obj)
static jsdisp_t *	gc_stack_pop (struct gc_ctx *gc_ctx)
HRESULT	gc_run (script_ctx_t *ctx)
HRESULT	gc_process_linked_obj (struct gc_ctx *gc_ctx, enum gc_traverse_op op, jsdisp_t *obj, jsdisp_t *link, void **unlink_ref)
HRESULT	gc_process_linked_val (struct gc_ctx *gc_ctx, enum gc_traverse_op op, jsdisp_t *obj, jsval_t *link)
static struct typeinfo_func *	get_func_from_memid (const ScriptTypeInfo *typeinfo, MEMBERID memid)
static dispex_prop_t *	get_var_from_memid (const ScriptTypeInfo *typeinfo, MEMBERID memid)
static ScriptTypeInfo *	ScriptTypeInfo_from_ITypeInfo (ITypeInfo *iface)
static ScriptTypeInfo *	ScriptTypeInfo_from_ITypeComp (ITypeComp *iface)
static HRESULT WINAPI	ScriptTypeInfo_QueryInterface (ITypeInfo *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ScriptTypeInfo_AddRef (ITypeInfo *iface)
static ULONG WINAPI	ScriptTypeInfo_Release (ITypeInfo *iface)
static HRESULT WINAPI	ScriptTypeInfo_GetTypeAttr (ITypeInfo *iface, TYPEATTR **ppTypeAttr)
static HRESULT WINAPI	ScriptTypeInfo_GetTypeComp (ITypeInfo *iface, ITypeComp **ppTComp)
static HRESULT WINAPI	ScriptTypeInfo_GetFuncDesc (ITypeInfo *iface, UINT index, FUNCDESC **ppFuncDesc)
static HRESULT WINAPI	ScriptTypeInfo_GetVarDesc (ITypeInfo *iface, UINT index, VARDESC **ppVarDesc)
static HRESULT WINAPI	ScriptTypeInfo_GetNames (ITypeInfo *iface, MEMBERID memid, BSTR *rgBstrNames, UINT cMaxNames, UINT *pcNames)
static HRESULT WINAPI	ScriptTypeInfo_GetRefTypeOfImplType (ITypeInfo *iface, UINT index, HREFTYPE *pRefType)
static HRESULT WINAPI	ScriptTypeInfo_GetImplTypeFlags (ITypeInfo *iface, UINT index, INT *pImplTypeFlags)
static HRESULT WINAPI	ScriptTypeInfo_GetIDsOfNames (ITypeInfo *iface, LPOLESTR *rgszNames, UINT cNames, MEMBERID *pMemId)
static HRESULT WINAPI	ScriptTypeInfo_Invoke (ITypeInfo *iface, PVOID pvInstance, MEMBERID memid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
static HRESULT WINAPI	ScriptTypeInfo_GetDocumentation (ITypeInfo *iface, MEMBERID memid, BSTR *pBstrName, BSTR *pBstrDocString, DWORD *pdwHelpContext, BSTR *pBstrHelpFile)
static HRESULT WINAPI	ScriptTypeInfo_GetDllEntry (ITypeInfo *iface, MEMBERID memid, INVOKEKIND invKind, BSTR *pBstrDllName, BSTR *pBstrName, WORD *pwOrdinal)
static HRESULT WINAPI	ScriptTypeInfo_GetRefTypeInfo (ITypeInfo *iface, HREFTYPE hRefType, ITypeInfo **ppTInfo)
static HRESULT WINAPI	ScriptTypeInfo_AddressOfMember (ITypeInfo *iface, MEMBERID memid, INVOKEKIND invKind, PVOID *ppv)
static HRESULT WINAPI	ScriptTypeInfo_CreateInstance (ITypeInfo *iface, IUnknown *pUnkOuter, REFIID riid, PVOID *ppvObj)
static HRESULT WINAPI	ScriptTypeInfo_GetMops (ITypeInfo *iface, MEMBERID memid, BSTR *pBstrMops)
static HRESULT WINAPI	ScriptTypeInfo_GetContainingTypeLib (ITypeInfo *iface, ITypeLib **ppTLib, UINT *pIndex)
static void WINAPI	ScriptTypeInfo_ReleaseTypeAttr (ITypeInfo *iface, TYPEATTR *pTypeAttr)
static void WINAPI	ScriptTypeInfo_ReleaseFuncDesc (ITypeInfo *iface, FUNCDESC *pFuncDesc)
static void WINAPI	ScriptTypeInfo_ReleaseVarDesc (ITypeInfo *iface, VARDESC *pVarDesc)
static HRESULT WINAPI	ScriptTypeComp_QueryInterface (ITypeComp *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ScriptTypeComp_AddRef (ITypeComp *iface)
static ULONG WINAPI	ScriptTypeComp_Release (ITypeComp *iface)
static HRESULT WINAPI	ScriptTypeComp_Bind (ITypeComp *iface, LPOLESTR szName, ULONG lHashVal, WORD wFlags, ITypeInfo **ppTInfo, DESCKIND *pDescKind, BINDPTR *pBindPtr)
static HRESULT WINAPI	ScriptTypeComp_BindType (ITypeComp *iface, LPOLESTR szName, ULONG lHashVal, ITypeInfo **ppTInfo, ITypeComp **ppTComp)
static void	jsdisp_free (jsdisp_t *obj)
jsdisp_t *	jsdisp_addref (jsdisp_t *obj)
ULONG	jsdisp_release (jsdisp_t *obj)
static jsdisp_t *	impl_from_IWineJSDispatch (IWineJSDispatch *iface)
static HRESULT WINAPI	DispatchEx_QueryInterface (IWineJSDispatch *iface, REFIID riid, void **ppv)
static ULONG WINAPI	DispatchEx_AddRef (IWineJSDispatch *iface)
static ULONG WINAPI	DispatchEx_Release (IWineJSDispatch *iface)
static HRESULT WINAPI	DispatchEx_GetTypeInfoCount (IWineJSDispatch *iface, UINT *pctinfo)
static HRESULT WINAPI	DispatchEx_GetTypeInfo (IWineJSDispatch *iface, UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
static HRESULT WINAPI	DispatchEx_GetIDsOfNames (IWineJSDispatch *iface, REFIID riid, LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
static HRESULT WINAPI	DispatchEx_Invoke (IWineJSDispatch *iface, DISPID dispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
static HRESULT WINAPI	DispatchEx_GetDispID (IWineJSDispatch *iface, BSTR bstrName, DWORD grfdex, DISPID *pid)
static HRESULT WINAPI	DispatchEx_InvokeEx (IWineJSDispatch *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp, VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
static HRESULT	delete_prop (jsdisp_t *obj, dispex_prop_t *prop, BOOL *ret)
static HRESULT WINAPI	DispatchEx_DeleteMemberByName (IWineJSDispatch *iface, BSTR bstrName, DWORD grfdex)
static HRESULT WINAPI	DispatchEx_DeleteMemberByDispID (IWineJSDispatch *iface, DISPID id)
static HRESULT WINAPI	DispatchEx_GetMemberProperties (IWineJSDispatch *iface, DISPID id, DWORD grfdexFetch, DWORD *pgrfdex)
static HRESULT WINAPI	DispatchEx_GetMemberName (IWineJSDispatch *iface, DISPID id, BSTR *pbstrName)
static HRESULT WINAPI	DispatchEx_GetNextDispID (IWineJSDispatch *iface, DWORD grfdex, DISPID id, DISPID *pid)
static HRESULT WINAPI	DispatchEx_GetNameSpaceParent (IWineJSDispatch *iface, IUnknown **ppunk)
static void WINAPI	WineJSDispatch_Free (IWineJSDispatch *iface)
static HRESULT WINAPI	WineJSDispatch_GetPropertyFlags (IWineJSDispatch *iface, DISPID id, UINT32 *ret)
static HRESULT WINAPI	WineJSDispatch_GetScriptGlobal (IWineJSDispatch *iface, IWineJSDispatchHost **ret)
jsdisp_t *	as_jsdisp (IDispatch *disp)
jsdisp_t *	to_jsdisp (IDispatch *disp)
HRESULT	init_dispex (jsdisp_t *dispex, script_ctx_t *ctx, const builtin_info_t *builtin_info, jsdisp_t *prototype)
HRESULT	create_dispex (script_ctx_t *ctx, const builtin_info_t *builtin_info, jsdisp_t *prototype, jsdisp_t **dispex)
HRESULT	init_dispex_from_constr (jsdisp_t *dispex, script_ctx_t *ctx, const builtin_info_t *builtin_info, jsdisp_t *constr)
jsdisp_t *	iface_to_jsdisp (IDispatch *iface)
HRESULT	jsdisp_get_id (jsdisp_t *jsdisp, const WCHAR *name, DWORD flags, DISPID *id)
HRESULT	jsdisp_get_idx_id (jsdisp_t *jsdisp, DWORD idx, DISPID *id)
HRESULT	jsdisp_call_value (jsdisp_t *jsfunc, jsval_t vthis, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r)
HRESULT	jsdisp_call (jsdisp_t *disp, DISPID id, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r)
HRESULT	jsdisp_call_name (jsdisp_t *disp, const WCHAR *name, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r)
static HRESULT	disp_invoke (script_ctx_t *ctx, IDispatch *disp, DISPID id, WORD flags, DISPPARAMS *params, VARIANT *r, IServiceProvider *caller)
HRESULT	disp_call (script_ctx_t *ctx, IDispatch *disp, DISPID id, WORD flags, unsigned argc, jsval_t *argv, jsval_t *ret)
HRESULT	disp_call_name (script_ctx_t *ctx, IDispatch *disp, const WCHAR *name, WORD flags, unsigned argc, jsval_t *argv, jsval_t *ret)
HRESULT	disp_call_value_with_caller (script_ctx_t *ctx, IDispatch *disp, jsval_t vthis, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r, IServiceProvider *caller)
HRESULT	jsdisp_propput (jsdisp_t *obj, const WCHAR *name, DWORD flags, BOOL throw, jsval_t val)
HRESULT	jsdisp_propput_name (jsdisp_t *obj, const WCHAR *name, jsval_t val)
HRESULT	jsdisp_propput_idx (jsdisp_t *obj, DWORD idx, jsval_t val)
HRESULT	disp_propput (script_ctx_t *ctx, IDispatch *disp, DISPID id, jsval_t val)
HRESULT	disp_propput_name (script_ctx_t *ctx, IDispatch *disp, const WCHAR *name, jsval_t val)
HRESULT	jsdisp_propget_name (jsdisp_t *obj, const WCHAR *name, jsval_t *val)
HRESULT	jsdisp_get_idx (jsdisp_t *obj, DWORD idx, jsval_t *r)
HRESULT	jsdisp_propget (jsdisp_t *jsdisp, DISPID id, jsval_t *val)
HRESULT	disp_propget (script_ctx_t *ctx, IDispatch *disp, DISPID id, jsval_t *val)
HRESULT	jsdisp_delete_idx (jsdisp_t *obj, DWORD idx)
HRESULT	disp_delete (IDispatch *disp, DISPID id, BOOL *ret)
HRESULT	jsdisp_next_prop (jsdisp_t *obj, DISPID id, enum jsdisp_enum_type enum_type, DISPID *ret)
HRESULT	disp_delete_name (script_ctx_t *ctx, IDispatch *disp, jsstr_t *name, BOOL *ret)
HRESULT	jsdisp_get_own_property (jsdisp_t *obj, const WCHAR *name, BOOL flags_only, property_desc_t *desc)
HRESULT	jsdisp_define_property (jsdisp_t *obj, const WCHAR *name, property_desc_t *desc)
HRESULT	jsdisp_define_data_property (jsdisp_t *obj, const WCHAR *name, unsigned flags, jsval_t value)
HRESULT	jsdisp_change_prototype (jsdisp_t *obj, jsdisp_t *proto)
static void	set_prop_flags (jsdisp_t *obj, dispex_prop_t *prop, UINT32 flags)
void	jsdisp_freeze (jsdisp_t *obj, BOOL seal)
BOOL	jsdisp_is_frozen (jsdisp_t *obj, BOOL sealed)
HRESULT	jsdisp_get_prop_name (jsdisp_t *obj, DISPID id, jsstr_t **r)
static HostObject *	HostObject_from_jsdisp (jsdisp_t *jsdisp)
static ULONG	HostObject_addref (jsdisp_t *jsdisp)
static ULONG	HostObject_release (jsdisp_t *jsdisp)
static HRESULT	HostObject_lookup_prop (jsdisp_t *jsdisp, const WCHAR *name, unsigned flags, struct property_info *desc)
static HRESULT	HostObject_prop_get (jsdisp_t *jsdisp, unsigned idx, jsval_t *r)
static HRESULT	HostObject_prop_put (jsdisp_t *jsdisp, unsigned idx, jsval_t v)
static HRESULT	HostObject_next_prop (jsdisp_t *jsdisp, unsigned id, struct property_info *desc)
static HRESULT	HostObject_prop_delete (jsdisp_t *jsdisp, unsigned id)
static HRESULT	HostObject_prop_config (jsdisp_t *jsdisp, unsigned id, unsigned flags)
static HRESULT	HostObject_to_string (jsdisp_t *jsdisp, jsstr_t **ret)
HRESULT	init_host_object (script_ctx_t *ctx, IWineJSDispatchHost *host_iface, IWineJSDispatch *prototype_iface, UINT32 flags, IWineJSDispatch **ret)
IWineJSDispatchHost *	get_host_dispatch (IDispatch *disp)

Variables
static const GUID	GUID_JScriptTypeInfo = {0xc59c6b12,0xf6c1,0x11cf,{0x88,0x35,0x00,0xa0,0xc9,0x11,0xe8,0xb2}}
static const ITypeInfoVtbl	ScriptTypeInfoVtbl
static const ITypeCompVtbl	ScriptTypeCompVtbl
static IWineJSDispatchVtbl	DispatchExVtbl
static const builtin_info_t	dispex_info = { .class = JSCLASS_NONE }
static const builtin_info_t	HostObject_info

Macro Definition Documentation

FDEX_VERSION_MASK

#define FDEX_VERSION_MASK   0xf0000000

Definition at line 30 of file dispex.c.

GOLDEN_RATIO

#define GOLDEN_RATIO   0x9E3779B9U

Definition at line 31 of file dispex.c.

Enumeration Type Documentation

prop_type_t

enum prop_type_t

Enumerator
PROP_JSVAL
PROP_BUILTIN
PROP_PROTREF
PROP_ACCESSOR
PROP_DELETED
PROP_EXTERN

Definition at line 33 of file dispex.c.

             {
    PROP_JSVAL,
    PROP_BUILTIN,
    PROP_PROTREF,
    PROP_ACCESSOR,
    PROP_DELETED,
    PROP_EXTERN
} prop_type_t;

Function Documentation

alloc_prop()

static dispex_prop_t * alloc_prop ( jsdisp_t *  This, const WCHAR *  name, prop_type_t  type, DWORD  flags  )

inlinestatic

Definition at line 213 of file dispex.c.

{
    dispex_prop_t *prop;
    unsigned bucket;
 
    if(FAILED(resize_props(This)))
        return NULL;
 
    prop = &This->props[This->prop_cnt];
    prop->name = wcsdup(name);
    if(!prop->name)
        return NULL;
    prop->type = type;
    prop->flags = flags;
    prop->hash = string_hash(name);
 
    bucket = get_props_idx(This, prop->hash);
    prop->bucket_next = This->props[bucket].bucket_head;
    This->props[bucket].bucket_head = This->prop_cnt++;
    return prop;
}

Referenced by alloc_protref(), ensure_prop_name(), find_prop_name(), jsdisp_define_property(), and update_external_prop().

alloc_protref()

static dispex_prop_t * alloc_protref ( jsdisp_t *  This, const WCHAR *  name, DWORD  ref  )

static

Definition at line 235 of file dispex.c.

{
    dispex_prop_t *ret;
 
    ret = alloc_prop(This, name, PROP_PROTREF, 0);
    if(!ret)
        return NULL;
 
    ret->u.ref = ref;
    return ret;
}

Referenced by fill_protrefs(), and find_prop_name_prot().

as_jsdisp()

jsdisp_t * as_jsdisp

(

IDispatch *

disp

)

Definition at line 2441 of file dispex.c.

{
    assert(disp->lpVtbl == (IDispatchVtbl*)&DispatchExVtbl);
    return impl_from_IWineJSDispatch((IWineJSDispatch*)disp);
}

Referenced by detach_arguments_object(), detach_scope(), DispatchEx_GetTypeInfo(), interp_obj_prop(), scope_init_locals(), setup_arguments_object(), and to_locale_string().

builtin_set_const()

HRESULT builtin_set_const	(	script_ctx_t *	ctx,
		jsdisp_t *	jsthis,
		jsval_t	value
	)

Definition at line 741 of file dispex.c.

{
    TRACE("%p %s\n", jsthis, debugstr_jsval(value));
    return S_OK;
}

convert_params()

static HRESULT convert_params ( script_ctx_t *  ctx, const DISPPARAMS *  dp, jsval_t *  buf, unsigned *  argc, jsval_t **  ret  )

static

Definition at line 537 of file dispex.c.

{
    jsval_t *argv;
    unsigned cnt;
    unsigned i;
    HRESULT hres;
 
    cnt = dp->cArgs - dp->cNamedArgs;
 
    if(cnt > 6) {
        argv = malloc(cnt * sizeof(*argv));
        if(!argv)
            return E_OUTOFMEMORY;
    }else {
        argv = buf;
    }
 
    for(i = 0; i < cnt; i++) {
        hres = variant_to_jsval(ctx, dp->rgvarg+dp->cArgs-i-1, argv+i);
        if(FAILED(hres)) {
            while(i--)
                jsval_release(argv[i]);
            if(argv != buf)
                free(argv);
            return hres;
        }
    }
 
    *argc = cnt;
    *ret = argv;
    return S_OK;
}

Referenced by DispatchEx_InvokeEx().

create_dispex()

HRESULT create_dispex	(	script_ctx_t *	ctx,
		const builtin_info_t *	builtin_info,
		jsdisp_t *	prototype,
		jsdisp_t **	dispex
	)

Definition at line 2493 of file dispex.c.

{
    jsdisp_t *ret;
    HRESULT hres;
 
    ret = calloc(1, sizeof(jsdisp_t));
    if(!ret)
        return E_OUTOFMEMORY;
 
    hres = init_dispex(ret, ctx, builtin_info ? builtin_info : &dispex_info, prototype);
    if(FAILED(hres)) {
        free(ret);
        return hres;
    }
 
    *dispex = ret;
    return S_OK;
}

Referenced by create_named_item_script_obj(), create_object_prototype(), detach_scope(), exec_source(), init_global(), init_set_constructor(), interp_enter_catch(), Object_create(), and scope_init_locals().

delete_prop()

static HRESULT delete_prop ( jsdisp_t *  obj, dispex_prop_t *  prop, BOOL *  ret  )

static

Definition at line 2249 of file dispex.c.

{
    if(prop->type == PROP_PROTREF || prop->type == PROP_DELETED) {
        *ret = TRUE;
        return S_OK;
    }
 
    if(!(prop->flags & PROPF_CONFIGURABLE)) {
        *ret = FALSE;
        return S_OK;
    }
 
    *ret = TRUE;
 
    switch(prop->type) {
    case PROP_JSVAL:
        jsval_release(prop->u.val);
        break;
    case PROP_ACCESSOR:
        if(prop->u.accessor.getter)
            jsdisp_release(prop->u.accessor.getter);
        if(prop->u.accessor.setter)
            jsdisp_release(prop->u.accessor.setter);
        break;
    case PROP_EXTERN:
        if(obj->builtin_info->prop_delete) {
            HRESULT hres;
            hres = obj->builtin_info->prop_delete(obj, prop->u.id);
            if(FAILED(hres))
                return hres;
        }
        break;
    default:
        break;
    }
    prop->type = PROP_DELETED;
    return S_OK;
}

Referenced by disp_delete(), disp_delete_name(), DispatchEx_DeleteMemberByDispID(), DispatchEx_DeleteMemberByName(), and jsdisp_delete_idx().

disp_call()

HRESULT disp_call	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		DISPID	id,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	ret
	)

Definition at line 2666 of file dispex.c.

{
    VARIANT buf[6], retv;
    jsdisp_t *jsdisp;
    DISPPARAMS dp;
    unsigned i;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp && jsdisp->ctx == ctx) {
        if(flags & DISPATCH_PROPERTYPUT) {
            FIXME("disp_call(propput) on builtin object\n");
            jsdisp_release(jsdisp);
            return E_FAIL;
        }
 
        if(ctx != jsdisp->ctx)
            flags &= ~DISPATCH_JSCRIPT_INTERNAL_MASK;
        hres = jsdisp_call(jsdisp, id, flags, argc, argv, ret);
        jsdisp_release(jsdisp);
        return hres;
    }
    if(jsdisp)
        jsdisp_release(jsdisp);
 
    flags &= ~DISPATCH_JSCRIPT_INTERNAL_MASK;
    if(ret && argc)
        flags |= DISPATCH_PROPERTYGET;
 
    dp.cArgs = argc;
 
    if(flags & DISPATCH_PROPERTYPUT) {
        static DISPID propput_dispid = DISPID_PROPERTYPUT;
 
        dp.cNamedArgs = 1;
        dp.rgdispidNamedArgs = &propput_dispid;
    }else {
        dp.cNamedArgs = 0;
        dp.rgdispidNamedArgs = NULL;
    }
 
    if(dp.cArgs > ARRAY_SIZE(buf)) {
        dp.rgvarg = malloc(argc * sizeof(VARIANT));
        if(!dp.rgvarg)
            return E_OUTOFMEMORY;
    }else {
        dp.rgvarg = buf;
    }
 
    for(i=0; i<argc; i++) {
        hres = jsval_to_variant(argv[i], dp.rgvarg+argc-i-1);
        if(FAILED(hres)) {
            while(i--)
                VariantClear(dp.rgvarg+argc-i-1);
            if(dp.rgvarg != buf)
                free(dp.rgvarg);
            return hres;
        }
    }
 
    V_VT(&retv) = VT_EMPTY;
    hres = disp_invoke(ctx, disp, id, flags, &dp, ret ? &retv : NULL, &ctx->jscaller->IServiceProvider_iface);
 
    for(i=0; i<argc; i++)
        VariantClear(dp.rgvarg+argc-i-1);
    if(dp.rgvarg != buf)
        free(dp.rgvarg);
 
    if(SUCCEEDED(hres) && ret)
        hres = variant_to_jsval(ctx, &retv, ret);
    VariantClear(&retv);
    return hres;
}

Referenced by disp_call_name(), do_icall(), do_mcall(), exprval_call(), interp_newenum(), and variant_call().

disp_call_name()

HRESULT disp_call_name	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		const WCHAR *	name,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	ret
	)

Definition at line 2740 of file dispex.c.

{
    IDispatchEx *dispex;
    jsdisp_t *jsdisp;
    HRESULT hres;
    DISPID id;
    BSTR bstr;
 
    if((jsdisp = to_jsdisp(disp)) && jsdisp->ctx == ctx)
        return jsdisp_call_name(jsdisp, name, flags, argc, argv, ret);
 
    if(!(bstr = SysAllocString(name)))
        return E_OUTOFMEMORY;
    hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
    if(SUCCEEDED(hres) && dispex) {
        hres = IDispatchEx_GetDispID(dispex, bstr, make_grfdex(ctx, fdexNameCaseSensitive), &id);
        IDispatchEx_Release(dispex);
    }else {
        hres = IDispatch_GetIDsOfNames(disp, &IID_NULL, &bstr, 1, 0, &id);
    }
    SysFreeString(bstr);
    if(FAILED(hres))
        return hres;
 
    return disp_call(ctx, disp, id, flags, argc, argv, ret);
}

Referenced by to_locale_string().

disp_call_value_with_caller()

HRESULT disp_call_value_with_caller	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		jsval_t	vthis,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	r,
		IServiceProvider *	caller
	)

Definition at line 2767 of file dispex.c.

{
    VARIANT buf[6], retv, *args = buf;
    IDispatch *jsthis;
    jsdisp_t *jsdisp;
    DISPPARAMS dp;
    unsigned i;
    HRESULT hres = S_OK;
 
    static DISPID this_id = DISPID_THIS;
 
    assert(!(flags & ~(DISPATCH_METHOD|DISPATCH_CONSTRUCT|DISPATCH_JSCRIPT_INTERNAL_MASK)));
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp && jsdisp->ctx == ctx) {
        hres = jsdisp_call_value(jsdisp, vthis, flags, argc, argv, r);
        jsdisp_release(jsdisp);
        return hres;
    }
    if(jsdisp)
        jsdisp_release(jsdisp);
 
    if(is_object_instance(vthis) && (ctx->version < SCRIPTLANGUAGEVERSION_ES5 ||
       ((jsdisp = to_jsdisp(get_object(vthis))) && is_class(jsdisp, JSCLASS_OBJECT))))
        jsthis = get_object(vthis);
    else
        jsthis = NULL;
 
    flags &= ~DISPATCH_JSCRIPT_INTERNAL_MASK;
    if(r && argc && flags == DISPATCH_METHOD)
        flags |= DISPATCH_PROPERTYGET;
 
    if(jsthis) {
        dp.cArgs = argc + 1;
        dp.cNamedArgs = 1;
        dp.rgdispidNamedArgs = &this_id;
    }else {
        dp.cArgs = argc;
        dp.cNamedArgs = 0;
        dp.rgdispidNamedArgs = NULL;
    }
 
    if(dp.cArgs > ARRAY_SIZE(buf) && !(args = malloc(dp.cArgs * sizeof(VARIANT))))
        return E_OUTOFMEMORY;
    dp.rgvarg = args;
 
    if(jsthis) {
        V_VT(dp.rgvarg) = VT_DISPATCH;
        V_DISPATCH(dp.rgvarg) = jsthis;
    }
 
    for(i=0; SUCCEEDED(hres) && i < argc; i++)
        hres = jsval_to_variant(argv[i], dp.rgvarg+dp.cArgs-i-1);
 
    if(SUCCEEDED(hres)) {
        V_VT(&retv) = VT_EMPTY;
        hres = disp_invoke(ctx, disp, DISPID_VALUE, flags, &dp, r ? &retv : NULL, caller);
    }
 
    for(i = 0; i < argc; i++)
        VariantClear(dp.rgvarg + dp.cArgs - i - 1);
    if(args != buf)
        free(args);
 
    if(FAILED(hres))
        return hres;
    if(!r)
        return S_OK;
 
    hres = variant_to_jsval(ctx, &retv, r);
    VariantClear(&retv);
    return hres;
}

Referenced by disp_call_value(), and invoke_prop_func().

disp_delete()

HRESULT disp_delete	(	IDispatch *	disp,
		DISPID	id,
		BOOL *	ret
	)

Definition at line 3038 of file dispex.c.

{
    IDispatchEx *dispex;
    jsdisp_t *jsdisp;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp) {
        dispex_prop_t *prop;
 
        prop = get_prop(jsdisp, id);
        if(prop)
            hres = delete_prop(jsdisp, prop, ret);
        else
            hres = DISP_E_MEMBERNOTFOUND;
 
        jsdisp_release(jsdisp);
        return hres;
    }
 
    hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
    if(FAILED(hres)) {
        *ret = FALSE;
        return S_OK;
    }
 
    hres = IDispatchEx_DeleteMemberByDispID(dispex, id);
    IDispatchEx_Release(dispex);
    if(FAILED(hres))
        return hres;
 
    *ret = hres == S_OK;
    return S_OK;
}

Referenced by interp_delete_ident(), and transform_json_object().

disp_delete_name()

HRESULT disp_delete_name	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		jsstr_t *	name,
		BOOL *	ret
	)

Definition at line 3112 of file dispex.c.

{
    IDispatchEx *dispex;
    jsdisp_t *jsdisp;
    BSTR bstr;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp) {
        dispex_prop_t *prop;
        const WCHAR *ptr;
 
        ptr = jsstr_flatten(name);
        if(!ptr) {
            jsdisp_release(jsdisp);
            return E_OUTOFMEMORY;
        }
 
        hres = find_prop_name(jsdisp, string_hash(ptr), ptr, FALSE, NULL, &prop);
        if(prop) {
            hres = delete_prop(jsdisp, prop, ret);
        }else {
            *ret = TRUE;
            hres = S_OK;
        }
 
        jsdisp_release(jsdisp);
        return hres;
    }
 
    bstr = SysAllocStringLen(NULL, jsstr_length(name));
    if(!bstr)
        return E_OUTOFMEMORY;
    jsstr_flush(name, bstr);
 
    hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
    if(SUCCEEDED(hres)) {
        hres = IDispatchEx_DeleteMemberByName(dispex, bstr, make_grfdex(ctx, fdexNameCaseSensitive));
        if(SUCCEEDED(hres))
            *ret = hres == S_OK;
        IDispatchEx_Release(dispex);
    }else {
        DISPID id;
 
        hres = IDispatch_GetIDsOfNames(disp, &IID_NULL, &bstr, 1, 0, &id);
        if(SUCCEEDED(hres)) {
            /* Property exists and we can't delete it from pure IDispatch interface, so return false. */
            *ret = FALSE;
        }else if(hres == DISP_E_UNKNOWNNAME) {
            /* Property doesn't exist, so nothing to delete */
            *ret = TRUE;
            hres = S_OK;
        }
    }
 
    SysFreeString(bstr);
    return hres;
}

Referenced by interp_delete().

disp_invoke()

static HRESULT disp_invoke ( script_ctx_t *  ctx, IDispatch *  disp, DISPID  id, WORD  flags, DISPPARAMS *  params, VARIANT *  r, IServiceProvider *  caller  )

static

Definition at line 2630 of file dispex.c.

{
    IDispatchEx *dispex;
    EXCEPINFO ei;
    HRESULT hres;
 
    memset(&ei, 0, sizeof(ei));
    hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
    if(SUCCEEDED(hres)) {
        hres = IDispatchEx_InvokeEx(dispex, id, ctx->lcid, flags, params, r, &ei, caller);
        IDispatchEx_Release(dispex);
    }else {
        UINT err = 0;
 
        if(flags == DISPATCH_CONSTRUCT) {
            WARN("IDispatch cannot be constructor\n");
            return DISP_E_MEMBERNOTFOUND;
        }
 
        if(params->cNamedArgs == 1 && params->rgdispidNamedArgs[0] == DISPID_THIS) {
            params->cNamedArgs = 0;
            params->rgdispidNamedArgs = NULL;
            params->cArgs--;
            params->rgvarg++;
        }
 
        TRACE("using IDispatch\n");
        hres = IDispatch_Invoke(disp, id, &IID_NULL, ctx->lcid, flags, params, r, &ei, &err);
    }
 
    if(hres == DISP_E_EXCEPTION)
        handle_dispatch_exception(ctx, &ei);
    return hres;
}

Referenced by disp_call(), disp_call_value_with_caller(), disp_propget(), and disp_propput().

disp_propget()

HRESULT disp_propget	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		DISPID	id,
		jsval_t *	val
	)

Definition at line 2994 of file dispex.c.

{
    DISPPARAMS dp  = {NULL,NULL,0,0};
    jsdisp_t *jsdisp;
    VARIANT var;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp && jsdisp->ctx == ctx) {
        hres = jsdisp_propget(jsdisp, id, val);
        jsdisp_release(jsdisp);
        return hres;
    }
    if(jsdisp)
        jsdisp_release(jsdisp);
 
    V_VT(&var) = VT_EMPTY;
    hres = disp_invoke(ctx, disp, id, INVOKE_PROPERTYGET, &dp, &var, &ctx->jscaller->IServiceProvider_iface);
    if(SUCCEEDED(hres)) {
        hres = variant_to_jsval(ctx, &var, val);
        VariantClear(&var);
    }
    return hres;
}

Referenced by exprval_call(), exprval_propget(), interp_array(), interp_member(), and to_primitive().

disp_propput()

HRESULT disp_propput	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		DISPID	id,
		jsval_t	val
	)

Definition at line 2872 of file dispex.c.

{
    jsdisp_t *jsdisp;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(jsdisp && jsdisp->ctx == ctx) {
        dispex_prop_t *prop;
 
        prop = get_prop(jsdisp, id);
        if(prop)
            hres = prop_put(jsdisp, prop, val);
        else
            hres = DISP_E_MEMBERNOTFOUND;
 
        jsdisp_release(jsdisp);
    }else {
        DISPID dispid = DISPID_PROPERTYPUT;
        DWORD flags = DISPATCH_PROPERTYPUT;
        VARIANT var;
        DISPPARAMS dp  = {&var, &dispid, 1, 1};
 
        if(jsdisp)
            jsdisp_release(jsdisp);
        hres = jsval_to_variant(val, &var);
        if(FAILED(hres))
            return hres;
 
        if(V_VT(&var) == VT_DISPATCH)
            flags |= DISPATCH_PROPERTYPUTREF;
 
        hres = disp_invoke(ctx, disp, id, flags, &dp, NULL, &ctx->jscaller->IServiceProvider_iface);
        VariantClear(&var);
    }
 
    return hres;
}

Referenced by assign_ident(), disp_propput_name(), exprval_propput(), interp_assign_member(), and interp_set_member().

disp_propput_name()

HRESULT disp_propput_name	(	script_ctx_t *	ctx,
		IDispatch *	disp,
		const WCHAR *	name,
		jsval_t	val
	)

Definition at line 2910 of file dispex.c.

{
    jsdisp_t *jsdisp;
    HRESULT hres;
 
    jsdisp = iface_to_jsdisp(disp);
    if(!jsdisp || jsdisp->ctx != ctx) {
        IDispatchEx *dispex;
        BSTR str;
        DISPID id;
 
        if(jsdisp)
            jsdisp_release(jsdisp);
        if(!(str = SysAllocString(name)))
            return E_OUTOFMEMORY;
 
        hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
        if(SUCCEEDED(hres)) {
            hres = IDispatchEx_GetDispID(dispex, str, make_grfdex(ctx, fdexNameEnsure|fdexNameCaseSensitive), &id);
            IDispatchEx_Release(dispex);
        }else {
            TRACE("using IDispatch\n");
            hres = IDispatch_GetIDsOfNames(disp, &IID_NULL, &str, 1, 0, &id);
        }
        SysFreeString(str);
        if(FAILED(hres))
            return hres;
 
        return disp_propput(ctx, disp, id, val);
    }
 
    hres = jsdisp_propput_name(jsdisp, name, val);
    jsdisp_release(jsdisp);
    return hres;
}

Referenced by interp_set_member().

DispatchEx_AddRef()

static ULONG WINAPI DispatchEx_AddRef ( IWineJSDispatch *  iface )

static

Definition at line 1955 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    if(This->builtin_info->addref)
        return This->builtin_info->addref(This);
    jsdisp_addref(This);
    return This->ref;
}

DispatchEx_DeleteMemberByDispID()

static HRESULT WINAPI DispatchEx_DeleteMemberByDispID ( IWineJSDispatch *  iface, DISPID  id  )

static

Definition at line 2311 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop;
    BOOL b;
 
    TRACE("(%p)->(%lx)\n", This, id);
 
    prop = get_prop(This, id);
    if(!prop) {
        WARN("invalid id\n");
        return DISP_E_MEMBERNOTFOUND;
    }
 
    return delete_prop(This, prop, &b);
}

DispatchEx_DeleteMemberByName()

static HRESULT WINAPI DispatchEx_DeleteMemberByName ( IWineJSDispatch *  iface, BSTR  bstrName, DWORD  grfdex  )

static

Definition at line 2288 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop;
    BOOL b;
    HRESULT hres;
 
    TRACE("(%p)->(%s %lx)\n", This, debugstr_w(bstrName), grfdex);
 
    if(grfdex & ~(fdexNameCaseSensitive|fdexNameCaseInsensitive|fdexNameEnsure|fdexNameImplicit|FDEX_VERSION_MASK))
        FIXME("Unsupported grfdex %lx\n", grfdex);
 
    hres = find_prop_name(This, string_hash(bstrName), bstrName, grfdex & fdexNameCaseInsensitive, NULL, &prop);
    if(FAILED(hres))
        return hres;
    if(!prop) {
        TRACE("not found\n");
        return S_OK;
    }
 
    return delete_prop(This, prop, &b);
}

DispatchEx_GetDispID()

static HRESULT WINAPI DispatchEx_GetDispID ( IWineJSDispatch *  iface, BSTR  bstrName, DWORD  grfdex, DISPID *  pid  )

static

Definition at line 2119 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
 
    TRACE("(%p)->(%s %lx %p)\n", This, debugstr_w(bstrName), grfdex, pid);
 
    if(grfdex & ~(fdexNameCaseSensitive|fdexNameCaseInsensitive|fdexNameEnsure|fdexNameImplicit|FDEX_VERSION_MASK)) {
        FIXME("Unsupported grfdex %lx\n", grfdex);
        return E_NOTIMPL;
    }
 
    return jsdisp_get_id(This, bstrName, grfdex, pid);
}

DispatchEx_GetIDsOfNames()

static HRESULT WINAPI DispatchEx_GetIDsOfNames ( IWineJSDispatch *  iface, REFIID  riid, LPOLESTR *  rgszNames, UINT  cNames, LCID  lcid, DISPID *  rgDispId  )

static

Definition at line 2078 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    UINT i;
    HRESULT hres;
 
    TRACE("(%p)->(%s %p %u %lu %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
          lcid, rgDispId);
 
    if(cNames == 0)
        return S_OK;
 
    hres = jsdisp_get_id(This, rgszNames[0], 0, rgDispId);
    if(FAILED(hres))
        return hres;
 
    /* DISPIDs for parameters don't seem to be supported */
    if(cNames > 1) {
        for(i = 1; i < cNames; i++)
            rgDispId[i] = DISPID_UNKNOWN;
        hres = DISP_E_UNKNOWNNAME;
    }
 
    return hres;
}

DispatchEx_GetMemberName()

static HRESULT WINAPI DispatchEx_GetMemberName ( IWineJSDispatch *  iface, DISPID  id, BSTR *  pbstrName  )

static

Definition at line 2348 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop;
 
    TRACE("(%p)->(%lx %p)\n", This, id, pbstrName);
 
    prop = get_prop(This, id);
    if(!prop)
        return DISP_E_MEMBERNOTFOUND;
 
    *pbstrName = SysAllocString(prop->name);
    if(!*pbstrName)
        return E_OUTOFMEMORY;
 
    return S_OK;
}

DispatchEx_GetMemberProperties()

static HRESULT WINAPI DispatchEx_GetMemberProperties ( IWineJSDispatch *  iface, DISPID  id, DWORD  grfdexFetch, DWORD *  pgrfdex  )

static

Definition at line 2328 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop;
 
    TRACE("(%p)->(%lx %lx %p)\n", This, id, grfdexFetch, pgrfdex);
 
    prop = get_prop(This, id);
    if(!prop)
        return DISP_E_MEMBERNOTFOUND;
    *pgrfdex = 0;
 
    if(grfdexFetch) {
        FIXME("unimplemented flags %08lx\n", grfdexFetch);
        return E_NOTIMPL;
    }
 
    return S_OK;
}

DispatchEx_GetNameSpaceParent()

static HRESULT WINAPI DispatchEx_GetNameSpaceParent ( IWineJSDispatch *  iface, IUnknown **  ppunk  )

static

Definition at line 2380 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    FIXME("(%p)->(%p)\n", This, ppunk);
    return E_NOTIMPL;
}

DispatchEx_GetNextDispID()

static HRESULT WINAPI DispatchEx_GetNextDispID ( IWineJSDispatch *  iface, DWORD  grfdex, DISPID  id, DISPID *  pid  )

static

Definition at line 2366 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    HRESULT hres = S_FALSE;
 
    TRACE("(%p)->(%lx %lx %p)\n", This, grfdex, id, pid);
 
    if(id != DISPID_VALUE)
        hres = jsdisp_next_prop(This, id, JSDISP_ENUM_ALL, pid);
    if(hres == S_FALSE)
        *pid = DISPID_STARTENUM;
    return hres;
}

DispatchEx_GetTypeInfo()

static HRESULT WINAPI DispatchEx_GetTypeInfo ( IWineJSDispatch *  iface, UINT  iTInfo, LCID  lcid, ITypeInfo **  ppTInfo  )

static

Definition at line 1980 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop, *cur, *end, **typevar;
    UINT num_funcs = 0, num_vars = 0;
    struct typeinfo_func *typefunc;
    function_code_t *func_code;
    ScriptTypeInfo *typeinfo;
    unsigned pos;
 
    TRACE("(%p)->(%u %lu %p)\n", This, iTInfo, lcid, ppTInfo);
 
    if (iTInfo != 0) return DISP_E_BADINDEX;
 
    for (prop = This->props, end = prop + This->prop_cnt; prop != end; prop++)
    {
        if (prop->type != PROP_JSVAL || !(prop->flags & PROPF_ENUMERABLE))
            continue;
 
        /* If two identifiers differ only by case, the TypeInfo fails */
        pos = This->props[get_props_idx(This, prop->hash)].bucket_head;
        while (pos != ~0)
        {
            cur = This->props + pos;
 
            if (prop->hash == cur->hash && prop != cur &&
                cur->type == PROP_JSVAL && (cur->flags & PROPF_ENUMERABLE) &&
                !wcsicmp(prop->name, cur->name))
            {
                return TYPE_E_AMBIGUOUSNAME;
            }
            pos = cur->bucket_next;
        }
 
        if (is_function_prop(prop))
        {
            if (Function_get_code(as_jsdisp(get_object(prop->u.val))))
                num_funcs++;
        }
        else num_vars++;
    }
 
    if (!(typeinfo = malloc(sizeof(*typeinfo))))
        return E_OUTOFMEMORY;
 
    typeinfo->ITypeInfo_iface.lpVtbl = &ScriptTypeInfoVtbl;
    typeinfo->ITypeComp_iface.lpVtbl = &ScriptTypeCompVtbl;
    typeinfo->ref = 1;
    typeinfo->num_vars = num_vars;
    typeinfo->num_funcs = num_funcs;
    typeinfo->jsdisp = This;
 
    typeinfo->funcs = malloc(sizeof(*typeinfo->funcs) * num_funcs);
    if (!typeinfo->funcs)
    {
        free(typeinfo);
        return E_OUTOFMEMORY;
    }
 
    typeinfo->vars = malloc(sizeof(*typeinfo->vars) * num_vars);
    if (!typeinfo->vars)
    {
        free(typeinfo->funcs);
        free(typeinfo);
        return E_OUTOFMEMORY;
    }
 
    typefunc = typeinfo->funcs;
    typevar = typeinfo->vars;
    for (prop = This->props; prop != end; prop++)
    {
        if (prop->type != PROP_JSVAL || !(prop->flags & PROPF_ENUMERABLE))
            continue;
 
        if (is_function_prop(prop))
        {
            func_code = Function_get_code(as_jsdisp(get_object(prop->u.val)));
            if (!func_code) continue;
 
            typefunc->prop = prop;
            typefunc->code = func_code;
            typefunc++;
 
            /* The function may be deleted, so keep a ref */
            bytecode_addref(func_code->bytecode);
        }
        else
            *typevar++ = prop;
    }
 
    /* Keep a ref to the props and their names */
    jsdisp_addref(This);
 
    *ppTInfo = &typeinfo->ITypeInfo_iface;
    return S_OK;
}

DispatchEx_GetTypeInfoCount()

static HRESULT WINAPI DispatchEx_GetTypeInfoCount ( IWineJSDispatch *  iface, UINT *  pctinfo  )

static

Definition at line 1970 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
 
    TRACE("(%p)->(%p)\n", This, pctinfo);
 
    *pctinfo = 1;
    return S_OK;
}

DispatchEx_Invoke()

static HRESULT WINAPI DispatchEx_Invoke ( IWineJSDispatch *  iface, DISPID  dispIdMember, REFIID  riid, LCID  lcid, WORD  wFlags, DISPPARAMS *  pDispParams, VARIANT *  pVarResult, EXCEPINFO *  pExcepInfo, UINT *  puArgErr  )

static

Definition at line 2106 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
 
    TRACE("(%p)->(%ld %s %ld %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
          lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 
    return IDispatchEx_InvokeEx(to_dispex(This), dispIdMember, lcid, wFlags,
            pDispParams, pVarResult, pExcepInfo, NULL);
}

DispatchEx_InvokeEx()

static HRESULT WINAPI DispatchEx_InvokeEx ( IWineJSDispatch *  iface, DISPID  id, LCID  lcid, WORD  wFlags, DISPPARAMS *  pdp, VARIANT *  pvarRes, EXCEPINFO *  pei, IServiceProvider *  pspCaller  )

static

Definition at line 2133 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    IServiceProvider *prev_caller;
    dispex_prop_t *prop;
    jsexcept_t ei;
    HRESULT hres;
 
    TRACE("(%p)->(%lx %lx %x %p %p %p %p)\n", This, id, lcid, wFlags, pdp, pvarRes, pei, pspCaller);
 
    if(pvarRes)
        V_VT(pvarRes) = VT_EMPTY;
 
    prop = get_prop(This, id);
    if(!prop && id != DISPID_VALUE) {
        TRACE("invalid id\n");
        return DISP_E_MEMBERNOTFOUND;
    }
 
    enter_script(This->ctx, &ei);
 
    prev_caller = This->ctx->jscaller->caller;
    This->ctx->jscaller->caller = pspCaller;
    if(pspCaller)
        IServiceProvider_AddRef(pspCaller);
 
    switch(wFlags) {
    case DISPATCH_METHOD|DISPATCH_PROPERTYGET:
        wFlags = DISPATCH_METHOD;
        /* fall through */
    case DISPATCH_METHOD:
    case DISPATCH_CONSTRUCT: {
        jsval_t *argv, buf[6], r;
        IDispatch *passed_this;
        unsigned argc;
 
        hres = convert_params(This->ctx, pdp, buf, &argc, &argv);
        if(FAILED(hres))
            break;
 
        passed_this = get_this(pdp);
        if(prop)
            hres = invoke_prop_func(This, passed_this, prop, wFlags, argc, argv, pvarRes ? &r : NULL, pspCaller);
        else
            hres = jsdisp_call_value(This, passed_this ? jsval_disp(passed_this) : jsval_undefined(), wFlags, argc, argv, pvarRes ? &r : NULL);
 
        while(argc--)
            jsval_release(argv[argc]);
        if(argv != buf)
            free(argv);
        if(SUCCEEDED(hres) && pvarRes) {
            hres = jsval_to_variant(r, pvarRes);
            jsval_release(r);
        }
        break;
    }
    case DISPATCH_PROPERTYGET: {
        jsval_t r;
 
        if(prop)
            hres = prop_get(This, to_disp(This), prop, &r);
        else {
            hres = to_primitive(This->ctx, jsval_obj(This), &r, NO_HINT);
            if(hres == JS_E_TO_PRIMITIVE)
                hres = DISP_E_MEMBERNOTFOUND;
        }
 
        if(SUCCEEDED(hres)) {
            hres = jsval_to_variant(r, pvarRes);
            jsval_release(r);
        }
        break;
    }
    case DISPATCH_PROPERTYPUTREF | DISPATCH_PROPERTYPUT:
    case DISPATCH_PROPERTYPUTREF:
    case DISPATCH_PROPERTYPUT: {
        jsval_t val;
        DWORD i;
 
        if(!prop) {
            hres = DISP_E_MEMBERNOTFOUND;
            break;
        }
 
        for(i=0; i < pdp->cNamedArgs; i++) {
            if(pdp->rgdispidNamedArgs[i] == DISPID_PROPERTYPUT)
                break;
        }
 
        if(i == pdp->cNamedArgs) {
            TRACE("no value to set\n");
            hres = DISP_E_PARAMNOTOPTIONAL;
            break;
        }
 
        hres = variant_to_jsval(This->ctx, pdp->rgvarg+i, &val);
        if(FAILED(hres))
            break;
 
        hres = prop_put(This, prop, val);
        jsval_release(val);
        break;
    }
    default:
        FIXME("Unimplemented flags %x\n", wFlags);
        hres = E_INVALIDARG;
        break;
    }
 
    This->ctx->jscaller->caller = prev_caller;
    if(pspCaller)
        IServiceProvider_Release(pspCaller);
    return leave_script(This->ctx, hres);
}

DispatchEx_QueryInterface()

static HRESULT WINAPI DispatchEx_QueryInterface ( IWineJSDispatch *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 1929 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
 
    if(IsEqualGUID(&IID_IUnknown, riid)) {
        TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
        *ppv = &This->IWineJSDispatch_iface;
    }else if(IsEqualGUID(&IID_IDispatch, riid)) {
        TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
        *ppv = &This->IWineJSDispatch_iface;
    }else if(IsEqualGUID(&IID_IDispatchEx, riid)) {
        TRACE("(%p)->(IID_IDispatchEx %p)\n", This, ppv);
        *ppv = &This->IWineJSDispatch_iface;
    }else if(IsEqualGUID(&IID_IWineJSDispatch, riid)) {
        TRACE("(%p)->(IID_IWineJSDispatch %p)\n", This, ppv);
        *ppv = &This->IWineJSDispatch_iface;
    }else {
        WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
        *ppv = NULL;
        return E_NOINTERFACE;
    }
 
    jsdisp_addref(This);
    return S_OK;
}

DispatchEx_Release()

static ULONG WINAPI DispatchEx_Release ( IWineJSDispatch *  iface )

static

Definition at line 1964 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    return jsdisp_release(This);
}

ensure_prop_name()

static HRESULT ensure_prop_name ( jsdisp_t *  This, const WCHAR *  name, DWORD  create_flags, BOOL  case_insens, dispex_prop_t **  ret  )

static

Definition at line 449 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name_prot(This, string_hash(name), name, case_insens, NULL, &prop);
    if(SUCCEEDED(hres) && (!prop || prop->type == PROP_DELETED)) {
        TRACE("creating prop %s flags %lx\n", debugstr_w(name), create_flags);
 
        if(!prop) {
            prop = alloc_prop(This, name, PROP_DELETED, 0);
            if(!prop)
                return E_OUTOFMEMORY;
        }
 
        if(This->builtin_info->lookup_prop) {
            struct property_info desc;
            hres = This->builtin_info->lookup_prop(This, name, fdexNameEnsure, &desc);
            if(hres == S_OK)
                return update_external_prop(This, name, prop, &desc, ret);
        }
 
        hres = S_OK;
        prop->type = PROP_JSVAL;
        prop->flags = create_flags;
        prop->u.val = jsval_undefined();
    }
 
    *ret = prop;
    return hres;
}

Referenced by jsdisp_get_id(), and jsdisp_propput().

fill_props()

static HRESULT fill_props ( jsdisp_t *  obj )

static

Definition at line 747 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    if(obj->builtin_info->next_prop) {
        struct property_info desc;
        unsigned id = ~0;
        WCHAR buf[12];
 
        for(;;) {
            hres = obj->builtin_info->next_prop(obj, id, &desc);
            if(FAILED(hres))
                return hres;
            if(hres == S_FALSE)
                break;
 
            if(!desc.name) {
                swprintf(buf, ARRAYSIZE(buf), L"%u", desc.index);
                desc.name = buf;
            }
 
            prop = lookup_dispex_prop(obj, string_hash(desc.name), desc.name, FALSE);
            if(!prop) {
                hres = update_external_prop(obj, desc.name, NULL, &desc, &prop);
                if(FAILED(hres))
                    return hres;
            }
            id = desc.id;
        }
    }
 
    return S_OK;
}

Referenced by fill_protrefs(), jsdisp_freeze(), jsdisp_is_frozen(), and jsdisp_next_prop().

fill_protrefs()

static HRESULT fill_protrefs ( jsdisp_t *  This )

static

Definition at line 782 of file dispex.c.

{
    dispex_prop_t *iter, *prop;
    HRESULT hres;
 
    hres = fill_props(This);
    if(FAILED(hres))
        return hres;
 
    if(!This->prototype)
        return S_OK;
 
    hres = fill_protrefs(This->prototype);
    if(FAILED(hres))
        return hres;
 
    for(iter = This->prototype->props; iter < This->prototype->props+This->prototype->prop_cnt; iter++) {
        hres = find_prop_name(This, iter->hash, iter->name, FALSE, NULL, &prop);
        if(FAILED(hres))
            return hres;
        if(!prop || prop->type==PROP_DELETED) {
            if(prop) {
                prop->type = PROP_PROTREF;
                prop->flags = 0;
                prop->u.ref = iter - This->prototype->props;
            }else {
                prop = alloc_protref(This, iter->name, iter - This->prototype->props);
                if(!prop)
                    return E_OUTOFMEMORY;
            }
        }
    }
 
    return S_OK;
}

Referenced by fill_protrefs(), and jsdisp_next_prop().

find_builtin_prop()

static const builtin_prop_t * find_builtin_prop ( jsdisp_t *  This, const WCHAR *  name, BOOL  case_insens  )

static

Definition at line 130 of file dispex.c.

{
    int min = 0, max = This->builtin_info->props_cnt-1, i, r;
    unsigned version;
 
    if(case_insens) {
        for(i = min; i <= max; i++)
            if(!wcsicmp(name, This->builtin_info->props[i].name))
                goto found;
        return NULL;
    }
 
    while(min <= max) {
        i = (min+max)/2;
 
        r = wcscmp(name, This->builtin_info->props[i].name);
        if(!r)
            goto found;
 
        if(r < 0)
            max = i-1;
        else
            min = i+1;
    }
 
    return NULL;
 
found:
    /* Skip prop if it's available only in higher compatibility mode. */
    version = (This->builtin_info->props[i].flags & PROPF_VERSION_MASK) >> PROPF_VERSION_SHIFT;
    if(version && version > This->ctx->version)
        return NULL;
 
    /* Skip prop if it's available only in HTML mode and we're not running in HTML mode. */
    if((This->builtin_info->props[i].flags & PROPF_HTML) && !This->ctx->html_mode)
        return NULL;
 
    return This->builtin_info->props + i;
}

Referenced by find_prop_name().

find_external_prop()

static HRESULT find_external_prop ( jsdisp_t *  This, const WCHAR *  name, BOOL  case_insens, dispex_prop_t *  prop, dispex_prop_t **  ret  )

static

Definition at line 323 of file dispex.c.

{
    if(This->builtin_info->lookup_prop) {
        struct property_info desc;
        HRESULT hres;
 
        hres = This->builtin_info->lookup_prop(This, name,
                                               case_insens ? fdexNameCaseInsensitive : fdexNameCaseSensitive, &desc);
        if(hres != DISP_E_UNKNOWNNAME) {
            if(FAILED(hres))
                return hres;
 
            if(prop && desc.name && wcscmp(prop->name, desc.name)) {
                prop = lookup_dispex_prop(This, string_hash(desc.name), desc.name, case_insens);
                if(prop && prop->type != PROP_EXTERN && prop->type != PROP_DELETED && prop->type != PROP_PROTREF) {
                    *ret = prop;
                    return S_OK;
                }
            }
 
            return update_external_prop(This, name, prop, &desc, ret);
        }else if(prop && prop->type == PROP_EXTERN) {
            prop->type = PROP_DELETED;
        }
    }
 
    *ret = prop;
    return S_OK;
}

Referenced by find_prop_name(), and jsdisp_next_prop().

find_prop_name()

static HRESULT find_prop_name ( jsdisp_t *  This, unsigned  hash, const WCHAR *  name, BOOL  case_insens, dispex_prop_t *  prop, dispex_prop_t **  ret  )

static

Definition at line 353 of file dispex.c.

{
    const builtin_prop_t *builtin;
    HRESULT hres;
 
    if(!prop)
        prop = lookup_dispex_prop(This, hash, name, case_insens);
    if(prop && prop->type != PROP_DELETED && prop->type != PROP_EXTERN) {
        *ret = prop;
        return S_OK;
    }
 
    if(!prop && (builtin = find_builtin_prop(This, name, case_insens))) {
        unsigned flags = builtin->flags;
        if(flags & PROPF_METHOD) {
            jsdisp_t *obj;
 
            hres = create_builtin_function(This->ctx, builtin->invoke, builtin->name, NULL, flags, NULL, &obj);
            if(FAILED(hres))
                return hres;
 
            prop = alloc_prop(This, builtin->name, PROP_JSVAL, (flags & PROPF_ALL) | PROPF_WRITABLE | PROPF_CONFIGURABLE);
            if(!prop) {
                jsdisp_release(obj);
                return E_OUTOFMEMORY;
            }
 
            prop->type = PROP_JSVAL;
            prop->u.val = jsval_obj(obj);
            *ret = prop;
            return S_OK;
        }else if(builtin->setter)
            flags |= PROPF_WRITABLE;
        flags &= PROPF_ENUMERABLE | PROPF_WRITABLE | PROPF_CONFIGURABLE;
        prop = alloc_prop(This, builtin->name, PROP_BUILTIN, flags);
        if(!prop)
            return E_OUTOFMEMORY;
 
        prop->u.p = builtin;
        *ret = prop;
        return S_OK;
    }
 
    return find_external_prop(This, name, case_insens, prop, ret);
}

Referenced by disp_delete_name(), DispatchEx_DeleteMemberByName(), fill_protrefs(), find_prop_name_prot(), jsdisp_define_property(), jsdisp_delete_idx(), jsdisp_get_own_property(), and jsdisp_propput().

find_prop_name_prot()

static HRESULT find_prop_name_prot ( jsdisp_t *  This, unsigned  hash, const WCHAR *  name, BOOL  case_insens, dispex_prop_t *  own_prop, dispex_prop_t **  ret  )

static

Definition at line 400 of file dispex.c.

{
    dispex_prop_t *prot_prop = NULL;
    HRESULT hres;
 
    hres = find_prop_name(This, hash, name, case_insens, own_prop, &own_prop);
    if(FAILED(hres))
        return hres;
    if(own_prop) {
        if(own_prop->type == PROP_PROTREF) {
            prot_prop = &This->prototype->props[own_prop->u.ref];
        }else if(own_prop->type != PROP_DELETED) {
            *ret = own_prop;
            return S_OK;
        }
    }
 
    if(This->prototype) {
        hres = find_prop_name_prot(This->prototype, hash, name, case_insens, prot_prop, &prot_prop);
        if(FAILED(hres))
            return hres;
        if(prot_prop && prot_prop->type != PROP_DELETED) {
            if(own_prop && case_insens && wcscmp(prot_prop->name, own_prop->name)) {
                hres = find_prop_name(This, prot_prop->hash, prot_prop->name, FALSE, NULL, &own_prop);
                if(FAILED(hres))
                    return hres;
                if(own_prop && own_prop->type != PROP_DELETED) {
                    *ret = own_prop;
                    return S_OK;
                }
            }
            if(own_prop) {
                own_prop->type = PROP_PROTREF;
                own_prop->u.ref = prot_prop - This->prototype->props;
            }else {
                own_prop = alloc_protref(This, prot_prop->name, prot_prop - This->prototype->props);
                if(!own_prop)
                    return E_OUTOFMEMORY;
            }
        }else if(own_prop) {
            own_prop->type = PROP_DELETED;
        }
    }
 
    *ret = own_prop;
    return S_OK;
}

Referenced by ensure_prop_name(), find_prop_name_prot(), init_dispex_from_constr(), jsdisp_call_name(), jsdisp_get_id(), jsdisp_get_idx(), and jsdisp_propget_name().

fix_protref_prop()

static void fix_protref_prop ( jsdisp_t *  jsdisp, dispex_prop_t *  prop  )

static

Definition at line 63 of file dispex.c.

{
    DWORD ref;
 
    if(prop->type != PROP_PROTREF)
        return;
    ref = prop->u.ref;
 
    while((jsdisp = jsdisp->prototype)) {
        if(ref >= jsdisp->prop_cnt || jsdisp->props[ref].type == PROP_DELETED)
            break;
        if(jsdisp->props[ref].type != PROP_PROTREF)
            return;
        ref = jsdisp->props[ref].u.ref;
    }
    prop->type = PROP_DELETED;
}

Referenced by get_prop().

gc_process_linked_obj()

HRESULT gc_process_linked_obj	(	struct gc_ctx *	gc_ctx,
		enum gc_traverse_op	op,
		jsdisp_t *	obj,
		jsdisp_t *	link,
		void **	unlink_ref
	)

Definition at line 1124 of file dispex.c.

{
    if(op == GC_TRAVERSE_UNLINK) {
        *unlink_ref = NULL;
        jsdisp_release(link);
        return S_OK;
    }
 
    if(op == GC_TRAVERSE_SPECULATIVELY)
        link->ref--;
    else if(link->gc_marked)
        return gc_stack_push(gc_ctx, link);
    return S_OK;
}

Referenced by Arguments_gc_traverse(), BindFunction_gc_traverse(), DataView_gc_traverse(), InterpretedFunction_gc_traverse(), and scope_gc_traverse().

gc_process_linked_val()

HRESULT gc_process_linked_val	(	struct gc_ctx *	gc_ctx,
		enum gc_traverse_op	op,
		jsdisp_t *	obj,
		jsval_t *	link
	)

Definition at line 1139 of file dispex.c.

{
    jsdisp_t *jsdisp;
 
    if(op == GC_TRAVERSE_UNLINK) {
        jsval_t val = *link;
        *link = jsval_undefined();
        jsval_release(val);
        return S_OK;
    }
 
    if(!is_object_instance(*link) || !(jsdisp = to_jsdisp(get_object(*link))))
        return S_OK;
    if(op == GC_TRAVERSE_SPECULATIVELY)
        jsdisp->ref--;
    else if(jsdisp->gc_marked)
        return gc_stack_push(gc_ctx, jsdisp);
    return S_OK;
}

Referenced by Arguments_gc_traverse(), BindFunction_gc_traverse(), Enumerator_gc_traverse(), Map_gc_traverse(), RegExp_gc_traverse(), scope_gc_traverse(), and WeakMap_gc_traverse().

gc_run()

HRESULT gc_run

(

script_ctx_t *

ctx

)

Definition at line 928 of file dispex.c.

{
    /* Save original refcounts in a linked list of chunks */
    struct chunk
    {
        struct chunk *next;
        LONG ref[1020];
    } *head, *chunk;
    struct thread_data *thread_data = ctx->thread_data;
    jsdisp_t *obj, *obj2, *link, *link2;
    dispex_prop_t *prop, *props_end;
    struct gc_ctx gc_ctx = { 0 };
    unsigned chunk_idx = 0;
    HRESULT hres = S_OK;
    struct list *iter;
 
    /* Prevent recursive calls from side-effects during unlinking (e.g. CollectGarbage from host object's Release) */
    if(thread_data->gc_is_unlinking)
        return S_OK;
 
    if(!(head = malloc(sizeof(*head))))
        return E_OUTOFMEMORY;
    head->next = NULL;
    chunk = head;
 
    /* 1. Save actual refcounts and decrease them speculatively as-if we unlinked the objects */
    LIST_FOR_EACH_ENTRY(obj, &thread_data->objects, jsdisp_t, entry) {
        if(chunk_idx == ARRAY_SIZE(chunk->ref)) {
            if(!(chunk->next = malloc(sizeof(*chunk)))) {
                do {
                    chunk = head->next;
                    free(head);
                    head = chunk;
                } while(head);
                return E_OUTOFMEMORY;
            }
            chunk = chunk->next; chunk_idx = 0;
            chunk->next = NULL;
        }
        chunk->ref[chunk_idx++] = obj->ref;
    }
    LIST_FOR_EACH_ENTRY(obj, &thread_data->objects, jsdisp_t, entry) {
        /* Skip objects with external reference counter */
        if(obj->builtin_info->addref) {
            obj->gc_marked = FALSE;
            continue;
        }
        for(prop = obj->props, props_end = prop + obj->prop_cnt; prop < props_end; prop++) {
            switch(prop->type) {
            case PROP_JSVAL:
                if(is_object_instance(prop->u.val) && (link = to_jsdisp(get_object(prop->u.val))))
                    link->ref--;
                break;
            case PROP_ACCESSOR:
                if(prop->u.accessor.getter)
                    prop->u.accessor.getter->ref--;
                if(prop->u.accessor.setter)
                    prop->u.accessor.setter->ref--;
                break;
            default:
                break;
            }
        }
 
        if(obj->prototype)
            obj->prototype->ref--;
        if(obj->builtin_info->gc_traverse)
            obj->builtin_info->gc_traverse(&gc_ctx, GC_TRAVERSE_SPECULATIVELY, obj);
        obj->gc_marked = TRUE;
    }
 
    /* 2. Clear mark on objects with non-zero "external refcount" and all objects accessible from them */
    LIST_FOR_EACH_ENTRY(obj, &thread_data->objects, jsdisp_t, entry) {
        if(!obj->ref || !obj->gc_marked)
            continue;
 
        hres = gc_stack_push(&gc_ctx, NULL);
        if(FAILED(hres))
            break;
 
        obj2 = obj;
        do
        {
            obj2->gc_marked = FALSE;
 
            for(prop = obj2->props, props_end = prop + obj2->prop_cnt; prop < props_end; prop++) {
                switch(prop->type) {
                case PROP_JSVAL:
                    if(!is_object_instance(prop->u.val))
                        continue;
                    link = to_jsdisp(get_object(prop->u.val));
                    link2 = NULL;
                    break;
                case PROP_ACCESSOR:
                    link = prop->u.accessor.getter;
                    link2 = prop->u.accessor.setter;
                    break;
                default:
                    continue;
                }
                if(link && link->gc_marked) {
                    hres = gc_stack_push(&gc_ctx, link);
                    if(FAILED(hres))
                        break;
                }
                if(link2 && link2->gc_marked) {
                    hres = gc_stack_push(&gc_ctx, link2);
                    if(FAILED(hres))
                        break;
                }
            }
 
            if(FAILED(hres))
                break;
 
            if(obj2->prototype && obj2->prototype->gc_marked) {
                hres = gc_stack_push(&gc_ctx, obj2->prototype);
                if(FAILED(hres))
                    break;
            }
 
            if(obj2->builtin_info->gc_traverse) {
                hres = obj2->builtin_info->gc_traverse(&gc_ctx, GC_TRAVERSE, obj2);
                if(FAILED(hres))
                    break;
            }
 
            /* For weak refs, traverse paths accessible from it via the WeakMaps, if the WeakMaps are alive at this point.
               We need both the key and the WeakMap for the entry to actually be accessible (and thus traversed). */
            if(obj2->has_weak_refs) {
                struct list *list = &RB_ENTRY_VALUE(rb_get(&thread_data->weak_refs, obj2), struct weak_refs_entry, entry)->list;
                struct weakmap_entry *entry;
 
                LIST_FOR_EACH_ENTRY(entry, list, struct weakmap_entry, weak_refs_entry) {
                    if(!entry->weakmap->gc_marked && is_object_instance(entry->value) && (link = to_jsdisp(get_object(entry->value)))) {
                        hres = gc_stack_push(&gc_ctx, link);
                        if(FAILED(hres))
                            break;
                    }
                }
 
                if(FAILED(hres))
                    break;
            }
 
            do obj2 = gc_stack_pop(&gc_ctx); while(obj2 && !obj2->gc_marked);
        } while(obj2);
 
        if(FAILED(hres)) {
            do obj2 = gc_stack_pop(&gc_ctx); while(obj2);
            break;
        }
    }
    free(gc_ctx.next);
 
    /* Restore */
    chunk = head; chunk_idx = 0;
    LIST_FOR_EACH_ENTRY(obj, &thread_data->objects, jsdisp_t, entry) {
        obj->ref = chunk->ref[chunk_idx++];
        if(chunk_idx == ARRAY_SIZE(chunk->ref)) {
            struct chunk *next = chunk->next;
            free(chunk);
            chunk = next; chunk_idx = 0;
        }
    }
    free(chunk);
 
    if(FAILED(hres))
        return hres;
 
    /* 3. Remove all the links from the marked objects, since they are dangling */
    thread_data->gc_is_unlinking = TRUE;
 
    iter = list_head(&thread_data->objects);
    while(iter) {
        obj = LIST_ENTRY(iter, jsdisp_t, entry);
        if(!obj->gc_marked) {
            iter = list_next(&thread_data->objects, iter);
            continue;
        }
 
        /* Grab it since it gets removed when unlinked */
        jsdisp_addref(obj);
        unlink_jsdisp(obj);
 
        /* Releasing unlinked object should not delete any other object,
           so we can safely obtain the next pointer now */
        iter = list_next(&thread_data->objects, iter);
        jsdisp_release(obj);
    }
 
    thread_data->gc_is_unlinking = FALSE;
    thread_data->gc_last_tick = GetTickCount();
    return S_OK;
}

Referenced by decrease_state(), init_dispex(), and JSGlobal_CollectGarbage().

gc_stack_pop()

static jsdisp_t * gc_stack_pop ( struct gc_ctx *  gc_ctx )

static

Definition at line 915 of file dispex.c.

{
    jsdisp_t *obj = gc_ctx->chunk->objects[gc_ctx->idx];
 
    if(++gc_ctx->idx == ARRAY_SIZE(gc_ctx->chunk->objects)) {
        free(gc_ctx->next);
        gc_ctx->next = gc_ctx->chunk;
        gc_ctx->chunk = gc_ctx->chunk->prev;
        gc_ctx->idx = 0;
    }
    return obj;
}

Referenced by gc_run().

gc_stack_push()

static HRESULT gc_stack_push ( struct gc_ctx *  gc_ctx, jsdisp_t *  obj  )

static

Definition at line 895 of file dispex.c.

{
    if(!gc_ctx->idx) {
        if(gc_ctx->next)
            gc_ctx->chunk = gc_ctx->next;
        else {
            struct gc_stack_chunk *prev, *tmp = malloc(sizeof(*tmp));
            if(!tmp)
                return E_OUTOFMEMORY;
            prev = gc_ctx->chunk;
            gc_ctx->chunk = tmp;
            gc_ctx->chunk->prev = prev;
        }
        gc_ctx->idx = ARRAY_SIZE(gc_ctx->chunk->objects);
        gc_ctx->next = NULL;
    }
    gc_ctx->chunk->objects[--gc_ctx->idx] = obj;
    return S_OK;
}

Referenced by gc_process_linked_obj(), gc_process_linked_val(), and gc_run().

get_flags()

static DWORD get_flags ( jsdisp_t *  This, dispex_prop_t *  prop  )

static

Definition at line 111 of file dispex.c.

{
    if(prop->type == PROP_PROTREF) {
        dispex_prop_t *parent = NULL;
 
        if(prop->u.ref < This->prototype->prop_cnt)
            parent = &This->prototype->props[prop->u.ref];
 
        if(!parent || parent->type == PROP_DELETED) {
            prop->type = PROP_DELETED;
            return 0;
        }
 
        return get_flags(This->prototype, parent);
    }
 
    return prop->flags;
}

get_func_from_memid()

static struct typeinfo_func * get_func_from_memid ( const ScriptTypeInfo *  typeinfo, MEMBERID  memid  )

static

Definition at line 1179 of file dispex.c.

{
    UINT a = 0, b = typeinfo->num_funcs;
 
    while (a < b)
    {
        UINT i = (a + b - 1) / 2;
        MEMBERID func_memid = prop_to_id(typeinfo->jsdisp, typeinfo->funcs[i].prop);
 
        if (memid == func_memid)
            return &typeinfo->funcs[i];
        else if (memid < func_memid)
            b = i;
        else
            a = i + 1;
    }
    return NULL;
}

Referenced by ScriptTypeInfo_AddressOfMember(), ScriptTypeInfo_GetDllEntry(), ScriptTypeInfo_GetDocumentation(), ScriptTypeInfo_GetMops(), ScriptTypeInfo_GetNames(), and ScriptTypeInfo_Invoke().

get_host_dispatch()

IWineJSDispatchHost * get_host_dispatch

(

IDispatch *

disp

)

Definition at line 3584 of file dispex.c.

{
    IWineJSDispatchHost *ret;
    HostObject *host_obj;
    jsdisp_t *jsdisp;
 
    if(!(jsdisp = to_jsdisp(disp)))
        return NULL;
    if(jsdisp->builtin_info != &HostObject_info)
        return NULL;
 
    host_obj = HostObject_from_jsdisp(jsdisp);
    IWineJSDispatchHost_GetOuterDispatch(host_obj->host_iface, &ret);
    return ret;
}

Referenced by disp_cmp(), HostFunction_call(), jsval_to_variant(), and WineJSDispatch_GetScriptGlobal().

get_prop()

static dispex_prop_t * get_prop ( jsdisp_t *  This, DISPID  id  )

inlinestatic

Definition at line 87 of file dispex.c.

{
    DWORD idx = id - 1;
 
    if(idx >= This->prop_cnt)
        return NULL;
    fix_protref_prop(This, &This->props[idx]);
 
    return This->props[idx].type == PROP_DELETED ? NULL : &This->props[idx];
}

Referenced by disp_delete(), disp_propput(), DispatchEx_DeleteMemberByDispID(), DispatchEx_GetMemberName(), DispatchEx_GetMemberProperties(), DispatchEx_InvokeEx(), jsdisp_call(), jsdisp_get_prop_name(), jsdisp_propget(), and WineJSDispatch_GetPropertyFlags().

get_props_idx()

static unsigned get_props_idx ( jsdisp_t *  This, unsigned  hash  )

inlinestatic

Definition at line 178 of file dispex.c.

{
    return (hash*GOLDEN_RATIO) & (This->buf_size-1);
}

Referenced by alloc_prop(), DispatchEx_GetTypeInfo(), lookup_dispex_prop(), and resize_props().

get_this()

static IDispatch * get_this ( DISPPARAMS *  dp )

static

Definition at line 519 of file dispex.c.

{
    DWORD i;
 
    for(i=0; i < dp->cNamedArgs; i++) {
        if(dp->rgdispidNamedArgs[i] == DISPID_THIS) {
            if(V_VT(dp->rgvarg+i) == VT_DISPATCH)
                return V_DISPATCH(dp->rgvarg+i);
 
            WARN("This is not VT_DISPATCH\n");
            return NULL;
        }
    }
 
    TRACE("no this passed\n");
    return NULL;
}

Referenced by DispatchEx_InvokeEx().

get_var_from_memid()

static dispex_prop_t * get_var_from_memid ( const ScriptTypeInfo *  typeinfo, MEMBERID  memid  )

static

Definition at line 1198 of file dispex.c.

{
    UINT a = 0, b = typeinfo->num_vars;
 
    while (a < b)
    {
        UINT i = (a + b - 1) / 2;
        MEMBERID var_memid = prop_to_id(typeinfo->jsdisp, typeinfo->vars[i]);
 
        if (memid == var_memid)
            return typeinfo->vars[i];
        else if (memid < var_memid)
            b = i;
        else
            a = i + 1;
    }
    return NULL;
}

Referenced by ScriptTypeInfo_AddressOfMember(), ScriptTypeInfo_GetDllEntry(), ScriptTypeInfo_GetDocumentation(), ScriptTypeInfo_GetMops(), ScriptTypeInfo_GetNames(), and ScriptTypeInfo_Invoke().

HostObject_addref()

static ULONG HostObject_addref ( jsdisp_t *  jsdisp )

static

Definition at line 3450 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
    return IWineJSDispatchHost_AddRef(This->host_iface);
}

HostObject_from_jsdisp()

static HostObject * HostObject_from_jsdisp ( jsdisp_t *  jsdisp )

inlinestatic

Definition at line 3445 of file dispex.c.

{
    return CONTAINING_RECORD(jsdisp, HostObject, jsdisp);
}

Referenced by get_host_dispatch(), HostObject_addref(), HostObject_lookup_prop(), HostObject_next_prop(), HostObject_prop_config(), HostObject_prop_delete(), HostObject_prop_get(), HostObject_prop_put(), HostObject_release(), and HostObject_to_string().

HostObject_lookup_prop()

static HRESULT HostObject_lookup_prop ( jsdisp_t *  jsdisp, const WCHAR *  name, unsigned  flags, struct property_info *  desc  )

static

Definition at line 3462 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
 
    return IWineJSDispatchHost_LookupProperty(This->host_iface, name, flags, desc);
}

HostObject_next_prop()

static HRESULT HostObject_next_prop ( jsdisp_t *  jsdisp, unsigned  id, struct property_info *  desc  )

static

Definition at line 3508 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
 
    return IWineJSDispatchHost_NextProperty(This->host_iface, id, desc);
}

HostObject_prop_config()

static HRESULT HostObject_prop_config ( jsdisp_t *  jsdisp, unsigned  id, unsigned  flags  )

static

Definition at line 3522 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
 
    return IWineJSDispatchHost_ConfigureProperty(This->host_iface, id, flags);
}

HostObject_prop_delete()

static HRESULT HostObject_prop_delete ( jsdisp_t *  jsdisp, unsigned  id  )

static

Definition at line 3515 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
 
    return IWineJSDispatchHost_DeleteProperty(This->host_iface, id);
}

HostObject_prop_get()

static HRESULT HostObject_prop_get ( jsdisp_t *  jsdisp, unsigned  idx, jsval_t *  r  )

static

Definition at line 3469 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
    EXCEPINFO ei = { 0 };
    VARIANT v;
    HRESULT hres;
 
    V_VT(&v) = VT_EMPTY;
    hres = IWineJSDispatchHost_GetProperty(This->host_iface, idx, jsdisp->ctx->lcid, &v, &ei,
                                           &jsdisp->ctx->jscaller->IServiceProvider_iface);
    if(hres == DISP_E_EXCEPTION)
        handle_dispatch_exception(jsdisp->ctx, &ei);
    if(FAILED(hres))
        return hres;
 
    hres = variant_to_jsval(jsdisp->ctx, &v, r);
    VariantClear(&v);
    return hres;
}

HostObject_prop_put()

static HRESULT HostObject_prop_put ( jsdisp_t *  jsdisp, unsigned  idx, jsval_t  v  )

static

Definition at line 3489 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
    EXCEPINFO ei = { 0 };
    VARIANT var;
    HRESULT hres;
 
    hres = jsval_to_variant(v, &var);
    if(FAILED(hres))
        return hres;
 
    hres = IWineJSDispatchHost_SetProperty(This->host_iface, idx, jsdisp->ctx->lcid, &var, &ei,
                                           &jsdisp->ctx->jscaller->IServiceProvider_iface);
    if(hres == DISP_E_EXCEPTION)
        handle_dispatch_exception(jsdisp->ctx, &ei);
    VariantClear(&var);
    return hres;
}

HostObject_release()

static ULONG HostObject_release ( jsdisp_t *  jsdisp )

static

Definition at line 3456 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
    return IWineJSDispatchHost_Release(This->host_iface);
}

HostObject_to_string()

static HRESULT HostObject_to_string ( jsdisp_t *  jsdisp, jsstr_t **  ret  )

static

Definition at line 3529 of file dispex.c.

{
    HostObject *This = HostObject_from_jsdisp(jsdisp);
    BSTR str;
    HRESULT hres;
 
    hres = IWineJSDispatchHost_ToString(This->host_iface, &str);
    if(FAILED(hres))
        return hres;
 
    *ret = jsstr_alloc(str);
    SysFreeString(str);
    return *ret ? S_OK : E_OUTOFMEMORY;
}

iface_to_jsdisp()

jsdisp_t * iface_to_jsdisp

(

IDispatch *

iface

)

Definition at line 2543 of file dispex.c.

{
    return iface->lpVtbl == (const IDispatchVtbl*)&DispatchExVtbl
        ? jsdisp_addref( impl_from_IWineJSDispatch((IWineJSDispatch*)iface))
        : NULL;
}

Referenced by Array_sort(), concat_obj(), disp_call(), disp_call_value_with_caller(), disp_delete(), disp_delete_name(), disp_propget(), disp_propput(), disp_propput_name(), Function_apply(), get_length(), init_dispex_from_constr(), interp_instanceof(), maybe_to_primitive(), String_match(), String_replace(), String_search(), String_split(), stringify(), and to_primitive().

impl_from_IWineJSDispatch()

static jsdisp_t * impl_from_IWineJSDispatch ( IWineJSDispatch *  iface )

inlinestatic

Definition at line 1924 of file dispex.c.

{
    return CONTAINING_RECORD(iface, jsdisp_t, IWineJSDispatch_iface);
}

Referenced by as_jsdisp(), DispatchEx_AddRef(), DispatchEx_DeleteMemberByDispID(), DispatchEx_DeleteMemberByName(), DispatchEx_GetDispID(), DispatchEx_GetIDsOfNames(), DispatchEx_GetMemberName(), DispatchEx_GetMemberProperties(), DispatchEx_GetNameSpaceParent(), DispatchEx_GetNextDispID(), DispatchEx_GetTypeInfo(), DispatchEx_GetTypeInfoCount(), DispatchEx_Invoke(), DispatchEx_InvokeEx(), DispatchEx_QueryInterface(), DispatchEx_Release(), iface_to_jsdisp(), init_host_object(), to_jsdisp(), WineJSDispatch_Free(), WineJSDispatch_GetPropertyFlags(), and WineJSDispatch_GetScriptGlobal().

init_dispex()

HRESULT init_dispex	(	jsdisp_t *	dispex,
		script_ctx_t *	ctx,
		const builtin_info_t *	builtin_info,
		jsdisp_t *	prototype
	)

Definition at line 2454 of file dispex.c.

{
    unsigned i;
 
    /* FIXME: Use better heuristics to decide when to run the GC */
    if(GetTickCount() - ctx->thread_data->gc_last_tick > 30000)
        gc_run(ctx);
 
    TRACE("%p (%p)\n", dispex, prototype);
 
    dispex->IWineJSDispatch_iface.lpVtbl = &DispatchExVtbl;
    dispex->ref = 1;
    dispex->builtin_info = builtin_info;
    dispex->extensible = TRUE;
    dispex->is_constructor = builtin_info->class == JSCLASS_FUNCTION;
    dispex->prop_cnt = 0;
 
    dispex->props = calloc(1, sizeof(dispex_prop_t)*(dispex->buf_size=4));
    if(!dispex->props)
        return E_OUTOFMEMORY;
 
    for(i = 0; i < dispex->buf_size; i++) {
        dispex->props[i].bucket_head = ~0;
        dispex->props[i].bucket_next = ~0;
    }
 
    dispex->prototype = prototype;
    if(prototype)
        jsdisp_addref(prototype);
 
    script_addref(ctx);
    dispex->ctx = ctx;
 
    list_add_tail(&ctx->thread_data->objects, &dispex->entry);
    return S_OK;
}

Referenced by alloc_array(), alloc_bool(), alloc_doc_node(), alloc_enumerator(), alloc_error(), alloc_number(), alloc_regexp(), alloc_vbarray(), create_child_collection(), create_children_nodelist(), create_date(), create_dispex(), create_dom_implementation(), create_event(), create_func_disp(), create_function(), create_history(), create_html_rect(), create_inner_window(), create_mime_types_collection(), create_nodemap(), create_parseError(), create_plugins_collection(), create_selection(), create_storage(), HTMLCurrentStyle_Create(), HTMLDocument_Create(), HTMLDOMAttribute_Create(), HTMLDOMTextNode_Create(), HTMLElement_get_attr_col(), HTMLElement_Init(), HTMLElementCollection_Create(), HTMLFiltersCollection_Create(), HTMLImageElementFactory_Create(), HTMLLocation_Create(), HTMLOptionElementFactory_Create(), HTMLScreen_Create(), HTMLSelectionObject_Create(), HTMLStyle_Create(), HTMLStyleSheet_Create(), HTMLStyleSheetRulesCollection_Create(), HTMLStyleSheetsCollection_Create(), HTMLTxtRange_Create(), HTMLXMLHttpRequestFactory_Create(), HTMLXMLHttpRequestFactory_create(), init_arraybuf_constructors(), init_dispex_from_constr(), init_host_object(), init_xmlnode(), Map_constructor(), MXNamespaceManager_create(), MXWriter_create(), OmNavigator_Create(), SAXAttributes_create(), SAXXMLReader_create(), SchemaCache_create(), scope_push(), Set_constructor(), string_alloc(), WeakMap_constructor(), XSLProcessor_create(), and XSLTemplate_create().

init_dispex_from_constr()

HRESULT init_dispex_from_constr	(	jsdisp_t *	dispex,
		script_ctx_t *	ctx,
		const builtin_info_t *	builtin_info,
		jsdisp_t *	constr
	)

Definition at line 2512 of file dispex.c.

{
    jsdisp_t *prot = NULL;
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name_prot(constr, string_hash(L"prototype"), L"prototype", FALSE, NULL, &prop);
    if(SUCCEEDED(hres) && prop && prop->type!=PROP_DELETED) {
        jsval_t val;
 
        hres = prop_get(constr, to_disp(constr), prop, &val);
        if(FAILED(hres)) {
            ERR("Could not get prototype\n");
            return hres;
        }
 
        if(is_object_instance(val))
            prot = iface_to_jsdisp(get_object(val));
        else
            prot = jsdisp_addref(ctx->object_prototype);
 
        jsval_release(val);
    }
 
    hres = init_dispex(dispex, ctx, builtin_info, prot);
 
    if(prot)
        jsdisp_release(prot);
    return hres;
}

Referenced by alloc_array(), alloc_bool(), alloc_enumerator(), alloc_error(), alloc_number(), alloc_regexp(), alloc_vbarray(), create_arraybuf(), create_date(), create_function(), create_json(), create_math(), create_object(), DataViewConstr_value(), setup_arguments_object(), and string_alloc().

init_host_object()

HRESULT init_host_object	(	script_ctx_t *	ctx,
		IWineJSDispatchHost *	host_iface,
		IWineJSDispatch *	prototype_iface,
		UINT32	flags,
		IWineJSDispatch **	ret
	)

Definition at line 3557 of file dispex.c.

{
    HostObject *host_obj;
    jsdisp_t *prototype;
    HRESULT hres;
 
    if(!(host_obj = calloc(1, sizeof(*host_obj))))
        return E_OUTOFMEMORY;
 
    if(prototype_iface)
        prototype = impl_from_IWineJSDispatch(prototype_iface);
    else
        prototype = ctx->object_prototype;
    hres = init_dispex(&host_obj->jsdisp, ctx, &HostObject_info, prototype);
    if(FAILED(hres)) {
        free(host_obj);
        return hres;
    }
 
    host_obj->host_iface = host_iface;
    if(flags & HOSTOBJ_CONSTRUCTOR)
        host_obj->jsdisp.is_constructor = TRUE;
    *ret = &host_obj->jsdisp.IWineJSDispatch_iface;
    return S_OK;
}

Referenced by WineJScript_InitHostObject().

invoke_prop_func()

static HRESULT invoke_prop_func ( jsdisp_t *  This, IDispatch *  jsthis, dispex_prop_t *  prop, WORD  flags, unsigned  argc, jsval_t *  argv, jsval_t *  r, IServiceProvider *  caller  )

static

Definition at line 686 of file dispex.c.

{
    HRESULT hres;
 
    switch(prop->type) {
    case PROP_BUILTIN:
        return JS_E_FUNCTION_EXPECTED;
    case PROP_PROTREF:
        return invoke_prop_func(This->prototype, jsthis ? jsthis : to_disp(This),
                                This->prototype->props+prop->u.ref, flags, argc, argv, r, caller);
    case PROP_JSVAL: {
        if(!is_object_instance(prop->u.val)) {
            FIXME("value %s is not a function\n", debugstr_jsval(prop->u.val));
            return JS_E_FUNCTION_EXPECTED;
        }
 
        TRACE("call %s %p\n", debugstr_w(prop->name), get_object(prop->u.val));
 
        return disp_call_value_with_caller(This->ctx, get_object(prop->u.val),
                jsval_disp(jsthis ? jsthis : to_disp(This)),
                flags, argc, argv, r, caller);
    }
    case PROP_ACCESSOR:
    case PROP_EXTERN: {
        jsval_t val;
 
        hres = prop_get(This, jsthis ? jsthis : to_disp(This), prop, &val);
        if(FAILED(hres))
            return hres;
 
        if(is_object_instance(val)) {
            jsdisp_t *jsfunc = to_jsdisp(get_object(val));
            if(!jsfunc || is_class(jsfunc, JSCLASS_FUNCTION))
                hres = disp_call_value_with_caller(This->ctx, get_object(val),
                                                   jsval_disp(jsthis ? jsthis : to_disp(This)),
                                                   flags, argc, argv, r, caller);
            else
                hres = JS_E_INVALID_PROPERTY;
        }else {
            WARN("value %s is not a function\n", debugstr_jsval(val));
            hres = JS_E_FUNCTION_EXPECTED;
        }
 
        jsval_release(val);
        return hres;
    }
    case PROP_DELETED:
        assert(0);
        break;
    }
 
    return E_FAIL;
}

Referenced by DispatchEx_InvokeEx(), invoke_prop_func(), jsdisp_call(), and jsdisp_call_name().

is_function_prop()

static BOOL is_function_prop ( dispex_prop_t *  prop )

inlinestatic

Definition at line 98 of file dispex.c.

{
    BOOL ret = FALSE;
 
    if (is_object_instance(prop->u.val))
    {
        jsdisp_t *jsdisp = to_jsdisp(get_object(prop->u.val));
 
        if (jsdisp) ret = is_class(jsdisp, JSCLASS_FUNCTION);
    }
    return ret;
}

Referenced by DispatchEx_GetTypeInfo().

jsdisp_addref()

jsdisp_t * jsdisp_addref

(

jsdisp_t *

obj

)

Definition at line 1902 of file dispex.c.

{
    if(obj->builtin_info->addref)
        obj->builtin_info->addref(obj);
    else
        ++obj->ref;
    return obj;
}

Referenced by Arguments_get_caller(), Array_reverse(), Array_sort(), Array_toLocaleString(), create_bind_function(), DataView_get_buffer(), DataViewConstr_value(), DispatchEx_AddRef(), DispatchEx_GetTypeInfo(), DispatchEx_QueryInterface(), exec_source(), Function_get_arguments(), Function_get_caller(), gc_run(), identifier_eval(), iface_to_jsdisp(), init_dispex(), init_dispex_from_constr(), jsdisp_change_prototype(), jsdisp_define_property(), jsdisp_get_own_property(), JSON_stringify(), Object_defineProperties(), Object_defineProperty(), Object_freeze(), Object_get_proto_(), Object_getPrototypeOf(), Object_preventExtensions(), Object_seal(), RegExpConstr_value(), scope_addref(), and stack_topn_exprval().

jsdisp_call()

HRESULT jsdisp_call	(	jsdisp_t *	disp,
		DISPID	id,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	r
	)

Definition at line 2604 of file dispex.c.

{
    dispex_prop_t *prop;
 
    prop = get_prop(disp, id);
    if(!prop)
        return DISP_E_MEMBERNOTFOUND;
 
    return invoke_prop_func(disp, to_disp(disp), prop, flags, argc, argv, r, &disp->ctx->jscaller->IServiceProvider_iface);
}

Referenced by disp_call(), and to_primitive().

jsdisp_call_name()

HRESULT jsdisp_call_name	(	jsdisp_t *	disp,
		const WCHAR *	name,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	r
	)

Definition at line 2615 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name_prot(disp, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if(!prop || prop->type == PROP_DELETED)
        return JS_E_INVALID_PROPERTY;
 
    return invoke_prop_func(disp, to_disp(disp), prop, flags, argc, argv, r, &disp->ctx->jscaller->IServiceProvider_iface);
}

Referenced by disp_call_name(), Object_toLocaleString(), and to_locale_string().

jsdisp_call_value()

HRESULT jsdisp_call_value	(	jsdisp_t *	jsfunc,
		jsval_t	vthis,
		WORD	flags,
		unsigned	argc,
		jsval_t *	argv,
		jsval_t *	r
	)

Definition at line 2581 of file dispex.c.

{
    HRESULT hres;
 
    assert(!(flags & ~(DISPATCH_METHOD|DISPATCH_CONSTRUCT|DISPATCH_JSCRIPT_INTERNAL_MASK)));
 
    if(is_class(jsfunc, JSCLASS_FUNCTION)) {
        hres = Function_invoke(jsfunc, vthis, flags, argc, argv, r);
    }else {
        if(!jsfunc->builtin_info->call) {
            WARN("Not a function\n");
            return JS_E_FUNCTION_EXPECTED;
        }
 
        if(jsfunc->ctx->state == SCRIPTSTATE_UNINITIALIZED || jsfunc->ctx->state == SCRIPTSTATE_CLOSED)
            return E_UNEXPECTED;
 
        flags &= ~DISPATCH_JSCRIPT_INTERNAL_MASK;
        hres = jsfunc->builtin_info->call(jsfunc->ctx, vthis, flags, argc, argv, r);
    }
    return hres;
}

Referenced by disp_call_value_with_caller(), DispatchEx_InvokeEx(), prop_get(), prop_put(), rep_call(), sort_cmp(), and stringify().

jsdisp_change_prototype()

HRESULT jsdisp_change_prototype	(	jsdisp_t *	obj,
		jsdisp_t *	proto
	)

Definition at line 3356 of file dispex.c.

{
    jsdisp_t *iter;
    DWORD i;
 
    if(obj->prototype == proto)
        return S_OK;
    if(!obj->extensible)
        return JS_E_CANNOT_CREATE_FOR_NONEXTENSIBLE;
 
    for(iter = proto; iter; iter = iter->prototype)
        if(iter == obj)
            return JS_E_CYCLIC_PROTO_VALUE;
 
    if(obj->prototype) {
        for(i = 0; i < obj->prop_cnt; i++)
            if(obj->props[i].type == PROP_PROTREF)
                obj->props[i].type = PROP_DELETED;
        jsdisp_release(obj->prototype);
    }
 
    obj->prototype = proto;
    if(proto)
        jsdisp_addref(proto);
    return S_OK;
}

Referenced by Object_set_proto_().

jsdisp_define_data_property()

HRESULT jsdisp_define_data_property	(	jsdisp_t *	obj,
		const WCHAR *	name,
		unsigned	flags,
		jsval_t	value
	)

Definition at line 3349 of file dispex.c.

{
    property_desc_t prop_desc = { flags, flags, TRUE };
    prop_desc.value = value;
    return jsdisp_define_property(obj, name, &prop_desc);
}

Referenced by create_builtin_function(), create_error(), create_math(), init_arraybuf_constructors(), init_constructors(), init_error_constr(), init_function_constr(), init_global(), init_host_constructor(), init_set_constructor(), InterpretedFunction_get_prototype(), InterpretedFunction_set_prototype(), JSON_parse(), Object_getOwnPropertyDescriptor(), set_constructor_prop(), setup_arguments_object(), and transform_json_object().

jsdisp_define_property()

HRESULT jsdisp_define_property	(	jsdisp_t *	obj,
		const WCHAR *	name,
		property_desc_t *	desc
	)

Definition at line 3216 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name(obj, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if((!prop || prop->type == PROP_DELETED || prop->type == PROP_PROTREF) && !obj->extensible)
        return throw_error(obj->ctx, JS_E_OBJECT_NONEXTENSIBLE, name);
 
    if(!prop && !(prop = alloc_prop(obj, name, PROP_DELETED, 0)))
       return E_OUTOFMEMORY;
 
    if(prop->type == PROP_DELETED || prop->type == PROP_PROTREF) {
        prop->flags = desc->flags;
        if(desc->explicit_getter || desc->explicit_setter) {
            prop->type = PROP_ACCESSOR;
            prop->u.accessor.getter = desc->getter ? jsdisp_addref(desc->getter) : NULL;
            prop->u.accessor.setter = desc->setter ? jsdisp_addref(desc->setter) : NULL;
            TRACE("%s = accessor { get: %p set: %p }\n", debugstr_w(name),
                  prop->u.accessor.getter, prop->u.accessor.setter);
        }else {
            prop->type = PROP_JSVAL;
            if(desc->explicit_value) {
                hres = jsval_copy(desc->value, &prop->u.val);
                if(FAILED(hres))
                    return hres;
            }else {
                prop->u.val = jsval_undefined();
            }
            TRACE("%s = %s\n", debugstr_w(name), debugstr_jsval(prop->u.val));
        }
        return S_OK;
    }
 
    TRACE("existing prop %s prop flags %lx desc flags %x desc mask %x\n", debugstr_w(name),
          prop->flags, desc->flags, desc->mask);
 
    if(!(prop->flags & PROPF_CONFIGURABLE)) {
        if(((desc->mask & PROPF_CONFIGURABLE) && (desc->flags & PROPF_CONFIGURABLE))
           || ((desc->mask & PROPF_ENUMERABLE)
               && ((desc->flags & PROPF_ENUMERABLE) != (prop->flags & PROPF_ENUMERABLE))))
            return throw_error(obj->ctx, JS_E_NONCONFIGURABLE_REDEFINED, name);
    }
 
    if(desc->explicit_value || (desc->mask & PROPF_WRITABLE)) {
        if(prop->type == PROP_ACCESSOR) {
            if(!(prop->flags & PROPF_CONFIGURABLE))
                return throw_error(obj->ctx, JS_E_NONCONFIGURABLE_REDEFINED, name);
            if(prop->u.accessor.getter)
                jsdisp_release(prop->u.accessor.getter);
            if(prop->u.accessor.setter)
                jsdisp_release(prop->u.accessor.setter);
 
            prop->type = PROP_JSVAL;
            hres = jsval_copy(desc->value, &prop->u.val);
            if(FAILED(hres)) {
                prop->u.val = jsval_undefined();
                return hres;
            }
        }else {
            if(!(prop->flags & PROPF_CONFIGURABLE) && !(prop->flags & PROPF_WRITABLE)) {
                if((desc->mask & PROPF_WRITABLE) && (desc->flags & PROPF_WRITABLE))
                    return throw_error(obj->ctx, JS_E_NONWRITABLE_MODIFIED, name);
                if(desc->explicit_value) {
                    if(prop->type == PROP_JSVAL) {
                        BOOL eq;
                        hres = jsval_strict_equal(desc->value, prop->u.val, &eq);
                        if(FAILED(hres))
                            return hres;
                        if(!eq)
                            return throw_error(obj->ctx, JS_E_NONWRITABLE_MODIFIED, name);
                    }else {
                        FIXME("redefinition of property type %d\n", prop->type);
                    }
                }
            }
            if(desc->explicit_value) {
                if(prop->type == PROP_JSVAL)
                    jsval_release(prop->u.val);
                else {
                    if(prop->type == PROP_EXTERN && obj->builtin_info->prop_delete) {
                        hres = obj->builtin_info->prop_delete(obj, prop->u.id);
                        if(FAILED(hres))
                            return hres;
                    }
                    prop->type = PROP_JSVAL;
                }
                hres = jsval_copy(desc->value, &prop->u.val);
                if(FAILED(hres)) {
                    prop->u.val = jsval_undefined();
                    return hres;
                }
            }
        }
    }else if(desc->explicit_getter || desc->explicit_setter) {
        if(prop->type != PROP_ACCESSOR) {
            if(!(prop->flags & PROPF_CONFIGURABLE))
                return throw_error(obj->ctx, JS_E_NONCONFIGURABLE_REDEFINED, name);
            if(prop->type == PROP_JSVAL)
                jsval_release(prop->u.val);
            prop->type = PROP_ACCESSOR;
            prop->u.accessor.getter = prop->u.accessor.setter = NULL;
        }else if(!(prop->flags & PROPF_CONFIGURABLE)) {
            if((desc->explicit_getter && desc->getter != prop->u.accessor.getter)
               || (desc->explicit_setter && desc->setter != prop->u.accessor.setter))
                return throw_error(obj->ctx, JS_E_NONCONFIGURABLE_REDEFINED, name);
        }
 
        if(desc->explicit_getter) {
            if(prop->u.accessor.getter) {
                jsdisp_release(prop->u.accessor.getter);
                prop->u.accessor.getter = NULL;
            }
            if(desc->getter)
                prop->u.accessor.getter = jsdisp_addref(desc->getter);
        }
        if(desc->explicit_setter) {
            if(prop->u.accessor.setter) {
                jsdisp_release(prop->u.accessor.setter);
                prop->u.accessor.setter = NULL;
            }
            if(desc->setter)
                prop->u.accessor.setter = jsdisp_addref(desc->setter);
        }
    }
 
    prop->flags = (prop->flags & ~desc->mask) | (desc->flags & desc->mask);
    return S_OK;
}

Referenced by init_arraybuf_constructors(), init_object_prototype_accessors(), interp_obj_prop(), jsdisp_define_data_property(), jsdisp_define_properties(), Object_defineGetter(), Object_defineProperty(), and Object_defineSetter().

jsdisp_delete_idx()

HRESULT jsdisp_delete_idx	(	jsdisp_t *	obj,
		DWORD	idx
	)

Definition at line 3019 of file dispex.c.

{
    WCHAR buf[12];
    dispex_prop_t *prop;
    BOOL b;
    HRESULT hres;
 
    swprintf(buf, ARRAY_SIZE(buf), L"%d", idx);
 
    hres = find_prop_name(obj, string_hash(buf), buf, FALSE, NULL, &prop);
    if(FAILED(hres) || !prop)
        return hres;
 
    hres = delete_prop(obj, prop, &b);
    if(FAILED(hres))
        return hres;
    return b ? S_OK : JS_E_INVALID_ACTION;
}

Referenced by Array_pop(), Array_reverse(), Array_set_length(), Array_shift(), and Array_splice().

jsdisp_free()

static void jsdisp_free ( jsdisp_t *  obj )

static

Definition at line 1861 of file dispex.c.

{
    dispex_prop_t *prop;
 
    list_remove(&obj->entry);
 
    TRACE("(%p)\n", obj);
 
    if(obj->has_weak_refs) {
        struct list *list = &RB_ENTRY_VALUE(rb_get(&obj->ctx->thread_data->weak_refs, obj), struct weak_refs_entry, entry)->list;
        do {
            remove_weakmap_entry(LIST_ENTRY(list->next, struct weakmap_entry, weak_refs_entry));
        } while(obj->has_weak_refs);
    }
 
    for(prop = obj->props; prop < obj->props+obj->prop_cnt; prop++) {
        switch(prop->type) {
        case PROP_JSVAL:
            jsval_release(prop->u.val);
            break;
        case PROP_ACCESSOR:
            if(prop->u.accessor.getter)
                jsdisp_release(prop->u.accessor.getter);
            if(prop->u.accessor.setter)
                jsdisp_release(prop->u.accessor.setter);
            break;
        default:
            break;
        };
        free(prop->name);
    }
    free(obj->props);
    script_release(obj->ctx);
    if(obj->prototype)
        jsdisp_release(obj->prototype);
 
    if(obj->builtin_info->destructor)
        obj->builtin_info->destructor(obj);
    free(obj);
}

Referenced by jsdisp_release(), and WineJSDispatch_Free().

jsdisp_freeze()

void jsdisp_freeze	(	jsdisp_t *	obj,
		BOOL	seal
	)

Definition at line 3393 of file dispex.c.

{
    unsigned int i;
 
    fill_props(obj);
    for(i = 0; i < obj->prop_cnt; i++) {
        unsigned int mask = PROPF_CONFIGURABLE;
        if(!seal && obj->props[i].type == PROP_JSVAL)
            mask |= PROPF_WRITABLE;
        set_prop_flags(obj, &obj->props[i], obj->props[i].flags & PROPF_PUBLIC_MASK & ~mask);
    }
 
    obj->extensible = FALSE;
}

Referenced by Object_freeze(), and Object_seal().

jsdisp_get_id()

HRESULT jsdisp_get_id	(	jsdisp_t *	jsdisp,
		const WCHAR *	name,
		DWORD	flags,
		DISPID *	id
	)

Definition at line 2550 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    if(jsdisp->extensible && (flags & fdexNameEnsure))
        hres = ensure_prop_name(jsdisp, name, PROPF_ENUMERABLE | PROPF_CONFIGURABLE | PROPF_WRITABLE,
                                flags & fdexNameCaseInsensitive, &prop);
    else
        hres = find_prop_name_prot(jsdisp, string_hash(name), name, flags & fdexNameCaseInsensitive, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if(prop && prop->type!=PROP_DELETED) {
        *id = prop_to_id(jsdisp, prop);
        return S_OK;
    }
 
    TRACE("not found %s\n", debugstr_w(name));
    *id = DISPID_UNKNOWN;
    return DISP_E_UNKNOWNNAME;
}

Referenced by Array_unshift(), disp_get_id(), DispatchEx_GetDispID(), DispatchEx_GetIDsOfNames(), exec_source(), identifier_eval(), interp_identifier_ref(), jsdisp_get_idx_id(), stack_topn_exprval(), stringify(), to_primitive(), to_property_descriptor(), and transform_json_object().

jsdisp_get_idx()

HRESULT jsdisp_get_idx	(	jsdisp_t *	obj,
		DWORD	idx,
		jsval_t *	r
	)

Definition at line 2963 of file dispex.c.

{
    WCHAR name[12];
    dispex_prop_t *prop;
    HRESULT hres;
 
    swprintf(name, ARRAY_SIZE(name), L"%d", idx);
 
    hres = find_prop_name_prot(obj, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if(!prop || prop->type==PROP_DELETED) {
        *r = jsval_undefined();
        return DISP_E_UNKNOWNNAME;
    }
 
    return prop_get(obj, to_disp(obj), prop, r);
}

Referenced by Array_every(), Array_filter(), Array_forEach(), Array_indexOf(), array_join(), Array_lastIndexOf(), Array_map(), Array_pop(), Array_reduce(), Array_reverse(), Array_shift(), Array_slice(), Array_some(), Array_sort(), Array_splice(), array_to_args(), and concat_array().

jsdisp_get_idx_id()

HRESULT jsdisp_get_idx_id	(	jsdisp_t *	jsdisp,
		DWORD	idx,
		DISPID *	id
	)

Definition at line 2573 of file dispex.c.

{
    WCHAR name[11];
 
    swprintf(name, ARRAY_SIZE(name), L"%u", idx);
    return jsdisp_get_id(jsdisp, name, 0, id);
}

Referenced by get_detached_var_dispid().

jsdisp_get_own_property()

HRESULT jsdisp_get_own_property	(	jsdisp_t *	obj,
		const WCHAR *	name,
		BOOL	flags_only,
		property_desc_t *	desc
	)

Definition at line 3171 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name(obj, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if(!prop)
        return DISP_E_UNKNOWNNAME;
 
    memset(desc, 0, sizeof(*desc));
 
    switch(prop->type) {
    case PROP_BUILTIN:
    case PROP_JSVAL:
    case PROP_EXTERN:
        desc->mask |= PROPF_WRITABLE;
        desc->explicit_value = TRUE;
        if(!flags_only) {
            hres = prop_get(obj, to_disp(obj), prop, &desc->value);
            if(FAILED(hres))
                return hres;
        }
        break;
    case PROP_ACCESSOR:
        desc->explicit_getter = desc->explicit_setter = TRUE;
        if(!flags_only) {
            desc->getter = prop->u.accessor.getter
                ? jsdisp_addref(prop->u.accessor.getter) : NULL;
            desc->setter = prop->u.accessor.setter
                ? jsdisp_addref(prop->u.accessor.setter) : NULL;
        }
        break;
    default:
        return DISP_E_UNKNOWNNAME;
    }
 
    desc->flags = prop->flags & (PROPF_ENUMERABLE | PROPF_WRITABLE | PROPF_CONFIGURABLE);
    desc->mask |= PROPF_ENUMERABLE | PROPF_CONFIGURABLE;
    return S_OK;
}

Referenced by Object_getOwnPropertyDescriptor(), Object_hasOwnProperty(), and Object_propertyIsEnumerable().

jsdisp_get_prop_name()

HRESULT jsdisp_get_prop_name	(	jsdisp_t *	obj,
		DISPID	id,
		jsstr_t **	r
	)

Definition at line 3429 of file dispex.c.

{
    dispex_prop_t *prop = get_prop(obj, id);
 
    if(!prop)
        return DISP_E_MEMBERNOTFOUND;
 
    *r = jsstr_alloc(prop->name);
    return *r ? S_OK : E_OUTOFMEMORY;
}

Referenced by object_keys(), and transform_json_object().

jsdisp_index_lookup()

HRESULT jsdisp_index_lookup	(	jsdisp_t *	obj,
		const WCHAR *	name,
		unsigned	length,
		struct property_info *	desc
	)

Definition at line 481 of file dispex.c.

{
    const WCHAR *ptr;
    unsigned idx = 0;
 
    for(ptr = name; is_digit(*ptr); ptr++) {
        idx = idx * 10 + (*ptr - '0');
        if (idx >= length)
            return DISP_E_UNKNOWNNAME;
    }
    if(*ptr)
        return DISP_E_UNKNOWNNAME;
 
    desc->id = idx;
    desc->flags = PROPF_ENUMERABLE;
    if(obj->builtin_info->prop_put)
        desc->flags |= PROPF_WRITABLE;
    desc->name = NULL;
    desc->index = idx;
    desc->iid = 0;
    return S_OK;
}

Referenced by Arguments_lookup_prop(), scope_lookup_prop(), and String_lookup_prop().

jsdisp_is_frozen()

BOOL jsdisp_is_frozen	(	jsdisp_t *	obj,
		BOOL	sealed
	)

Definition at line 3408 of file dispex.c.

{
    unsigned int i;
 
    if(obj->extensible)
        return FALSE;
    fill_props(obj);
 
    for(i = 0; i < obj->prop_cnt; i++) {
        if(obj->props[i].type == PROP_JSVAL || obj->props[i].type == PROP_EXTERN) {
            if(!sealed && (obj->props[i].flags & PROPF_WRITABLE))
                return FALSE;
        }else if(obj->props[i].type != PROP_ACCESSOR)
            continue;
        if(obj->props[i].flags & PROPF_CONFIGURABLE)
            return FALSE;
    }
 
    return TRUE;
}

Referenced by Object_isFrozen(), and Object_isSealed().

jsdisp_next_index()

HRESULT jsdisp_next_index	(	jsdisp_t *	obj,
		unsigned	length,
		unsigned	id,
		struct property_info *	desc
	)

Definition at line 504 of file dispex.c.

{
    if(id + 1 == length)
        return S_FALSE;
 
    desc->id = id + 1;
    desc->flags = PROPF_ENUMERABLE;
    if(obj->builtin_info->prop_put)
        desc->flags |= PROPF_WRITABLE;
    desc->name = NULL;
    desc->index = desc->id;
    desc->iid = 0;
    return S_OK;
}

Referenced by Arguments_next_prop(), and String_next_prop().

jsdisp_next_prop()

HRESULT jsdisp_next_prop	(	jsdisp_t *	obj,
		DISPID	id,
		enum jsdisp_enum_type	enum_type,
		DISPID *	ret
	)

Definition at line 3073 of file dispex.c.

{
    dispex_prop_t *iter;
    DWORD idx = id;
    HRESULT hres;
 
    if(id == DISPID_STARTENUM || idx >= obj->prop_cnt) {
        hres = (enum_type == JSDISP_ENUM_ALL) ? fill_protrefs(obj) : fill_props(obj);
        if(FAILED(hres))
            return hres;
        if(id == DISPID_STARTENUM)
            idx = 0;
        if(idx >= obj->prop_cnt)
            return S_FALSE;
    }
 
    for(iter = &obj->props[idx]; iter < obj->props + obj->prop_cnt; iter++) {
        if(iter->type == PROP_EXTERN) {
            dispex_prop_t *prop;
            hres = find_external_prop(obj, iter->name, FALSE, iter, &prop);
            if(FAILED(hres) || prop != iter)
                iter->type = PROP_DELETED;
        }
        if(iter->type == PROP_DELETED)
            continue;
        if(enum_type != JSDISP_ENUM_ALL && iter->type == PROP_PROTREF)
            continue;
        if(enum_type != JSDISP_ENUM_OWN && !(get_flags(obj, iter) & PROPF_ENUMERABLE))
            continue;
        *ret = prop_to_id(obj, iter);
        return S_OK;
    }
 
    if(obj->ctx->html_mode)
        return jsdisp_next_prop(obj, prop_to_id(obj, iter - 1), enum_type, ret);
 
    return S_FALSE;
}

Referenced by DispatchEx_GetNextDispID(), jsdisp_define_properties(), jsdisp_next_prop(), object_keys(), and transform_json_object().

jsdisp_propget()

HRESULT jsdisp_propget	(	jsdisp_t *	jsdisp,
		DISPID	id,
		jsval_t *	val
	)

Definition at line 2983 of file dispex.c.

{
    dispex_prop_t *prop;
 
    prop = get_prop(jsdisp, id);
    if(!prop)
        return DISP_E_MEMBERNOTFOUND;
 
    return prop_get(jsdisp, to_disp(jsdisp), prop, val);
}

Referenced by Array_unshift(), disp_propget(), jsdisp_define_properties(), and to_property_descriptor().

jsdisp_propget_name()

HRESULT jsdisp_propget_name	(	jsdisp_t *	obj,
		const WCHAR *	name,
		jsval_t *	val
	)

Definition at line 2946 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    hres = find_prop_name_prot(obj, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
 
    if(!prop || prop->type==PROP_DELETED) {
        *val = jsval_undefined();
        return S_OK;
    }
 
    return prop_get(obj, to_disp(obj), prop, val);
}

Referenced by array_to_args(), Error_toString(), get_length(), interp_instanceof(), set_error_value(), stringify(), transform_json_object(), and unwind_exception().

jsdisp_propput()

HRESULT jsdisp_propput	(	jsdisp_t *	obj,
		const WCHAR *	name,
		DWORD	flags,
		BOOL	throw,
		jsval_t	val
	)

Definition at line 2842 of file dispex.c.

{
    dispex_prop_t *prop;
    HRESULT hres;
 
    if(obj->extensible)
        hres = ensure_prop_name(obj, name, flags, FALSE, &prop);
    else
        hres = find_prop_name(obj, string_hash(name), name, FALSE, NULL, &prop);
    if(FAILED(hres))
        return hres;
    if(!prop || (prop->type == PROP_DELETED && !obj->extensible))
        return throw ? JS_E_INVALID_ACTION : S_OK;
 
    return prop_put(obj, prop, val);
}

Referenced by jsdisp_propput_idx(), jsdisp_propput_name(), and setup_arguments_object().

jsdisp_propput_idx()

HRESULT jsdisp_propput_idx	(	jsdisp_t *	obj,
		DWORD	idx,
		jsval_t	val
	)

Definition at line 2864 of file dispex.c.

{
    WCHAR buf[12];
 
    swprintf(buf, ARRAY_SIZE(buf), L"%d", idx);
    return jsdisp_propput(obj, buf, PROPF_ENUMERABLE | PROPF_CONFIGURABLE | PROPF_WRITABLE, TRUE, val);
}

Referenced by Array_concat(), Array_filter(), Array_map(), Array_push(), Array_reverse(), Array_shift(), Array_slice(), Array_sort(), Array_splice(), Array_unshift(), ArrayConstr_value(), concat_array(), concat_obj(), create_match_array(), interp_carray_set(), object_keys(), parse_json_value(), regexp_string_match(), String_split(), and VBArray_toArray().

jsdisp_propput_name()

HRESULT jsdisp_propput_name	(	jsdisp_t *	obj,
		const WCHAR *	name,
		jsval_t	val
	)

Definition at line 2859 of file dispex.c.

{
    return jsdisp_propput(obj, name, PROPF_ENUMERABLE | PROPF_CONFIGURABLE | PROPF_WRITABLE, FALSE, val);
}

Referenced by Array_splice(), create_match_array(), detach_arguments_object(), detach_scope(), disp_propput_name(), exec_source(), interp_enter_catch(), interp_obj_prop(), JSON_stringify(), Object_getOwnPropertyDescriptor(), parse_json_value(), regexp_string_match(), scope_init_locals(), and set_length().

jsdisp_release()

ULONG jsdisp_release

(

jsdisp_t *

obj

)

Definition at line 1911 of file dispex.c.

{
    ULONG ref;
 
    if(obj->builtin_info->release)
        return obj->builtin_info->release(obj);
 
    ref = --obj->ref;
    if(!ref)
        jsdisp_free(obj);
    return ref;
}

Referenced by Array_concat(), Array_every(), Array_filter(), Array_forEach(), Array_indexOf(), Array_join(), Array_lastIndexOf(), Array_map(), Array_pop(), Array_push(), Array_reduce(), Array_reverse(), Array_shift(), Array_slice(), Array_some(), Array_sort(), Array_splice(), Array_toLocaleString(), Array_unshift(), ArrayConstr_value(), BindFunction_destructor(), concat_obj(), create_activex_constr(), create_array_constr(), create_bind_function(), create_bool_constr(), create_builtin_constructor(), create_builtin_function(), create_date_constr(), create_enumerator(), create_enumerator_constr(), create_error(), create_match_array(), create_math(), create_number_constr(), create_regexp(), create_regexp_constr(), create_string_constr(), create_vbarray(), create_vbarray_constr(), DataView_destructor(), DateConstr_value(), delete_prop(), detach_arguments_object(), disp_call(), disp_call_value_with_caller(), disp_delete(), disp_delete_name(), disp_propget(), disp_propput(), disp_propput_name(), DispatchEx_Release(), EnumeratorConstr_value(), error_constr(), exec_source(), find_prop_name(), Function_apply(), Function_bind(), gc_process_linked_obj(), gc_run(), get_length(), init_arraybuf_constructors(), init_dispex_from_constr(), init_error_constr(), init_function_constr(), init_global(), init_object_prototype_accessors(), init_set_constructor(), interp_enter_catch(), interp_instanceof(), InterpretedFunction_get_prototype(), jsdisp_change_prototype(), jsdisp_define_properties(), jsdisp_define_property(), jsdisp_free(), JSON_parse(), JSON_stringify(), maybe_to_primitive(), Object_create(), Object_getOwnPropertyDescriptor(), object_keys(), ObjectConstr_value(), parse_json_value(), pop_call_frame(), regexp_string_match(), RegExpConstr_value(), release_named_item_script_obj(), release_property_descriptor(), scope_init_locals(), scope_release(), script_globals_release(), ScriptTypeInfo_Release(), setup_arguments_object(), String_match(), String_replace(), String_search(), String_split(), stringify(), to_locale_string(), to_primitive(), unlink_jsdisp(), update_external_prop(), variant_date_to_string(), variant_to_jsval(), VBArray_toArray(), and VBArrayConstr_value().

lookup_dispex_prop()

static dispex_prop_t * lookup_dispex_prop ( jsdisp_t *  obj, unsigned  hash, const WCHAR *  name, BOOL  case_insens  )

static

Definition at line 247 of file dispex.c.

{
    unsigned bucket, pos, prev = ~0;
 
    bucket = get_props_idx(obj, hash);
    pos = obj->props[bucket].bucket_head;
    while(pos != ~0) {
        if(case_insens ? !wcsicmp(name, obj->props[pos].name) : !wcscmp(name, obj->props[pos].name)) {
            if(prev != ~0) {
                obj->props[prev].bucket_next = obj->props[pos].bucket_next;
                obj->props[pos].bucket_next = obj->props[bucket].bucket_head;
                obj->props[bucket].bucket_head = pos;
            }
 
            return &obj->props[pos];
        }
 
        prev = pos;
        pos = obj->props[pos].bucket_next;
    }
 
    return NULL;
}

Referenced by fill_props(), find_external_prop(), and find_prop_name().

prop_get()

static HRESULT prop_get ( jsdisp_t *  This, IDispatch *  jsthis, dispex_prop_t *  prop, jsval_t *  r  )

static

Definition at line 570 of file dispex.c.

{
    jsdisp_t *prop_obj = This;
    HRESULT hres;
 
    while(prop->type == PROP_PROTREF) {
        prop_obj = prop_obj->prototype;
        prop = prop_obj->props + prop->u.ref;
    }
 
    switch(prop->type) {
    case PROP_BUILTIN:
        hres = prop->u.p->getter(This->ctx, prop_obj, r);
        break;
    case PROP_JSVAL:
        hres = jsval_copy(prop->u.val, r);
        break;
    case PROP_ACCESSOR:
        if(prop->u.accessor.getter) {
            hres = jsdisp_call_value(prop->u.accessor.getter, jsval_disp(jsthis),
                                     DISPATCH_METHOD, 0, NULL, r);
        }else {
            *r = jsval_undefined();
            hres = S_OK;
        }
        break;
    case PROP_EXTERN:
        hres = prop_obj->builtin_info->prop_get(prop_obj, prop->u.id, r);
        break;
    default:
        ERR("type %d\n", prop->type);
        return E_FAIL;
    }
 
    if(FAILED(hres)) {
        TRACE("fail %08lx\n", hres);
        return hres;
    }
 
    TRACE("%p.%s ret %s\n", This, debugstr_w(prop->name), debugstr_jsval(*r));
    return hres;
}

Referenced by DispatchEx_InvokeEx(), init_dispex_from_constr(), invoke_prop_func(), jsdisp_get_idx(), jsdisp_get_own_property(), jsdisp_propget(), and jsdisp_propget_name().

prop_put()

static HRESULT prop_put ( jsdisp_t *  This, dispex_prop_t *  prop, jsval_t  val  )

static

Definition at line 613 of file dispex.c.

{
    HRESULT hres;
 
    if(prop->type == PROP_PROTREF) {
        dispex_prop_t *prop_iter = prop;
        jsdisp_t *prototype_iter = This;
 
        do {
            prototype_iter = prototype_iter->prototype;
            prop_iter = prototype_iter->props + prop_iter->u.ref;
        } while(prop_iter->type == PROP_PROTREF);
 
        if(prop_iter->type == PROP_ACCESSOR)
            prop = prop_iter;
    }
 
    switch(prop->type) {
    case PROP_BUILTIN:
        if(!prop->u.p->setter) {
            TRACE("getter with no setter\n");
            return S_OK;
        }
        return prop->u.p->setter(This->ctx, This, val);
    case PROP_PROTREF:
    case PROP_DELETED:
        if(!This->extensible)
            return S_OK;
        prop->type = PROP_JSVAL;
        prop->flags = PROPF_ENUMERABLE | PROPF_CONFIGURABLE | PROPF_WRITABLE;
        prop->u.val = jsval_undefined();
        break;
    case PROP_JSVAL:
        if(!(prop->flags & PROPF_WRITABLE))
            return S_OK;
 
        jsval_release(prop->u.val);
        break;
    case PROP_ACCESSOR:
        if(!prop->u.accessor.setter) {
            TRACE("no setter\n");
            return S_OK;
        }
        return jsdisp_call_value(prop->u.accessor.setter, jsval_obj(This), DISPATCH_METHOD, 1, &val, NULL);
    case PROP_EXTERN:
        if(!This->builtin_info->prop_put) {
            TRACE("no prop_put\n");
            return S_OK;
        }
        hres = This->builtin_info->prop_put(This, prop->u.id, val);
        if(hres != S_FALSE)
            return hres;
        prop->type = PROP_JSVAL;
        prop->flags = PROPF_ENUMERABLE | PROPF_CONFIGURABLE | PROPF_WRITABLE;
        prop->u.val = jsval_undefined();
        break;
    default:
        ERR("type %d\n", prop->type);
        return E_FAIL;
    }
 
    TRACE("%p.%s = %s\n", This, debugstr_w(prop->name), debugstr_jsval(val));
 
    hres = jsval_copy(val, &prop->u.val);
    if(FAILED(hres))
        return hres;
 
    if(This->builtin_info->on_put)
        This->builtin_info->on_put(This, prop->name);
 
    return S_OK;
}

Referenced by disp_propput(), DispatchEx_InvokeEx(), and jsdisp_propput().

prop_to_id()

static DISPID prop_to_id ( jsdisp_t *  This, dispex_prop_t *  prop  )

inlinestatic

Definition at line 81 of file dispex.c.

{
    /* don't overlap with DISPID_VALUE */
    return prop - This->props + 1;
}

Referenced by get_func_from_memid(), get_var_from_memid(), jsdisp_get_id(), jsdisp_next_prop(), ScriptTypeInfo_GetFuncDesc(), ScriptTypeInfo_GetIDsOfNames(), and ScriptTypeInfo_GetVarDesc().

resize_props()

static HRESULT resize_props ( jsdisp_t *  This )

inlinestatic

Definition at line 183 of file dispex.c.

{
    dispex_prop_t *props;
    int i, bucket;
 
    if(This->buf_size != This->prop_cnt)
        return S_FALSE;
 
    props = realloc(This->props, sizeof(dispex_prop_t) * This->buf_size * 2);
    if(!props)
        return E_OUTOFMEMORY;
    This->buf_size *= 2;
    This->props = props;
 
    for(i=0; i<This->buf_size; i++) {
        This->props[i].bucket_head = ~0;
        This->props[i].bucket_next = ~0;
    }
 
    for(i=0; i<This->prop_cnt; i++) {
        props = This->props+i;
 
        bucket = get_props_idx(This, props->hash);
        props->bucket_next = This->props[bucket].bucket_head;
        This->props[bucket].bucket_head = i;
    }
 
    return S_OK;
}

Referenced by alloc_prop().

ScriptTypeComp_AddRef()

static ULONG WINAPI ScriptTypeComp_AddRef ( ITypeComp *  iface )

static

Definition at line 1760 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeComp(iface);
    return ITypeInfo_AddRef(&This->ITypeInfo_iface);
}

ScriptTypeComp_Bind()

static HRESULT WINAPI ScriptTypeComp_Bind ( ITypeComp *  iface, LPOLESTR  szName, ULONG  lHashVal, WORD  wFlags, ITypeInfo **  ppTInfo, DESCKIND *  pDescKind, BINDPTR *  pBindPtr  )

static

Definition at line 1772 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeComp(iface);
    UINT flags = wFlags ? wFlags : ~0;
    ITypeInfo *disp_typeinfo;
    ITypeComp *disp_typecomp;
    HRESULT hr;
    UINT i;
 
    TRACE("(%p)->(%s %08lx %d %p %p %p)\n", This, debugstr_w(szName), lHashVal,
          wFlags, ppTInfo, pDescKind, pBindPtr);
 
    if (!szName || !ppTInfo || !pDescKind || !pBindPtr)
        return E_INVALIDARG;
 
    for (i = 0; i < This->num_funcs; i++)
    {
        if (wcsicmp(szName, This->funcs[i].prop->name)) continue;
        if (!(flags & INVOKE_FUNC)) return TYPE_E_TYPEMISMATCH;
 
        hr = ITypeInfo_GetFuncDesc(&This->ITypeInfo_iface, i, &pBindPtr->lpfuncdesc);
        if (FAILED(hr)) return hr;
 
        *pDescKind = DESCKIND_FUNCDESC;
        *ppTInfo = &This->ITypeInfo_iface;
        ITypeInfo_AddRef(*ppTInfo);
        return S_OK;
    }
 
    for (i = 0; i < This->num_vars; i++)
    {
        if (wcsicmp(szName, This->vars[i]->name)) continue;
        if (!(flags & INVOKE_PROPERTYGET)) return TYPE_E_TYPEMISMATCH;
 
        hr = ITypeInfo_GetVarDesc(&This->ITypeInfo_iface, i, &pBindPtr->lpvardesc);
        if (FAILED(hr)) return hr;
 
        *pDescKind = DESCKIND_VARDESC;
        *ppTInfo = &This->ITypeInfo_iface;
        ITypeInfo_AddRef(*ppTInfo);
        return S_OK;
    }
 
    /* Look into the inherited IDispatch */
    hr = get_dispatch_typeinfo(&disp_typeinfo);
    if (FAILED(hr)) return hr;
 
    hr = ITypeInfo_GetTypeComp(disp_typeinfo, &disp_typecomp);
    if (FAILED(hr)) return hr;
 
    hr = ITypeComp_Bind(disp_typecomp, szName, lHashVal, wFlags, ppTInfo, pDescKind, pBindPtr);
    ITypeComp_Release(disp_typecomp);
    return hr;
}

ScriptTypeComp_BindType()

static HRESULT WINAPI ScriptTypeComp_BindType ( ITypeComp *  iface, LPOLESTR  szName, ULONG  lHashVal, ITypeInfo **  ppTInfo, ITypeComp **  ppTComp  )

static

Definition at line 1828 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeComp(iface);
    ITypeInfo *disp_typeinfo;
    ITypeComp *disp_typecomp;
    HRESULT hr;
 
    TRACE("(%p)->(%s %08lx %p %p)\n", This, debugstr_w(szName), lHashVal, ppTInfo, ppTComp);
 
    if (!szName || !ppTInfo || !ppTComp)
        return E_INVALIDARG;
 
    /* Look into the inherited IDispatch */
    hr = get_dispatch_typeinfo(&disp_typeinfo);
    if (FAILED(hr)) return hr;
 
    hr = ITypeInfo_GetTypeComp(disp_typeinfo, &disp_typecomp);
    if (FAILED(hr)) return hr;
 
    hr = ITypeComp_BindType(disp_typecomp, szName, lHashVal, ppTInfo, ppTComp);
    ITypeComp_Release(disp_typecomp);
    return hr;
}

ScriptTypeComp_QueryInterface()

static HRESULT WINAPI ScriptTypeComp_QueryInterface ( ITypeComp *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 1754 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeComp(iface);
    return ITypeInfo_QueryInterface(&This->ITypeInfo_iface, riid, ppv);
}

ScriptTypeComp_Release()

static ULONG WINAPI ScriptTypeComp_Release ( ITypeComp *  iface )

static

Definition at line 1766 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeComp(iface);
    return ITypeInfo_Release(&This->ITypeInfo_iface);
}

ScriptTypeInfo_AddRef()

static ULONG WINAPI ScriptTypeInfo_AddRef ( ITypeInfo *  iface )

static

Definition at line 1247 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    LONG ref = InterlockedIncrement(&This->ref);
 
    TRACE("(%p) ref=%ld\n", This, ref);
 
    return ref;
}

ScriptTypeInfo_AddressOfMember()

static HRESULT WINAPI ScriptTypeInfo_AddressOfMember ( ITypeInfo *  iface, MEMBERID  memid, INVOKEKIND  invKind, PVOID *  ppv  )

static

Definition at line 1638 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    ITypeInfo *disp_typeinfo;
    HRESULT hr;
 
    TRACE("(%p)->(%ld %d %p)\n", This, memid, invKind, ppv);
 
    if (!ppv) return E_INVALIDARG;
    *ppv = NULL;
 
    if (!get_func_from_memid(This, memid) && !get_var_from_memid(This, memid))
    {
        hr = get_dispatch_typeinfo(&disp_typeinfo);
        if (FAILED(hr)) return hr;
 
        return ITypeInfo_AddressOfMember(disp_typeinfo, memid, invKind, ppv);
    }
    return TYPE_E_BADMODULEKIND;
}

ScriptTypeInfo_CreateInstance()

static HRESULT WINAPI ScriptTypeInfo_CreateInstance ( ITypeInfo *  iface, IUnknown *  pUnkOuter, REFIID  riid, PVOID *  ppvObj  )

static

Definition at line 1659 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%p %s %p)\n", This, pUnkOuter, debugstr_guid(riid), ppvObj);
 
    if (!ppvObj) return E_INVALIDARG;
 
    *ppvObj = NULL;
    return TYPE_E_BADMODULEKIND;
}

ScriptTypeInfo_from_ITypeComp()

static ScriptTypeInfo * ScriptTypeInfo_from_ITypeComp ( ITypeComp *  iface )

inlinestatic

Definition at line 1222 of file dispex.c.

{
    return CONTAINING_RECORD(iface, ScriptTypeInfo, ITypeComp_iface);
}

Referenced by ScriptTypeComp_AddRef(), ScriptTypeComp_Bind(), ScriptTypeComp_BindType(), ScriptTypeComp_QueryInterface(), and ScriptTypeComp_Release().

ScriptTypeInfo_from_ITypeInfo()

static ScriptTypeInfo * ScriptTypeInfo_from_ITypeInfo ( ITypeInfo *  iface )

inlinestatic

Definition at line 1217 of file dispex.c.

{
    return CONTAINING_RECORD(iface, ScriptTypeInfo, ITypeInfo_iface);
}

Referenced by ScriptTypeInfo_AddRef(), ScriptTypeInfo_AddressOfMember(), ScriptTypeInfo_CreateInstance(), ScriptTypeInfo_GetContainingTypeLib(), ScriptTypeInfo_GetDllEntry(), ScriptTypeInfo_GetDocumentation(), ScriptTypeInfo_GetFuncDesc(), ScriptTypeInfo_GetIDsOfNames(), ScriptTypeInfo_GetImplTypeFlags(), ScriptTypeInfo_GetMops(), ScriptTypeInfo_GetNames(), ScriptTypeInfo_GetRefTypeInfo(), ScriptTypeInfo_GetRefTypeOfImplType(), ScriptTypeInfo_GetTypeAttr(), ScriptTypeInfo_GetTypeComp(), ScriptTypeInfo_GetVarDesc(), ScriptTypeInfo_Invoke(), ScriptTypeInfo_QueryInterface(), ScriptTypeInfo_Release(), ScriptTypeInfo_ReleaseFuncDesc(), ScriptTypeInfo_ReleaseTypeAttr(), and ScriptTypeInfo_ReleaseVarDesc().

ScriptTypeInfo_GetContainingTypeLib()

static HRESULT WINAPI ScriptTypeInfo_GetContainingTypeLib ( ITypeInfo *  iface, ITypeLib **  ppTLib, UINT *  pIndex  )

static

Definition at line 1693 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    FIXME("(%p)->(%p %p)\n", This, ppTLib, pIndex);
 
    return E_NOTIMPL;
}

ScriptTypeInfo_GetDllEntry()

static HRESULT WINAPI ScriptTypeInfo_GetDllEntry ( ITypeInfo *  iface, MEMBERID  memid, INVOKEKIND  invKind, BSTR *  pBstrDllName, BSTR *  pBstrName, WORD *  pwOrdinal  )

static

Definition at line 1593 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    ITypeInfo *disp_typeinfo;
    HRESULT hr;
 
    TRACE("(%p)->(%ld %d %p %p %p)\n", This, memid, invKind, pBstrDllName, pBstrName, pwOrdinal);
 
    if (pBstrDllName) *pBstrDllName = NULL;
    if (pBstrName) *pBstrName = NULL;
    if (pwOrdinal) *pwOrdinal = 0;
 
    if (!get_func_from_memid(This, memid) && !get_var_from_memid(This, memid))
    {
        hr = get_dispatch_typeinfo(&disp_typeinfo);
        if (FAILED(hr)) return hr;
 
        return ITypeInfo_GetDllEntry(disp_typeinfo, memid, invKind, pBstrDllName, pBstrName, pwOrdinal);
    }
    return TYPE_E_BADMODULEKIND;
}

ScriptTypeInfo_GetDocumentation()

static HRESULT WINAPI ScriptTypeInfo_GetDocumentation ( ITypeInfo *  iface, MEMBERID  memid, BSTR *  pBstrName, BSTR *  pBstrDocString, DWORD *  pdwHelpContext, BSTR *  pBstrHelpFile  )

static

Definition at line 1540 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    struct typeinfo_func *func;
    ITypeInfo *disp_typeinfo;
    dispex_prop_t *var;
    HRESULT hr;
 
    TRACE("(%p)->(%ld %p %p %p %p)\n", This, memid, pBstrName, pBstrDocString, pdwHelpContext, pBstrHelpFile);
 
    if (pBstrDocString) *pBstrDocString = NULL;
    if (pdwHelpContext) *pdwHelpContext = 0;
    if (pBstrHelpFile) *pBstrHelpFile = NULL;
 
    if (memid == MEMBERID_NIL)
    {
        if (pBstrName && !(*pBstrName = SysAllocString(L"JScriptTypeInfo")))
            return E_OUTOFMEMORY;
        if (pBstrDocString &&
            !(*pBstrDocString = SysAllocString(L"JScript Type Info")))
        {
            if (pBstrName) SysFreeString(*pBstrName);
            return E_OUTOFMEMORY;
        }
        return S_OK;
    }
    if (memid <= 0) return TYPE_E_ELEMENTNOTFOUND;
 
    func = get_func_from_memid(This, memid);
    if (!func)
    {
        var = get_var_from_memid(This, memid);
        if (!var)
        {
            hr = get_dispatch_typeinfo(&disp_typeinfo);
            if (FAILED(hr)) return hr;
 
            return ITypeInfo_GetDocumentation(disp_typeinfo, memid, pBstrName, pBstrDocString,
                                              pdwHelpContext, pBstrHelpFile);
        }
    }
 
    if (pBstrName)
    {
        *pBstrName = SysAllocString(func ? func->prop->name : var->name);
 
        if (!*pBstrName)
            return E_OUTOFMEMORY;
    }
    return S_OK;
}

ScriptTypeInfo_GetFuncDesc()

static HRESULT WINAPI ScriptTypeInfo_GetFuncDesc ( ITypeInfo *  iface, UINT  index, FUNCDESC **  ppFuncDesc  )

static

Definition at line 1321 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    struct typeinfo_func *func;
    FUNCDESC *desc;
    unsigned i;
 
    TRACE("(%p)->(%u %p)\n", This, index, ppFuncDesc);
 
    if (!ppFuncDesc) return E_INVALIDARG;
    if (index >= This->num_funcs) return TYPE_E_ELEMENTNOTFOUND;
    func = &This->funcs[index];
 
    /* Store the parameter array after the FUNCDESC structure */
    desc = calloc(1, sizeof(*desc) + sizeof(ELEMDESC) * func->code->param_cnt);
    if (!desc) return E_OUTOFMEMORY;
 
    desc->memid = prop_to_id(This->jsdisp, func->prop);
    desc->funckind = FUNC_DISPATCH;
    desc->invkind = INVOKE_FUNC;
    desc->callconv = CC_STDCALL;
    desc->cParams = func->code->param_cnt;
    desc->elemdescFunc.tdesc.vt = VT_VARIANT;
 
    if (func->code->param_cnt) desc->lprgelemdescParam = (ELEMDESC*)(desc + 1);
    for (i = 0; i < func->code->param_cnt; i++)
        desc->lprgelemdescParam[i].tdesc.vt = VT_VARIANT;
 
    *ppFuncDesc = desc;
    return S_OK;
}

ScriptTypeInfo_GetIDsOfNames()

static HRESULT WINAPI ScriptTypeInfo_GetIDsOfNames ( ITypeInfo *  iface, LPOLESTR *  rgszNames, UINT  cNames, MEMBERID *  pMemId  )

static

Definition at line 1454 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    ITypeInfo *disp_typeinfo;
    const WCHAR *name;
    HRESULT hr = S_OK;
    int i, j, arg;
 
    TRACE("(%p)->(%p %u %p)\n", This, rgszNames, cNames, pMemId);
 
    if (!rgszNames || !cNames || !pMemId) return E_INVALIDARG;
 
    for (i = 0; i < cNames; i++) pMemId[i] = MEMBERID_NIL;
    name = rgszNames[0];
 
    for (i = 0; i < This->num_funcs; i++)
    {
        struct typeinfo_func *func = &This->funcs[i];
 
        if (wcsicmp(name, func->prop->name)) continue;
        pMemId[0] = prop_to_id(This->jsdisp, func->prop);
 
        for (j = 1; j < cNames; j++)
        {
            name = rgszNames[j];
            for (arg = func->code->param_cnt; --arg >= 0;)
                if (!wcsicmp(name, func->code->params[arg]))
                    break;
            if (arg >= 0)
                pMemId[j] = arg;
            else
                hr = DISP_E_UNKNOWNNAME;
        }
        return hr;
    }
 
    for (i = 0; i < This->num_vars; i++)
    {
        dispex_prop_t *var = This->vars[i];
 
        if (wcsicmp(name, var->name)) continue;
        pMemId[0] = prop_to_id(This->jsdisp, var);
        return S_OK;
    }
 
    /* Look into the inherited IDispatch */
    hr = get_dispatch_typeinfo(&disp_typeinfo);
    if (FAILED(hr)) return hr;
 
    return ITypeInfo_GetIDsOfNames(disp_typeinfo, rgszNames, cNames, pMemId);
}

ScriptTypeInfo_GetImplTypeFlags()

static HRESULT WINAPI ScriptTypeInfo_GetImplTypeFlags ( ITypeInfo *  iface, UINT  index, INT *  pImplTypeFlags  )

static

Definition at line 1441 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%u %p)\n", This, index, pImplTypeFlags);
 
    if (!pImplTypeFlags) return E_INVALIDARG;
    if (index != 0) return TYPE_E_ELEMENTNOTFOUND;
 
    *pImplTypeFlags = 0;
    return S_OK;
}

ScriptTypeInfo_GetMops()

static HRESULT WINAPI ScriptTypeInfo_GetMops ( ITypeInfo *  iface, MEMBERID  memid, BSTR *  pBstrMops  )

static

Definition at line 1671 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    ITypeInfo *disp_typeinfo;
    HRESULT hr;
 
    TRACE("(%p)->(%ld %p)\n", This, memid, pBstrMops);
 
    if (!pBstrMops) return E_INVALIDARG;
 
    if (!get_func_from_memid(This, memid) && !get_var_from_memid(This, memid))
    {
        hr = get_dispatch_typeinfo(&disp_typeinfo);
        if (FAILED(hr)) return hr;
 
        return ITypeInfo_GetMops(disp_typeinfo, memid, pBstrMops);
    }
 
    *pBstrMops = NULL;
    return S_OK;
}

ScriptTypeInfo_GetNames()

static HRESULT WINAPI ScriptTypeInfo_GetNames ( ITypeInfo *  iface, MEMBERID  memid, BSTR *  rgBstrNames, UINT  cMaxNames, UINT *  pcNames  )

static

Definition at line 1374 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    struct typeinfo_func *func;
    ITypeInfo *disp_typeinfo;
    dispex_prop_t *var;
    HRESULT hr;
    UINT i = 0;
 
    TRACE("(%p)->(%ld %p %u %p)\n", This, memid, rgBstrNames, cMaxNames, pcNames);
 
    if (!rgBstrNames || !pcNames) return E_INVALIDARG;
    if (memid <= 0) return TYPE_E_ELEMENTNOTFOUND;
 
    func = get_func_from_memid(This, memid);
    if (!func)
    {
        var = get_var_from_memid(This, memid);
        if (!var)
        {
            hr = get_dispatch_typeinfo(&disp_typeinfo);
            if (FAILED(hr)) return hr;
 
            return ITypeInfo_GetNames(disp_typeinfo, memid, rgBstrNames, cMaxNames, pcNames);
        }
    }
 
    *pcNames = 0;
    if (!cMaxNames) return S_OK;
 
    rgBstrNames[0] = SysAllocString(func ? func->prop->name : var->name);
    if (!rgBstrNames[0]) return E_OUTOFMEMORY;
    i++;
 
    if (func)
    {
        unsigned num = min(cMaxNames, func->code->param_cnt + 1);
 
        for (; i < num; i++)
        {
            if (!(rgBstrNames[i] = SysAllocString(func->code->params[i - 1])))
            {
                do SysFreeString(rgBstrNames[--i]); while (i);
                return E_OUTOFMEMORY;
            }
        }
    }
 
    *pcNames = i;
    return S_OK;
}

ScriptTypeInfo_GetRefTypeInfo()

static HRESULT WINAPI ScriptTypeInfo_GetRefTypeInfo ( ITypeInfo *  iface, HREFTYPE  hRefType, ITypeInfo **  ppTInfo  )

static

Definition at line 1616 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    HRESULT hr;
 
    TRACE("(%p)->(%lx %p)\n", This, hRefType, ppTInfo);
 
    if (!ppTInfo || (INT)hRefType < 0) return E_INVALIDARG;
 
    if (hRefType & ~3) return E_FAIL;
    if (hRefType & 1)
    {
        hr = get_dispatch_typeinfo(ppTInfo);
        if (FAILED(hr)) return hr;
    }
    else
        *ppTInfo = iface;
 
    ITypeInfo_AddRef(*ppTInfo);
    return S_OK;
}

ScriptTypeInfo_GetRefTypeOfImplType()

static HRESULT WINAPI ScriptTypeInfo_GetRefTypeOfImplType ( ITypeInfo *  iface, UINT  index, HREFTYPE *  pRefType  )

static

Definition at line 1427 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%u %p)\n", This, index, pRefType);
 
    /* We only inherit from IDispatch */
    if (!pRefType) return E_INVALIDARG;
    if (index != 0) return TYPE_E_ELEMENTNOTFOUND;
 
    *pRefType = 1;
    return S_OK;
}

ScriptTypeInfo_GetTypeAttr()

static HRESULT WINAPI ScriptTypeInfo_GetTypeAttr ( ITypeInfo *  iface, TYPEATTR **  ppTypeAttr  )

static

Definition at line 1277 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    TYPEATTR *attr;
 
    TRACE("(%p)->(%p)\n", This, ppTypeAttr);
 
    if (!ppTypeAttr) return E_INVALIDARG;
 
    attr = calloc(1, sizeof(*attr));
    if (!attr) return E_OUTOFMEMORY;
 
    attr->guid = GUID_JScriptTypeInfo;
    attr->lcid = LOCALE_USER_DEFAULT;
    attr->memidConstructor = MEMBERID_NIL;
    attr->memidDestructor = MEMBERID_NIL;
    attr->cbSizeInstance = 4;
    attr->typekind = TKIND_DISPATCH;
    attr->cFuncs = This->num_funcs;
    attr->cVars = This->num_vars;
    attr->cImplTypes = 1;
    attr->cbSizeVft = sizeof(IDispatchVtbl);
    attr->cbAlignment = 4;
    attr->wTypeFlags = TYPEFLAG_FDISPATCHABLE;
    attr->wMajorVerNum = JSCRIPT_MAJOR_VERSION;
    attr->wMinorVerNum = JSCRIPT_MINOR_VERSION;
 
    *ppTypeAttr = attr;
    return S_OK;
}

ScriptTypeInfo_GetTypeComp()

static HRESULT WINAPI ScriptTypeInfo_GetTypeComp ( ITypeInfo *  iface, ITypeComp **  ppTComp  )

static

Definition at line 1308 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%p)\n", This, ppTComp);
 
    if (!ppTComp) return E_INVALIDARG;
 
    *ppTComp = &This->ITypeComp_iface;
    ITypeInfo_AddRef(iface);
    return S_OK;
}

ScriptTypeInfo_GetVarDesc()

static HRESULT WINAPI ScriptTypeInfo_GetVarDesc ( ITypeInfo *  iface, UINT  index, VARDESC **  ppVarDesc  )

static

Definition at line 1353 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    VARDESC *desc;
 
    TRACE("(%p)->(%u %p)\n", This, index, ppVarDesc);
 
    if (!ppVarDesc) return E_INVALIDARG;
    if (index >= This->num_vars) return TYPE_E_ELEMENTNOTFOUND;
 
    desc = calloc(1, sizeof(*desc));
    if (!desc) return E_OUTOFMEMORY;
 
    desc->memid = prop_to_id(This->jsdisp, This->vars[index]);
    desc->varkind = VAR_DISPATCH;
    desc->elemdescVar.tdesc.vt = VT_VARIANT;
 
    *ppVarDesc = desc;
    return S_OK;
}

ScriptTypeInfo_Invoke()

static HRESULT WINAPI ScriptTypeInfo_Invoke ( ITypeInfo *  iface, PVOID  pvInstance, MEMBERID  memid, WORD  wFlags, DISPPARAMS *  pDispParams, VARIANT *  pVarResult, EXCEPINFO *  pExcepInfo, UINT *  puArgErr  )

static

Definition at line 1507 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    ITypeInfo *disp_typeinfo;
    IDispatch *disp;
    HRESULT hr;
 
    TRACE("(%p)->(%p %ld %d %p %p %p %p)\n", This, pvInstance, memid, wFlags,
          pDispParams, pVarResult, pExcepInfo, puArgErr);
 
    if (!pvInstance) return E_INVALIDARG;
    if (memid <= 0) return TYPE_E_ELEMENTNOTFOUND;
 
    if (!get_func_from_memid(This, memid) && !get_var_from_memid(This, memid))
    {
        hr = get_dispatch_typeinfo(&disp_typeinfo);
        if (FAILED(hr)) return hr;
 
        return ITypeInfo_Invoke(disp_typeinfo, pvInstance, memid, wFlags, pDispParams,
                                pVarResult, pExcepInfo, puArgErr);
    }
 
    hr = IUnknown_QueryInterface((IUnknown*)pvInstance, &IID_IDispatch, (void**)&disp);
    if (FAILED(hr)) return hr;
 
    hr = IDispatch_Invoke(disp, memid, &IID_NULL, LOCALE_USER_DEFAULT, wFlags,
                          pDispParams, pVarResult, pExcepInfo, puArgErr);
    IDispatch_Release(disp);
 
    return hr;
}

ScriptTypeInfo_QueryInterface()

static HRESULT WINAPI ScriptTypeInfo_QueryInterface ( ITypeInfo *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 1227 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    if (IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_ITypeInfo, riid))
        *ppv = &This->ITypeInfo_iface;
    else if (IsEqualGUID(&IID_ITypeComp, riid))
        *ppv = &This->ITypeComp_iface;
    else
    {
        WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
        *ppv = NULL;
        return E_NOINTERFACE;
    }
 
    TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
    IUnknown_AddRef((IUnknown*)*ppv);
    return S_OK;
}

ScriptTypeInfo_Release()

static ULONG WINAPI ScriptTypeInfo_Release ( ITypeInfo *  iface )

static

Definition at line 1257 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
    LONG ref = InterlockedDecrement(&This->ref);
    UINT i;
 
    TRACE("(%p) ref=%ld\n", This, ref);
 
    if (!ref)
    {
        for (i = This->num_funcs; i--;)
            release_bytecode(This->funcs[i].code->bytecode);
        jsdisp_release(This->jsdisp);
        free(This->funcs);
        free(This->vars);
        free(This);
    }
    return ref;
}

ScriptTypeInfo_ReleaseFuncDesc()

static void WINAPI ScriptTypeInfo_ReleaseFuncDesc ( ITypeInfo *  iface, FUNCDESC *  pFuncDesc  )

static

Definition at line 1711 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%p)\n", This, pFuncDesc);
 
    free(pFuncDesc);
}

ScriptTypeInfo_ReleaseTypeAttr()

static void WINAPI ScriptTypeInfo_ReleaseTypeAttr ( ITypeInfo *  iface, TYPEATTR *  pTypeAttr  )

static

Definition at line 1702 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%p)\n", This, pTypeAttr);
 
    free(pTypeAttr);
}

ScriptTypeInfo_ReleaseVarDesc()

static void WINAPI ScriptTypeInfo_ReleaseVarDesc ( ITypeInfo *  iface, VARDESC *  pVarDesc  )

static

Definition at line 1720 of file dispex.c.

{
    ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
 
    TRACE("(%p)->(%p)\n", This, pVarDesc);
 
    free(pVarDesc);
}

set_prop_flags()

static void set_prop_flags ( jsdisp_t *  obj, dispex_prop_t *  prop, UINT32  flags  )

static

Definition at line 3383 of file dispex.c.

{
    if(prop->type == PROP_EXTERN && obj->builtin_info->prop_config) {
        HRESULT hres = obj->builtin_info->prop_config(obj, prop->u.id, flags);
        if(hres != S_OK)
            return;
    }
    prop->flags = (prop->flags & ~PROPF_PUBLIC_MASK) | flags;
}

Referenced by jsdisp_freeze().

string_hash()

static unsigned string_hash ( const WCHAR *  name )

inlinestatic

Definition at line 170 of file dispex.c.

{
    unsigned h = 0;
    for(; *name; name++)
        h = (h>>(sizeof(unsigned)*8-4)) ^ (h<<4) ^ towlower(*name);
    return h;
}

Referenced by alloc_prop(), disp_delete_name(), DispatchEx_DeleteMemberByName(), ensure_prop_name(), fill_props(), find_external_prop(), init_dispex_from_constr(), jsdisp_call_name(), jsdisp_define_property(), jsdisp_delete_idx(), jsdisp_get_id(), jsdisp_get_idx(), jsdisp_get_own_property(), jsdisp_propget_name(), and jsdisp_propput().

to_jsdisp()

jsdisp_t * to_jsdisp

(

IDispatch *

disp

)

Definition at line 2447 of file dispex.c.

{
    if(disp->lpVtbl != (IDispatchVtbl*)&DispatchExVtbl)
        return NULL;
    return impl_from_IWineJSDispatch((IWineJSDispatch*)disp);
}

Referenced by array_this(), arraybuf_this(), ArrayConstr_isArray(), boolval_this(), create_regexp_var(), dataview_this(), date_this(), disp_call_name(), disp_call_value_with_caller(), disp_get_id(), enumerator_this(), Error_toString(), exec_source(), exprval_call(), Function_apply(), function_this(), gc_process_linked_val(), gc_run(), get_host_dispatch(), get_map_this(), get_set_this(), get_weakmap_this(), interp_call_eval(), interp_carray_set(), interp_instanceof(), interp_obj_prop(), invoke_prop_func(), is_function_prop(), jsdisp_define_properties(), JSON_stringify(), numberval_this(), Object_create(), Object_defineGetter(), Object_defineProperties(), Object_defineProperty(), Object_defineSetter(), Object_freeze(), Object_get_proto_(), Object_getOwnPropertyDescriptor(), Object_getPrototypeOf(), Object_hasOwnProperty(), Object_isExtensible(), Object_isFrozen(), Object_isPrototypeOf(), Object_isSealed(), object_keys(), Object_preventExtensions(), Object_propertyIsEnumerable(), Object_seal(), Object_set_proto_(), Object_toLocaleString(), Object_toString(), regexp_this(), RegExpConstr_value(), scope_gc_traverse(), set_error_value(), stack_topn_exprval(), string_this(), stringify(), to_property_descriptor(), transform_json_object(), typeof_string(), unwind_exception(), variant_to_jsval(), vbarray_this(), WeakMap_delete(), WeakMap_get(), WeakMap_has(), and WeakMap_set().

unlink_jsdisp()

static void unlink_jsdisp ( jsdisp_t *  jsdisp )

static

Definition at line 818 of file dispex.c.

{
    dispex_prop_t *prop = jsdisp->props, *end;
 
    for(end = prop + jsdisp->prop_cnt; prop < end; prop++) {
        switch(prop->type) {
        case PROP_DELETED:
            continue;
        case PROP_JSVAL:
            jsval_release(prop->u.val);
            break;
        case PROP_ACCESSOR:
            if(prop->u.accessor.getter)
                jsdisp_release(prop->u.accessor.getter);
            if(prop->u.accessor.setter)
                jsdisp_release(prop->u.accessor.setter);
            break;
        default:
            break;
        }
        prop->type = PROP_DELETED;
    }
 
    if(jsdisp->prototype) {
        jsdisp_release(jsdisp->prototype);
        jsdisp->prototype = NULL;
    }
 
    if(jsdisp->builtin_info->gc_traverse)
        jsdisp->builtin_info->gc_traverse(NULL, GC_TRAVERSE_UNLINK, jsdisp);
}

Referenced by gc_run().

update_external_prop()

static HRESULT update_external_prop ( jsdisp_t *  obj, const WCHAR *  name, dispex_prop_t *  prop, const struct property_info *  desc, dispex_prop_t **  ret  )

static

Definition at line 271 of file dispex.c.

{
    HRESULT hres;
 
    if(desc->name)
        name = desc->name;
 
    if(!desc->iid) {
        if(!prop && !(prop = alloc_prop(obj, name, PROP_DELETED, 0)))
            return E_OUTOFMEMORY;
        prop->type = PROP_EXTERN;
        prop->u.id = desc->id;
    }else if(prop) {
        /* If a property for a host non-volatile already exists, it must have been deleted. */
        *ret = prop;
        return S_OK;
    }else if(desc->flags & PROPF_METHOD) {
        jsdisp_t *func;
 
        hres = create_host_function(obj->ctx, desc, DISPATCH_METHOD, &func);
        if(FAILED(hres))
            return hres;
 
        if(!(prop = alloc_prop(obj, name, PROP_JSVAL, 0)))
            return E_OUTOFMEMORY;
        prop->u.val = jsval_obj(func);
    }else {
        jsdisp_t *getter, *setter = NULL;
 
        hres = create_host_function(obj->ctx, desc, DISPATCH_PROPERTYGET, &getter);
        if(FAILED(hres))
            return hres;
 
        if(desc->flags & PROPF_WRITABLE) {
            hres = create_host_function(obj->ctx, desc, DISPATCH_PROPERTYPUT, &setter);
            if(FAILED(hres)) {
                jsdisp_release(getter);
                return hres;
            }
        }
 
        if(!(prop = alloc_prop(obj, name, PROP_ACCESSOR, 0)))
            return E_OUTOFMEMORY;
        prop->u.accessor.getter = getter;
        prop->u.accessor.setter = setter;
    }
 
    prop->flags = desc->flags & PROPF_ALL;
    *ret = prop;
    return S_OK;
}

Referenced by ensure_prop_name(), fill_props(), and find_external_prop().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

jscript

)

WineJSDispatch_Free()

static void WINAPI WineJSDispatch_Free ( IWineJSDispatch *  iface )

static

Definition at line 2387 of file dispex.c.

{
   jsdisp_t *This = impl_from_IWineJSDispatch(iface);
   jsdisp_free(This);
}

WineJSDispatch_GetPropertyFlags()

static HRESULT WINAPI WineJSDispatch_GetPropertyFlags ( IWineJSDispatch *  iface, DISPID  id, UINT32 *  ret  )

static

Definition at line 2393 of file dispex.c.

{
    jsdisp_t *This = impl_from_IWineJSDispatch(iface);
    dispex_prop_t *prop = get_prop(This, id);
 
    if(!prop || prop->type == PROP_DELETED || prop->type == PROP_PROTREF)
        return DISP_E_MEMBERNOTFOUND;
 
    *ret = prop->flags & PROPF_PUBLIC_MASK;
    return S_OK;
}

WineJSDispatch_GetScriptGlobal()

static HRESULT WINAPI WineJSDispatch_GetScriptGlobal ( IWineJSDispatch *  iface, IWineJSDispatchHost **  ret  )

static

Definition at line 2405 of file dispex.c.

{
   jsdisp_t *This = impl_from_IWineJSDispatch(iface);
   IDispatch *disp;
 
   if(!This->ctx->site)
       return E_UNEXPECTED;
 
   if(!(disp = lookup_global_host(This->ctx)))
       return E_NOINTERFACE;
 
   *ret = get_host_dispatch(disp);
   return S_OK;
}

Variable Documentation

DispatchExVtbl

IWineJSDispatchVtbl DispatchExVtbl

static

Initial value:

= {
    DispatchEx_QueryInterface,
    DispatchEx_AddRef,
    DispatchEx_Release,
    DispatchEx_GetTypeInfoCount,
    DispatchEx_GetTypeInfo,
    DispatchEx_GetIDsOfNames,
    DispatchEx_Invoke,
    DispatchEx_GetDispID,
    DispatchEx_InvokeEx,
    DispatchEx_DeleteMemberByName,
    DispatchEx_DeleteMemberByDispID,
    DispatchEx_GetMemberProperties,
    DispatchEx_GetMemberName,
    DispatchEx_GetNextDispID,
    DispatchEx_GetNameSpaceParent,
    WineJSDispatch_Free,
    WineJSDispatch_GetPropertyFlags,
    WineJSDispatch_GetScriptGlobal,
}

Definition at line 2420 of file dispex.c.

Referenced by as_jsdisp(), iface_to_jsdisp(), init_dispex(), and to_jsdisp().

dispex_info

const builtin_info_t dispex_info = { .class = JSCLASS_NONE }

static

Definition at line 2491 of file dispex.c.

Referenced by create_dispex().

GUID_JScriptTypeInfo

const GUID GUID_JScriptTypeInfo = {0xc59c6b12,0xf6c1,0x11cf,{0x88,0x35,0x00,0xa0,0xc9,0x11,0xe8,0xb2}}

static

Definition at line 28 of file dispex.c.

Referenced by ScriptTypeInfo_GetTypeAttr().

HostObject_info

const builtin_info_t HostObject_info

static

Initial value:

= {
    .class       = JSCLASS_HOST,
    .addref      = HostObject_addref,
    .release     = HostObject_release,
    .lookup_prop = HostObject_lookup_prop,
    .prop_get    = HostObject_prop_get,
    .prop_put    = HostObject_prop_put,
    .next_prop   = HostObject_next_prop,
    .prop_delete = HostObject_prop_delete,
    .prop_config = HostObject_prop_config,
    .to_string   = HostObject_to_string,
}

Definition at line 3544 of file dispex.c.

Referenced by get_host_dispatch(), and init_host_object().

ScriptTypeCompVtbl

const ITypeCompVtbl ScriptTypeCompVtbl

static

Initial value:

= {
    ScriptTypeComp_QueryInterface,
    ScriptTypeComp_AddRef,
    ScriptTypeComp_Release,
    ScriptTypeComp_Bind,
    ScriptTypeComp_BindType
}

Definition at line 1853 of file dispex.c.

Referenced by DispatchEx_GetTypeInfo().

ScriptTypeInfoVtbl

const ITypeInfoVtbl ScriptTypeInfoVtbl

static

Initial value:

= {
    ScriptTypeInfo_QueryInterface,
    ScriptTypeInfo_AddRef,
    ScriptTypeInfo_Release,
    ScriptTypeInfo_GetTypeAttr,
    ScriptTypeInfo_GetTypeComp,
    ScriptTypeInfo_GetFuncDesc,
    ScriptTypeInfo_GetVarDesc,
    ScriptTypeInfo_GetNames,
    ScriptTypeInfo_GetRefTypeOfImplType,
    ScriptTypeInfo_GetImplTypeFlags,
    ScriptTypeInfo_GetIDsOfNames,
    ScriptTypeInfo_Invoke,
    ScriptTypeInfo_GetDocumentation,
    ScriptTypeInfo_GetDllEntry,
    ScriptTypeInfo_GetRefTypeInfo,
    ScriptTypeInfo_AddressOfMember,
    ScriptTypeInfo_CreateInstance,
    ScriptTypeInfo_GetMops,
    ScriptTypeInfo_GetContainingTypeLib,
    ScriptTypeInfo_ReleaseTypeAttr,
    ScriptTypeInfo_ReleaseFuncDesc,
    ScriptTypeInfo_ReleaseVarDesc
}

Definition at line 1729 of file dispex.c.

Referenced by DispatchEx_GetTypeInfo().