295 lines
9.1 KiB
C
295 lines
9.1 KiB
C
/*
|
|
* Common Dialog Boxes interface (32 bit)
|
|
* Find/Replace
|
|
*
|
|
* Copyright 1999 Bertho A. Stultiens
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
|
|
#define COBJMACROS
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "wingdi.h"
|
|
#include "winuser.h"
|
|
#include "objbase.h"
|
|
#include "rpcproxy.h"
|
|
#include "commdlg.h"
|
|
#include "cderr.h"
|
|
#include "wine/debug.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(commdlg);
|
|
|
|
#include "cdlg.h"
|
|
|
|
|
|
DECLSPEC_HIDDEN HINSTANCE COMDLG32_hInstance = 0;
|
|
|
|
static DWORD COMDLG32_TlsIndex = TLS_OUT_OF_INDEXES;
|
|
|
|
static HINSTANCE SHELL32_hInstance;
|
|
static HINSTANCE SHFOLDER_hInstance;
|
|
|
|
/* ITEMIDLIST */
|
|
LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILClone) (LPCITEMIDLIST) DECLSPEC_HIDDEN;
|
|
LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILCombine)(LPCITEMIDLIST,LPCITEMIDLIST) DECLSPEC_HIDDEN;
|
|
LPITEMIDLIST (WINAPI *COMDLG32_PIDL_ILGetNext)(LPITEMIDLIST) DECLSPEC_HIDDEN;
|
|
BOOL (WINAPI *COMDLG32_PIDL_ILRemoveLastID)(LPCITEMIDLIST) DECLSPEC_HIDDEN;
|
|
BOOL (WINAPI *COMDLG32_PIDL_ILIsEqual)(LPCITEMIDLIST, LPCITEMIDLIST) DECLSPEC_HIDDEN;
|
|
UINT (WINAPI *COMDLG32_PIDL_ILGetSize)(LPCITEMIDLIST) DECLSPEC_HIDDEN;
|
|
|
|
/* SHELL */
|
|
LPVOID (WINAPI *COMDLG32_SHAlloc)(DWORD) DECLSPEC_HIDDEN;
|
|
DWORD (WINAPI *COMDLG32_SHFree)(LPVOID) DECLSPEC_HIDDEN;
|
|
BOOL (WINAPI *COMDLG32_SHGetFolderPathW)(HWND,int,HANDLE,DWORD,LPWSTR) DECLSPEC_HIDDEN;
|
|
LPITEMIDLIST (WINAPI *COMDLG32_SHSimpleIDListFromPathAW)(LPCVOID) DECLSPEC_HIDDEN;
|
|
|
|
/***********************************************************************
|
|
* DllMain (COMDLG32.init)
|
|
*
|
|
* Initialization code for the COMDLG32 DLL
|
|
*
|
|
* RETURNS:
|
|
* FALSE if sibling could not be loaded or instantiated twice, TRUE
|
|
* otherwise.
|
|
*/
|
|
static const char GPA_string[] = "Failed to get entry point %s for hinst = %p\n";
|
|
#define GPA(dest, hinst, name) \
|
|
if(!(dest = (void*)GetProcAddress(hinst,name)))\
|
|
{ \
|
|
ERR(GPA_string, debugstr_a(name), hinst); \
|
|
return FALSE; \
|
|
}
|
|
|
|
BOOL WINAPI DllMain(HINSTANCE hInstance, DWORD Reason, LPVOID Reserved)
|
|
{
|
|
TRACE("(%p, %d, %p)\n", hInstance, Reason, Reserved);
|
|
|
|
switch(Reason)
|
|
{
|
|
case DLL_PROCESS_ATTACH:
|
|
COMDLG32_hInstance = hInstance;
|
|
DisableThreadLibraryCalls(hInstance);
|
|
|
|
SHELL32_hInstance = GetModuleHandleA("SHELL32.DLL");
|
|
|
|
/* ITEMIDLIST */
|
|
GPA(COMDLG32_PIDL_ILIsEqual, SHELL32_hInstance, (LPCSTR)21L);
|
|
GPA(COMDLG32_PIDL_ILCombine, SHELL32_hInstance, (LPCSTR)25L);
|
|
GPA(COMDLG32_PIDL_ILGetNext, SHELL32_hInstance, (LPCSTR)153L);
|
|
GPA(COMDLG32_PIDL_ILClone, SHELL32_hInstance, (LPCSTR)18L);
|
|
GPA(COMDLG32_PIDL_ILRemoveLastID, SHELL32_hInstance, (LPCSTR)17L);
|
|
GPA(COMDLG32_PIDL_ILGetSize, SHELL32_hInstance, (LPCSTR)152L);
|
|
|
|
/* SHELL */
|
|
GPA(COMDLG32_SHSimpleIDListFromPathAW, SHELL32_hInstance, (LPCSTR)162);
|
|
GPA(COMDLG32_SHAlloc, SHELL32_hInstance, (LPCSTR)196L);
|
|
GPA(COMDLG32_SHFree, SHELL32_hInstance, (LPCSTR)195L);
|
|
|
|
/* for the first versions of shell32 SHGetFolderPathW is in SHFOLDER.DLL */
|
|
COMDLG32_SHGetFolderPathW = (void*)GetProcAddress(SHELL32_hInstance,"SHGetFolderPathW");
|
|
if (!COMDLG32_SHGetFolderPathW)
|
|
{
|
|
SHFOLDER_hInstance = LoadLibraryA("SHFOLDER.DLL");
|
|
GPA(COMDLG32_SHGetFolderPathW, SHFOLDER_hInstance,"SHGetFolderPathW");
|
|
}
|
|
|
|
break;
|
|
|
|
case DLL_PROCESS_DETACH:
|
|
if (COMDLG32_TlsIndex != TLS_OUT_OF_INDEXES) TlsFree(COMDLG32_TlsIndex);
|
|
if(SHFOLDER_hInstance) FreeLibrary(SHFOLDER_hInstance);
|
|
break;
|
|
}
|
|
return TRUE;
|
|
}
|
|
#undef GPA
|
|
|
|
/***********************************************************************
|
|
* COMDLG32_AllocMem (internal)
|
|
* Get memory for internal datastructure plus stringspace etc.
|
|
* RETURNS
|
|
* Success: Pointer to a heap block
|
|
* Failure: null
|
|
*/
|
|
LPVOID COMDLG32_AllocMem(
|
|
int size /* [in] Block size to allocate */
|
|
) {
|
|
LPVOID ptr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size);
|
|
if(!ptr)
|
|
{
|
|
COMDLG32_SetCommDlgExtendedError(CDERR_MEMALLOCFAILURE);
|
|
return NULL;
|
|
}
|
|
return ptr;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* COMDLG32_SetCommDlgExtendedError (internal)
|
|
*
|
|
* Used to set the thread's local error value if a comdlg32 function fails.
|
|
*/
|
|
void COMDLG32_SetCommDlgExtendedError(DWORD err)
|
|
{
|
|
TRACE("(%08x)\n", err);
|
|
if (COMDLG32_TlsIndex == TLS_OUT_OF_INDEXES)
|
|
COMDLG32_TlsIndex = TlsAlloc();
|
|
if (COMDLG32_TlsIndex != TLS_OUT_OF_INDEXES)
|
|
TlsSetValue(COMDLG32_TlsIndex, (LPVOID)(DWORD_PTR)err);
|
|
else
|
|
FIXME("No Tls Space\n");
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* CommDlgExtendedError (COMDLG32.@)
|
|
*
|
|
* Get the thread's local error value if a comdlg32 function fails.
|
|
* RETURNS
|
|
* Current error value which might not be valid
|
|
* if a previous call succeeded.
|
|
*/
|
|
DWORD WINAPI CommDlgExtendedError(void)
|
|
{
|
|
if (COMDLG32_TlsIndex != TLS_OUT_OF_INDEXES)
|
|
return (DWORD_PTR)TlsGetValue(COMDLG32_TlsIndex);
|
|
else
|
|
return 0; /* we never set an error, so there isn't one */
|
|
}
|
|
|
|
/*************************************************************************
|
|
* Implement the CommDlg32 class factory
|
|
*
|
|
* (Taken from shdocvw/factory.c; based on implementation in
|
|
* ddraw/main.c)
|
|
*/
|
|
typedef struct
|
|
{
|
|
IClassFactory IClassFactory_iface;
|
|
HRESULT (*cf)(IUnknown*, REFIID, void**);
|
|
} IClassFactoryImpl;
|
|
|
|
static inline IClassFactoryImpl *impl_from_IClassFactory(IClassFactory *iface)
|
|
{
|
|
return CONTAINING_RECORD(iface, IClassFactoryImpl, IClassFactory_iface);
|
|
}
|
|
|
|
/*************************************************************************
|
|
* CDLGCF_QueryInterface (IUnknown)
|
|
*/
|
|
static HRESULT WINAPI CDLGCF_QueryInterface(IClassFactory* iface,
|
|
REFIID riid, void **ppobj)
|
|
{
|
|
TRACE("%p (%s %p)\n", iface, debugstr_guid(riid), ppobj);
|
|
|
|
if(!ppobj)
|
|
return E_POINTER;
|
|
|
|
if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IClassFactory, riid))
|
|
{
|
|
*ppobj = iface;
|
|
IClassFactory_AddRef(iface);
|
|
return S_OK;
|
|
}
|
|
|
|
WARN("Interface not supported.\n");
|
|
|
|
*ppobj = NULL;
|
|
return E_NOINTERFACE;
|
|
}
|
|
|
|
/*************************************************************************
|
|
* CDLGCF_AddRef (IUnknown)
|
|
*/
|
|
static ULONG WINAPI CDLGCF_AddRef(IClassFactory *iface)
|
|
{
|
|
return 2; /* non-heap based object */
|
|
}
|
|
|
|
/*************************************************************************
|
|
* CDLGCF_Release (IUnknown)
|
|
*/
|
|
static ULONG WINAPI CDLGCF_Release(IClassFactory *iface)
|
|
{
|
|
return 1; /* non-heap based object */
|
|
}
|
|
|
|
/*************************************************************************
|
|
* CDLGCF_CreateInstance (IClassFactory)
|
|
*/
|
|
static HRESULT WINAPI CDLGCF_CreateInstance(IClassFactory *iface, IUnknown *pOuter,
|
|
REFIID riid, void **ppobj)
|
|
{
|
|
IClassFactoryImpl *This = impl_from_IClassFactory(iface);
|
|
return This->cf(pOuter, riid, ppobj);
|
|
}
|
|
|
|
/*************************************************************************
|
|
* CDLGCF_LockServer (IClassFactory)
|
|
*/
|
|
static HRESULT WINAPI CDLGCF_LockServer(IClassFactory *iface, BOOL dolock)
|
|
{
|
|
TRACE("%p (%d)\n", iface, dolock);
|
|
return S_OK;
|
|
}
|
|
|
|
static const IClassFactoryVtbl CDLGCF_Vtbl =
|
|
{
|
|
CDLGCF_QueryInterface,
|
|
CDLGCF_AddRef,
|
|
CDLGCF_Release,
|
|
CDLGCF_CreateInstance,
|
|
CDLGCF_LockServer
|
|
};
|
|
|
|
/*************************************************************************
|
|
* DllGetClassObject (COMMDLG32.@)
|
|
*/
|
|
HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, void **ppv)
|
|
{
|
|
static IClassFactoryImpl FileOpenDlgClassFactory = {{&CDLGCF_Vtbl}, FileOpenDialog_Constructor};
|
|
static IClassFactoryImpl FileSaveDlgClassFactory = {{&CDLGCF_Vtbl}, FileSaveDialog_Constructor};
|
|
|
|
TRACE("%s, %s, %p\n", debugstr_guid(rclsid), debugstr_guid(riid), ppv);
|
|
|
|
if(IsEqualGUID(&CLSID_FileOpenDialog, rclsid))
|
|
return IClassFactory_QueryInterface(&FileOpenDlgClassFactory.IClassFactory_iface, riid, ppv);
|
|
|
|
if(IsEqualGUID(&CLSID_FileSaveDialog, rclsid))
|
|
return IClassFactory_QueryInterface(&FileSaveDlgClassFactory.IClassFactory_iface, riid, ppv);
|
|
|
|
return CLASS_E_CLASSNOTAVAILABLE;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* DllRegisterServer (COMMDLG32.@)
|
|
*/
|
|
HRESULT WINAPI DllRegisterServer(void)
|
|
{
|
|
return __wine_register_resources(COMDLG32_hInstance);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* DllUnregisterServer (COMMDLG32.@)
|
|
*/
|
|
HRESULT WINAPI DllUnregisterServer(void)
|
|
{
|
|
return __wine_unregister_resources(COMDLG32_hInstance);
|
|
}
|