DLLGetClassObject/Classfactory: create objects by CLSID not IID.

This commit is contained in:
Juergen Schmied 1999-07-10 11:48:15 +00:00 committed by Alexandre Julliard
parent ee1e4ce4b9
commit 61adb76bea
1 changed files with 61 additions and 49 deletions

View File

@ -37,35 +37,43 @@ static GetClassPtr SH_find_moduleproc(LPSTR dllname,HMODULE *xhmod,LPSTR name)
FARPROC dllunload,nameproc; FARPROC dllunload,nameproc;
TRACE("dll=%s, hmodule=%p, name=%s\n",dllname, xhmod, name); TRACE("dll=%s, hmodule=%p, name=%s\n",dllname, xhmod, name);
if (xhmod) if (xhmod)
{ *xhmod = 0; { *xhmod = 0;
} }
if (!strcasecmp(PathFindFilenameA(dllname),"shell32.dll")) if (!strcasecmp(PathFindFilenameA(dllname),"shell32.dll"))
{ return (GetClassPtr)SHELL32_DllGetClassObject; { return (GetClassPtr)SHELL32_DllGetClassObject;
} }
hmod = LoadLibraryExA(dllname,0,LOAD_WITH_ALTERED_SEARCH_PATH); hmod = LoadLibraryExA(dllname,0,LOAD_WITH_ALTERED_SEARCH_PATH);
if (!hmod) if (!hmod)
{ return NULL; { return NULL;
} }
dllunload = GetProcAddress(hmod,"DllCanUnloadNow"); dllunload = GetProcAddress(hmod,"DllCanUnloadNow");
if (!dllunload) if (!dllunload)
{ if (xhmod) { if (xhmod)
{ *xhmod = hmod; { *xhmod = hmod;
} }
} }
nameproc = GetProcAddress(hmod,name); nameproc = GetProcAddress(hmod,name);
if (!nameproc) if (!nameproc)
{ FreeLibrary(hmod); { FreeLibrary(hmod);
return NULL; return NULL;
} }
/* register unloadable dll with unloadproc ... */ /* register unloadable dll with unloadproc ... */
return (GetClassPtr)nameproc; return (GetClassPtr)nameproc;
} }
/************************************************************************* /*************************************************************************
* *
*/ */
static DWORD SH_get_instance(REFCLSID clsid,LPSTR dllname,LPVOID unknownouter,REFIID refiid,LPVOID inst) static DWORD SH_get_instance(REFCLSID clsid,LPSTR dllname,LPVOID unknownouter,REFIID refiid,LPVOID *ppv)
{ GetClassPtr dllgetclassob; { GetClassPtr dllgetclassob;
DWORD hres; DWORD hres;
LPCLASSFACTORY classfac; LPCLASSFACTORY classfac;
@ -73,23 +81,28 @@ static DWORD SH_get_instance(REFCLSID clsid,LPSTR dllname,LPVOID unknownouter,RE
char xclsid[50],xrefiid[50]; char xclsid[50],xrefiid[50];
WINE_StringFromCLSID((LPCLSID)clsid,xclsid); WINE_StringFromCLSID((LPCLSID)clsid,xclsid);
WINE_StringFromCLSID((LPCLSID)refiid,xrefiid); WINE_StringFromCLSID((LPCLSID)refiid,xrefiid);
TRACE("\n\tCLSID:%s,%s,%p,\n\tIID:%s,%p\n",xclsid, dllname,unknownouter,xrefiid,inst);
TRACE("\n\tCLSID:%s,%s,%p,\n\tIID:%s,%p\n",xclsid, dllname,unknownouter,xrefiid,ppv);
dllgetclassob = SH_find_moduleproc(dllname,NULL,"DllGetClassObject"); dllgetclassob = SH_find_moduleproc(dllname,NULL,"DllGetClassObject");
if (!dllgetclassob) if (!dllgetclassob)
{ return 0x80070000|GetLastError(); { return 0x80070000|GetLastError();
} }
hres = (*dllgetclassob)(clsid,(REFIID)&IID_IClassFactory,&classfac); hres = (*dllgetclassob)(clsid,(REFIID)&IID_IClassFactory,&classfac);
if ((hres<0) || (hres>=0x80000000)) if ((hres<0) || (hres>=0x80000000))
return hres; return hres;
if (!classfac) if (!classfac)
{ FIXME("no classfactory, but hres is 0x%ld!\n",hres); { FIXME("no classfactory, but hres is 0x%ld!\n",hres);
return E_FAIL; return E_FAIL;
} }
IClassFactory_CreateInstance(classfac,unknownouter,refiid,inst);
IClassFactory_CreateInstance(classfac,unknownouter,refiid,ppv);
IClassFactory_Release(classfac); IClassFactory_Release(classfac);
return 0; return S_OK;
} }
/************************************************************************* /*************************************************************************
@ -98,8 +111,14 @@ static DWORD SH_get_instance(REFCLSID clsid,LPSTR dllname,LPVOID unknownouter,RE
* NOTES * NOTES
* exported by ordinal * exported by ordinal
*/ */
LRESULT WINAPI SHCoCreateInstance(LPSTR aclsid,CLSID *clsid,LPUNKNOWN unknownouter,REFIID refiid,LPVOID inst) LRESULT WINAPI SHCoCreateInstance(
{ char buffer[256],xclsid[48],xiid[48],path[260],tmodel[100]; LPSTR aclsid,
CLSID *clsid,
LPUNKNOWN unknownouter,
REFIID refiid,
LPVOID *ppv)
{
char buffer[256],xclsid[48],xiid[48],path[260],tmodel[100];
HKEY inprockey; HKEY inprockey;
DWORD pathlen,type,tmodellen; DWORD pathlen,type,tmodellen;
DWORD hres; DWORD hres;
@ -111,39 +130,43 @@ LRESULT WINAPI SHCoCreateInstance(LPSTR aclsid,CLSID *clsid,LPUNKNOWN unknownout
} }
else else
{ if (!aclsid) { if (!aclsid)
{ return 0x80040154; { return REGDB_E_CLASSNOTREG;
} }
strcpy(xclsid,aclsid); strcpy(xclsid,aclsid);
} }
TRACE("(%p,\n\tSID:\t%s,%p,\n\tIID:\t%s,%p)\n",aclsid,xclsid,unknownouter,xiid,inst);
TRACE("(%p,\n\tSID:\t%s,%p,\n\tIID:\t%s,%p)\n",aclsid,xclsid,unknownouter,xiid,ppv);
sprintf(buffer,"CLSID\\%s\\InProcServer32",xclsid); sprintf(buffer,"CLSID\\%s\\InProcServer32",xclsid);
if (RegOpenKeyExA(HKEY_CLASSES_ROOT,buffer,0,0x02000000,&inprockey)) if (RegOpenKeyExA(HKEY_CLASSES_ROOT,buffer,0,0x02000000,&inprockey))
{ return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,inst); { return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,ppv);
} }
pathlen=sizeof(path); pathlen=sizeof(path);
if (RegQueryValueA(inprockey,NULL,path,&pathlen)) if (RegQueryValueA(inprockey,NULL,path,&pathlen))
{ RegCloseKey(inprockey); { RegCloseKey(inprockey);
return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,inst); return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,ppv);
} }
TRACE("Server dll is %s\n",path); TRACE("Server dll is %s\n",path);
tmodellen=sizeof(tmodel); tmodellen=sizeof(tmodel);
type=REG_SZ; type=REG_SZ;
if (RegQueryValueExA(inprockey,"ThreadingModel",NULL,&type,tmodel,&tmodellen)) if (RegQueryValueExA(inprockey,"ThreadingModel",NULL,&type,tmodel,&tmodellen))
{ RegCloseKey(inprockey); { RegCloseKey(inprockey);
return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,inst); return SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,ppv);
} }
TRACE("Threading model is %s\n",tmodel); TRACE("Threading model is %s\n",tmodel);
hres=SH_get_instance(clsid,path,unknownouter,refiid,inst); hres=SH_get_instance(clsid,path,unknownouter,refiid,ppv);
if (hres<0 || (hres>0x80000000)) if (hres<0 || (hres>0x80000000))
{ hres=SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,inst); { hres=SH_get_instance(clsid,"shell32.dll",unknownouter,refiid,ppv);
} }
RegCloseKey(inprockey); RegCloseKey(inprockey);
TRACE("-- interface is %p\n", *ppv);
return hres; return hres;
} }
@ -159,7 +182,7 @@ LRESULT WINAPI SHCoCreateInstance(LPSTR aclsid,CLSID *clsid,LPUNKNOWN unknownout
* This function does NOT instantiate the Class!!! * This function does NOT instantiate the Class!!!
* *
*/ */
HRESULT WINAPI SHELL32_DllGetClassObject(REFCLSID rclsid,REFIID iid,LPVOID *ppv) HRESULT WINAPI SHELL32_DllGetClassObject(REFCLSID rclsid, REFIID iid,LPVOID *ppv)
{ HRESULT hres = E_OUTOFMEMORY; { HRESULT hres = E_OUTOFMEMORY;
LPCLASSFACTORY lpclf; LPCLASSFACTORY lpclf;
@ -171,21 +194,11 @@ HRESULT WINAPI SHELL32_DllGetClassObject(REFCLSID rclsid,REFIID iid,LPVOID *ppv)
*ppv = NULL; *ppv = NULL;
if(IsEqualCLSID(rclsid, &CLSID_ShellDesktop)|| if(IsEqualCLSID(rclsid, &CLSID_ShellDesktop)||
IsEqualCLSID(rclsid, &CLSID_ShellLink)) IsEqualCLSID(rclsid, &CLSID_ShellLink))
{ if(IsEqualCLSID(rclsid, &CLSID_ShellDesktop)) /*debug*/ {
{ TRACE("-- requested CLSID_ShellDesktop\n"); lpclf = IClassFactory_Constructor( rclsid );
}
if (IsEqualCLSID(rclsid, &CLSID_ShellLink)) if(lpclf)
{ if (VERSION_OsIsUnicode ()) {
lpclf = IShellLinkW_CF_Constructor();
else
lpclf = IShellLink_CF_Constructor();
}
else
{ lpclf = IClassFactory_Constructor();
}
if(lpclf) {
hres = IClassFactory_QueryInterface(lpclf,iid, ppv); hres = IClassFactory_QueryInterface(lpclf,iid, ppv);
IClassFactory_Release(lpclf); IClassFactory_Release(lpclf);
} }
@ -234,6 +247,7 @@ typedef struct
/* IUnknown fields */ /* IUnknown fields */
ICOM_VTABLE(IClassFactory)* lpvtbl; ICOM_VTABLE(IClassFactory)* lpvtbl;
DWORD ref; DWORD ref;
CLSID *rclsid;
} IClassFactoryImpl; } IClassFactoryImpl;
static ICOM_VTABLE(IClassFactory) clfvt; static ICOM_VTABLE(IClassFactory) clfvt;
@ -242,13 +256,14 @@ static ICOM_VTABLE(IClassFactory) clfvt;
* IClassFactory_Constructor * IClassFactory_Constructor
*/ */
LPCLASSFACTORY IClassFactory_Constructor(void) LPCLASSFACTORY IClassFactory_Constructor(REFCLSID rclsid)
{ {
IClassFactoryImpl* lpclf; IClassFactoryImpl* lpclf;
lpclf= (IClassFactoryImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IClassFactoryImpl)); lpclf= (IClassFactoryImpl*)HeapAlloc(GetProcessHeap(),0,sizeof(IClassFactoryImpl));
lpclf->ref = 1; lpclf->ref = 1;
lpclf->lpvtbl = &clfvt; lpclf->lpvtbl = &clfvt;
lpclf->rclsid = (CLSID*)rclsid;
TRACE("(%p)->()\n",lpclf); TRACE("(%p)->()\n",lpclf);
shell32_ObjCount++; shell32_ObjCount++;
@ -279,7 +294,7 @@ static HRESULT WINAPI IClassFactory_fnQueryInterface(
TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj); TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj);
return S_OK; return S_OK;
} }
TRACE("-- Interface: E_NOINTERFACE\n"); TRACE("-- Interface: %s E_NOINTERFACE\n", xriid);
return E_NOINTERFACE; return E_NOINTERFACE;
} }
/****************************************************************************** /******************************************************************************
@ -326,35 +341,32 @@ static HRESULT WINAPI IClassFactory_fnCreateInstance(
*ppObject = NULL; *ppObject = NULL;
if(pUnknown) if(pUnknown)
{ return(CLASS_E_NOAGGREGATION); {
return(CLASS_E_NOAGGREGATION);
} }
if (IsEqualIID(riid, &IID_IShellFolder)) if (IsEqualCLSID(This->rclsid, &CLSID_ShellDesktop))
{ pObj = (IUnknown *)IShellFolder_Constructor(NULL,NULL); {
pObj = (IUnknown *)IShellFolder_Constructor(NULL,NULL);
} }
else if (IsEqualIID(riid, &IID_IShellView)) else if (IsEqualCLSID(This->rclsid, &CLSID_ShellLink))
{ pObj = (IUnknown *)IShellView_Constructor(NULL,NULL); {
} pObj = (IUnknown *)IShellLink_Constructor(FALSE);
else if (IsEqualIID(riid, &IID_IExtractIconA))
{ pObj = (IUnknown *)IExtractIconA_Constructor(NULL);
}
else if (IsEqualIID(riid, &IID_IContextMenu))
{ pObj = (IUnknown *)IContextMenu_Constructor(NULL, NULL, 0);
}
else if (IsEqualIID(riid, &IID_IDataObject))
{ pObj = (IUnknown *)IDataObject_Constructor(0,NULL,NULL,0);
} }
else else
{ ERR("unknown IID requested\n\tIID:\t%s\n",xriid); {
ERR("unknown IID requested\n\tIID:\t%s\n",xriid);
return(E_NOINTERFACE); return(E_NOINTERFACE);
} }
if (!pObj) if (!pObj)
{ return(E_OUTOFMEMORY); {
return(E_OUTOFMEMORY);
} }
hres = pObj->lpvtbl->fnQueryInterface(pObj,riid, ppObject); hres = IUnknown_QueryInterface(pObj,riid, ppObject);
pObj->lpvtbl->fnRelease(pObj); IUnknown_Release(pObj);
TRACE("-- Object created: (%p)->%p\n",This,*ppObject); TRACE("-- Object created: (%p)->%p\n",This,*ppObject);
return hres; return hres;