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

Include dependency graph for jscript.c:

Classes
class	JScript

struct	JScriptError

struct	AXSite

Macros
#define	CTXARG_T DWORD

#define	IActiveScriptParseVtbl IActiveScriptParse32Vtbl

#define	IActiveScriptParseProcedure2Vtbl IActiveScriptParseProcedure2_32Vtbl

#define	SUPPORTED_OPTIONS (INTERFACESAFE_FOR_UNTRUSTED_DATA\|INTERFACE_USES_DISPEX\|INTERFACE_USES_SECURITY_MANAGER)

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (jscript)

void	script_release (script_ctx_t *ctx)

static void	script_globals_release (script_ctx_t *ctx)

static void	change_state (JScript *This, SCRIPTSTATE state)

static BOOL	is_started (script_ctx_t *ctx)

HRESULT	create_named_item_script_obj (script_ctx_t ctx, named_item_t item)

static void	release_named_item_script_obj (named_item_t *item)

static HRESULT	retrieve_named_item_disp (IActiveScriptSite site, named_item_t item)

named_item_t *	lookup_named_item (script_ctx_t ctx, const WCHAR item_name, unsigned flags)

void	release_named_item (named_item_t *item)

static JScriptError *	impl_from_IActiveScriptError (IActiveScriptError *iface)

