script.c File Reference

#include "mshtml_private.h"
#include <activdbg.h>

Include dependency graph for script.c:

Go to the source code of this file.

Classes
struct	ScriptHost
struct	fire_readystatechange_task_t
struct	ScriptBSC

Macros
#define	CTXARG_T   DWORD
#define	IActiveScriptSiteDebugVtbl   IActiveScriptSiteDebug32Vtbl
#define	IActiveScriptParse_Release   IActiveScriptParse32_Release
#define	IActiveScriptParse_InitNew   IActiveScriptParse32_InitNew
#define	IActiveScriptParse_ParseScriptText   IActiveScriptParse32_ParseScriptText
#define	IActiveScriptParseProcedure2_Release   IActiveScriptParseProcedure2_32_Release
#define	IActiveScriptParseProcedure2_ParseProcedureText   IActiveScriptParseProcedure2_32_ParseProcedureText

Functions
static void	set_script_prop (ScriptHost *script_host, DWORD property, VARIANT *val)
static BOOL	init_script_engine (ScriptHost *script_host)
static void	release_script_engine (ScriptHost *This)
void	connect_scripts (HTMLInnerWindow *window)
static ScriptHost *	impl_from_IActiveScriptSite (IActiveScriptSite *iface)
static HRESULT WINAPI	ActiveScriptSite_QueryInterface (IActiveScriptSite *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ActiveScriptSite_AddRef (IActiveScriptSite *iface)
static ULONG WINAPI	ActiveScriptSite_Release (IActiveScriptSite *iface)
static HRESULT WINAPI	ActiveScriptSite_GetLCID (IActiveScriptSite *iface, LCID *plcid)
static HRESULT WINAPI	ActiveScriptSite_GetItemInfo (IActiveScriptSite *iface, LPCOLESTR pstrName, DWORD dwReturnMask, IUnknown **ppiunkItem, ITypeInfo **ppti)
static HRESULT WINAPI	ActiveScriptSite_GetDocVersionString (IActiveScriptSite *iface, BSTR *pbstrVersion)
static HRESULT WINAPI	ActiveScriptSite_OnScriptTerminate (IActiveScriptSite *iface, const VARIANT *pvarResult, const EXCEPINFO *pexcepinfo)
static HRESULT WINAPI	ActiveScriptSite_OnStateChange (IActiveScriptSite *iface, SCRIPTSTATE ssScriptState)
static HRESULT WINAPI	ActiveScriptSite_OnScriptError (IActiveScriptSite *iface, IActiveScriptError *pscripterror)
static HRESULT WINAPI	ActiveScriptSite_OnEnterScript (IActiveScriptSite *iface)
static HRESULT WINAPI	ActiveScriptSite_OnLeaveScript (IActiveScriptSite *iface)
static ScriptHost *	impl_from_IActiveScriptSiteInterruptPoll (IActiveScriptSiteInterruptPoll *iface)
static HRESULT WINAPI	ActiveScriptSiteInterruptPoll_QueryInterface (IActiveScriptSiteInterruptPoll *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ActiveScriptSiteInterruptPoll_AddRef (IActiveScriptSiteInterruptPoll *iface)
static ULONG WINAPI	ActiveScriptSiteInterruptPoll_Release (IActiveScriptSiteInterruptPoll *iface)
static HRESULT WINAPI	ActiveScriptSiteInterruptPoll_QueryContinue (IActiveScriptSiteInterruptPoll *iface)
static ScriptHost *	impl_from_IActiveScriptSiteWindow (IActiveScriptSiteWindow *iface)
static HRESULT WINAPI	ActiveScriptSiteWindow_QueryInterface (IActiveScriptSiteWindow *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ActiveScriptSiteWindow_AddRef (IActiveScriptSiteWindow *iface)
static ULONG WINAPI	ActiveScriptSiteWindow_Release (IActiveScriptSiteWindow *iface)
static HRESULT WINAPI	ActiveScriptSiteWindow_GetWindow (IActiveScriptSiteWindow *iface, HWND *phwnd)
static HRESULT WINAPI	ActiveScriptSiteWindow_EnableModeless (IActiveScriptSiteWindow *iface, BOOL fEnable)
static ScriptHost *	impl_from_IActiveScriptSiteUIControl (IActiveScriptSiteUIControl *iface)
static HRESULT WINAPI	ActiveScriptSiteUIControl_QueryInterface (IActiveScriptSiteUIControl *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ActiveScriptSiteUIControl_AddRef (IActiveScriptSiteUIControl *iface)
static ULONG WINAPI	ActiveScriptSiteUIControl_Release (IActiveScriptSiteUIControl *iface)
static HRESULT WINAPI	ActiveScriptSiteUIControl_GetUIBehavior (IActiveScriptSiteUIControl *iface, SCRIPTUICITEM UicItem, SCRIPTUICHANDLING *pUicHandling)
static ScriptHost *	impl_from_IActiveScriptSiteDebug (IActiveScriptSiteDebug *iface)
static HRESULT WINAPI	ActiveScriptSiteDebug_QueryInterface (IActiveScriptSiteDebug *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ActiveScriptSiteDebug_AddRef (IActiveScriptSiteDebug *iface)
static ULONG WINAPI	ActiveScriptSiteDebug_Release (IActiveScriptSiteDebug *iface)
static HRESULT WINAPI	ActiveScriptSiteDebug_GetDocumentContextFromPosition (IActiveScriptSiteDebug *iface, CTXARG_T dwSourceContext, ULONG uCharacterOffset, ULONG uNumChars, IDebugDocumentContext **ppsc)
static HRESULT WINAPI	ActiveScriptSiteDebug_GetApplication (IActiveScriptSiteDebug *iface, IDebugApplication **ppda)
static HRESULT WINAPI	ActiveScriptSiteDebug_GetRootApplicationNode (IActiveScriptSiteDebug *iface, IDebugApplicationNode **ppdanRoot)
static HRESULT WINAPI	ActiveScriptSiteDebug_OnScriptErrorDebug (IActiveScriptSiteDebug *iface, IActiveScriptErrorDebug *pErrorDebug, BOOL *pfEnterDebugger, BOOL *pfCallOnScriptErrorWhenContinuing)
static ScriptHost *	impl_from_IServiceProvider (IServiceProvider *iface)
static HRESULT WINAPI	ASServiceProvider_QueryInterface (IServiceProvider *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ASServiceProvider_AddRef (IServiceProvider *iface)
static ULONG WINAPI	ASServiceProvider_Release (IServiceProvider *iface)
static HRESULT WINAPI	ASServiceProvider_QueryService (IServiceProvider *iface, REFGUID guidService, REFIID riid, void **ppv)
static ScriptHost *	create_script_host (HTMLInnerWindow *window, const GUID *guid)
static void	fire_readystatechange_proc (task_t *_task)
static void	fire_readystatechange_task_destr (task_t *_task)
static void	set_script_elem_readystate (HTMLScriptElement *script_elem, READYSTATE readystate)
static void	parse_elem_text (ScriptHost *script_host, HTMLScriptElement *script_elem, LPCWSTR text)
static ScriptBSC *	impl_from_BSCallback (BSCallback *iface)
static void	ScriptBSC_destroy (BSCallback *bsc)
static HRESULT	ScriptBSC_init_bindinfo (BSCallback *bsc)
static HRESULT	ScriptBSC_start_binding (BSCallback *bsc)
static HRESULT	ScriptBSC_stop_binding (BSCallback *bsc, HRESULT result)
static HRESULT	ScriptBSC_read_data (BSCallback *bsc, IStream *stream)
static HRESULT	ScriptBSC_on_progress (BSCallback *bsc, ULONG status_code, LPCWSTR status_text)
static HRESULT	ScriptBSC_on_response (BSCallback *bsc, DWORD response_code, LPCWSTR response_headers)
static HRESULT	ScriptBSC_beginning_transaction (BSCallback *bsc, WCHAR **additional_headers)
static HRESULT	bind_script_to_text (HTMLInnerWindow *window, IUri *uri, HTMLScriptElement *script_elem, WCHAR **ret)
static void	parse_extern_script (ScriptHost *script_host, HTMLScriptElement *script_elem, LPCWSTR src)
static void	parse_inline_script (ScriptHost *script_host, HTMLScriptElement *script_elem)
static void	parse_script_elem (ScriptHost *script_host, HTMLScriptElement *script_elem)
static GUID	get_default_script_guid (HTMLInnerWindow *window)
static BOOL	get_guid_from_type (LPCWSTR type, GUID *guid)
static BOOL	get_guid_from_language (LPCWSTR type, GUID *guid)
static BOOL	get_script_guid (HTMLInnerWindow *window, nsIDOMHTMLScriptElement *nsscript, GUID *guid)
static ScriptHost *	get_script_host (HTMLInnerWindow *window, const GUID *guid)
static ScriptHost *	get_elem_script_host (HTMLInnerWindow *window, HTMLScriptElement *script_elem)
void	doc_insert_script (HTMLInnerWindow *window, HTMLScriptElement *script_elem)
IDispatch *	script_parse_event (HTMLInnerWindow *window, LPCWSTR text)
HRESULT	exec_script (HTMLInnerWindow *window, const WCHAR *code, const WCHAR *lang, VARIANT *ret)
IDispatch *	get_script_disp (ScriptHost *script_host)
static EventTarget *	find_event_target (HTMLDocumentNode *doc, HTMLScriptElement *script_elem)
static BOOL	parse_event_str (WCHAR *event, const WCHAR **args)
static IDispatch *	parse_event_elem (HTMLDocumentNode *doc, HTMLScriptElement *script_elem, WCHAR **ret_event)
void	bind_event_scripts (HTMLDocumentNode *doc)
BOOL	find_global_prop (HTMLInnerWindow *window, BSTR name, DWORD flags, ScriptHost **ret_host, DISPID *ret_id)
static BOOL	is_jscript_available (void)
void	set_script_mode (HTMLOuterWindow *window, SCRIPTMODE mode)
void	release_script_hosts (HTMLInnerWindow *window)

Variables
static const WCHAR	documentW [] = {'d','o','c','u','m','e','n','t',0}
static const WCHAR	windowW [] = {'w','i','n','d','o','w',0}
static const WCHAR	script_endW [] = {'<','/','S','C','R','I','P','T','>',0}
static const WCHAR	emptyW [] = {0}
static const IActiveScriptSiteVtbl	ActiveScriptSiteVtbl
static const IActiveScriptSiteInterruptPollVtbl	ActiveScriptSiteInterruptPollVtbl
static const IActiveScriptSiteWindowVtbl	ActiveScriptSiteWindowVtbl
static const IActiveScriptSiteUIControlVtbl	ActiveScriptSiteUIControlVtbl
static const IActiveScriptSiteDebugVtbl	ActiveScriptSiteDebugVtbl
static const IServiceProviderVtbl	ASServiceProviderVtbl
static const BSCallbackVtbl	ScriptBSCVtbl

Macro Definition Documentation

CTXARG_T

#define CTXARG_T   DWORD

Definition at line 36 of file script.c.

IActiveScriptParse_InitNew

#define IActiveScriptParse_InitNew   IActiveScriptParse32_InitNew

Definition at line 40 of file script.c.

IActiveScriptParse_ParseScriptText

#define IActiveScriptParse_ParseScriptText   IActiveScriptParse32_ParseScriptText

Definition at line 41 of file script.c.

IActiveScriptParse_Release

#define IActiveScriptParse_Release   IActiveScriptParse32_Release

Definition at line 39 of file script.c.

IActiveScriptParseProcedure2_ParseProcedureText

#define IActiveScriptParseProcedure2_ParseProcedureText   IActiveScriptParseProcedure2_32_ParseProcedureText

Definition at line 43 of file script.c.

IActiveScriptParseProcedure2_Release

#define IActiveScriptParseProcedure2_Release   IActiveScriptParseProcedure2_32_Release

Definition at line 42 of file script.c.

IActiveScriptSiteDebugVtbl

#define IActiveScriptSiteDebugVtbl   IActiveScriptSiteDebug32Vtbl

Definition at line 37 of file script.c.

Function Documentation

ActiveScriptSite_AddRef()

static ULONG WINAPI ActiveScriptSite_AddRef ( IActiveScriptSite *  iface )

static

Definition at line 267 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
    LONG ref = InterlockedIncrement(&This->ref);
 
    TRACE("(%p) ref=%d\n", This, ref);
 
    return ref;
}

ActiveScriptSite_GetDocVersionString()

static HRESULT WINAPI ActiveScriptSite_GetDocVersionString ( IActiveScriptSite *  iface, BSTR *  pbstrVersion  )

static

Definition at line 331 of file script.c.

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

ActiveScriptSite_GetItemInfo()

static HRESULT WINAPI ActiveScriptSite_GetItemInfo ( IActiveScriptSite *  iface, LPCOLESTR  pstrName, DWORD  dwReturnMask, IUnknown **  ppiunkItem, ITypeInfo **  ppti  )

static

Definition at line 304 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    TRACE("(%p)->(%s %x %p %p)\n", This, debugstr_w(pstrName), dwReturnMask, ppiunkItem, ppti);
 
    if(dwReturnMask != SCRIPTINFO_IUNKNOWN) {
        FIXME("Unsupported mask %x\n", dwReturnMask);
        return E_NOTIMPL;
    }
 
    *ppiunkItem = NULL;
 
    if(strcmpW(pstrName, windowW))
        return DISP_E_MEMBERNOTFOUND;
 
    if(!This->window)
        return E_FAIL;
 
    /* FIXME: Return proxy object */
    *ppiunkItem = (IUnknown*)&This->window->base.IHTMLWindow2_iface;
    IUnknown_AddRef(*ppiunkItem);
 
    return S_OK;
}

ActiveScriptSite_GetLCID()

static HRESULT WINAPI ActiveScriptSite_GetLCID ( IActiveScriptSite *  iface, LCID *  plcid  )

static

Definition at line 294 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    TRACE("(%p)->(%p)\n", This, plcid);
 
    *plcid = GetUserDefaultLCID();
    return S_OK;
}

ActiveScriptSite_OnEnterScript()

static HRESULT WINAPI ActiveScriptSite_OnEnterScript ( IActiveScriptSite *  iface )

static

Definition at line 363 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    TRACE("(%p)->()\n", This);
 
    return S_OK;
}

ActiveScriptSite_OnLeaveScript()

static HRESULT WINAPI ActiveScriptSite_OnLeaveScript ( IActiveScriptSite *  iface )

static

Definition at line 372 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    TRACE("(%p)->()\n", This);
 
    return S_OK;
}

ActiveScriptSite_OnScriptError()

static HRESULT WINAPI ActiveScriptSite_OnScriptError ( IActiveScriptSite *  iface, IActiveScriptError *  pscripterror  )

static

Definition at line 356 of file script.c.

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

ActiveScriptSite_OnScriptTerminate()

static HRESULT WINAPI ActiveScriptSite_OnScriptTerminate ( IActiveScriptSite *  iface, const VARIANT *  pvarResult, const EXCEPINFO *  pexcepinfo  )

static

Definition at line 338 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
    FIXME("(%p)->(%p %p)\n", This, pvarResult, pexcepinfo);
    return E_NOTIMPL;
}

