activex.c File Reference

#include "jscript.h"
#include "objsafe.h"
#include "mshtmhst.h"
#include "wine/debug.h"

Include dependency graph for activex.c:

Go to the source code of this file.

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (jscript)
static IInternetHostSecurityManager *	get_sec_mgr (script_ctx_t *ctx)
static IUnknown *	create_activex_object (script_ctx_t *ctx, const WCHAR *progid)
static HRESULT	ActiveXObject_value (script_ctx_t *ctx, vdisp_t *jsthis, WORD flags, unsigned argc, jsval_t *argv, jsval_t *r)
HRESULT	create_activex_constr (script_ctx_t *ctx, jsdisp_t **ret)

Variables
const GUID	GUID_CUSTOM_CONFIRMOBJECTSAFETY

Function Documentation

ActiveXObject_value()

static HRESULT ActiveXObject_value ( script_ctx_t *  ctx, vdisp_t *  jsthis, WORD  flags, unsigned  argc, jsval_t *  argv, jsval_t *  r  )

static

Definition at line 141 of file activex.c.

{
    jsstr_t * progid_str;
    const WCHAR *progid;
    IDispatch *disp;
    IUnknown *obj;
    HRESULT hres;
 
    TRACE("\n");
 
    if(flags != DISPATCH_CONSTRUCT) {
        FIXME("unsupported flags %x\n", flags);
        return E_NOTIMPL;
    }
 
    if(ctx->safeopt != (INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_DISPEX|INTERFACE_USES_SECURITY_MANAGER)
        && ctx->safeopt != INTERFACE_USES_DISPEX) {
        FIXME("Unsupported safeopt %x\n", ctx->safeopt);
        return E_NOTIMPL;
    }
 
    if(argc != 1) {
        FIXME("unsupported argc %d\n", argc);
        return E_NOTIMPL;
    }
 
    hres = to_flat_string(ctx, argv[0], &progid_str, &progid);
    if(FAILED(hres))
        return hres;
 
    obj = create_activex_object(ctx, progid);
    jsstr_release(progid_str);
    if(!obj)
        return throw_generic_error(ctx, JS_E_CANNOT_CREATE_OBJ, NULL);
 
    hres = IUnknown_QueryInterface(obj, &IID_IDispatch, (void**)&disp);
    IUnknown_Release(obj);
    if(FAILED(hres)) {
        FIXME("Object does not support IDispatch\n");
        return E_NOTIMPL;
    }
 
    *r = jsval_disp(disp);
    return S_OK;
}

Referenced by create_activex_constr().

create_activex_constr()

HRESULT create_activex_constr	(	script_ctx_t *	ctx,
		jsdisp_t **	ret
	)

Definition at line 188 of file activex.c.

{
    jsdisp_t *prototype;
    HRESULT hres;
 
    static const WCHAR ActiveXObjectW[] = {'A','c','t','i','v','e','X','O','b','j','e','c','t',0};
 
    hres = create_object(ctx, NULL, &prototype);
    if(FAILED(hres))
        return hres;
 
    hres = create_builtin_function(ctx, ActiveXObject_value, ActiveXObjectW, NULL,
            PROPF_CONSTR|1, prototype, ret);
 
    jsdisp_release(prototype);
    return hres;
}

Referenced by init_global().

create_activex_object()

static IUnknown * create_activex_object ( script_ctx_t *  ctx, const WCHAR *  progid  )

static

Definition at line 57 of file activex.c.