static HRESULT WINAPI	JScriptError_QueryInterface (IActiveScriptError iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScriptError_AddRef (IActiveScriptError *iface)

static ULONG WINAPI	JScriptError_Release (IActiveScriptError *iface)

static HRESULT WINAPI	JScriptError_GetExceptionInfo (IActiveScriptError iface, EXCEPINFO excepinfo)

static HRESULT WINAPI	JScriptError_GetSourcePosition (IActiveScriptError iface, DWORD source_context, ULONG line, LONG character)

static HRESULT WINAPI	JScriptError_GetSourceLineText (IActiveScriptError iface, BSTR source)

void	reset_ei (jsexcept_t *ei)

void	enter_script (script_ctx_t ctx, jsexcept_t ei)

HRESULT	leave_script (script_ctx_t *ctx, HRESULT result)

static void	clear_script_queue (JScript *This)

static void	clear_persistent_code_list (JScript *This)

static void	release_persistent_script_objs (JScript *This)

static void	release_named_item_list (JScript *This)

static HRESULT	exec_global_code (script_ctx_t ctx, bytecode_t code, jsval_t *r)

static void	exec_queued_code (JScript *This)

static void	decrease_state (JScript *This, SCRIPTSTATE state)

static AXSite *	impl_from_IServiceProvider (IServiceProvider *iface)

static HRESULT WINAPI	AXSite_QueryInterface (IServiceProvider iface, REFIID riid, void *ppv)

static ULONG WINAPI	AXSite_AddRef (IServiceProvider *iface)

static ULONG WINAPI	AXSite_Release (IServiceProvider *iface)

static HRESULT WINAPI	AXSite_QueryService (IServiceProvider iface, REFGUID guidService, REFIID riid, void *ppv)

IUnknown *	create_ax_site (script_ctx_t *ctx)

static JScript *	impl_from_IActiveScript (IActiveScript *iface)

static HRESULT WINAPI	JScript_QueryInterface (IActiveScript iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScript_AddRef (IActiveScript *iface)

static ULONG WINAPI	JScript_Release (IActiveScript *iface)

static HRESULT WINAPI	JScript_SetScriptSite (IActiveScript iface, IActiveScriptSite pass)

static HRESULT WINAPI	JScript_GetScriptSite (IActiveScript iface, REFIID riid, void *ppvObject)

static HRESULT WINAPI	JScript_SetScriptState (IActiveScript *iface, SCRIPTSTATE ss)

static HRESULT WINAPI	JScript_GetScriptState (IActiveScript iface, SCRIPTSTATE pssState)

static HRESULT WINAPI	JScript_Close (IActiveScript *iface)

static HRESULT WINAPI	JScript_AddNamedItem (IActiveScript *iface, LPCOLESTR pstrName, DWORD dwFlags)

static HRESULT WINAPI	JScript_AddTypeLib (IActiveScript *iface, REFGUID rguidTypeLib, DWORD dwMajor, DWORD dwMinor, DWORD dwFlags)

static HRESULT WINAPI	JScript_GetScriptDispatch (IActiveScript iface, LPCOLESTR pstrItemName, IDispatch *ppdisp)

static HRESULT WINAPI	JScript_GetCurrentScriptThreadID (IActiveScript iface, SCRIPTTHREADID pstridThread)

static HRESULT WINAPI	JScript_GetScriptThreadID (IActiveScript iface, DWORD dwWin32ThreadId, SCRIPTTHREADID pstidThread)

static HRESULT WINAPI	JScript_GetScriptThreadState (IActiveScript iface, SCRIPTTHREADID stidThread, SCRIPTTHREADSTATE pstsState)

static HRESULT WINAPI	JScript_InterruptScriptThread (IActiveScript iface, SCRIPTTHREADID stidThread, const EXCEPINFO pexcepinfo, DWORD dwFlags)

static HRESULT WINAPI	JScript_Clone (IActiveScript iface, IActiveScript *ppscript)

static JScript *	impl_from_IActiveScriptParse (IActiveScriptParse *iface)

static HRESULT WINAPI	JScriptParse_QueryInterface (IActiveScriptParse iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScriptParse_AddRef (IActiveScriptParse *iface)

static ULONG WINAPI	JScriptParse_Release (IActiveScriptParse *iface)

static HRESULT WINAPI	JScriptParse_InitNew (IActiveScriptParse *iface)

static HRESULT WINAPI	JScriptParse_AddScriptlet (IActiveScriptParse iface, LPCOLESTR pstrDefaultName, LPCOLESTR pstrCode, LPCOLESTR pstrItemName, LPCOLESTR pstrSubItemName, LPCOLESTR pstrEventName, LPCOLESTR pstrDelimiter, CTXARG_T dwSourceContextCookie, ULONG ulStartingLineNumber, DWORD dwFlags, BSTR pbstrName, EXCEPINFO *pexcepinfo)

static HRESULT WINAPI	JScriptParse_ParseScriptText (IActiveScriptParse iface, LPCOLESTR pstrCode, LPCOLESTR pstrItemName, IUnknown punkContext, LPCOLESTR pstrDelimiter, CTXARG_T dwSourceContextCookie, ULONG ulStartingLine, DWORD dwFlags, VARIANT pvarResult, EXCEPINFO pexcepinfo)

static JScript *	impl_from_IActiveScriptParseProcedure2 (IActiveScriptParseProcedure2 *iface)

static HRESULT WINAPI	JScriptParseProcedure_QueryInterface (IActiveScriptParseProcedure2 iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScriptParseProcedure_AddRef (IActiveScriptParseProcedure2 *iface)

static ULONG WINAPI	JScriptParseProcedure_Release (IActiveScriptParseProcedure2 *iface)

static HRESULT WINAPI	JScriptParseProcedure_ParseProcedureText (IActiveScriptParseProcedure2 iface, LPCOLESTR pstrCode, LPCOLESTR pstrFormalParams, LPCOLESTR pstrProcedureName, LPCOLESTR pstrItemName, IUnknown punkContext, LPCOLESTR pstrDelimiter, CTXARG_T dwSourceContextCookie, ULONG ulStartingLineNumber, DWORD dwFlags, IDispatch **ppdisp)

static JScript *	impl_from_IActiveScriptProperty (IActiveScriptProperty *iface)

static HRESULT WINAPI	JScriptProperty_QueryInterface (IActiveScriptProperty iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScriptProperty_AddRef (IActiveScriptProperty *iface)

static ULONG WINAPI	JScriptProperty_Release (IActiveScriptProperty *iface)

static HRESULT WINAPI	JScriptProperty_GetProperty (IActiveScriptProperty iface, DWORD dwProperty, VARIANT pvarIndex, VARIANT *pvarValue)

static HRESULT WINAPI	JScriptProperty_SetProperty (IActiveScriptProperty iface, DWORD dwProperty, VARIANT pvarIndex, VARIANT *pvarValue)

static JScript *	impl_from_IObjectSafety (IObjectSafety *iface)

static HRESULT WINAPI	JScriptSafety_QueryInterface (IObjectSafety iface, REFIID riid, void *ppv)

static ULONG WINAPI	JScriptSafety_AddRef (IObjectSafety *iface)

static ULONG WINAPI	JScriptSafety_Release (IObjectSafety *iface)

static HRESULT WINAPI	JScriptSafety_GetInterfaceSafetyOptions (IObjectSafety iface, REFIID riid, DWORD pdwSupportedOptions, DWORD *pdwEnabledOptions)

static HRESULT WINAPI	JScriptSafety_SetInterfaceSafetyOptions (IObjectSafety *iface, REFIID riid, DWORD dwOptionSetMask, DWORD dwEnabledOptions)

static JScript *	impl_from_IVariantChangeType (IVariantChangeType *iface)

static HRESULT WINAPI	VariantChangeType_QueryInterface (IVariantChangeType iface, REFIID riid, void *ppv)

static ULONG WINAPI	VariantChangeType_AddRef (IVariantChangeType *iface)

static ULONG WINAPI	VariantChangeType_Release (IVariantChangeType *iface)

static HRESULT WINAPI	VariantChangeType_ChangeType (IVariantChangeType iface, VARIANT dst, VARIANT *src, LCID lcid, VARTYPE vt)

static JScript *	impl_from_IWineJScript (IWineJScript *iface)

static HRESULT WINAPI	WineJScript_QueryInterface (IWineJScript iface, REFIID riid, void *ppv)

static ULONG WINAPI	WineJScript_AddRef (IWineJScript *iface)

static ULONG WINAPI	WineJScript_Release (IWineJScript *iface)

static HRESULT WINAPI	WineJScript_InitHostObject (IWineJScript iface, IWineJSDispatchHost host_obj, IWineJSDispatch prototype, UINT32 flags, IWineJSDispatch *ret)

static HRESULT WINAPI	WineJScript_InitHostConstructor (IWineJScript iface, IWineJSDispatchHost constr, IWineJSDispatch prototype, IWineJSDispatch *ret)

HRESULT	create_jscript_object (BOOL is_encode, REFIID riid, void **ppv)

Variables
static const IActiveScriptErrorVtbl	JScriptErrorVtbl

static IServiceProviderVtbl	AXSiteVtbl

static const IActiveScriptVtbl	JScriptVtbl

static const IActiveScriptParseVtbl	JScriptParseVtbl

static const IActiveScriptParseProcedure2Vtbl	JScriptParseProcedureVtbl

static const IActiveScriptPropertyVtbl	JScriptPropertyVtbl

static const IObjectSafetyVtbl	JScriptSafetyVtbl

static const IVariantChangeTypeVtbl	VariantChangeTypeVtbl

static const IWineJScriptVtbl	WineJScriptVtbl

Macro Definition Documentation

◆ CTXARG_T

#define CTXARG_T DWORD

Definition at line 37 of file jscript.c.

◆ IActiveScriptParseProcedure2Vtbl

#define IActiveScriptParseProcedure2Vtbl IActiveScriptParseProcedure2_32Vtbl

Definition at line 39 of file jscript.c.

◆ IActiveScriptParseVtbl

#define IActiveScriptParseVtbl IActiveScriptParse32Vtbl

Definition at line 38 of file jscript.c.

◆ SUPPORTED_OPTIONS

#define SUPPORTED_OPTIONS (INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_DISPEX|INTERFACE_USES_SECURITY_MANAGER)

Definition at line 1331 of file jscript.c.

Function Documentation

◆ AXSite_AddRef()

static ULONG WINAPI AXSite_AddRef ( IServiceProvider * iface )

static

Definition at line 566 of file jscript.c.

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

◆ AXSite_QueryInterface()

static HRESULT WINAPI AXSite_QueryInterface	(	IServiceProvider *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 546 of file jscript.c.

{
    AXSite *This = impl_from_IServiceProvider(iface);
 
    if(IsEqualGUID(&IID_IUnknown, riid)) {
        TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
        *ppv = &This->IServiceProvider_iface;
    }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
        TRACE("(%p)->(IID_IServiceProvider %p)\n", This, ppv);
        *ppv = &This->IServiceProvider_iface;
    }else {
        TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
        *ppv = NULL;
        return E_NOINTERFACE;
    }
 
    IUnknown_AddRef((IUnknown*)*ppv);
    return S_OK;
}

◆ AXSite_QueryService()

static HRESULT WINAPI AXSite_QueryService	(	IServiceProvider *	iface,
		REFGUID	guidService,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 594 of file jscript.c.

{
    AXSite *This = impl_from_IServiceProvider(iface);
 
    TRACE("(%p)->(%s %s %p)\n", This, debugstr_guid(guidService), debugstr_guid(riid), ppv);
 
    if(!This->sp)
        return E_NOINTERFACE;
 
    return IServiceProvider_QueryService(This->sp, guidService, riid, ppv);
}

◆ AXSite_Release()

static ULONG WINAPI AXSite_Release ( IServiceProvider * iface )

static

Definition at line 576 of file jscript.c.

{
    AXSite *This = impl_from_IServiceProvider(iface);
    LONG ref = InterlockedDecrement(&This->ref);
 
    TRACE("(%p) ref=%ld\n", This, ref);
 
    if(!ref)
    {
        if(This->sp)
            IServiceProvider_Release(This->sp);
 
        free(This);
    }
 
    return ref;
}

◆ change_state()

static void change_state	(	JScript *	This,
		SCRIPTSTATE	state
	)

static

Definition at line 107 of file jscript.c.

{
    if(This->ctx->state == state)
        return;
 
    This->ctx->state = state;
    if(This->site)
        IActiveScriptSite_OnStateChange(This->site, state);
}

Referenced by decrease_state(), JScript_SetScriptSite(), JScript_SetScriptState(), and JScriptParse_InitNew().

◆ clear_persistent_code_list()

static void clear_persistent_code_list ( JScript * This )

static

Definition at line 398 of file jscript.c.

{
    while(!list_empty(&This->persistent_code))
    {
        bytecode_t *iter = LIST_ENTRY(list_head(&This->persistent_code), bytecode_t, entry);
        list_remove(&iter->entry);
        release_bytecode(iter);
    }
}

Referenced by JScript_Close().

◆ clear_script_queue()

static void clear_script_queue ( JScript * This )

static

Definition at line 385 of file jscript.c.

{
    while(!list_empty(&This->queued_code))
    {
        bytecode_t *iter = LIST_ENTRY(list_head(&This->queued_code), bytecode_t, entry);
        list_remove(&iter->entry);
        if (iter->is_persistent)
            list_add_tail(&This->persistent_code, &iter->entry);
        else
            release_bytecode(iter);
    }
}

Referenced by decrease_state(), and exec_queued_code().

◆ create_ax_site()

IUnknown * create_ax_site ( script_ctx_t * ctx )

Definition at line 614 of file jscript.c.

{
    IServiceProvider *sp = NULL;
    AXSite *ret;
    HRESULT hres;
 
    hres = IActiveScriptSite_QueryInterface(ctx->site, &IID_IServiceProvider, (void**)&sp);
    if(FAILED(hres)) {
        TRACE("Could not get IServiceProvider iface: %08lx\n", hres);
    }
 
    ret = malloc(sizeof(AXSite));
    if(!ret) {
        IServiceProvider_Release(sp);
        return NULL;
    }
 
    ret->IServiceProvider_iface.lpVtbl = &AXSiteVtbl;
    ret->ref = 1;
    ret->sp = sp;
 
    return (IUnknown*)&ret->IServiceProvider_iface;
}

Referenced by create_activex_object(), and set_object_site().

◆ create_jscript_object()

HRESULT create_jscript_object	(	BOOL	is_encode,
		REFIID	riid,
		void **	ppv
	)

Definition at line 1476 of file jscript.c.

{
    JScript *ret;
    HRESULT hres;
 
    ret = calloc(1, sizeof(*ret));
    if(!ret)
        return E_OUTOFMEMORY;
 
    lock_module();
 
    ret->IActiveScript_iface.lpVtbl = &JScriptVtbl;
    ret->IActiveScriptParse_iface.lpVtbl = &JScriptParseVtbl;
    ret->IActiveScriptParseProcedure2_iface.lpVtbl = &JScriptParseProcedureVtbl;
    ret->IActiveScriptProperty_iface.lpVtbl = &JScriptPropertyVtbl;
    ret->IObjectSafety_iface.lpVtbl = &JScriptSafetyVtbl;
    ret->IVariantChangeType_iface.lpVtbl = &VariantChangeTypeVtbl;
    ret->IWineJScript_iface.lpVtbl = &WineJScriptVtbl;
    ret->ref = 1;
    ret->safeopt = INTERFACE_USES_DISPEX;
    ret->is_encode = is_encode;
    list_init(&ret->persistent_code);
    list_init(&ret->queued_code);
 
    hres = IActiveScript_QueryInterface(&ret->IActiveScript_iface, riid, ppv);
    IActiveScript_Release(&ret->IActiveScript_iface);
    return hres;
}

Referenced by JScriptEncodeFactory_CreateInstance(), and JScriptFactory_CreateInstance().

◆ create_named_item_script_obj()

HRESULT create_named_item_script_obj	(	script_ctx_t *	ctx,
		named_item_t *	item
	)

Definition at line 124 of file jscript.c.

{
    static const builtin_info_t disp_info = { .class = JSCLASS_GLOBAL };
    return create_dispex(ctx, &disp_info, NULL, &item->script_obj);
}

Referenced by exec_source(), and lookup_named_item().

◆ decrease_state()

static void decrease_state	(	JScript *	This,
		SCRIPTSTATE	state
	)

static

Definition at line 454 of file jscript.c.

{
    named_item_t *item, *item_next;
 
    if(This->ctx) {
        switch(This->ctx->state) {
        case SCRIPTSTATE_CONNECTED:
            change_state(This, SCRIPTSTATE_DISCONNECTED);
            if(state == SCRIPTSTATE_DISCONNECTED)
                return;
            /* FALLTHROUGH */
        case SCRIPTSTATE_STARTED:
        case SCRIPTSTATE_DISCONNECTED:
            clear_script_queue(This);
 
            if(This->ctx->state == SCRIPTSTATE_DISCONNECTED)
                change_state(This, SCRIPTSTATE_INITIALIZED);
            if(state == SCRIPTSTATE_INITIALIZED)
                return;
            /* FALLTHROUGH */
        case SCRIPTSTATE_INITIALIZED:
            clear_script_queue(This);
            release_persistent_script_objs(This);
 
            LIST_FOR_EACH_ENTRY_SAFE(item, item_next, &This->ctx->named_items, named_item_t, entry)
            {
                if(item->disp)
                {
                    IDispatch_Release(item->disp);
                    item->disp = NULL;
                }
                release_named_item_script_obj(item);
                if(!(item->flags & SCRIPTITEM_ISPERSISTENT))
                {
                    list_remove(&item->entry);
                    release_named_item(item);
                }
            }
 
            if(This->ctx->secmgr) {
                IInternetHostSecurityManager_Release(This->ctx->secmgr);
                This->ctx->secmgr = NULL;
            }
 
            if(This->ctx->site) {
                IActiveScriptSite_Release(This->ctx->site);
                This->ctx->site = NULL;
            }
 
            script_globals_release(This->ctx);
            gc_run(This->ctx);
 
            /* FALLTHROUGH */
        case SCRIPTSTATE_UNINITIALIZED:
            change_state(This, state);
            break;
        default:
            assert(0);
        }
 
        change_state(This, state);
    }else if(state == SCRIPTSTATE_UNINITIALIZED) {
        if(This->site)
            IActiveScriptSite_OnStateChange(This->site, state);
    }else {
        FIXME("NULL ctx\n");
    }
 
    if((state == SCRIPTSTATE_UNINITIALIZED || state == SCRIPTSTATE_CLOSED) && This->thread_data) {
        release_thread_data(This->thread_data);
        This->thread_data = NULL;
    }
 
    if(This->site) {
        IActiveScriptSite_Release(This->site);
        This->site = NULL;
    }
}

Referenced by JScript_Close(), and JScript_SetScriptState().

◆ enter_script()

void enter_script	(	script_ctx_t *	ctx,
		jsexcept_t *	ei
	)

Definition at line 340 of file jscript.c.

{
    memset(ei, 0, sizeof(*ei));
    ei->prev = ctx->ei;
    ctx->ei = ei;
    TRACE("ctx %p ei %p prev %p\n", ctx, ei, ei->prev);
}

Referenced by DispatchEx_InvokeEx(), exec_queued_code(), JScriptParse_ParseScriptText(), JScriptParseProcedure_ParseProcedureText(), variant_change_type(), and VariantChangeType_ChangeType().

◆ exec_global_code()

static HRESULT exec_global_code	(	script_ctx_t *	ctx,
		bytecode_t *	code,
		jsval_t *	r
	)

static

Definition at line 426 of file jscript.c.

{
    IServiceProvider *prev_caller = ctx->jscaller->caller;
    HRESULT hres;
 
    ctx->jscaller->caller = SP_CALLER_UNINITIALIZED;
    hres = exec_source(ctx, EXEC_GLOBAL, code, &code->global_code, NULL, NULL, NULL, 0, NULL, r);
    ctx->jscaller->caller = prev_caller;
    return hres;
}

Referenced by exec_queued_code(), and JScriptParse_ParseScriptText().

◆ exec_queued_code()

static void exec_queued_code ( JScript * This )

static

Definition at line 437 of file jscript.c.

{
    bytecode_t *iter;
    jsexcept_t ei;
    HRESULT hres = S_OK;
 
    LIST_FOR_EACH_ENTRY(iter, &This->queued_code, bytecode_t, entry) {
        enter_script(This->ctx, &ei);
        hres = exec_global_code(This->ctx, iter, NULL);
        leave_script(This->ctx, hres);
        if(FAILED(hres))
            break;
    }
 
    clear_script_queue(This);
}

Referenced by JScript_SetScriptState().

◆ impl_from_IActiveScript()

static JScript * impl_from_IActiveScript ( IActiveScript * iface )

inlinestatic

Definition at line 638 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IActiveScript_iface);
}

Referenced by JScript_AddNamedItem(), JScript_AddRef(), JScript_AddTypeLib(), JScript_Clone(), JScript_Close(), JScript_GetCurrentScriptThreadID(), JScript_GetScriptDispatch(), JScript_GetScriptSite(), JScript_GetScriptState(), JScript_GetScriptThreadID(), JScript_GetScriptThreadState(), JScript_InterruptScriptThread(), JScript_QueryInterface(), JScript_Release(), JScript_SetScriptSite(), and JScript_SetScriptState().

◆ impl_from_IActiveScriptError()

static JScriptError * impl_from_IActiveScriptError ( IActiveScriptError * iface )

inlinestatic

Definition at line 194 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScriptError, IActiveScriptError_iface);
}

Referenced by JScriptError_AddRef(), JScriptError_GetExceptionInfo(), JScriptError_GetSourceLineText(), JScriptError_GetSourcePosition(), JScriptError_QueryInterface(), and JScriptError_Release().

◆ impl_from_IActiveScriptParse()

static JScript * impl_from_IActiveScriptParse ( IActiveScriptParse * iface )

inlinestatic

Definition at line 1034 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IActiveScriptParse_iface);
}