ActiveScriptSite_OnStateChange()

static HRESULT WINAPI ActiveScriptSite_OnStateChange ( IActiveScriptSite *  iface, SCRIPTSTATE  ssScriptState  )

static

Definition at line 346 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    TRACE("(%p)->(%x)\n", This, ssScriptState);
 
    This->script_state = ssScriptState;
    return S_OK;
}

ActiveScriptSite_QueryInterface()

static HRESULT WINAPI ActiveScriptSite_QueryInterface ( IActiveScriptSite *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 228 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
 
    *ppv = NULL;
 
    if(IsEqualGUID(&IID_IUnknown, riid)) {
        TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSite_iface;
    }else if(IsEqualGUID(&IID_IActiveScriptSite, riid)) {
        TRACE("(%p)->(IID_IActiveScriptSite %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSite_iface;
    }else if(IsEqualGUID(&IID_IActiveScriptSiteInterruptPoll, riid)) {
        TRACE("(%p)->(IID_IActiveScriptSiteInterruprtPoll %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSiteInterruptPoll_iface;
    }else if(IsEqualGUID(&IID_IActiveScriptSiteWindow, riid)) {
        TRACE("(%p)->(IID_IActiveScriptSiteWindow %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSiteWindow_iface;
    }else if(IsEqualGUID(&IID_IActiveScriptSiteUIControl, riid)) {
        TRACE("(%p)->(IID_IActiveScriptSiteUIControl %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSiteUIControl_iface;
    }else if(IsEqualGUID(&IID_IActiveScriptSiteDebug, riid)) {
        TRACE("(%p)->(IID_IActiveScriptSiteDebug %p)\n", This, ppv);
        *ppv = &This->IActiveScriptSiteDebug_iface;
    }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
        TRACE("(%p)->(IID_IServiceProvider %p)\n", This, ppv);
        *ppv = &This->IServiceProvider_iface;
    }else if(IsEqualGUID(&IID_ICanHandleException, riid)) {
        TRACE("(%p)->(IID_ICanHandleException not supported %p)\n", This, ppv);
        return E_NOINTERFACE;
    }else {
        FIXME("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
        return E_NOINTERFACE;
    }
 
    IUnknown_AddRef((IUnknown*)*ppv);
    return S_OK;
}

ActiveScriptSite_Release()

static ULONG WINAPI ActiveScriptSite_Release ( IActiveScriptSite *  iface )

static

Definition at line 277 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSite(iface);
    LONG ref = InterlockedDecrement(&This->ref);
 
    TRACE("(%p) ref=%d\n", This, ref);
 
    if(!ref) {
        release_script_engine(This);
        if(This->window)
            list_remove(&This->entry);
        heap_free(This);
    }
 
    return ref;
}

ActiveScriptSiteDebug_AddRef()

static ULONG WINAPI ActiveScriptSiteDebug_AddRef ( IActiveScriptSiteDebug *  iface )

static

Definition at line 540 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteDebug(iface);
    return IActiveScriptSite_AddRef(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteDebug_GetApplication()

static HRESULT WINAPI ActiveScriptSiteDebug_GetApplication ( IActiveScriptSiteDebug *  iface, IDebugApplication **  ppda  )

static

Definition at line 561 of file script.c.

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

ActiveScriptSiteDebug_GetDocumentContextFromPosition()

static HRESULT WINAPI ActiveScriptSiteDebug_GetDocumentContextFromPosition ( IActiveScriptSiteDebug *  iface, CTXARG_T  dwSourceContext, ULONG  uCharacterOffset, ULONG  uNumChars, IDebugDocumentContext **  ppsc  )

static

Definition at line 552 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteDebug(iface);
    FIXME("(%p)->(%s %u %u %p)\n", This, wine_dbgstr_longlong(dwSourceContext), uCharacterOffset,
          uNumChars, ppsc);
    return E_NOTIMPL;
}

ActiveScriptSiteDebug_GetRootApplicationNode()

static HRESULT WINAPI ActiveScriptSiteDebug_GetRootApplicationNode ( IActiveScriptSiteDebug *  iface, IDebugApplicationNode **  ppdanRoot  )

static

Definition at line 568 of file script.c.

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

ActiveScriptSiteDebug_OnScriptErrorDebug()

static HRESULT WINAPI ActiveScriptSiteDebug_OnScriptErrorDebug ( IActiveScriptSiteDebug *  iface, IActiveScriptErrorDebug *  pErrorDebug, BOOL *  pfEnterDebugger, BOOL *  pfCallOnScriptErrorWhenContinuing  )

static

Definition at line 576 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteDebug(iface);
    FIXME("(%p)->(%p %p %p)\n", This, pErrorDebug, pfEnterDebugger, pfCallOnScriptErrorWhenContinuing);
    return E_NOTIMPL;
}

ActiveScriptSiteDebug_QueryInterface()

static HRESULT WINAPI ActiveScriptSiteDebug_QueryInterface ( IActiveScriptSiteDebug *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 533 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteDebug(iface);
    return IActiveScriptSite_QueryInterface(&This->IActiveScriptSite_iface, riid, ppv);
}

ActiveScriptSiteDebug_Release()

static ULONG WINAPI ActiveScriptSiteDebug_Release ( IActiveScriptSiteDebug *  iface )

static

Definition at line 546 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteDebug(iface);
    return IActiveScriptSite_Release(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteInterruptPoll_AddRef()

static ULONG WINAPI ActiveScriptSiteInterruptPoll_AddRef ( IActiveScriptSiteInterruptPoll *  iface )

static

Definition at line 407 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteInterruptPoll(iface);
    return IActiveScriptSite_AddRef(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteInterruptPoll_QueryContinue()

static HRESULT WINAPI ActiveScriptSiteInterruptPoll_QueryContinue ( IActiveScriptSiteInterruptPoll *  iface )

static

Definition at line 419 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteInterruptPoll(iface);
 
    TRACE("(%p)\n", This);
 
    return S_OK;
}

ActiveScriptSiteInterruptPoll_QueryInterface()

static HRESULT WINAPI ActiveScriptSiteInterruptPoll_QueryInterface ( IActiveScriptSiteInterruptPoll *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 400 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteInterruptPoll(iface);
    return IActiveScriptSite_QueryInterface(&This->IActiveScriptSite_iface, riid, ppv);
}

ActiveScriptSiteInterruptPoll_Release()

static ULONG WINAPI ActiveScriptSiteInterruptPoll_Release ( IActiveScriptSiteInterruptPoll *  iface )

static

Definition at line 413 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteInterruptPoll(iface);
    return IActiveScriptSite_Release(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteUIControl_AddRef()

static ULONG WINAPI ActiveScriptSiteUIControl_AddRef ( IActiveScriptSiteUIControl *  iface )

static

Definition at line 498 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteUIControl(iface);
    return IActiveScriptSite_AddRef(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteUIControl_GetUIBehavior()

static HRESULT WINAPI ActiveScriptSiteUIControl_GetUIBehavior ( IActiveScriptSiteUIControl *  iface, SCRIPTUICITEM  UicItem, SCRIPTUICHANDLING *  pUicHandling  )

static

Definition at line 510 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteUIControl(iface);
 
    WARN("(%p)->(%d %p) semi-stub\n", This, UicItem, pUicHandling);
 
    *pUicHandling = SCRIPTUICHANDLING_ALLOW;
    return S_OK;
}

ActiveScriptSiteUIControl_QueryInterface()

static HRESULT WINAPI ActiveScriptSiteUIControl_QueryInterface ( IActiveScriptSiteUIControl *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 492 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteUIControl(iface);
    return IActiveScriptSite_QueryInterface(&This->IActiveScriptSite_iface, riid, ppv);
}

ActiveScriptSiteUIControl_Release()

static ULONG WINAPI ActiveScriptSiteUIControl_Release ( IActiveScriptSiteUIControl *  iface )

static

Definition at line 504 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteUIControl(iface);
    return IActiveScriptSite_Release(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteWindow_AddRef()

static ULONG WINAPI ActiveScriptSiteWindow_AddRef ( IActiveScriptSiteWindow *  iface )

static

Definition at line 447 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteWindow(iface);
    return IActiveScriptSite_AddRef(&This->IActiveScriptSite_iface);
}

ActiveScriptSiteWindow_EnableModeless()

static HRESULT WINAPI ActiveScriptSiteWindow_EnableModeless ( IActiveScriptSiteWindow *  iface, BOOL  fEnable  )

static

Definition at line 472 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteWindow(iface);
    FIXME("(%p)->(%x)\n", This, fEnable);
    return S_OK;
}

ActiveScriptSiteWindow_GetWindow()

static HRESULT WINAPI ActiveScriptSiteWindow_GetWindow ( IActiveScriptSiteWindow *  iface, HWND *  phwnd  )

static

Definition at line 459 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteWindow(iface);
 
    TRACE("(%p)->(%p)\n", This, phwnd);
 
    if(!This->window || !This->window->base.outer_window || !This->window->base.outer_window->doc_obj)
        return E_UNEXPECTED;
 
    *phwnd = This->window->base.outer_window->doc_obj->hwnd;
    return S_OK;
}

ActiveScriptSiteWindow_QueryInterface()

static HRESULT WINAPI ActiveScriptSiteWindow_QueryInterface ( IActiveScriptSiteWindow *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 440 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteWindow(iface);
    return IActiveScriptSite_QueryInterface(&This->IActiveScriptSite_iface, riid, ppv);
}

ActiveScriptSiteWindow_Release()

static ULONG WINAPI ActiveScriptSiteWindow_Release ( IActiveScriptSiteWindow *  iface )

static

Definition at line 453 of file script.c.

{
    ScriptHost *This = impl_from_IActiveScriptSiteWindow(iface);
    return IActiveScriptSite_Release(&This->IActiveScriptSite_iface);
}

ASServiceProvider_AddRef()

static ULONG WINAPI ASServiceProvider_AddRef ( IServiceProvider *  iface )

static

Definition at line 605 of file script.c.

{
    ScriptHost *This = impl_from_IServiceProvider(iface);
    return IActiveScriptSite_AddRef(&This->IActiveScriptSite_iface);
}

ASServiceProvider_QueryInterface()

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

static

Definition at line 599 of file script.c.

{
    ScriptHost *This = impl_from_IServiceProvider(iface);
    return IActiveScriptSite_QueryInterface(&This->IActiveScriptSite_iface, riid, ppv);
}

ASServiceProvider_QueryService()

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

static

Definition at line 617 of file script.c.

{
    ScriptHost *This = impl_from_IServiceProvider(iface);
 
    if(IsEqualGUID(&SID_SInternetHostSecurityManager, guidService)) {
        TRACE("(%p)->(SID_SInternetHostSecurityManager)\n", This);
 
        if(!This->window || !This->window->doc)
            return E_NOINTERFACE;
 
        return IInternetHostSecurityManager_QueryInterface(&This->window->doc->IInternetHostSecurityManager_iface,
                riid, ppv);
    }
 
    if(IsEqualGUID(&SID_SContainerDispatch, guidService)) {
        TRACE("(%p)->(SID_SContainerDispatch)\n", This);
 
        if(!This->window || !This->window->doc)
            return E_NOINTERFACE;
 
        return IHTMLDocument2_QueryInterface(&This->window->doc->basedoc.IHTMLDocument2_iface, riid, ppv);
    }
 
    FIXME("(%p)->(%s %s %p)\n", This, debugstr_guid(guidService), debugstr_guid(riid), ppv);
    return E_NOINTERFACE;
}

ASServiceProvider_Release()

static ULONG WINAPI ASServiceProvider_Release ( IServiceProvider *  iface )

static

Definition at line 611 of file script.c.

{
    ScriptHost *This = impl_from_IServiceProvider(iface);
    return IActiveScriptSite_Release(&This->IActiveScriptSite_iface);
}

bind_event_scripts()

void bind_event_scripts

(

HTMLDocumentNode *

doc

)

Definition at line 1423 of file script.c.

{
    HTMLPluginContainer *plugin_container;
    nsIDOMHTMLScriptElement *nsscript;
    HTMLScriptElement *script_elem;
    EventTarget *event_target;
    nsIDOMNodeList *node_list;
    nsIDOMNode *script_node;
    nsAString selector_str;
    IDispatch *event_disp;
    UINT32 length, i;
    WCHAR *event;
    nsresult nsres;
    HRESULT hres;
 
    static const PRUnichar selectorW[] = {'s','c','r','i','p','t','[','e','v','e','n','t',']',0};
 
    TRACE("%p\n", doc);
 
    if(!doc->nsdoc)
        return;
 
    nsAString_InitDepend(&selector_str, selectorW);
    nsres = nsIDOMHTMLDocument_QuerySelectorAll(doc->nsdoc, &selector_str, &node_list);
    nsAString_Finish(&selector_str);
    if(NS_FAILED(nsres)) {
        ERR("QuerySelectorAll failed: %08x\n", nsres);
        return;
    }
 
    if(!node_list)
        return;
 
    nsres = nsIDOMNodeList_GetLength(node_list, &length);
    assert(nsres == NS_OK);
 
    for(i=0; i < length; i++) {
        nsres = nsIDOMNodeList_Item(node_list, i, &script_node);
        if(NS_FAILED(nsres) || !script_node) {
            ERR("Item(%d) failed: %08x\n", i, nsres);
            continue;
        }
 
        nsres = nsIDOMNode_QueryInterface(script_node, &IID_nsIDOMHTMLScriptElement, (void**)&nsscript);
        assert(nsres == NS_OK);
        nsIDOMNode_Release(script_node);
 
        hres = script_elem_from_nsscript(doc, nsscript, &script_elem);
        if(FAILED(hres))
            continue;
 
        event_disp = parse_event_elem(doc, script_elem, &event);
        if(event_disp) {
            event_target = find_event_target(doc, script_elem);
            if(event_target) {
                hres = IDispatchEx_QueryInterface(&event_target->dispex.IDispatchEx_iface, &IID_HTMLPluginContainer,
                        (void**)&plugin_container);
                if(SUCCEEDED(hres))
                    bind_activex_event(doc, plugin_container, event, event_disp);
                else
                    bind_target_event(doc, event_target, event, event_disp);
 
                IDispatchEx_Release(&event_target->dispex.IDispatchEx_iface);
                if(plugin_container)
                    node_release(&plugin_container->element.node);
            }
 
            heap_free(event);
            IDispatch_Release(event_disp);
        }
 
        IHTMLScriptElement_Release(&script_elem->IHTMLScriptElement_iface);
    }
 
    nsIDOMNodeList_Release(node_list);
}

Referenced by run_end_load().

bind_script_to_text()

static HRESULT bind_script_to_text ( HTMLInnerWindow *  window, IUri *  uri, HTMLScriptElement *  script_elem, WCHAR **  ret  )

static

Definition at line 884 of file script.c.

{
    UINT cp = CP_UTF8;
    ScriptBSC *bsc;
    IMoniker *mon;
    WCHAR *text;
    HRESULT hres;
 
    hres = CreateURLMonikerEx2(NULL, uri, &mon, URL_MK_UNIFORM);
    if(FAILED(hres))
        return hres;
 
    bsc = heap_alloc_zero(sizeof(*bsc));
    if(!bsc) {
        IMoniker_Release(mon);
        return E_OUTOFMEMORY;
    }
 
    init_bscallback(&bsc->bsc, &ScriptBSCVtbl, mon, 0);
    IMoniker_Release(mon);
    bsc->hres = E_FAIL;
 
    hres = IUri_GetScheme(uri, &bsc->scheme);
    if(FAILED(hres))
        bsc->scheme = URL_SCHEME_UNKNOWN;
 
    IHTMLScriptElement_AddRef(&script_elem->IHTMLScriptElement_iface);
    bsc->script_elem = script_elem;
 
    hres = start_binding(window, &bsc->bsc, NULL);
    if(SUCCEEDED(hres))
        hres = bsc->hres;
    if(FAILED(hres)) {
        IBindStatusCallback_Release(&bsc->bsc.IBindStatusCallback_iface);
        return hres;
    }
 
    if(!bsc->bsc.readed) {
        *ret = NULL;
        return S_OK;
    }
 
    switch(bsc->bsc.bom) {
    case BOM_UTF16:
        if(bsc->bsc.readed % sizeof(WCHAR)) {
            FIXME("The buffer is not a valid utf16 string\n");
            hres = E_FAIL;
            break;
        }
 
        text = heap_alloc(bsc->bsc.readed+sizeof(WCHAR));
        if(!text) {
            hres = E_OUTOFMEMORY;
            break;
        }
 
        memcpy(text, bsc->buf, bsc->bsc.readed);
        text[bsc->bsc.readed/sizeof(WCHAR)] = 0;
        break;
 
    default:
        /* FIXME: Try to use charset from HTTP headers first */
        cp = get_document_charset(window->doc);
        /* fall through */
    case BOM_UTF8: {
        DWORD len;
 
        len = MultiByteToWideChar(cp, 0, bsc->buf, bsc->bsc.readed, NULL, 0);
        text = heap_alloc((len+1)*sizeof(WCHAR));
        if(!text) {
            hres = E_OUTOFMEMORY;
            break;
        }
 
        MultiByteToWideChar(cp, 0, bsc->buf, bsc->bsc.readed, text, len);
        text[len] = 0;
    }
    }
 
    IBindStatusCallback_Release(&bsc->bsc.IBindStatusCallback_iface);
    if(FAILED(hres))
        return hres;
 
    *ret = text;
    return S_OK;
}

Referenced by parse_extern_script().

connect_scripts()

void connect_scripts

(

HTMLInnerWindow *

window

)

Definition at line 213 of file script.c.

{
    ScriptHost *iter;
 
    LIST_FOR_EACH_ENTRY(iter, &window->script_hosts, ScriptHost, entry) {
        if(iter->script_state == SCRIPTSTATE_STARTED)
            IActiveScript_SetScriptState(iter->script, SCRIPTSTATE_CONNECTED);
    }
}

Referenced by handle_load().

create_script_host()

static ScriptHost * create_script_host ( HTMLInnerWindow *  window, const GUID *  guid  )

static

Definition at line 652 of file script.c.

{
    ScriptHost *ret;
    HRESULT hres;
 
    ret = heap_alloc_zero(sizeof(*ret));
    if(!ret)
        return NULL;
 
    ret->IActiveScriptSite_iface.lpVtbl = &ActiveScriptSiteVtbl;
    ret->IActiveScriptSiteInterruptPoll_iface.lpVtbl = &ActiveScriptSiteInterruptPollVtbl;
    ret->IActiveScriptSiteWindow_iface.lpVtbl = &ActiveScriptSiteWindowVtbl;
    ret->IActiveScriptSiteUIControl_iface.lpVtbl = &ActiveScriptSiteUIControlVtbl;
    ret->IActiveScriptSiteDebug_iface.lpVtbl = &ActiveScriptSiteDebugVtbl;
    ret->IServiceProvider_iface.lpVtbl = &ASServiceProviderVtbl;
    ret->ref = 1;
    ret->window = window;
    ret->script_state = SCRIPTSTATE_UNINITIALIZED;
 
    ret->guid = *guid;
    list_add_tail(&window->script_hosts, &ret->entry);
 
    hres = CoCreateInstance(&ret->guid, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
            &IID_IActiveScript, (void**)&ret->script);
    if(FAILED(hres))
        WARN("Could not load script engine: %08x\n", hres);
    else if(!init_script_engine(ret))
        release_script_engine(ret);
 
    return ret;
}

Referenced by get_script_host().

doc_insert_script()

void doc_insert_script	(	HTMLInnerWindow *	window,
		HTMLScriptElement *	script_elem
	)

Definition at line 1172 of file script.c.

{
    ScriptHost *script_host;
 
    script_host = get_elem_script_host(window, script_elem);
    if(!script_host)
        return;
 
    if(script_host->parse)
        parse_script_elem(script_host, script_elem);
}

Referenced by HTMLScriptElement_put_src(), HTMLScriptElement_put_text(), and run_insert_script().

exec_script()

HRESULT exec_script	(	HTMLInnerWindow *	window,
		const WCHAR *	code,
		const WCHAR *	lang,
		VARIANT *	ret
	)

Definition at line 1245 of file script.c.

{
    ScriptHost *script_host;
    EXCEPINFO ei;
    GUID guid;
    HRESULT hres;
 
    static const WCHAR delimW[] = {'"',0};
 
    if(!get_guid_from_language(lang, &guid)) {
        WARN("Could not find script GUID\n");
        return CO_E_CLASSSTRING;
    }
 
    script_host = get_script_host(window, &guid);
    if(!script_host) {
        FIXME("No script host\n");
        return E_FAIL;
    }
 
    if(!script_host->parse) {
        FIXME("script_host->parse == NULL\n");
        return E_FAIL;
    }
 
    memset(&ei, 0, sizeof(ei));
    TRACE(">>>\n");
    hres = IActiveScriptParse_ParseScriptText(script_host->parse, code, NULL, NULL, delimW, 0, 0, SCRIPTTEXT_ISVISIBLE, ret, &ei);
    if(SUCCEEDED(hres))
        TRACE("<<<\n");
    else
        WARN("<<< %08x\n", hres);
 
    return hres;
}

Referenced by create_vbdisp(), exec_global_code(), HTMLWindow2_execScript(), invoke_vbdisp(), navigate_javascript_proc(), run_terminator(), and ScriptDisp_InvokeEx().

find_event_target()

static EventTarget * find_event_target ( HTMLDocumentNode *  doc, HTMLScriptElement *  script_elem  )

static

Definition at line 1296 of file script.c.

{
    EventTarget *event_target = NULL;
    const PRUnichar *target_id;
    nsAString target_id_str;
    nsresult nsres;
    HRESULT hres;
 
    nsAString_Init(&target_id_str, NULL);
    nsres = nsIDOMHTMLScriptElement_GetHtmlFor(script_elem->nsscript, &target_id_str);
    if(NS_FAILED(nsres)) {
        ERR("GetScriptFor failed: %08x\n", nsres);
        nsAString_Finish(&target_id_str);
        return NULL;
    }
 
    nsAString_GetData(&target_id_str, &target_id);
    if(!*target_id) {
        FIXME("Empty for attribute\n");
    }else if(!strcmpW(target_id, documentW)) {
        event_target = &doc->node.event_target;
        htmldoc_addref(&doc->basedoc);
    }else if(!strcmpW(target_id, windowW)) {
        if(doc->window) {
            event_target = &doc->window->event_target;
            IDispatchEx_AddRef(&event_target->dispex.IDispatchEx_iface);
        }
    }else {
        HTMLElement *target_elem;
 
        hres = get_doc_elem_by_id(doc, target_id, &target_elem);
        if(SUCCEEDED(hres) && target_elem) {
            event_target = &target_elem->node.event_target;
        }
    }
 
    nsAString_Finish(&target_id_str);
    return event_target;
}

Referenced by bind_event_scripts().

find_global_prop()

BOOL find_global_prop	(	HTMLInnerWindow *	window,
		BSTR	name,
		DWORD	flags,
		ScriptHost **	ret_host,
		DISPID *	ret_id
	)

Definition at line 1500 of file script.c.

{
    IDispatchEx *dispex;
    IDispatch *disp;
    ScriptHost *iter;
    HRESULT hres;
 
    LIST_FOR_EACH_ENTRY(iter, &window->script_hosts, ScriptHost, entry) {
        disp = get_script_disp(iter);
        if(!disp)
            continue;
 
        hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
        if(SUCCEEDED(hres)) {
            hres = IDispatchEx_GetDispID(dispex, name, flags & (~fdexNameEnsure), ret_id);
            IDispatchEx_Release(dispex);
        }else {
            FIXME("No IDispatchEx\n");
            hres = E_NOTIMPL;
        }
 
        IDispatch_Release(disp);
        if(SUCCEEDED(hres)) {
            *ret_host = iter;
            return TRUE;
        }
    }
 
    return FALSE;
}

Referenced by search_window_props().

fire_readystatechange_proc()

static void fire_readystatechange_proc ( task_t *  _task )

static

Definition at line 689 of file script.c.

{
    fire_readystatechange_task_t *task = (fire_readystatechange_task_t*)_task;
 
    if(!task->elem->pending_readystatechange_event)
        return;
 
    task->elem->pending_readystatechange_event = FALSE;
    fire_event(task->elem->element.node.doc, EVENTID_READYSTATECHANGE, FALSE, task->elem->element.node.nsnode, NULL, NULL);
}

Referenced by set_script_elem_readystate().

fire_readystatechange_task_destr()

static void fire_readystatechange_task_destr ( task_t *  _task )

static

Definition at line 700 of file script.c.

{
    fire_readystatechange_task_t *task = (fire_readystatechange_task_t*)_task;
 
    IHTMLScriptElement_Release(&task->elem->IHTMLScriptElement_iface);
}

Referenced by set_script_elem_readystate().

get_default_script_guid()

static GUID get_default_script_guid ( HTMLInnerWindow *  window )

static

Definition at line 1055 of file script.c.

{
    /* If not specified, we should use very first script host that was created for the page (or JScript if none) */
    return list_empty(&window->script_hosts)
        ? CLSID_JScript
        : LIST_ENTRY(list_head(&window->script_hosts), ScriptHost, entry)->guid;
}

Referenced by get_script_guid(), and script_parse_event().

get_elem_script_host()

static ScriptHost * get_elem_script_host ( HTMLInnerWindow *  window, HTMLScriptElement *  script_elem  )

static

Definition at line 1154 of file script.c.

{
    GUID guid;
 
    if(!get_script_guid(window, script_elem->nsscript, &guid)) {
        WARN("Could not find script GUID\n");
        return NULL;
    }
 
    if(IsEqualGUID(&CLSID_JScript, &guid)
       && (!window->base.outer_window || window->base.outer_window->scriptmode != SCRIPTMODE_ACTIVESCRIPT)) {
        TRACE("Ignoring JScript\n");
        return NULL;
    }
 
    return get_script_host(window, &guid);
}

Referenced by doc_insert_script(), and parse_event_elem().

get_guid_from_language()

static BOOL get_guid_from_language ( LPCWSTR  type, GUID *  guid  )

static

Definition at line 1085 of file script.c.

{
    HRESULT hres;
 
    hres = CLSIDFromProgID(type, guid);
    if(FAILED(hres))
        return FALSE;
 
    /* FIXME: Check CATID_ActiveScriptParse */
 
    return TRUE;
}

Referenced by exec_script(), get_script_guid(), and script_parse_event().

get_guid_from_type()

static BOOL get_guid_from_type ( LPCWSTR  type, GUID *  guid  )

static

Definition at line 1063 of file script.c.

{
    const WCHAR text_javascriptW[] =
        {'t','e','x','t','/','j','a','v','a','s','c','r','i','p','t',0};
    const WCHAR text_jscriptW[] =
        {'t','e','x','t','/','j','s','c','r','i','p','t',0};
    const WCHAR text_vbscriptW[] =
        {'t','e','x','t','/','v','b','s','c','r','i','p','t',0};
 
    /* FIXME: Handle more types */
    if(!strcmpiW(type, text_javascriptW) || !strcmpiW(type, text_jscriptW)) {
        *guid = CLSID_JScript;
    }else if(!strcmpiW(type, text_vbscriptW)) {
        *guid = CLSID_VBScript;
    }else {
        FIXME("Unknown type %s\n", debugstr_w(type));
        return FALSE;
    }
 
    return TRUE;
}

Referenced by get_script_guid().

get_script_disp()

IDispatch * get_script_disp

(

ScriptHost *

script_host

)

Definition at line 1281 of file script.c.

{
    IDispatch *disp;
    HRESULT hres;
 
    if(!script_host->script)
        return NULL;
 
    hres = IActiveScript_GetScriptDispatch(script_host->script, windowW, &disp);
    if(FAILED(hres))
        return NULL;
 
    return disp;
}

Referenced by find_global_prop(), and HTMLWindow_invoke().

get_script_guid()

static BOOL get_script_guid ( HTMLInnerWindow *  window, nsIDOMHTMLScriptElement *  nsscript, GUID *  guid  )

static

Definition at line 1098 of file script.c.

{
    nsIDOMHTMLElement *nselem;
    const PRUnichar *language;
    nsAString val_str;
    BOOL ret = FALSE;
    nsresult nsres;
 
    static const PRUnichar languageW[] = {'l','a','n','g','u','a','g','e',0};
 
    nsAString_Init(&val_str, NULL);
 
    nsres = nsIDOMHTMLScriptElement_GetType(nsscript, &val_str);
    if(NS_SUCCEEDED(nsres)) {
        const PRUnichar *type;
 
        nsAString_GetData(&val_str, &type);
        if(*type) {
            ret = get_guid_from_type(type, guid);
            nsAString_Finish(&val_str);
            return ret;
        }
    }else {
        ERR("GetType failed: %08x\n", nsres);
    }
 
    nsres = nsIDOMHTMLScriptElement_QueryInterface(nsscript, &IID_nsIDOMHTMLElement, (void**)&nselem);
    assert(nsres == NS_OK);
 
    nsres = get_elem_attr_value(nselem, languageW, &val_str, &language);
    nsIDOMHTMLElement_Release(nselem);
    if(NS_SUCCEEDED(nsres)) {
        if(*language) {
            ret = get_guid_from_language(language, guid);
        }else {
            *guid = get_default_script_guid(window);
            ret = TRUE;
        }
        nsAString_Finish(&val_str);
    }
 
    return ret;
}

Referenced by get_elem_script_host().

get_script_host()

static ScriptHost * get_script_host ( HTMLInnerWindow *  window, const GUID *  guid  )

static

Definition at line 1142 of file script.c.

{
    ScriptHost *iter;
 
    LIST_FOR_EACH_ENTRY(iter, &window->script_hosts, ScriptHost, entry) {
        if(IsEqualGUID(guid, &iter->guid))
            return iter;
    }
 
    return create_script_host(window, guid);
}

Referenced by exec_script(), get_elem_script_host(), and script_parse_event().

impl_from_BSCallback()

static ScriptBSC * impl_from_BSCallback ( BSCallback *  iface )

inlinestatic

Definition at line 772 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptBSC, bsc);
}