{
    IInternetHostSecurityManager *secmgr = NULL;
    IObjectWithSite *obj_site;
    struct CONFIRMSAFETY cs;
    IClassFactoryEx *cfex;
    IClassFactory *cf;
    DWORD policy_size;
    BYTE *bpolicy;
    IUnknown *obj;
    DWORD policy;
    GUID guid;
    HRESULT hres;
 
    TRACE("%s\n", debugstr_w(progid));
 
    hres = CLSIDFromProgID(progid, &guid);
    if(FAILED(hres))
        return NULL;
 
    TRACE("GUID %s\n", debugstr_guid(&guid));
 
    if(ctx->safeopt & INTERFACE_USES_SECURITY_MANAGER) {
        secmgr = get_sec_mgr(ctx);
        if(!secmgr)
            return NULL;
 
        policy = 0;
        hres = IInternetHostSecurityManager_ProcessUrlAction(secmgr, URLACTION_ACTIVEX_RUN,
                (BYTE*)&policy, sizeof(policy), (BYTE*)&guid, sizeof(GUID), 0, 0);
        if(FAILED(hres) || policy != URLPOLICY_ALLOW)
            return NULL;
    }
 
    hres = CoGetClassObject(&guid, CLSCTX_INPROC_SERVER|CLSCTX_LOCAL_SERVER, NULL, &IID_IClassFactory, (void**)&cf);
    if(FAILED(hres))
        return NULL;
 
    hres = IClassFactory_QueryInterface(cf, &IID_IClassFactoryEx, (void**)&cfex);
    if(SUCCEEDED(hres)) {
        FIXME("Use IClassFactoryEx\n");
        IClassFactoryEx_Release(cfex);
    }
 
    hres = IClassFactory_CreateInstance(cf, NULL, &IID_IUnknown, (void**)&obj);
    if(FAILED(hres))
        return NULL;
 
    if(secmgr) {
        cs.clsid = guid;
        cs.pUnk = obj;
        cs.dwFlags = 0;
        hres = IInternetHostSecurityManager_QueryCustomPolicy(secmgr, &GUID_CUSTOM_CONFIRMOBJECTSAFETY,
                &bpolicy, &policy_size, (BYTE*)&cs, sizeof(cs), 0);
        if(SUCCEEDED(hres)) {
            policy = policy_size >= sizeof(DWORD) ? *(DWORD*)bpolicy : URLPOLICY_DISALLOW;
            CoTaskMemFree(bpolicy);
        }
 
        if(FAILED(hres) || policy != URLPOLICY_ALLOW) {
            IUnknown_Release(obj);
            return NULL;
        }
    }
 
    hres = IUnknown_QueryInterface(obj, &IID_IObjectWithSite, (void**)&obj_site);
    if(SUCCEEDED(hres)) {
        IUnknown *ax_site;
 
        ax_site = create_ax_site(ctx);
        if(ax_site) {
            hres = IObjectWithSite_SetSite(obj_site, ax_site);
            IUnknown_Release(ax_site);
        }
        IObjectWithSite_Release(obj_site);
        if(!ax_site || FAILED(hres)) {
            IUnknown_Release(obj);
            return NULL;
        }
    }
 
    return obj;
}

Referenced by ActiveXObject_value().

get_sec_mgr()

static IInternetHostSecurityManager * get_sec_mgr ( script_ctx_t *  ctx )

static

Definition at line 32 of file activex.c.

{
    IInternetHostSecurityManager *secmgr;
    IServiceProvider *sp;
    HRESULT hres;
 
    if(!ctx->site)
        return NULL;
 
    if(ctx->secmgr)
        return ctx->secmgr;
 
    hres = IActiveScriptSite_QueryInterface(ctx->site, &IID_IServiceProvider, (void**)&sp);
    if(FAILED(hres))
        return NULL;
 
    hres = IServiceProvider_QueryService(sp, &SID_SInternetHostSecurityManager, &IID_IInternetHostSecurityManager,
            (void**)&secmgr);
    IServiceProvider_Release(sp);
    if(FAILED(hres))
        return NULL;
 
    return ctx->secmgr = secmgr;
}

Referenced by create_activex_object().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

jscript

)

Variable Documentation

GUID_CUSTOM_CONFIRMOBJECTSAFETY

const GUID GUID_CUSTOM_CONFIRMOBJECTSAFETY

Initial value:

=
    {0x10200490,0xfa38,0x11d0,{0xac,0x0e,0x00,0xa0,0xc9,0xf,0xff,0xc0}}

Definition at line 29 of file activex.c.

Referenced by check_load_safety(), check_script_safety(), create_activex_object(), and InternetHostSecurityManager_QueryCustomPolicy().