Referenced by JScriptParse_AddRef(), JScriptParse_AddScriptlet(), JScriptParse_InitNew(), JScriptParse_ParseScriptText(), JScriptParse_QueryInterface(), and JScriptParse_Release().

◆ impl_from_IActiveScriptParseProcedure2()

static JScript * impl_from_IActiveScriptParseProcedure2 ( IActiveScriptParseProcedure2 * iface )

inlinestatic

Definition at line 1165 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IActiveScriptParseProcedure2_iface);
}

Referenced by JScriptParseProcedure_AddRef(), JScriptParseProcedure_ParseProcedureText(), JScriptParseProcedure_QueryInterface(), and JScriptParseProcedure_Release().

◆ impl_from_IActiveScriptProperty()

static JScript * impl_from_IActiveScriptProperty ( IActiveScriptProperty * iface )

inlinestatic

Definition at line 1240 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IActiveScriptProperty_iface);
}

Referenced by JScriptProperty_AddRef(), JScriptProperty_GetProperty(), JScriptProperty_QueryInterface(), JScriptProperty_Release(), and JScriptProperty_SetProperty().

◆ impl_from_IObjectSafety()

static JScript * impl_from_IObjectSafety ( IObjectSafety * iface )

inlinestatic

Definition at line 1308 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IObjectSafety_iface);
}

Referenced by JScriptSafety_AddRef(), JScriptSafety_GetInterfaceSafetyOptions(), JScriptSafety_QueryInterface(), JScriptSafety_Release(), and JScriptSafety_SetInterfaceSafetyOptions().

◆ impl_from_IServiceProvider()

static AXSite * impl_from_IServiceProvider ( IServiceProvider * iface )

inlinestatic

Definition at line 541 of file jscript.c.

{
    return CONTAINING_RECORD(iface, AXSite, IServiceProvider_iface);
}

Referenced by AXSite_AddRef(), AXSite_QueryInterface(), AXSite_QueryService(), and AXSite_Release().

◆ impl_from_IVariantChangeType()

static JScript * impl_from_IVariantChangeType ( IVariantChangeType * iface )

inlinestatic

Definition at line 1371 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IVariantChangeType_iface);
}

Referenced by VariantChangeType_AddRef(), VariantChangeType_ChangeType(), VariantChangeType_QueryInterface(), and VariantChangeType_Release().

◆ impl_from_IWineJScript()

static JScript * impl_from_IWineJScript ( IWineJScript * iface )

inlinestatic

Definition at line 1431 of file jscript.c.

{
    return CONTAINING_RECORD(iface, JScript, IWineJScript_iface);
}

Referenced by WineJScript_AddRef(), WineJScript_InitHostConstructor(), WineJScript_InitHostObject(), WineJScript_QueryInterface(), and WineJScript_Release().

◆ is_started()

static BOOL is_started ( script_ctx_t * ctx )

inlinestatic

Definition at line 117 of file jscript.c.

{
    return ctx->state == SCRIPTSTATE_STARTED
        || ctx->state == SCRIPTSTATE_CONNECTED
        || ctx->state == SCRIPTSTATE_DISCONNECTED;
}

Referenced by JScriptParse_ParseScriptText().

◆ JScript_AddNamedItem()

static HRESULT WINAPI JScript_AddNamedItem	(	IActiveScript *	iface,
		LPCOLESTR	pstrName,
		DWORD	dwFlags
	)

static

Definition at line 887 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
    named_item_t *item;
    IDispatch *disp = NULL;
    HRESULT hres;
 
    TRACE("(%p)->(%s %lx)\n", This, debugstr_w(pstrName), dwFlags);
 
    if(!This->thread_data || This->thread_data->thread_id != GetCurrentThreadId() || !This->ctx || This->ctx->state == SCRIPTSTATE_CLOSED)
        return E_UNEXPECTED;
 
    if(dwFlags & SCRIPTITEM_GLOBALMEMBERS) {
        IUnknown *unk;
 
        hres = IActiveScriptSite_GetItemInfo(This->site, pstrName, SCRIPTINFO_IUNKNOWN, &unk, NULL);
        if(FAILED(hres)) {
            WARN("GetItemInfo failed: %08lx\n", hres);
            return hres;
        }
 
        hres = IUnknown_QueryInterface(unk, &IID_IDispatch, (void**)&disp);
        IUnknown_Release(unk);
        if(FAILED(hres)) {
            WARN("object does not implement IDispatch\n");
            return hres;
        }
    }
 
    item = malloc(sizeof(*item));
    if(!item) {
        if(disp)
            IDispatch_Release(disp);
        return E_OUTOFMEMORY;
    }
 
    item->ref = 1;
    item->disp = disp;
    item->flags = dwFlags;
    item->script_obj = NULL;
    item->name = wcsdup(pstrName);
    if(!item->name) {
        if(disp)
            IDispatch_Release(disp);
        free(item);
        return E_OUTOFMEMORY;
    }
 
    list_add_tail(&This->ctx->named_items, &item->entry);
    return S_OK;
}