Referenced by ScriptBSC_destroy(), ScriptBSC_read_data(), ScriptBSC_start_binding(), and ScriptBSC_stop_binding().

impl_from_IActiveScriptSite()

static ScriptHost * impl_from_IActiveScriptSite ( IActiveScriptSite *  iface )

inlinestatic

Definition at line 223 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptHost, IActiveScriptSite_iface);
}

Referenced by ActiveScriptSite_AddRef(), ActiveScriptSite_GetDocVersionString(), ActiveScriptSite_GetItemInfo(), ActiveScriptSite_GetLCID(), ActiveScriptSite_OnEnterScript(), ActiveScriptSite_OnLeaveScript(), ActiveScriptSite_OnScriptError(), ActiveScriptSite_OnScriptTerminate(), ActiveScriptSite_OnStateChange(), ActiveScriptSite_QueryInterface(), ActiveScriptSite_Release(), MsiActiveScriptSite_AddRef(), MsiActiveScriptSite_GetDocVersionString(), MsiActiveScriptSite_GetItemInfo(), MsiActiveScriptSite_GetLCID(), MsiActiveScriptSite_OnEnterScript(), MsiActiveScriptSite_OnLeaveScript(), MsiActiveScriptSite_OnScriptError(), MsiActiveScriptSite_OnScriptTerminate(), MsiActiveScriptSite_QueryInterface(), and MsiActiveScriptSite_Release().

