scrrun.c File Reference

#include <stdarg.h>
#include "windef.h"
#include "winbase.h"
#include "ole2.h"
#include "olectl.h"
#include "rpcproxy.h"
#include <initguid.h>
#include "scrrun.h"
#include "scrrun_private.h"
#include "wine/debug.h"

Include dependency graph for scrrun.c:

Go to the source code of this file.

Macros
#define	COBJMACROS

Typedefs
typedef HRESULT(*	fnCreateInstance) (LPVOID *ppObj)

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (scrrun)
static struct provideclassinfo *	impl_from_IProvideClassInfo (IProvideClassInfo *iface)
static HRESULT WINAPI	scrruncf_QueryInterface (IClassFactory *iface, REFIID riid, LPVOID *ppv)
static ULONG WINAPI	scrruncf_AddRef (IClassFactory *iface)
static ULONG WINAPI	scrruncf_Release (IClassFactory *iface)
static HRESULT WINAPI	scrruncf_LockServer (IClassFactory *iface, BOOL fLock)
static HRESULT	load_typelib (void)
static HRESULT	get_typeinfo_of_guid (const GUID *guid, ITypeInfo **tinfo)
HRESULT	get_typeinfo (tid_t tid, ITypeInfo **typeinfo)
static void	release_typelib (void)
static HRESULT WINAPI	provideclassinfo_QueryInterface (IProvideClassInfo *iface, REFIID riid, void **obj)
static ULONG WINAPI	provideclassinfo_AddRef (IProvideClassInfo *iface)
static ULONG WINAPI	provideclassinfo_Release (IProvideClassInfo *iface)
static HRESULT WINAPI	provideclassinfo_GetClassInfo (IProvideClassInfo *iface, ITypeInfo **ti)
void	init_classinfo (const GUID *guid, IUnknown *outer, struct provideclassinfo *classinfo)
BOOL WINAPI	DllMain (HINSTANCE hinst, DWORD reason, LPVOID reserved)
HRESULT WINAPI	DllGetClassObject (REFCLSID rclsid, REFIID riid, LPVOID *ppv)

Variables
static const struct IClassFactoryVtbl	scrruncf_vtbl
static const struct IClassFactoryVtbl	dictcf_vtbl
static IClassFactory	FileSystemFactory = { &scrruncf_vtbl }
static IClassFactory	DictionaryFactory = { &dictcf_vtbl }
static ITypeLib *	typelib
static ITypeInfo *	typeinfos [LAST_tid]
static REFIID	tid_ids []
static const IProvideClassInfoVtbl	provideclassinfovtbl

Macro Definition Documentation

COBJMACROS

#define COBJMACROS

Definition at line 18 of file scrrun.c.

Typedef Documentation

fnCreateInstance

typedef HRESULT(* fnCreateInstance) (LPVOID *ppObj)

Definition at line 41 of file scrrun.c.

Function Documentation

DllGetClassObject()

HRESULT WINAPI DllGetClassObject	(	REFCLSID	rclsid,
		REFIID	riid,
		LPVOID *	ppv
	)

Definition at line 258 of file scrrun.c.