◆ JScript_AddRef()

static ULONG WINAPI JScript_AddRef ( IActiveScript * iface )

static

Definition at line 687 of file jscript.c.

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

◆ JScript_AddTypeLib()

static HRESULT WINAPI JScript_AddTypeLib	(	IActiveScript *	iface,
		REFGUID	rguidTypeLib,
		DWORD	dwMajor,
		DWORD	dwMinor,
		DWORD	dwFlags
	)

static

Definition at line 940 of file jscript.c.

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

◆ JScript_Clone()

static HRESULT WINAPI JScript_Clone	(	IActiveScript *	iface,
		IActiveScript **	ppscript
	)

static

Definition at line 1008 of file jscript.c.

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

◆ JScript_Close()

static HRESULT WINAPI JScript_Close ( IActiveScript * iface )

static

Definition at line 872 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
 
    TRACE("(%p)->()\n", This);
 
    if(This->thread_data && This->thread_data->thread_id != GetCurrentThreadId())
        return E_UNEXPECTED;
 
    decrease_state(This, SCRIPTSTATE_CLOSED);
    clear_persistent_code_list(This);
    release_named_item_list(This);
    return S_OK;
}

◆ JScript_GetCurrentScriptThreadID()

static HRESULT WINAPI JScript_GetCurrentScriptThreadID	(	IActiveScript *	iface,
		SCRIPTTHREADID *	pstridThread
	)

static

Definition at line 976 of file jscript.c.

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

◆ JScript_GetScriptDispatch()

static HRESULT WINAPI JScript_GetScriptDispatch	(	IActiveScript *	iface,
		LPCOLESTR	pstrItemName,
		IDispatch **	ppdisp
	)

static

Definition at line 948 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
    jsdisp_t *script_obj;
 
    TRACE("(%p)->(%s %p)\n", This, debugstr_w(pstrItemName), ppdisp);
 
    if(!ppdisp)
        return E_POINTER;
 
    if(!This->thread_data || This->thread_data->thread_id != GetCurrentThreadId() || !This->ctx->global) {
        *ppdisp = NULL;
        return E_UNEXPECTED;
    }
 
    script_obj = This->ctx->global;
    if(pstrItemName) {
        named_item_t *item = lookup_named_item(This->ctx, pstrItemName, 0);
        if(!item) return E_INVALIDARG;
        if(item->script_obj) script_obj = item->script_obj;
    }
 
    *ppdisp = to_disp(script_obj);
    IDispatch_AddRef(*ppdisp);
    return S_OK;
}

◆ JScript_GetScriptSite()

static HRESULT WINAPI JScript_GetScriptSite	(	IActiveScript *	iface,
		REFIID	riid,
		void **	ppvObject
	)

static

Definition at line 807 of file jscript.c.

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

◆ JScript_GetScriptState()

static HRESULT WINAPI JScript_GetScriptState	(	IActiveScript *	iface,
		SCRIPTSTATE *	pssState
	)

static

Definition at line 856 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
 
    TRACE("(%p)->(%p)\n", This, pssState);
 
    if(!pssState)
        return E_POINTER;
 
    if(This->thread_data && This->thread_data->thread_id != GetCurrentThreadId())
        return E_UNEXPECTED;
 
    *pssState = This->ctx ? This->ctx->state : SCRIPTSTATE_UNINITIALIZED;
    return S_OK;
}

◆ JScript_GetScriptThreadID()

static HRESULT WINAPI JScript_GetScriptThreadID	(	IActiveScript *	iface,
		DWORD	dwWin32ThreadId,
		SCRIPTTHREADID *	pstidThread
	)

static

Definition at line 984 of file jscript.c.

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

◆ JScript_GetScriptThreadState()

static HRESULT WINAPI JScript_GetScriptThreadState	(	IActiveScript *	iface,
		SCRIPTTHREADID	stidThread,
		SCRIPTTHREADSTATE *	pstsState
	)

static

Definition at line 992 of file jscript.c.

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

◆ JScript_InterruptScriptThread()

static HRESULT WINAPI JScript_InterruptScriptThread	(	IActiveScript *	iface,
		SCRIPTTHREADID	stidThread,
		const EXCEPINFO *	pexcepinfo,
		DWORD	dwFlags
	)

static

Definition at line 1000 of file jscript.c.

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

◆ JScript_QueryInterface()

static HRESULT WINAPI JScript_QueryInterface	(	IActiveScript *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 643 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
 
    *ppv = NULL;
 
    if(IsEqualGUID(riid, &IID_IUnknown)) {
        TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
        *ppv = &This->IActiveScript_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScript)) {
        TRACE("(%p)->(IID_IActiveScript %p)\n", This, ppv);
        *ppv = &This->IActiveScript_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScriptParse)) {
        TRACE("(%p)->(IID_IActiveScriptParse %p)\n", This, ppv);
        *ppv = &This->IActiveScriptParse_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScriptParseProcedure)) {
        TRACE("(%p)->(IID_IActiveScriptParseProcedure %p)\n", This, ppv);
        *ppv = &This->IActiveScriptParseProcedure2_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScriptParseProcedure2)) {
        TRACE("(%p)->(IID_IActiveScriptParseProcedure2 %p)\n", This, ppv);
        *ppv = &This->IActiveScriptParseProcedure2_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScriptProperty)) {
        TRACE("(%p)->(IID_IActiveScriptProperty %p)\n", This, ppv);
        *ppv = &This->IActiveScriptProperty_iface;
    }else if(IsEqualGUID(riid, &IID_IObjectSafety)) {
        TRACE("(%p)->(IID_IObjectSafety %p)\n", This, ppv);
        *ppv = &This->IObjectSafety_iface;
    }else if(IsEqualGUID(riid, &IID_IVariantChangeType)) {
        TRACE("(%p)->(IID_IVariantChangeType %p)\n", This, ppv);
        *ppv = &This->IVariantChangeType_iface;
    }else if(IsEqualGUID(riid, &IID_IWineJScript)) {
        TRACE("(%p)->(IID_IWineJScript %p)\n", This, ppv);
        *ppv = &This->IWineJScript_iface;
    }
 
    if(*ppv) {
        IUnknown_AddRef((IUnknown*)*ppv);
        return S_OK;
    }
 
    FIXME("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
    return E_NOINTERFACE;
}

◆ JScript_Release()

static ULONG WINAPI JScript_Release ( IActiveScript * iface )

static

Definition at line 697 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
    LONG ref = InterlockedDecrement(&This->ref);
 
    TRACE("(%p) ref=%ld\n", iface, ref);
 
    if(!ref) {
        if(This->ctx && This->ctx->state != SCRIPTSTATE_CLOSED)
            IActiveScript_Close(&This->IActiveScript_iface);
        if(This->ctx) {
            This->ctx->active_script = NULL;
            script_release(This->ctx);
        }
        if(This->thread_data)
            release_thread_data(This->thread_data);
        free(This);
        unlock_module();
    }
 
    return ref;
}

◆ JScript_SetScriptSite()

static HRESULT WINAPI JScript_SetScriptSite	(	IActiveScript *	iface,
		IActiveScriptSite *	pass
	)

static

Definition at line 720 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
    struct thread_data *thread_data;
    named_item_t *item;
    LCID lcid;
    HRESULT hres;
 
    TRACE("(%p)->(%p)\n", This, pass);
 
    if(!pass)
        return E_POINTER;
 
    if(This->site)
        return E_UNEXPECTED;
 
    if(!(thread_data = get_thread_data()))
        return E_OUTOFMEMORY;
 
    if(InterlockedCompareExchangePointer((void**)&This->thread_data, thread_data, NULL)) {
        release_thread_data(thread_data);
        return E_UNEXPECTED;
    }
 
    if(!This->ctx) {
        script_ctx_t *ctx = calloc(1, sizeof(script_ctx_t));
        if(!ctx)
            return E_OUTOFMEMORY;
 
        ctx->ref = 1;
        ctx->state = SCRIPTSTATE_UNINITIALIZED;
        ctx->active_script = &This->IActiveScript_iface;
        ctx->safeopt = This->safeopt;
        ctx->version = This->version;
        ctx->html_mode = This->html_mode;
        ctx->acc = jsval_undefined();
        list_init(&ctx->named_items);
        heap_pool_init(&ctx->tmp_heap);
 
        hres = create_jscaller(ctx);
        if(FAILED(hres)) {
            free(ctx);
            return hres;
        }
 
        thread_data->ref++;
        ctx->thread_data = thread_data;
        ctx->last_match = jsstr_empty();
 
        This->ctx = ctx;
    }
 
    /* Retrieve new dispatches for persistent named items */
    LIST_FOR_EACH_ENTRY(item, &This->ctx->named_items, named_item_t, entry)
    {
        if(!item->disp)
        {
            hres = retrieve_named_item_disp(pass, item);
            if(FAILED(hres)) return hres;
        }
 
        /* For some reason, CODEONLY flag is lost in re-initialized scripts */
        item->flags &= ~SCRIPTITEM_CODEONLY;
    }
 
    This->site = pass;
    IActiveScriptSite_AddRef(This->site);
 
    hres = IActiveScriptSite_GetLCID(This->site, &lcid);
    if(hres == S_OK)
        This->lcid = lcid;
 
    This->ctx->lcid = This->lcid;
 
    hres = init_global(This->ctx);
    if(FAILED(hres))
        return hres;
 
    IActiveScriptSite_AddRef(This->site);
    This->ctx->site = This->site;
 
    if(This->is_initialized)
        change_state(This, SCRIPTSTATE_INITIALIZED);
    return S_OK;
}