impl_from_IActiveScriptSiteDebug()

static ScriptHost * impl_from_IActiveScriptSiteDebug ( IActiveScriptSiteDebug *  iface )

inlinestatic

Definition at line 528 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptHost, IActiveScriptSiteDebug_iface);
}

Referenced by ActiveScriptSiteDebug_AddRef(), ActiveScriptSiteDebug_GetApplication(), ActiveScriptSiteDebug_GetDocumentContextFromPosition(), ActiveScriptSiteDebug_GetRootApplicationNode(), ActiveScriptSiteDebug_OnScriptErrorDebug(), ActiveScriptSiteDebug_QueryInterface(), and ActiveScriptSiteDebug_Release().

impl_from_IActiveScriptSiteInterruptPoll()

static ScriptHost * impl_from_IActiveScriptSiteInterruptPoll ( IActiveScriptSiteInterruptPoll *  iface )

inlinestatic

Definition at line 395 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptHost, IActiveScriptSiteInterruptPoll_iface);
}

Referenced by ActiveScriptSiteInterruptPoll_AddRef(), ActiveScriptSiteInterruptPoll_QueryContinue(), ActiveScriptSiteInterruptPoll_QueryInterface(), and ActiveScriptSiteInterruptPoll_Release().

impl_from_IActiveScriptSiteUIControl()