{
    if(IsEqualGUID(&CLSID_FileSystemObject, rclsid)) {
        TRACE("(CLSID_FileSystemObject %s %p)\n", debugstr_guid(riid), ppv);
        return IClassFactory_QueryInterface(&FileSystemFactory, riid, ppv);
    }
    else if(IsEqualGUID(&CLSID_Dictionary, rclsid)) {
        TRACE("(CLSID_Dictionary %s %p)\n", debugstr_guid(riid), ppv);
        return IClassFactory_QueryInterface(&DictionaryFactory, riid, ppv);
    }
 
    FIXME("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
    return CLASS_E_CLASSNOTAVAILABLE;
}

DllMain()

BOOL WINAPI DllMain	(	HINSTANCE	hinst,
		DWORD	reason,
		LPVOID	reserved
	)

Definition at line 237 of file scrrun.c.

{
    TRACE("%p, %lu, %p\n", hinst, reason, reserved);
 
    switch (reason)
    {
        case DLL_PROCESS_ATTACH:
            DisableThreadLibraryCalls( hinst );
            break;
        case DLL_PROCESS_DETACH:
            if (reserved) break;
            release_typelib();
            break;
    }
    return TRUE;
}

get_typeinfo()

HRESULT get_typeinfo	(	tid_t	tid,
		ITypeInfo **	typeinfo
	)

Definition at line 148 of file scrrun.c.

{
    HRESULT hres;
 
    if (FAILED(hres = load_typelib()))
        return hres;
 
    if(!typeinfos[tid]) {
        ITypeInfo *ti;
 
        hres = ITypeLib_GetTypeInfoOfGuid(typelib, tid_ids[tid], &ti);
        if(FAILED(hres)) {
            ERR("GetTypeInfoOfGuid(%s) failed: %#lx.\n", debugstr_guid(tid_ids[tid]), hres);
            return hres;
        }
 
        if(InterlockedCompareExchangePointer((void**)(typeinfos+tid), ti, NULL))
            ITypeInfo_Release(ti);
    }
 
    *typeinfo = typeinfos[tid];
    ITypeInfo_AddRef(typeinfos[tid]);
    return S_OK;
}

get_typeinfo_of_guid()

static HRESULT get_typeinfo_of_guid ( const GUID *  guid, ITypeInfo **  tinfo  )

static

Definition at line 138 of file scrrun.c.

{
    HRESULT hres;
 
    if(FAILED(hres = load_typelib()))
        return hres;
 
    return ITypeLib_GetTypeInfoOfGuid(typelib, guid, tinfo);
}

Referenced by provideclassinfo_GetClassInfo().

impl_from_IProvideClassInfo()

static struct provideclassinfo * impl_from_IProvideClassInfo ( IProvideClassInfo *  iface )

inlinestatic

Definition at line 36 of file scrrun.c.

{
    return CONTAINING_RECORD(iface, struct provideclassinfo, IProvideClassInfo_iface);
}

Referenced by provideclassinfo_AddRef(), provideclassinfo_GetClassInfo(), provideclassinfo_QueryInterface(), and provideclassinfo_Release().

init_classinfo()

void init_classinfo	(	const GUID *	guid,
		IUnknown *	outer,
		struct provideclassinfo *	classinfo
	)

Definition at line 230 of file scrrun.c.

{
    classinfo->IProvideClassInfo_iface.lpVtbl = &provideclassinfovtbl;
    classinfo->outer = outer;
    classinfo->guid = guid;
}

Referenced by create_drive(), create_drivecoll(), create_file(), create_filecoll(), create_folder(), create_foldercoll(), create_textstream(), Dictionary_CreateInstance(), DoOpenPipeStream(), FileSystem_CreateInstance(), WshCollection_Create(), WshEnvironment_Create(), WshExec_create(), WshShellFactory_CreateInstance(), and WshShortcut_Create().

load_typelib()

static HRESULT load_typelib ( void  )

static

Definition at line 119 of file scrrun.c.

{
    HRESULT hres;
    ITypeLib *tl;
 
    if(typelib)
        return S_OK;
 
    hres = LoadRegTypeLib(&LIBID_Scripting, 1, 0, LOCALE_SYSTEM_DEFAULT, &tl);
    if(FAILED(hres)) {
        ERR("LoadRegTypeLib failed: %#lx.\n", hres);
        return hres;
    }
 
    if(InterlockedCompareExchangePointer((void**)&typelib, tl, NULL))
        ITypeLib_Release(tl);
    return hres;
}

Referenced by get_typeinfo(), and get_typeinfo_of_guid().

provideclassinfo_AddRef()

static ULONG WINAPI provideclassinfo_AddRef ( IProvideClassInfo *  iface )

static

Definition at line 202 of file scrrun.c.

{
    struct provideclassinfo *This = impl_from_IProvideClassInfo(iface);
    return IUnknown_AddRef(This->outer);
}

provideclassinfo_GetClassInfo()

static HRESULT WINAPI provideclassinfo_GetClassInfo ( IProvideClassInfo *  iface, ITypeInfo **  ti  )

static

Definition at line 214 of file scrrun.c.

{
    struct provideclassinfo *This = impl_from_IProvideClassInfo(iface);
 
    TRACE("(%p)->(%p)\n", This, ti);
 
    return get_typeinfo_of_guid(This->guid, ti);
}

provideclassinfo_QueryInterface()

static HRESULT WINAPI provideclassinfo_QueryInterface ( IProvideClassInfo *  iface, REFIID  riid, void **  obj  )

static

Definition at line 187 of file scrrun.c.

{
    struct provideclassinfo *This = impl_from_IProvideClassInfo(iface);
 
    TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
 
    if (IsEqualIID(riid, &IID_IProvideClassInfo)) {
        *obj = iface;
        IProvideClassInfo_AddRef(iface);
        return S_OK;
    }
    else
        return IUnknown_QueryInterface(This->outer, riid, obj);
}

provideclassinfo_Release()

static ULONG WINAPI provideclassinfo_Release ( IProvideClassInfo *  iface )

static

Definition at line 208 of file scrrun.c.

{
    struct provideclassinfo *This = impl_from_IProvideClassInfo(iface);
    return IUnknown_Release(This->outer);
}

release_typelib()

static void release_typelib ( void  )

static

Definition at line 173 of file scrrun.c.

{
    unsigned i;
 
    if(!typelib)
        return;
 
    for (i = 0; i < ARRAY_SIZE(typeinfos); i++)
        if(typeinfos[i])
            ITypeInfo_Release(typeinfos[i]);
 
    ITypeLib_Release(typelib);
}

Referenced by DllMain().

scrruncf_AddRef()

static ULONG WINAPI scrruncf_AddRef ( IClassFactory *  iface )

static

Definition at line 64 of file scrrun.c.

{
    TRACE("(%p)\n", iface);
    return 2;
}

scrruncf_LockServer()

static HRESULT WINAPI scrruncf_LockServer ( IClassFactory *  iface, BOOL  fLock  )

static

Definition at line 76 of file scrrun.c.

{
    TRACE("(%p)->(%x)\n", iface, fLock);
    return S_OK;
}

scrruncf_QueryInterface()

static HRESULT WINAPI scrruncf_QueryInterface ( IClassFactory *  iface, REFIID  riid, LPVOID *  ppv  )

static

Definition at line 43 of file scrrun.c.

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

scrruncf_Release()

static ULONG WINAPI scrruncf_Release ( IClassFactory *  iface )

static

Definition at line 70 of file scrrun.c.

{
    TRACE("(%p)\n", iface);
    return 1;
}

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

scrrun

)