◆ JScript_SetScriptState()

static HRESULT WINAPI JScript_SetScriptState	(	IActiveScript *	iface,
		SCRIPTSTATE	ss
	)

static

Definition at line 815 of file jscript.c.

{
    JScript *This = impl_from_IActiveScript(iface);
 
    TRACE("(%p)->(%d)\n", This, ss);
 
    if(This->thread_data && This->thread_data->thread_id != GetCurrentThreadId())
        return E_UNEXPECTED;
 
    if(ss == SCRIPTSTATE_UNINITIALIZED) {
        if(This->ctx && This->ctx->state == SCRIPTSTATE_CLOSED)
            return E_UNEXPECTED;
 
        decrease_state(This, SCRIPTSTATE_UNINITIALIZED);
        list_move_tail(&This->queued_code, &This->persistent_code);
        return S_OK;
    }
 
    if(!This->is_initialized || !This->ctx)
        return E_UNEXPECTED;
 
    switch(ss) {
    case SCRIPTSTATE_STARTED:
    case SCRIPTSTATE_CONNECTED: /* FIXME */
        if(This->ctx->state == SCRIPTSTATE_UNINITIALIZED || This->ctx->state == SCRIPTSTATE_CLOSED)
            return E_UNEXPECTED;
 
        exec_queued_code(This);
        break;
    case SCRIPTSTATE_INITIALIZED:
        FIXME("unimplemented SCRIPTSTATE_INITIALIZED\n");
        return S_OK;
    default:
        FIXME("unimplemented state %d\n", ss);
        return E_NOTIMPL;
    }
 
    change_state(This, ss);
    return S_OK;
}

◆ JScriptError_AddRef()

static ULONG WINAPI JScriptError_AddRef ( IActiveScriptError * iface )

static

Definition at line 219 of file jscript.c.

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

◆ JScriptError_GetExceptionInfo()

static HRESULT WINAPI JScriptError_GetExceptionInfo	(	IActiveScriptError *	iface,
		EXCEPINFO *	excepinfo
	)

static

Definition at line 244 of file jscript.c.

{
    JScriptError *This = impl_from_IActiveScriptError(iface);
 
    TRACE("(%p)->(%p)\n", This, excepinfo);
 
    if(!excepinfo)
        return E_POINTER;
 
    memset(excepinfo, 0, sizeof(*excepinfo));
    excepinfo->scode = This->ei.error;
    if(This->ei.source)
        jsstr_to_bstr(This->ei.source, &excepinfo->bstrSource);
    if(This->ei.message)
        jsstr_to_bstr(This->ei.message, &excepinfo->bstrDescription);
    return S_OK;
}

◆ JScriptError_GetSourceLineText()

static HRESULT WINAPI JScriptError_GetSourceLineText	(	IActiveScriptError *	iface,
		BSTR *	source
	)

static

Definition at line 288 of file jscript.c.

{
    JScriptError *This = impl_from_IActiveScriptError(iface);
 
    TRACE("(%p)->(%p)\n", This, source);
 
    if(!source)
        return E_POINTER;
 
    if(!This->ei.line) {
        *source = NULL;
        return E_FAIL;
    }
 
    return jsstr_to_bstr(This->ei.line, source);
}

◆ JScriptError_GetSourcePosition()

static HRESULT WINAPI JScriptError_GetSourcePosition	(	IActiveScriptError *	iface,
		DWORD *	source_context,
		ULONG *	line,
		LONG *	character
	)

static

Definition at line 262 of file jscript.c.

{
    JScriptError *This = impl_from_IActiveScriptError(iface);
    bytecode_t *code = This->ei.code;
    unsigned line_pos, char_pos;
 
    TRACE("(%p)->(%p %p %p)\n", This, source_context, line, character);
 
    if(!This->ei.code) {
        FIXME("unknown position\n");
        return E_FAIL;
    }
 
    if(source_context)
        *source_context = This->ei.code->source_context;
    if(!line && !character)
        return S_OK;
 
    line_pos = get_location_line(code, This->ei.loc, &char_pos);
    if(line)
        *line = line_pos;
    if(character)
        *character = char_pos;
    return S_OK;
}

◆ JScriptError_QueryInterface()

static HRESULT WINAPI JScriptError_QueryInterface	(	IActiveScriptError *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 199 of file jscript.c.

{
    JScriptError *This = impl_from_IActiveScriptError(iface);
 
    if(IsEqualGUID(riid, &IID_IUnknown)) {
        TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
        *ppv = &This->IActiveScriptError_iface;
    }else if(IsEqualGUID(riid, &IID_IActiveScriptError)) {
        TRACE("(%p)->(IID_IActiveScriptError %p)\n", This, ppv);
        *ppv = &This->IActiveScriptError_iface;
    }else {
        FIXME("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
        *ppv = NULL;
        return E_NOINTERFACE;
    }
 
    IUnknown_AddRef((IUnknown*)*ppv);
    return S_OK;
}

◆ JScriptError_Release()

static ULONG WINAPI JScriptError_Release ( IActiveScriptError * iface )

static

Definition at line 229 of file jscript.c.

{
    JScriptError *This = impl_from_IActiveScriptError(iface);
    LONG ref = InterlockedDecrement(&This->ref);
 
    TRACE("(%p) ref=%ld\n", This, ref);
 
    if(!ref) {
        reset_ei(&This->ei);
        free(This);
    }
 
    return ref;
}

◆ JScriptParse_AddRef()

static ULONG WINAPI JScriptParse_AddRef ( IActiveScriptParse * iface )

static

Definition at line 1045 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ JScriptParse_AddScriptlet()

static HRESULT WINAPI JScriptParse_AddScriptlet	(	IActiveScriptParse *	iface,
		LPCOLESTR	pstrDefaultName,
		LPCOLESTR	pstrCode,
		LPCOLESTR	pstrItemName,
		LPCOLESTR	pstrSubItemName,
		LPCOLESTR	pstrEventName,
		LPCOLESTR	pstrDelimiter,
		CTXARG_T	dwSourceContextCookie,
		ULONG	ulStartingLineNumber,
		DWORD	dwFlags,
		BSTR *	pbstrName,
		EXCEPINFO *	pexcepinfo
	)

static

Definition at line 1072 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
    FIXME("(%p)->(%s %s %s %s %s %s %s %lu %lx %p %p)\n", This, debugstr_w(pstrDefaultName),
          debugstr_w(pstrCode), debugstr_w(pstrItemName), debugstr_w(pstrSubItemName),
          debugstr_w(pstrEventName), debugstr_w(pstrDelimiter), wine_dbgstr_longlong(dwSourceContextCookie),
          ulStartingLineNumber, dwFlags, pbstrName, pexcepinfo);
    return E_NOTIMPL;
}

◆ JScriptParse_InitNew()

static HRESULT WINAPI JScriptParse_InitNew ( IActiveScriptParse * iface )

static

Definition at line 1057 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
 
    TRACE("(%p)\n", This);
 
    if(This->is_initialized)
        return E_UNEXPECTED;
    This->is_initialized = TRUE;
 
    if(This->site)
        change_state(This, SCRIPTSTATE_INITIALIZED);
    return S_OK;
}

◆ JScriptParse_ParseScriptText()

static HRESULT WINAPI JScriptParse_ParseScriptText	(	IActiveScriptParse *	iface,
		LPCOLESTR	pstrCode,
		LPCOLESTR	pstrItemName,
		IUnknown *	punkContext,
		LPCOLESTR	pstrDelimiter,
		CTXARG_T	dwSourceContextCookie,
		ULONG	ulStartingLine,
		DWORD	dwFlags,
		VARIANT *	pvarResult,
		EXCEPINFO *	pexcepinfo
	)

static