static ScriptHost * impl_from_IActiveScriptSiteUIControl ( IActiveScriptSiteUIControl *  iface )

inlinestatic

Definition at line 487 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptHost, IActiveScriptSiteUIControl_iface);
}

Referenced by ActiveScriptSiteUIControl_AddRef(), ActiveScriptSiteUIControl_GetUIBehavior(), ActiveScriptSiteUIControl_QueryInterface(), and ActiveScriptSiteUIControl_Release().

impl_from_IActiveScriptSiteWindow()

static ScriptHost * impl_from_IActiveScriptSiteWindow ( IActiveScriptSiteWindow *  iface )

inlinestatic

Definition at line 435 of file script.c.

{
    return CONTAINING_RECORD(iface, ScriptHost, IActiveScriptSiteWindow_iface);
}

Referenced by ActiveScriptSiteWindow_AddRef(), ActiveScriptSiteWindow_EnableModeless(), ActiveScriptSiteWindow_GetWindow(), ActiveScriptSiteWindow_QueryInterface(), and ActiveScriptSiteWindow_Release().

impl_from_IServiceProvider()

static ScriptHost * impl_from_IServiceProvider ( IServiceProvider *  iface )

inlinestatic

Definition at line 594 of file script.c.

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

Referenced by ASServiceProvider_AddRef(), ASServiceProvider_QueryInterface(), ASServiceProvider_QueryService(), and ASServiceProvider_Release().