Variable Documentation

dictcf_vtbl

const struct IClassFactoryVtbl dictcf_vtbl

static

Initial value:

=
{
    scrruncf_QueryInterface,
    scrruncf_AddRef,
    scrruncf_Release,
    Dictionary_CreateInstance,
    scrruncf_LockServer
}

Definition at line 91 of file scrrun.c.

DictionaryFactory

IClassFactory DictionaryFactory = { &dictcf_vtbl }

static

Definition at line 101 of file scrrun.c.

Referenced by DllGetClassObject().

FileSystemFactory

IClassFactory FileSystemFactory = { &scrruncf_vtbl }

static

Definition at line 100 of file scrrun.c.

Referenced by DllGetClassObject().

provideclassinfovtbl

const IProvideClassInfoVtbl provideclassinfovtbl

static

Initial value:

= {
    provideclassinfo_QueryInterface,
    provideclassinfo_AddRef,
    provideclassinfo_Release,
    provideclassinfo_GetClassInfo
}

Definition at line 223 of file scrrun.c.

Referenced by init_classinfo().

scrruncf_vtbl

const struct IClassFactoryVtbl scrruncf_vtbl

static

Initial value:

=
{
    scrruncf_QueryInterface,
    scrruncf_AddRef,
    scrruncf_Release,
    FileSystem_CreateInstance,
    scrruncf_LockServer
}

Definition at line 82 of file scrrun.c.

tid_ids

REFIID tid_ids[]

static

Initial value:

= {
    &IID_NULL,
    &IID_IDictionary,
    &IID_IDrive,
    &IID_IDriveCollection,
    &IID_IFile,
    &IID_IFileCollection,
    &IID_IFileSystem3,
    &IID_IFolder,
    &IID_IFolderCollection,
    &IID_ITextStream
}

Definition at line 106 of file scrrun.c.

Referenced by get_typeinfo().

typeinfos

ITypeInfo* typeinfos[LAST_tid]

static

Definition at line 104 of file scrrun.c.

Referenced by get_typeinfo(), and release_typelib().

typelib

ITypeLib* typelib

static

Definition at line 103 of file scrrun.c.