Definition at line 1086 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
    named_item_t *item = NULL;
    bytecode_t *code;
    jsexcept_t ei;
    HRESULT hres;
 
    TRACE("(%p)->(%s %s %p %s %s %lu %lx %p %p)\n", This, debugstr_w(pstrCode),
          debugstr_w(pstrItemName), punkContext, debugstr_w(pstrDelimiter),
          wine_dbgstr_longlong(dwSourceContextCookie), ulStartingLine, dwFlags, pvarResult, pexcepinfo);
 
    if(!This->thread_data || This->thread_data->thread_id != GetCurrentThreadId() || This->ctx->state == SCRIPTSTATE_CLOSED)
        return E_UNEXPECTED;
 
    if(pstrItemName) {
        item = lookup_named_item(This->ctx, pstrItemName, 0);
        if(!item) {
            WARN("Unknown context %s\n", debugstr_w(pstrItemName));
            return E_INVALIDARG;
        }
        if(!item->script_obj) item = NULL;
    }
 
    enter_script(This->ctx, &ei);
    hres = compile_script(This->ctx, pstrCode, dwSourceContextCookie, ulStartingLine, NULL, pstrDelimiter,
            (dwFlags & SCRIPTTEXT_ISEXPRESSION) != 0, This->is_encode, item, &code);
    if(FAILED(hres))
        return leave_script(This->ctx, hres);
 
    if(dwFlags & SCRIPTTEXT_ISEXPRESSION) {
        jsval_t r;
 
        hres = exec_global_code(This->ctx, code, &r);
        if(SUCCEEDED(hres)) {
            if(pvarResult)
                hres = jsval_to_variant(r, pvarResult);
            jsval_release(r);
        }
 
        return leave_script(This->ctx, hres);
    }
 
    code->is_persistent = (dwFlags & SCRIPTTEXT_ISPERSISTENT) != 0;
 
    /*
     * Although pvarResult is not really used without SCRIPTTEXT_ISEXPRESSION flag, if it's not NULL,
     * script is executed immediately, even if it's not in started state yet.
     */
    if(!pvarResult && !is_started(This->ctx)) {
        list_add_tail(&This->queued_code, &code->entry);
    }else {
        hres = exec_global_code(This->ctx, code, NULL);
        if(code->is_persistent)
            list_add_tail(&This->persistent_code, &code->entry);
        else
            release_bytecode(code);
    }
 
    if(FAILED(hres = leave_script(This->ctx, hres)))
        return hres;
 
    if(pvarResult)
        V_VT(pvarResult) = VT_EMPTY;
    return S_OK;
}

◆ JScriptParse_QueryInterface()