init_script_engine()

static BOOL init_script_engine ( ScriptHost *  script_host )

static

Definition at line 92 of file script.c.

{
    IObjectSafety *safety;
    SCRIPTSTATE state;
    DWORD supported_opts=0, enabled_opts=0;
    VARIANT var;
    HRESULT hres;
 
    hres = IActiveScript_QueryInterface(script_host->script, &IID_IActiveScriptParse, (void**)&script_host->parse);
    if(FAILED(hres)) {
        WARN("Could not get IActiveScriptHost: %08x\n", hres);
        return FALSE;
    }
 
    hres = IActiveScript_QueryInterface(script_host->script, &IID_IObjectSafety, (void**)&safety);
    if(FAILED(hres)) {
        FIXME("Could not get IObjectSafety: %08x\n", hres);
        return FALSE;
    }
 
    hres = IObjectSafety_GetInterfaceSafetyOptions(safety, &IID_IActiveScriptParse, &supported_opts, &enabled_opts);
    if(FAILED(hres)) {
        FIXME("GetInterfaceSafetyOptions failed: %08x\n", hres);
    }else if(!(supported_opts & INTERFACE_USES_DISPEX)) {
        FIXME("INTERFACE_USES_DISPEX is not supported\n");
    }else {
        hres = IObjectSafety_SetInterfaceSafetyOptions(safety, &IID_IActiveScriptParse,
                INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_DISPEX|INTERFACE_USES_SECURITY_MANAGER,
                INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_DISPEX|INTERFACE_USES_SECURITY_MANAGER);
        if(FAILED(hres))
            FIXME("SetInterfaceSafetyOptions failed: %08x\n", hres);
    }
 
    IObjectSafety_Release(safety);
    if(FAILED(hres))
        return FALSE;
 
    V_VT(&var) = VT_I4;
    V_I4(&var) = 1;
    set_script_prop(script_host, SCRIPTPROP_INVOKEVERSIONING, &var);
 
    V_VT(&var) = VT_BOOL;
    V_BOOL(&var) = VARIANT_TRUE;
    set_script_prop(script_host, SCRIPTPROP_HACK_TRIDENTEVENTSINK, &var);
 
    hres = IActiveScriptParse_InitNew(script_host->parse);
    if(FAILED(hres)) {
        WARN("InitNew failed: %08x\n", hres);
        return FALSE;
    }
 
    hres = IActiveScript_SetScriptSite(script_host->script, &script_host->IActiveScriptSite_iface);
    if(FAILED(hres)) {
        WARN("SetScriptSite failed: %08x\n", hres);
        IActiveScript_Close(script_host->script);
        return FALSE;
    }
 
    hres = IActiveScript_GetScriptState(script_host->script, &state);
    if(FAILED(hres))
        WARN("GetScriptState failed: %08x\n", hres);
    else if(state != SCRIPTSTATE_INITIALIZED)
        FIXME("state = %x\n", state);
 
    hres = IActiveScript_SetScriptState(script_host->script, SCRIPTSTATE_STARTED);
    if(FAILED(hres)) {
        WARN("Starting script failed: %08x\n", hres);
        return FALSE;
    }
 
    hres = IActiveScript_AddNamedItem(script_host->script, windowW,
            SCRIPTITEM_ISVISIBLE|SCRIPTITEM_ISSOURCE|SCRIPTITEM_GLOBALMEMBERS);
    if(SUCCEEDED(hres)) {
        V_VT(&var) = VT_BOOL;
        V_BOOL(&var) = VARIANT_TRUE;
        set_script_prop(script_host, SCRIPTPROP_ABBREVIATE_GLOBALNAME_RESOLUTION, &var);
    }else {
       WARN("AddNamedItem failed: %08x\n", hres);
    }
 
    hres = IActiveScript_QueryInterface(script_host->script, &IID_IActiveScriptParseProcedure2,
                                        (void**)&script_host->parse_proc);
    if(FAILED(hres)) {
        /* FIXME: QI for IActiveScriptParseProcedure */
        WARN("Could not get IActiveScriptParseProcedure iface: %08x\n", hres);
    }
 
    return TRUE;
}

Referenced by create_script_host().

is_jscript_available()

static BOOL is_jscript_available ( void  )

static

Definition at line 1531 of file script.c.

{
    static BOOL available, checked;
 
    if(!checked) {
        IUnknown *unk;
        HRESULT hres = CoGetClassObject(&CLSID_JScript, CLSCTX_INPROC_SERVER, NULL, &IID_IUnknown, (void**)&unk);
 
        if(SUCCEEDED(hres)) {
            available = TRUE;
            IUnknown_Release(unk);
        }else {
            available = FALSE;
        }
        checked = TRUE;
    }
 
    return available;
}

Referenced by set_script_mode().

parse_elem_text()

static void parse_elem_text ( ScriptHost *  script_host, HTMLScriptElement *  script_elem, LPCWSTR  text  )

static

Definition at line 738 of file script.c.

{
    EXCEPINFO excepinfo;
    VARIANT var;
    HRESULT hres;
 
    TRACE("%s\n", debugstr_w(text));
 
    set_script_elem_readystate(script_elem, READYSTATE_INTERACTIVE);
 
    VariantInit(&var);
    memset(&excepinfo, 0, sizeof(excepinfo));
    TRACE(">>>\n");
    hres = IActiveScriptParse_ParseScriptText(script_host->parse, text, windowW, NULL, script_endW,
                                              0, 0, SCRIPTTEXT_ISVISIBLE|SCRIPTTEXT_HOSTMANAGESSOURCE,
                                              &var, &excepinfo);
    if(SUCCEEDED(hres))
        TRACE("<<<\n");
    else
        WARN("<<< %08x\n", hres);
 
}

Referenced by parse_extern_script(), and parse_inline_script().

parse_event_elem()

static IDispatch * parse_event_elem ( HTMLDocumentNode *  doc, HTMLScriptElement *  script_elem, WCHAR **  ret_event  )

static

Definition at line 1363 of file script.c.

{
    ScriptHost *script_host;
    WCHAR *event = NULL;
    const WCHAR *args;
    nsAString nsstr;
    IDispatch *disp;
    nsresult nsres;
    HRESULT hres;
 
    if(script_elem->parsed)
        return NULL;
 
    script_host = get_elem_script_host(doc->window, script_elem);
    if(!script_host || !script_host->parse_proc)
        return NULL;
 
    nsAString_Init(&nsstr, NULL);
    nsres = nsIDOMHTMLScriptElement_GetEvent(script_elem->nsscript, &nsstr);
    if(NS_SUCCEEDED(nsres)) {
        const PRUnichar *event_val;
 
        nsAString_GetData(&nsstr, &event_val);
        event = heap_strdupW(event_val);
    }
    nsAString_Finish(&nsstr);
    if(!event)
        return NULL;
 
    if(!parse_event_str(event, &args)) {
        WARN("parsing %s failed\n", debugstr_w(event));
        heap_free(event);
        return NULL;
    }
 
    nsAString_Init(&nsstr, NULL);
    nsres = nsIDOMHTMLScriptElement_GetText(script_elem->nsscript, &nsstr);
    if(NS_SUCCEEDED(nsres)) {
        const PRUnichar *text;
 
        nsAString_GetData(&nsstr, &text);
        hres = IActiveScriptParseProcedure2_ParseProcedureText(script_host->parse_proc, text, args,
                emptyW, NULL, NULL, script_endW, 0, 0,
                SCRIPTPROC_HOSTMANAGESSOURCE|SCRIPTPROC_IMPLICIT_THIS|SCRIPTPROC_IMPLICIT_PARENTS, &disp);
        if(FAILED(hres))
            disp = NULL;
    }else {
        ERR("GetText failed: %08x\n", nsres);
        disp = NULL;
    }
    nsAString_Finish(&nsstr);
    if(!disp) {
        heap_free(event);
        return NULL;
    }
 
    *ret_event = event;
    return disp;
}

Referenced by bind_event_scripts().

parse_event_str()

static BOOL parse_event_str ( WCHAR *  event, const WCHAR **  args  )

static

Definition at line 1336 of file script.c.

{
    WCHAR *ptr;
 
    TRACE("%s\n", debugstr_w(event));
 
    for(ptr = event; isalnumW(*ptr); ptr++);
    if(!*ptr) {
        *args = NULL;
        return TRUE;
    }
 
    if(*ptr != '(')
        return FALSE;
 
    *ptr++ = 0;
    *args = ptr;
    while(isalnumW(*ptr) || isspaceW(*ptr) || *ptr == ',')
        ptr++;
 
    if(*ptr != ')')
        return FALSE;
 
    *ptr++ = 0;
    return !*ptr;
}

Referenced by parse_event_elem().

parse_extern_script()

static void parse_extern_script ( ScriptHost *  script_host, HTMLScriptElement *  script_elem, LPCWSTR  src  )

static

Definition at line 971 of file script.c.

{
    WCHAR *text;
    IUri *uri;
    HRESULT hres;
 
    static const WCHAR wine_schemaW[] = {'w','i','n','e',':'};
 
    if(strlenW(src) > sizeof(wine_schemaW)/sizeof(WCHAR) && !memcmp(src, wine_schemaW, sizeof(wine_schemaW)))
        src += sizeof(wine_schemaW)/sizeof(WCHAR);
 
    hres = create_uri(src, 0, &uri);
    if(FAILED(hres))
        return;
 
    hres = bind_script_to_text(script_host->window, uri, script_elem, &text);
    IUri_Release(uri);
    if(FAILED(hres) || !text)
        return;
 
    parse_elem_text(script_host, script_elem, text);
 
    heap_free(text);
}

Referenced by parse_script_elem().

parse_inline_script()

static void parse_inline_script ( ScriptHost *  script_host, HTMLScriptElement *  script_elem  )

static

Definition at line 996 of file script.c.

{
    const PRUnichar *text;
    nsAString text_str;
    nsresult nsres;
 
    nsAString_Init(&text_str, NULL);
    nsres = nsIDOMHTMLScriptElement_GetText(script_elem->nsscript, &text_str);
    nsAString_GetData(&text_str, &text);
 
    if(NS_FAILED(nsres)) {
        ERR("GetText failed: %08x\n", nsres);
    }else if(*text) {
        parse_elem_text(script_host, script_elem, text);
    }
 
    nsAString_Finish(&text_str);
}

Referenced by parse_script_elem().

parse_script_elem()

static void parse_script_elem ( ScriptHost *  script_host, HTMLScriptElement *  script_elem  )

static

Definition at line 1015 of file script.c.

{
    nsAString src_str, event_str;
    const PRUnichar *src;
    nsresult nsres;
 
    nsAString_Init(&event_str, NULL);
    nsres = nsIDOMHTMLScriptElement_GetEvent(script_elem->nsscript, &event_str);
    if(NS_SUCCEEDED(nsres)) {
        const PRUnichar *event;
 
        nsAString_GetData(&event_str, &event);
        if(*event) {
            TRACE("deferring event %s script evaluation\n", debugstr_w(event));
            nsAString_Finish(&event_str);
            return;
        }
    }else {
        ERR("GetEvent failed: %08x\n", nsres);
    }
    nsAString_Finish(&event_str);
 
    nsAString_Init(&src_str, NULL);
    nsres = nsIDOMHTMLScriptElement_GetSrc(script_elem->nsscript, &src_str);
    nsAString_GetData(&src_str, &src);
 
    if(NS_FAILED(nsres)) {
        ERR("GetSrc failed: %08x\n", nsres);
    }else if(*src) {
        script_elem->parsed = TRUE;
        parse_extern_script(script_host, script_elem, src);
    }else {
        parse_inline_script(script_host, script_elem);
    }
 
    nsAString_Finish(&src_str);
 
    set_script_elem_readystate(script_elem, READYSTATE_COMPLETE);
}

Referenced by doc_insert_script().

release_script_engine()

static void release_script_engine ( ScriptHost *  This )

static

Definition at line 182 of file script.c.

{
    if(!This->script)
        return;
 
    switch(This->script_state) {
    case SCRIPTSTATE_CONNECTED:
        IActiveScript_SetScriptState(This->script, SCRIPTSTATE_DISCONNECTED);
 
    case SCRIPTSTATE_STARTED:
    case SCRIPTSTATE_DISCONNECTED:
    case SCRIPTSTATE_INITIALIZED:
        IActiveScript_Close(This->script);
 
    default:
        if(This->parse_proc) {
            IActiveScriptParseProcedure2_Release(This->parse_proc);
            This->parse_proc = NULL;
        }
 
        if(This->parse) {
            IActiveScriptParse_Release(This->parse);
            This->parse = NULL;
        }
    }
 
    IActiveScript_Release(This->script);
    This->script = NULL;
    This->script_state = SCRIPTSTATE_UNINITIALIZED;
}

Referenced by ActiveScriptSite_Release(), create_script_host(), and release_script_hosts().

release_script_hosts()

void release_script_hosts

(

HTMLInnerWindow *

window

)

Definition at line 1583 of file script.c.

{
    script_queue_entry_t *queue_iter;
    ScriptHost *iter;
 
    while(!list_empty(&window->script_queue)) {
        queue_iter = LIST_ENTRY(list_head(&window->script_queue), script_queue_entry_t, entry);
 
        list_remove(&queue_iter->entry);
        IHTMLScriptElement_Release(&queue_iter->script->IHTMLScriptElement_iface);
        heap_free(queue_iter);
    }
 
    while(!list_empty(&window->script_hosts)) {
        iter = LIST_ENTRY(list_head(&window->script_hosts), ScriptHost, entry);
 
        release_script_engine(iter);
        list_remove(&iter->entry);
        iter->window = NULL;
        IActiveScriptSite_Release(&iter->IActiveScriptSite_iface);
    }
}

Referenced by detach_inner_window().

script_parse_event()

IDispatch * script_parse_event	(	HTMLInnerWindow *	window,
		LPCWSTR	text
	)

Definition at line 1184 of file script.c.

{
    ScriptHost *script_host;
    GUID guid;
    const WCHAR *ptr;
    IDispatch *disp;
    HRESULT hres;
 
    static const WCHAR delimiterW[] = {'\"',0};
 
    TRACE("%s\n", debugstr_w(text));
 
    for(ptr = text; isalnumW(*ptr); ptr++);
    if(*ptr == ':') {
        LPWSTR language;
        BOOL b;
 
        language = heap_alloc((ptr-text+1)*sizeof(WCHAR));
        if(!language)
            return NULL;
 
        memcpy(language, text, (ptr-text)*sizeof(WCHAR));
        language[ptr-text] = 0;
 
        b = get_guid_from_language(language, &guid);
 
        heap_free(language);
 
        if(!b) {
            WARN("Could not find language\n");
            return NULL;
        }
 
        ptr++;
    }else {
        ptr = text;
        guid = get_default_script_guid(window);
    }
 
    if(IsEqualGUID(&CLSID_JScript, &guid)
       && (!window->base.outer_window || window->base.outer_window->scriptmode != SCRIPTMODE_ACTIVESCRIPT)) {
        TRACE("Ignoring JScript\n");
        return NULL;
    }
 
    script_host = get_script_host(window, &guid);
    if(!script_host || !script_host->parse_proc)
        return NULL;
 
    hres = IActiveScriptParseProcedure2_ParseProcedureText(script_host->parse_proc, ptr, NULL, emptyW,
            NULL, NULL, delimiterW, 0 /* FIXME */, 0,
            SCRIPTPROC_HOSTMANAGESSOURCE|SCRIPTPROC_IMPLICIT_THIS|SCRIPTPROC_IMPLICIT_PARENTS, &disp);
    if(FAILED(hres)) {
        WARN("ParseProcedureText failed: %08x\n", hres);
        return NULL;
    }
 
    TRACE("ret %p\n", disp);
    return disp;
}

Referenced by check_event_attr(), and window_set_timer().

ScriptBSC_beginning_transaction()

static HRESULT ScriptBSC_beginning_transaction ( BSCallback *  bsc, WCHAR **  additional_headers  )

static

Definition at line 867 of file script.c.

{
    return S_FALSE;
}

ScriptBSC_destroy()

static void ScriptBSC_destroy ( BSCallback *  bsc )

static

Definition at line 777 of file script.c.

{
    ScriptBSC *This = impl_from_BSCallback(bsc);
 
    if(This->script_elem) {
        IHTMLScriptElement_Release(&This->script_elem->IHTMLScriptElement_iface);
        This->script_elem = NULL;
    }
 
    heap_free(This->buf);
    heap_free(This);
}

ScriptBSC_init_bindinfo()

static HRESULT ScriptBSC_init_bindinfo ( BSCallback *  bsc )

static

Definition at line 790 of file script.c.

{
    return S_OK;
}

ScriptBSC_on_progress()

static HRESULT ScriptBSC_on_progress ( BSCallback *  bsc, ULONG  status_code, LPCWSTR  status_text  )

static

Definition at line 856 of file script.c.

{
    return S_OK;
}

ScriptBSC_on_response()

static HRESULT ScriptBSC_on_response ( BSCallback *  bsc, DWORD  response_code, LPCWSTR  response_headers  )

static

Definition at line 861 of file script.c.

{
    return S_OK;
}

ScriptBSC_read_data()

static HRESULT ScriptBSC_read_data ( BSCallback *  bsc, IStream *  stream  )

static

Definition at line 827 of file script.c.

{
    ScriptBSC *This = impl_from_BSCallback(bsc);
    DWORD readed;
    HRESULT hres;
 
    if(!This->buf) {
        This->buf = heap_alloc(128);
        if(!This->buf)
            return E_OUTOFMEMORY;
        This->size = 128;
    }
 
    do {
        if(This->bsc.readed >= This->size) {
            void *new_buf;
            new_buf = heap_realloc(This->buf, This->size << 1);
            if(!new_buf)
                return E_OUTOFMEMORY;
            This->size <<= 1;
            This->buf = new_buf;
        }
 
        hres = read_stream(&This->bsc, stream, This->buf+This->bsc.readed, This->size-This->bsc.readed, &readed);
    }while(hres == S_OK);
 
    return S_OK;
}