static HRESULT WINAPI JScriptParse_QueryInterface	(	IActiveScriptParse *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1039 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ JScriptParse_Release()

static ULONG WINAPI JScriptParse_Release ( IActiveScriptParse * iface )

static

Definition at line 1051 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParse(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

◆ JScriptParseProcedure_AddRef()

static ULONG WINAPI JScriptParseProcedure_AddRef ( IActiveScriptParseProcedure2 * iface )

static

Definition at line 1176 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParseProcedure2(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ JScriptParseProcedure_ParseProcedureText()

static HRESULT WINAPI JScriptParseProcedure_ParseProcedureText	(	IActiveScriptParseProcedure2 *	iface,
		LPCOLESTR	pstrCode,
		LPCOLESTR	pstrFormalParams,
		LPCOLESTR	pstrProcedureName,
		LPCOLESTR	pstrItemName,
		IUnknown *	punkContext,
		LPCOLESTR	pstrDelimiter,
		CTXARG_T	dwSourceContextCookie,
		ULONG	ulStartingLineNumber,
		DWORD	dwFlags,
		IDispatch **	ppdisp
	)

static

Definition at line 1188 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParseProcedure2(iface);
    named_item_t *item = NULL;
    bytecode_t *code;
    jsdisp_t *dispex;
    jsexcept_t ei;
    HRESULT hres;
 
    TRACE("(%p)->(%s %s %s %s %p %s %s %lu %lx %p)\n", This, debugstr_w(pstrCode), debugstr_w(pstrFormalParams),
          debugstr_w(pstrProcedureName), debugstr_w(pstrItemName), punkContext, debugstr_w(pstrDelimiter),
          wine_dbgstr_longlong(dwSourceContextCookie), ulStartingLineNumber, dwFlags, ppdisp);
 
    if(!This->thread_data || This->thread_data->thread_id != GetCurrentThreadId() || This->ctx->state == SCRIPTSTATE_CLOSED)
        return E_UNEXPECTED;
 
    if(pstrItemName) {
        item = lookup_named_item(This->ctx, pstrItemName, 0);
        if(!item) {
            WARN("Unknown context %s\n", debugstr_w(pstrItemName));
            return E_INVALIDARG;
        }
        if(!item->script_obj) item = NULL;
    }
 
    enter_script(This->ctx, &ei);
    hres = compile_script(This->ctx, pstrCode, dwSourceContextCookie, ulStartingLineNumber, pstrFormalParams,
                          pstrDelimiter, FALSE, This->is_encode, item, &code);
    if(FAILED(hres))
        return leave_script(This->ctx, hres);
 
    hres = create_source_function(This->ctx, code, &code->global_code, NULL, &dispex);
    release_bytecode(code);
 
    hres = leave_script(This->ctx, hres);
    if(FAILED(hres))
        return hres;
 
    *ppdisp = to_disp(dispex);
    return S_OK;
}

◆ JScriptParseProcedure_QueryInterface()

static HRESULT WINAPI JScriptParseProcedure_QueryInterface	(	IActiveScriptParseProcedure2 *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1170 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParseProcedure2(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ JScriptParseProcedure_Release()

static ULONG WINAPI JScriptParseProcedure_Release ( IActiveScriptParseProcedure2 * iface )

static

Definition at line 1182 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptParseProcedure2(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

◆ JScriptProperty_AddRef()

static ULONG WINAPI JScriptProperty_AddRef ( IActiveScriptProperty * iface )

static

Definition at line 1251 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptProperty(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ JScriptProperty_GetProperty()

static HRESULT WINAPI JScriptProperty_GetProperty	(	IActiveScriptProperty *	iface,
		DWORD	dwProperty,
		VARIANT *	pvarIndex,
		VARIANT *	pvarValue
	)

static

Definition at line 1263 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptProperty(iface);
    FIXME("(%p)->(%lx %p %p)\n", This, dwProperty, pvarIndex, pvarValue);
    return E_NOTIMPL;
}

◆ JScriptProperty_QueryInterface()

static HRESULT WINAPI JScriptProperty_QueryInterface	(	IActiveScriptProperty *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1245 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptProperty(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ JScriptProperty_Release()

static ULONG WINAPI JScriptProperty_Release ( IActiveScriptProperty * iface )

static

Definition at line 1257 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptProperty(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

◆ JScriptProperty_SetProperty()

static HRESULT WINAPI JScriptProperty_SetProperty	(	IActiveScriptProperty *	iface,
		DWORD	dwProperty,
		VARIANT *	pvarIndex,
		VARIANT *	pvarValue
	)

static

Definition at line 1271 of file jscript.c.

{
    JScript *This = impl_from_IActiveScriptProperty(iface);
 
    TRACE("(%p)->(%lx %s %s)\n", This, dwProperty, debugstr_variant(pvarIndex), debugstr_variant(pvarValue));
 
    if(pvarIndex)
        FIXME("unsupported pvarIndex\n");
 
    switch(dwProperty) {
    case SCRIPTPROP_INVOKEVERSIONING:
        if(V_VT(pvarValue) != VT_I4 || V_I4(pvarValue) < 0
           || (V_I4(pvarValue) > 15 && !(V_I4(pvarValue) & SCRIPTLANGUAGEVERSION_HTML))) {
            WARN("invalid value %s\n", debugstr_variant(pvarValue));
            return E_INVALIDARG;
        }
 
        This->version = V_I4(pvarValue) & 0x1ff;
        This->html_mode = (V_I4(pvarValue) & SCRIPTLANGUAGEVERSION_HTML) != 0;
        break;
    default:
        FIXME("Unimplemented property %lx\n", dwProperty);
        return E_NOTIMPL;
    }
 
    return S_OK;
}

◆ JScriptSafety_AddRef()

static ULONG WINAPI JScriptSafety_AddRef ( IObjectSafety * iface )

static

Definition at line 1319 of file jscript.c.

{
    JScript *This = impl_from_IObjectSafety(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ JScriptSafety_GetInterfaceSafetyOptions()

static HRESULT WINAPI JScriptSafety_GetInterfaceSafetyOptions	(	IObjectSafety *	iface,
		REFIID	riid,
		DWORD *	pdwSupportedOptions,
		DWORD *	pdwEnabledOptions
	)

static

Definition at line 1333 of file jscript.c.

{
    JScript *This = impl_from_IObjectSafety(iface);
 
    TRACE("(%p)->(%s %p %p)\n", This, debugstr_guid(riid), pdwSupportedOptions, pdwEnabledOptions);
 
    if(!pdwSupportedOptions || !pdwEnabledOptions)
        return E_POINTER;
 
    *pdwSupportedOptions = SUPPORTED_OPTIONS;
    *pdwEnabledOptions = This->safeopt;
 
    return S_OK;
}

◆ JScriptSafety_QueryInterface()

static HRESULT WINAPI JScriptSafety_QueryInterface	(	IObjectSafety *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1313 of file jscript.c.

{
    JScript *This = impl_from_IObjectSafety(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ JScriptSafety_Release()

static ULONG WINAPI JScriptSafety_Release ( IObjectSafety * iface )

static

Definition at line 1325 of file jscript.c.

{
    JScript *This = impl_from_IObjectSafety(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

◆ JScriptSafety_SetInterfaceSafetyOptions()

static HRESULT WINAPI JScriptSafety_SetInterfaceSafetyOptions	(	IObjectSafety *	iface,
		REFIID	riid,
		DWORD	dwOptionSetMask,
		DWORD	dwEnabledOptions
	)

static

Definition at line 1349 of file jscript.c.

{
    JScript *This = impl_from_IObjectSafety(iface);
 
    TRACE("(%p)->(%s %lx %lx)\n", This, debugstr_guid(riid), dwOptionSetMask, dwEnabledOptions);
 
    if(dwOptionSetMask & ~SUPPORTED_OPTIONS)
        return E_FAIL;
 
    This->safeopt = (dwEnabledOptions & dwOptionSetMask) | (This->safeopt & ~dwOptionSetMask) | INTERFACE_USES_DISPEX;
    return S_OK;
}

◆ leave_script()

HRESULT leave_script	(	script_ctx_t *	ctx,
		HRESULT	result
	)

Definition at line 348 of file jscript.c.

{
    jsexcept_t *ei = ctx->ei;
    BOOL enter_notified = ei->enter_notified;
    JScriptError *error;
 
    TRACE("ctx %p ei %p prev %p\n", ctx, ei, ei->prev);
 
    ctx->ei = ei->prev;
    if(result == DISP_E_EXCEPTION) {
        result = ei->error;
    }else {
        reset_ei(ei);
        ei->error = result;
    }
    if(FAILED(result)) {
        WARN("%08lx\n", result);
        if(ctx->site && (error = malloc(sizeof(*error)))) {
            HRESULT hres;
 
            error->IActiveScriptError_iface.lpVtbl = &JScriptErrorVtbl;
            error->ref = 1;
            error->ei = *ei;
            memset(ei, 0, sizeof(*ei));
 
            hres = IActiveScriptSite_OnScriptError(ctx->site, &error->IActiveScriptError_iface);
            IActiveScriptError_Release(&error->IActiveScriptError_iface);
            if(hres == S_OK)
                result = SCRIPT_E_REPORTED;
        }
    }
    if(enter_notified && ctx->site)
        IActiveScriptSite_OnLeaveScript(ctx->site);
    reset_ei(ei);
    return result;
}

Referenced by DispatchEx_InvokeEx(), exec_queued_code(), JScriptParse_ParseScriptText(), JScriptParseProcedure_ParseProcedureText(), variant_change_type(), and VariantChangeType_ChangeType().

◆ lookup_named_item()

named_item_t * lookup_named_item	(	script_ctx_t *	ctx,
		const WCHAR *	item_name,
		unsigned	flags
	)

Definition at line 162 of file jscript.c.

{
    named_item_t *item;
    HRESULT hr;
 
    LIST_FOR_EACH_ENTRY(item, &ctx->named_items, named_item_t, entry) {
        if((item->flags & flags) == flags && !wcscmp(item->name, item_name)) {
            if(!item->script_obj && !(item->flags & SCRIPTITEM_GLOBALMEMBERS)) {
                hr = create_named_item_script_obj(ctx, item);
                if(FAILED(hr)) return NULL;
            }
 
            if(!item->disp && (flags || !(item->flags & SCRIPTITEM_CODEONLY))) {
                hr = retrieve_named_item_disp(ctx->site, item);
                if(FAILED(hr)) continue;
            }
 
            return item;
        }
    }
 
    return NULL;
}

Referenced by compile_script(), identifier_eval(), JScript_GetScriptDispatch(), JScriptParse_ParseScriptText(), JScriptParseProcedure_ParseProcedureText(), and lookup_identifier().

◆ release_named_item()

void release_named_item ( named_item_t * item )

Definition at line 186 of file jscript.c.

{
    if(--item->ref) return;
 
    free(item->name);
    free(item);
}

Referenced by decrease_state(), release_bytecode(), release_named_item_list(), and release_vbscode().

◆ release_named_item_list()

static void release_named_item_list ( JScript * This )

static

Definition at line 417 of file jscript.c.

{
    while(!list_empty(&This->ctx->named_items)) {
        named_item_t *iter = LIST_ENTRY(list_head(&This->ctx->named_items), named_item_t, entry);
        list_remove(&iter->entry);
        release_named_item(iter);
    }
}

Referenced by JScript_Close().

◆ release_named_item_script_obj()

static void release_named_item_script_obj ( named_item_t * item )

static

Definition at line 130 of file jscript.c.

{
    if(!item->script_obj) return;
 
    jsdisp_release(item->script_obj);
    item->script_obj = NULL;
}

Referenced by decrease_state(), and release_persistent_script_objs().

◆ release_persistent_script_objs()

static void release_persistent_script_objs ( JScript * This )

static

Definition at line 408 of file jscript.c.

{
    bytecode_t *iter;
 
    LIST_FOR_EACH_ENTRY(iter, &This->persistent_code, bytecode_t, entry)
        if(iter->named_item)
            release_named_item_script_obj(iter->named_item);
}

Referenced by decrease_state().

◆ reset_ei()

void reset_ei ( jsexcept_t * ei )

Definition at line 314 of file jscript.c.

{
    ei->error = S_OK;
    if(ei->valid_value) {
        jsval_release(ei->value);
        ei->valid_value = FALSE;
    }
    if(ei->code) {
        release_bytecode(ei->code);
        ei->code = NULL;
        ei->loc = 0;
    }
    if(ei->source) {
        jsstr_release(ei->source);
        ei->source = NULL;
    }
    if(ei->message) {
        jsstr_release(ei->message);
        ei->message = NULL;
    }
    if(ei->line) {
        jsstr_release(ei->line);
        ei->line = NULL;
    }
}

Referenced by handle_dispatch_exception(), JScriptError_Release(), leave_script(), set_error_value(), and throw_error().

◆ retrieve_named_item_disp()

static HRESULT retrieve_named_item_disp	(	IActiveScriptSite *	site,
		named_item_t *	item
	)

static

Definition at line 138 of file jscript.c.

{
    IUnknown *unk;
    HRESULT hr;
 
    if(!site)
        return E_UNEXPECTED;
 
    hr = IActiveScriptSite_GetItemInfo(site, item->name, SCRIPTINFO_IUNKNOWN, &unk, NULL);
    if(FAILED(hr)) {
        WARN("GetItemInfo failed: %08lx\n", hr);
        return hr;
    }
 
    hr = IUnknown_QueryInterface(unk, &IID_IDispatch, (void**)&item->disp);
    IUnknown_Release(unk);
    if(FAILED(hr)) {
        WARN("object does not implement IDispatch\n");
        return hr;
    }
 
    return S_OK;
}

Referenced by JScript_SetScriptSite(), and lookup_named_item().

◆ script_globals_release()

static void script_globals_release ( script_ctx_t * ctx )

static

Definition at line 96 of file jscript.c.

{
    unsigned i;
    for(i = 0; i < ARRAY_SIZE(ctx->global_objects); i++) {
        if(ctx->global_objects[i]) {
            jsdisp_release(ctx->global_objects[i]);
            ctx->global_objects[i] = NULL;
        }
    }
}

Referenced by decrease_state().

◆ script_release()

void script_release ( script_ctx_t * ctx )

Definition at line 75 of file jscript.c.

{
    if(--ctx->ref)
        return;
 
    jsval_release(ctx->acc);
    if(ctx->cc)
        release_cc(ctx->cc);
    heap_pool_free(&ctx->tmp_heap);
    if(ctx->last_match)
        jsstr_release(ctx->last_match);
    assert(!ctx->stack_top);
    free(ctx->stack);
 
    ctx->jscaller->ctx = NULL;
    IServiceProvider_Release(&ctx->jscaller->IServiceProvider_iface);
 
    release_thread_data(ctx->thread_data);
    free(ctx);
}

Referenced by JScript_Release(), and jsdisp_free().

◆ VariantChangeType_AddRef()

static ULONG WINAPI VariantChangeType_AddRef ( IVariantChangeType * iface )

static

Definition at line 1382 of file jscript.c.

{
    JScript *This = impl_from_IVariantChangeType(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ VariantChangeType_ChangeType()

static HRESULT WINAPI VariantChangeType_ChangeType	(	IVariantChangeType *	iface,
		VARIANT *	dst,
		VARIANT *	src,
		LCID	lcid,
		VARTYPE	vt
	)

static

Definition at line 1394 of file jscript.c.

{
    JScript *This = impl_from_IVariantChangeType(iface);
    jsexcept_t ei;
    VARIANT res;
    HRESULT hres;
 
    TRACE("(%p)->(%p %s %lx %s)\n", This, dst, debugstr_variant(src), lcid, debugstr_vt(vt));
 
    if(!This->ctx) {
        FIXME("Object uninitialized\n");
        return E_UNEXPECTED;
    }
 
    enter_script(This->ctx, &ei);
    hres = variant_change_type(This->ctx, &res, src, vt);
    hres = leave_script(This->ctx, hres);
    if(FAILED(hres))
        return hres;
 
    hres = VariantClear(dst);
    if(FAILED(hres)) {
        VariantClear(&res);
        return hres;
    }
 
    *dst = res;
    return S_OK;
}

◆ VariantChangeType_QueryInterface()

static HRESULT WINAPI VariantChangeType_QueryInterface	(	IVariantChangeType *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1376 of file jscript.c.

{
    JScript *This = impl_from_IVariantChangeType(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ VariantChangeType_Release()

static ULONG WINAPI VariantChangeType_Release ( IVariantChangeType * iface )

static

Definition at line 1388 of file jscript.c.

{
    JScript *This = impl_from_IVariantChangeType(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

◆ WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL ( jscript )

◆ WineJScript_AddRef()

static ULONG WINAPI WineJScript_AddRef ( IWineJScript * iface )

static

Definition at line 1442 of file jscript.c.

{
    JScript *This = impl_from_IWineJScript(iface);
    return IActiveScript_AddRef(&This->IActiveScript_iface);
}

◆ WineJScript_InitHostConstructor()

static HRESULT WINAPI WineJScript_InitHostConstructor	(	IWineJScript *	iface,
		IWineJSDispatchHost *	constr,
		IWineJSDispatch *	prototype,
		IWineJSDispatch **	ret
	)

static

Definition at line 1461 of file jscript.c.

{
    JScript *This = impl_from_IWineJScript(iface);
    return init_host_constructor(This->ctx, constr, prototype, ret);
}

◆ WineJScript_InitHostObject()

static HRESULT WINAPI WineJScript_InitHostObject	(	IWineJScript *	iface,
		IWineJSDispatchHost *	host_obj,
		IWineJSDispatch *	prototype,
		UINT32	flags,
		IWineJSDispatch **	ret
	)

static

Definition at line 1454 of file jscript.c.

{
    JScript *This = impl_from_IWineJScript(iface);
    return init_host_object(This->ctx, host_obj, prototype, flags, ret);
}

◆ WineJScript_QueryInterface()

static HRESULT WINAPI WineJScript_QueryInterface	(	IWineJScript *	iface,
		REFIID	riid,
		void **	ppv
	)

static

Definition at line 1436 of file jscript.c.

{
    JScript *This = impl_from_IWineJScript(iface);
    return IActiveScript_QueryInterface(&This->IActiveScript_iface, riid, ppv);
}

◆ WineJScript_Release()

static ULONG WINAPI WineJScript_Release ( IWineJScript * iface )

static

Definition at line 1448 of file jscript.c.

{
    JScript *This = impl_from_IWineJScript(iface);
    return IActiveScript_Release(&This->IActiveScript_iface);
}

Variable Documentation

◆ AXSiteVtbl

IServiceProviderVtbl AXSiteVtbl

static

Initial value:

= {
    AXSite_QueryInterface,
    AXSite_AddRef,
    AXSite_Release,
    AXSite_QueryService
}

Definition at line 607 of file jscript.c.

Referenced by create_ax_site().

◆ JScriptErrorVtbl

const IActiveScriptErrorVtbl JScriptErrorVtbl

static

Initial value:

= {
    JScriptError_QueryInterface,
    JScriptError_AddRef,
    JScriptError_Release,
    JScriptError_GetExceptionInfo,
    JScriptError_GetSourcePosition,
    JScriptError_GetSourceLineText
}

Definition at line 305 of file jscript.c.

Referenced by leave_script().

◆ JScriptParseProcedureVtbl

const IActiveScriptParseProcedure2Vtbl JScriptParseProcedureVtbl

static

Initial value:

= {
    JScriptParseProcedure_QueryInterface,
    JScriptParseProcedure_AddRef,
    JScriptParseProcedure_Release,
    JScriptParseProcedure_ParseProcedureText,
}

Definition at line 1233 of file jscript.c.

Referenced by create_jscript_object().

◆ JScriptParseVtbl

const IActiveScriptParseVtbl JScriptParseVtbl

static

Initial value:

= {
    JScriptParse_QueryInterface,
    JScriptParse_AddRef,
    JScriptParse_Release,
    JScriptParse_InitNew,
    JScriptParse_AddScriptlet,
    JScriptParse_ParseScriptText
}

Definition at line 1156 of file jscript.c.

Referenced by create_jscript_object().

◆ JScriptPropertyVtbl

const IActiveScriptPropertyVtbl JScriptPropertyVtbl

static

Initial value:

= {
    JScriptProperty_QueryInterface,
    JScriptProperty_AddRef,
    JScriptProperty_Release,
    JScriptProperty_GetProperty,
    JScriptProperty_SetProperty
}

Definition at line 1300 of file jscript.c.

Referenced by create_jscript_object().

◆ JScriptSafetyVtbl

const IObjectSafetyVtbl JScriptSafetyVtbl

static

Initial value:

= {
    JScriptSafety_QueryInterface,
    JScriptSafety_AddRef,
    JScriptSafety_Release,
    JScriptSafety_GetInterfaceSafetyOptions,
    JScriptSafety_SetInterfaceSafetyOptions
}

Definition at line 1363 of file jscript.c.

Referenced by create_jscript_object().

◆ JScriptVtbl

const IActiveScriptVtbl JScriptVtbl

static

Initial value:

= {
    JScript_QueryInterface,
    JScript_AddRef,
    JScript_Release,
    JScript_SetScriptSite,
    JScript_GetScriptSite,
    JScript_SetScriptState,
    JScript_GetScriptState,
    JScript_Close,
    JScript_AddNamedItem,
    JScript_AddTypeLib,
    JScript_GetScriptDispatch,
    JScript_GetCurrentScriptThreadID,
    JScript_GetScriptThreadID,
    JScript_GetScriptThreadState,
    JScript_InterruptScriptThread,
    JScript_Clone
}

Definition at line 1015 of file jscript.c.

Referenced by create_jscript_object().

◆ VariantChangeTypeVtbl

const IVariantChangeTypeVtbl VariantChangeTypeVtbl

static

Initial value:

= {
    VariantChangeType_QueryInterface,
    VariantChangeType_AddRef,
    VariantChangeType_Release,
    VariantChangeType_ChangeType
}

Definition at line 1424 of file jscript.c.

Referenced by create_jscript_object().

◆ WineJScriptVtbl

const IWineJScriptVtbl WineJScriptVtbl

static

Initial value:

= {
    WineJScript_QueryInterface,
    WineJScript_AddRef,
    WineJScript_Release,
    WineJScript_InitHostObject,
    WineJScript_InitHostConstructor,
}

Definition at line 1468 of file jscript.c.

Referenced by create_jscript_object().

Classes

Macros

Functions

Variables

Macro Definition Documentation

◆ CTXARG_T

◆ IActiveScriptParseProcedure2Vtbl

◆ IActiveScriptParseVtbl

◆ SUPPORTED_OPTIONS

Function Documentation

◆ AXSite_AddRef()

◆ AXSite_QueryInterface()

◆ AXSite_QueryService()

◆ AXSite_Release()

◆ change_state()

◆ clear_persistent_code_list()

◆ clear_script_queue()

◆ create_ax_site()

◆ create_jscript_object()

◆ create_named_item_script_obj()

◆ decrease_state()

◆ enter_script()

◆ exec_global_code()

◆ exec_queued_code()

◆ impl_from_IActiveScript()

◆ impl_from_IActiveScriptError()

◆ impl_from_IActiveScriptParse()

◆ impl_from_IActiveScriptParseProcedure2()

◆ impl_from_IActiveScriptProperty()

◆ impl_from_IObjectSafety()

◆ impl_from_IServiceProvider()

◆ impl_from_IVariantChangeType()

◆ impl_from_IWineJScript()

◆ is_started()

◆ JScript_AddNamedItem()

◆ JScript_AddRef()

◆ JScript_AddTypeLib()

◆ JScript_Clone()

◆ JScript_Close()

◆ JScript_GetCurrentScriptThreadID()

◆ JScript_GetScriptDispatch()

◆ JScript_GetScriptSite()

◆ JScript_GetScriptState()

◆ JScript_GetScriptThreadID()

◆ JScript_GetScriptThreadState()

◆ JScript_InterruptScriptThread()

◆ JScript_QueryInterface()

◆ JScript_Release()

◆ JScript_SetScriptSite()

◆ JScript_SetScriptState()

◆ JScriptError_AddRef()

◆ JScriptError_GetExceptionInfo()

◆ JScriptError_GetSourceLineText()

◆ JScriptError_GetSourcePosition()

◆ JScriptError_QueryInterface()

◆ JScriptError_Release()

◆ JScriptParse_AddRef()

◆ JScriptParse_AddScriptlet()

◆ JScriptParse_InitNew()

◆ JScriptParse_ParseScriptText()

◆ JScriptParse_QueryInterface()

◆ JScriptParse_Release()

◆ JScriptParseProcedure_AddRef()

◆ JScriptParseProcedure_ParseProcedureText()

◆ JScriptParseProcedure_QueryInterface()

◆ JScriptParseProcedure_Release()

◆ JScriptProperty_AddRef()

◆ JScriptProperty_GetProperty()

◆ JScriptProperty_QueryInterface()

◆ JScriptProperty_Release()

◆ JScriptProperty_SetProperty()

◆ JScriptSafety_AddRef()

◆ JScriptSafety_GetInterfaceSafetyOptions()

◆ JScriptSafety_QueryInterface()

◆ JScriptSafety_Release()

◆ JScriptSafety_SetInterfaceSafetyOptions()

◆ leave_script()

◆ lookup_named_item()

◆ release_named_item()

◆ release_named_item_list()