ScriptBSC_start_binding()

static HRESULT ScriptBSC_start_binding ( BSCallback *  bsc )

static

Definition at line 795 of file script.c.

{
    ScriptBSC *This = impl_from_BSCallback(bsc);
 
    /* FIXME: We should find a better to decide if 'loading' state is supposed to be used by the protocol. */
    if(This->scheme == URL_SCHEME_HTTPS || This->scheme == URL_SCHEME_HTTP)
        set_script_elem_readystate(This->script_elem, READYSTATE_LOADING);
 
    return S_OK;
}

ScriptBSC_stop_binding()

static HRESULT ScriptBSC_stop_binding ( BSCallback *  bsc, HRESULT  result  )

static

Definition at line 806 of file script.c.

{
    ScriptBSC *This = impl_from_BSCallback(bsc);
 
    This->hres = result;
 
    if(SUCCEEDED(result)) {
        if(This->script_elem->readystate == READYSTATE_LOADING)
            set_script_elem_readystate(This->script_elem, READYSTATE_LOADED);
    }else {
        FIXME("binding failed %08x\n", result);
        heap_free(This->buf);
        This->buf = NULL;
        This->size = 0;
    }
 
    IHTMLScriptElement_Release(&This->script_elem->IHTMLScriptElement_iface);
    This->script_elem = NULL;
    return S_OK;
}

set_script_elem_readystate()

static void set_script_elem_readystate ( HTMLScriptElement *  script_elem, READYSTATE  readystate  )

static

Definition at line 707 of file script.c.

{
    script_elem->readystate = readystate;
 
    if(readystate != READYSTATE_INTERACTIVE) {
        if(!script_elem->element.node.doc->window->parser_callback_cnt) {
            fire_readystatechange_task_t *task;
            HRESULT hres;
 
            if(script_elem->pending_readystatechange_event)
                return;
 
            task = heap_alloc(sizeof(*task));
            if(!task)
                return;
 
            IHTMLScriptElement_AddRef(&script_elem->IHTMLScriptElement_iface);
            task->elem = script_elem;
 
            hres = push_task(&task->header, fire_readystatechange_proc, fire_readystatechange_task_destr,
                    script_elem->element.node.doc->window->task_magic);
            if(SUCCEEDED(hres))
                script_elem->pending_readystatechange_event = TRUE;
        }else {
            script_elem->pending_readystatechange_event = FALSE;
            fire_event(script_elem->element.node.doc, EVENTID_READYSTATECHANGE, FALSE,
                    script_elem->element.node.nsnode, NULL, NULL);
        }
    }
}

Referenced by parse_elem_text(), parse_script_elem(), ScriptBSC_start_binding(), and ScriptBSC_stop_binding().

set_script_mode()

void set_script_mode	(	HTMLOuterWindow *	window,
		SCRIPTMODE	mode
	)

Definition at line 1551 of file script.c.

{
    nsIWebBrowserSetup *setup;
    nsresult nsres;
 
    if(mode == SCRIPTMODE_ACTIVESCRIPT && !is_jscript_available()) {
        TRACE("jscript.dll not available\n");
        window->scriptmode = SCRIPTMODE_GECKO;
        return;
    }
 
    window->scriptmode = mode;
 
    if(!window->doc_obj->nscontainer || !window->doc_obj->nscontainer->webbrowser)
        return;
 
    nsres = nsIWebBrowser_QueryInterface(window->doc_obj->nscontainer->webbrowser,
            &IID_nsIWebBrowserSetup, (void**)&setup);
    if(NS_SUCCEEDED(nsres)) {
        nsres = nsIWebBrowserSetup_SetProperty(setup, SETUP_ALLOW_JAVASCRIPT,
                window->scriptmode == SCRIPTMODE_GECKO);
 
        if(NS_SUCCEEDED(nsres))
            nsres = nsIWebBrowserSetup_SetProperty(setup, SETUP_DISABLE_NOSCRIPT, TRUE);
 
        nsIWebBrowserSetup_Release(setup);
    }
 
    if(NS_FAILED(nsres))
        ERR("JavaScript setup failed: %08x\n", nsres);
}

Referenced by set_current_mon().

set_script_prop()

static void set_script_prop ( ScriptHost *  script_host, DWORD  property, VARIANT *  val  )

static

Definition at line 74 of file script.c.

{
    IActiveScriptProperty *script_prop;
    HRESULT hres;
 
    hres = IActiveScript_QueryInterface(script_host->script, &IID_IActiveScriptProperty,
            (void**)&script_prop);
    if(FAILED(hres)) {
        WARN("Could not get IActiveScriptProperty iface: %08x\n", hres);
        return;
    }
 
    hres = IActiveScriptProperty_SetProperty(script_prop, property, NULL, val);
    IActiveScriptProperty_Release(script_prop);
    if(FAILED(hres))
        WARN("SetProperty(%x) failed: %08x\n", property, hres);
}

Referenced by init_script_engine().

Variable Documentation

ActiveScriptSiteDebugVtbl

const IActiveScriptSiteDebugVtbl ActiveScriptSiteDebugVtbl

static

Initial value:

= {
    ActiveScriptSiteDebug_QueryInterface,
    ActiveScriptSiteDebug_AddRef,
    ActiveScriptSiteDebug_Release,
    ActiveScriptSiteDebug_GetDocumentContextFromPosition,
    ActiveScriptSiteDebug_GetApplication,
    ActiveScriptSiteDebug_GetRootApplicationNode,
    ActiveScriptSiteDebug_OnScriptErrorDebug
}

Definition at line 584 of file script.c.

Referenced by create_script_host().

ActiveScriptSiteInterruptPollVtbl

const IActiveScriptSiteInterruptPollVtbl ActiveScriptSiteInterruptPollVtbl

static

Initial value:

= {
    ActiveScriptSiteInterruptPoll_QueryInterface,
    ActiveScriptSiteInterruptPoll_AddRef,
    ActiveScriptSiteInterruptPoll_Release,
    ActiveScriptSiteInterruptPoll_QueryContinue
}

Definition at line 428 of file script.c.

Referenced by create_script_host().

ActiveScriptSiteUIControlVtbl

const IActiveScriptSiteUIControlVtbl ActiveScriptSiteUIControlVtbl

static

Initial value:

= {
    ActiveScriptSiteUIControl_QueryInterface,
    ActiveScriptSiteUIControl_AddRef,
    ActiveScriptSiteUIControl_Release,
    ActiveScriptSiteUIControl_GetUIBehavior
}

Definition at line 521 of file script.c.

Referenced by create_script_host().

ActiveScriptSiteVtbl

const IActiveScriptSiteVtbl ActiveScriptSiteVtbl

static

Initial value:

= {
    ActiveScriptSite_QueryInterface,
    ActiveScriptSite_AddRef,
    ActiveScriptSite_Release,
    ActiveScriptSite_GetLCID,
    ActiveScriptSite_GetItemInfo,
    ActiveScriptSite_GetDocVersionString,
    ActiveScriptSite_OnScriptTerminate,
    ActiveScriptSite_OnStateChange,
    ActiveScriptSite_OnScriptError,
    ActiveScriptSite_OnEnterScript,
    ActiveScriptSite_OnLeaveScript
}

Definition at line 381 of file script.c.

Referenced by create_script_host().

ActiveScriptSiteWindowVtbl

const IActiveScriptSiteWindowVtbl ActiveScriptSiteWindowVtbl

static

Initial value:

= {
    ActiveScriptSiteWindow_QueryInterface,
    ActiveScriptSiteWindow_AddRef,
    ActiveScriptSiteWindow_Release,
    ActiveScriptSiteWindow_GetWindow,
    ActiveScriptSiteWindow_EnableModeless
}

Definition at line 479 of file script.c.

Referenced by create_script_host().

ASServiceProviderVtbl

const IServiceProviderVtbl ASServiceProviderVtbl

static

Initial value:

= {
    ASServiceProvider_QueryInterface,
    ASServiceProvider_AddRef,
    ASServiceProvider_Release,
    ASServiceProvider_QueryService
}

Definition at line 645 of file script.c.

Referenced by create_script_host().

documentW

const WCHAR documentW[] = {'d','o','c','u','m','e','n','t',0}

static

Definition at line 47 of file script.c.

Referenced by find_event_target(), and test_script_run().

emptyW

const WCHAR emptyW[] = {0}

static

Definition at line 50 of file script.c.

Referenced by parse_event_elem(), and script_parse_event().

script_endW

const WCHAR script_endW[] = {'<','/','S','C','R','I','P','T','>',0}

static

Definition at line 49 of file script.c.

Referenced by parse_elem_text(), and parse_event_elem().

ScriptBSCVtbl

const BSCallbackVtbl ScriptBSCVtbl

static

Initial value:

= {
    ScriptBSC_destroy,
    ScriptBSC_init_bindinfo,
    ScriptBSC_start_binding,
    ScriptBSC_stop_binding,
    ScriptBSC_read_data,
    ScriptBSC_on_progress,
    ScriptBSC_on_response,
    ScriptBSC_beginning_transaction
}

Definition at line 872 of file script.c.

Referenced by bind_script_to_text().

windowW

const WCHAR windowW[] = {'w','i','n','d','o','w',0}

static

Definition at line 48 of file script.c.

Referenced by ActiveScript_AddNamedItem(), ActiveScriptSite_GetItemInfo(), find_event_target(), get_script_disp(), init_script_engine(), and parse_elem_text().