2001-01-11 23:32:44 +01:00
|
|
|
/*
|
2002-05-05 21:40:57 +02:00
|
|
|
* SHDOCVW - Internet Explorer Web Control
|
2001-01-11 23:32:44 +01:00
|
|
|
*
|
2002-03-10 00:29:33 +01:00
|
|
|
* Copyright 2001 John R. Sheets (for CodeWeavers)
|
|
|
|
*
|
|
|
|
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
2001-01-11 23:32:44 +01:00
|
|
|
*/
|
|
|
|
|
2004-02-13 21:57:34 +01:00
|
|
|
#include "config.h"
|
|
|
|
|
2003-01-03 20:12:55 +01:00
|
|
|
#define COM_NO_WINDOWS_H
|
2003-09-06 01:08:26 +02:00
|
|
|
#include <stdarg.h>
|
2004-02-13 21:57:34 +01:00
|
|
|
#include <stdio.h>
|
2001-01-26 21:43:40 +01:00
|
|
|
#include <string.h>
|
2003-09-06 01:08:26 +02:00
|
|
|
#include "windef.h"
|
|
|
|
#include "winbase.h"
|
2001-11-06 23:31:19 +01:00
|
|
|
#include "winreg.h"
|
2003-09-09 21:39:31 +02:00
|
|
|
#include "winuser.h"
|
2004-02-13 21:57:34 +01:00
|
|
|
#include "winnls.h"
|
2001-01-11 23:32:44 +01:00
|
|
|
#include "ole2.h"
|
|
|
|
#include "shlwapi.h"
|
|
|
|
|
|
|
|
#include "shdocvw.h"
|
2004-02-13 21:57:34 +01:00
|
|
|
#include "uuids.h"
|
|
|
|
|
|
|
|
#include "wine/unicode.h"
|
2002-03-10 00:29:33 +01:00
|
|
|
#include "wine/debug.h"
|
2001-01-11 23:32:44 +01:00
|
|
|
|
2004-02-13 21:57:34 +01:00
|
|
|
#include "initguid.h"
|
|
|
|
|
2002-03-10 00:29:33 +01:00
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
|
2001-01-11 23:32:44 +01:00
|
|
|
|
2004-02-13 21:57:34 +01:00
|
|
|
|
|
|
|
DEFINE_GUID( CLSID_MozillaBrowser, 0x1339B54C,0x3453,0x11D2,0x93,0xB9,0x00,0x00,0x00,0x00,0x00,0x00);
|
|
|
|
|
|
|
|
typedef HRESULT (WINAPI *fnGetClassObject)(REFCLSID rclsid, REFIID iid, LPVOID *ppv);
|
|
|
|
|
2003-10-02 06:31:06 +02:00
|
|
|
HINSTANCE shdocvw_hinstance = 0;
|
2004-02-13 21:57:34 +01:00
|
|
|
static HMODULE SHDOCVW_hshell32 = 0;
|
|
|
|
static HMODULE hMozCtl = (HMODULE)~0UL;
|
|
|
|
|
|
|
|
|
|
|
|
/* convert a guid to a wide character string */
|
|
|
|
static void SHDOCVW_guid2wstr( const GUID *guid, LPWSTR wstr )
|
|
|
|
{
|
|
|
|
char str[40];
|
|
|
|
|
|
|
|
sprintf(str, "{%08lX-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
|
|
|
|
guid->Data1, guid->Data2, guid->Data3,
|
|
|
|
guid->Data4[0], guid->Data4[1], guid->Data4[2], guid->Data4[3],
|
|
|
|
guid->Data4[4], guid->Data4[5], guid->Data4[6], guid->Data4[7] );
|
|
|
|
MultiByteToWideChar( CP_ACP, 0, str, -1, wstr, 40 );
|
|
|
|
}
|
|
|
|
|
|
|
|
static BOOL SHDOCVW_GetMozctlPath( LPWSTR szPath, DWORD sz )
|
|
|
|
{
|
|
|
|
DWORD r, type;
|
|
|
|
BOOL ret = FALSE;
|
|
|
|
HKEY hkey;
|
|
|
|
const WCHAR szPre[] = {
|
|
|
|
'S','o','f','t','w','a','r','e','\\',
|
|
|
|
'C','l','a','s','s','e','s','\\',
|
|
|
|
'C','L','S','I','D','\\',0 };
|
|
|
|
const WCHAR szPost[] = {
|
|
|
|
'\\','I','n','p','r','o','c','S','e','r','v','e','r','3','2',0 };
|
|
|
|
WCHAR szRegPath[(sizeof(szPre)+sizeof(szPost))/sizeof(WCHAR)+40];
|
|
|
|
|
|
|
|
strcpyW( szRegPath, szPre );
|
|
|
|
SHDOCVW_guid2wstr( &CLSID_MozillaBrowser, &szRegPath[strlenW(szRegPath)] );
|
|
|
|
strcatW( szRegPath, szPost );
|
|
|
|
|
|
|
|
TRACE("key = %s\n", debugstr_w( szRegPath ) );
|
|
|
|
|
|
|
|
r = RegOpenKeyW( HKEY_LOCAL_MACHINE, szRegPath, &hkey );
|
|
|
|
if( r != ERROR_SUCCESS )
|
|
|
|
return FALSE;
|
|
|
|
|
|
|
|
r = RegQueryValueExW( hkey, NULL, NULL, &type, (LPBYTE)szPath, &sz );
|
|
|
|
ret = ( r == ERROR_SUCCESS ) && ( type == REG_SZ );
|
|
|
|
RegCloseKey( hkey );
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
2003-10-02 06:31:06 +02:00
|
|
|
|
|
|
|
/*************************************************************************
|
|
|
|
* SHDOCVW DllMain
|
|
|
|
*/
|
|
|
|
BOOL WINAPI DllMain(HINSTANCE hinst, DWORD fdwReason, LPVOID fImpLoad)
|
|
|
|
{
|
|
|
|
TRACE("%p 0x%lx %p\n", hinst, fdwReason, fImpLoad);
|
|
|
|
switch (fdwReason)
|
|
|
|
{
|
|
|
|
case DLL_PROCESS_ATTACH:
|
|
|
|
shdocvw_hinstance = hinst;
|
|
|
|
break;
|
|
|
|
case DLL_PROCESS_DETACH:
|
|
|
|
if (SHDOCVW_hshell32) FreeLibrary(SHDOCVW_hshell32);
|
2004-02-13 21:57:34 +01:00
|
|
|
if (hMozCtl && hMozCtl != (HMODULE)~0UL) FreeLibrary(hMozCtl);
|
2003-10-02 06:31:06 +02:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
return TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*************************************************************************
|
2002-05-22 03:55:18 +02:00
|
|
|
* DllCanUnloadNow (SHDOCVW.@)
|
|
|
|
*/
|
2002-05-05 21:40:57 +02:00
|
|
|
HRESULT WINAPI SHDOCVW_DllCanUnloadNow(void)
|
|
|
|
{
|
|
|
|
FIXME("(void): stub\n");
|
|
|
|
|
|
|
|
return S_FALSE;
|
|
|
|
}
|
|
|
|
|
2004-02-13 21:57:34 +01:00
|
|
|
|
|
|
|
static BOOL SHDOCVW_TryLoadMozillaControl()
|
|
|
|
{
|
|
|
|
WCHAR szPath[MAX_PATH];
|
|
|
|
|
|
|
|
if( hMozCtl != (HMODULE)~0UL )
|
|
|
|
return hMozCtl ? TRUE : FALSE;
|
|
|
|
|
|
|
|
if( !SHDOCVW_GetMozctlPath( szPath, sizeof szPath ) )
|
|
|
|
{
|
|
|
|
MESSAGE("You need to install the Mozilla ActiveX control to\n");
|
|
|
|
MESSAGE("use Wine's builtin CLSID_WebBrowser from SHDOCVW.DLL\n");
|
|
|
|
return FALSE;
|
|
|
|
}
|
|
|
|
hMozCtl = LoadLibraryExW(szPath, NULL, LOAD_WITH_ALTERED_SEARCH_PATH);
|
|
|
|
if( !hMozCtl )
|
|
|
|
{
|
|
|
|
ERR("Can't load the Mozilla ActiveX control\n");
|
|
|
|
return FALSE;
|
|
|
|
}
|
|
|
|
return TRUE;
|
|
|
|
}
|
|
|
|
|
2002-05-05 21:40:57 +02:00
|
|
|
/*************************************************************************
|
2002-05-22 03:55:18 +02:00
|
|
|
* DllGetClassObject (SHDOCVW.@)
|
2002-05-05 21:40:57 +02:00
|
|
|
*/
|
|
|
|
HRESULT WINAPI SHDOCVW_DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
|
|
|
|
{
|
|
|
|
TRACE("\n");
|
|
|
|
|
2004-02-13 21:57:34 +01:00
|
|
|
if( IsEqualGUID( &CLSID_WebBrowser, rclsid ) &&
|
|
|
|
SHDOCVW_TryLoadMozillaControl() )
|
|
|
|
{
|
|
|
|
HRESULT r;
|
|
|
|
fnGetClassObject pGetClassObject;
|
|
|
|
|
|
|
|
TRACE("WebBrowser class %s\n", debugstr_guid(rclsid) );
|
|
|
|
|
|
|
|
pGetClassObject = (fnGetClassObject)
|
|
|
|
GetProcAddress( hMozCtl, "DllGetClassObject" );
|
|
|
|
|
|
|
|
if( !pGetClassObject )
|
|
|
|
return CLASS_E_CLASSNOTAVAILABLE;
|
|
|
|
r = pGetClassObject( &CLSID_MozillaBrowser, riid, ppv );
|
|
|
|
|
|
|
|
TRACE("r = %08lx *ppv = %p\n", r, *ppv );
|
|
|
|
|
|
|
|
return r;
|
|
|
|
}
|
|
|
|
|
2002-05-05 21:40:57 +02:00
|
|
|
if (IsEqualGUID(&IID_IClassFactory, riid))
|
|
|
|
{
|
|
|
|
/* Pass back our shdocvw class factory */
|
|
|
|
*ppv = (LPVOID)&SHDOCVW_ClassFactory;
|
|
|
|
IClassFactory_AddRef((IClassFactory*)&SHDOCVW_ClassFactory);
|
|
|
|
|
|
|
|
return S_OK;
|
|
|
|
}
|
|
|
|
|
|
|
|
return CLASS_E_CLASSNOTAVAILABLE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/***********************************************************************
|
2002-05-22 03:55:18 +02:00
|
|
|
* DllGetVersion (SHDOCVW.@)
|
2001-01-11 23:32:44 +01:00
|
|
|
*/
|
2004-02-21 05:01:22 +01:00
|
|
|
HRESULT WINAPI SHDOCVW_DllGetVersion (DLLVERSIONINFO *info)
|
2001-01-11 23:32:44 +01:00
|
|
|
{
|
2004-02-21 05:01:22 +01:00
|
|
|
if (info->cbSize != sizeof(DLLVERSIONINFO)) FIXME("support DLLVERSIONINFO2\n");
|
|
|
|
|
|
|
|
/* this is what IE6 on Windows 98 reports */
|
|
|
|
info->dwMajorVersion = 6;
|
|
|
|
info->dwMinorVersion = 0;
|
|
|
|
info->dwBuildNumber = 2600;
|
|
|
|
info->dwPlatformID = DLLVER_PLATFORM_WINDOWS;
|
|
|
|
|
|
|
|
return NOERROR;
|
2001-01-11 23:32:44 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
/*************************************************************************
|
2002-05-22 03:55:18 +02:00
|
|
|
* DllInstall (SHDOCVW.@)
|
2001-01-11 23:32:44 +01:00
|
|
|
*/
|
|
|
|
HRESULT WINAPI SHDOCVW_DllInstall(BOOL bInstall, LPCWSTR cmdline)
|
|
|
|
{
|
2002-05-05 21:40:57 +02:00
|
|
|
FIXME("(%s, %s): stub!\n", bInstall ? "TRUE":"FALSE", debugstr_w(cmdline));
|
2001-01-11 23:32:44 +01:00
|
|
|
|
2002-05-05 21:40:57 +02:00
|
|
|
return S_OK;
|
2001-01-11 23:32:44 +01:00
|
|
|
}
|
|
|
|
|
2003-10-02 06:31:06 +02:00
|
|
|
/*************************************************************************
|
|
|
|
* SHDOCVW_LoadShell32
|
|
|
|
*
|
|
|
|
* makes sure the handle to shell32 is valid
|
|
|
|
*/
|
|
|
|
BOOL SHDOCVW_LoadShell32(void)
|
|
|
|
{
|
|
|
|
if (SHDOCVW_hshell32)
|
|
|
|
return TRUE;
|
|
|
|
return ((SHDOCVW_hshell32 = LoadLibraryA("shell32.dll")) != NULL);
|
|
|
|
}
|
|
|
|
|
2003-05-13 06:44:39 +02:00
|
|
|
/***********************************************************************
|
2003-09-11 03:04:24 +02:00
|
|
|
* @ (SHDOCVW.110)
|
2003-05-13 06:44:39 +02:00
|
|
|
*
|
|
|
|
* Called by Win98 explorer.exe main binary, definitely has 0
|
|
|
|
* parameters.
|
|
|
|
*/
|
2003-09-11 03:04:24 +02:00
|
|
|
DWORD WINAPI WinList_Init(void)
|
2003-05-13 06:44:39 +02:00
|
|
|
{
|
|
|
|
FIXME("(), stub!\n");
|
|
|
|
return 0x0deadfeed;
|
|
|
|
}
|
|
|
|
|
|
|
|
/***********************************************************************
|
2003-09-11 03:04:24 +02:00
|
|
|
* @ (SHDOCVW.118)
|
2003-05-13 06:44:39 +02:00
|
|
|
*
|
|
|
|
* Called by Win98 explorer.exe main binary, definitely has only one
|
|
|
|
* parameter.
|
|
|
|
*/
|
2003-10-02 06:31:06 +02:00
|
|
|
static BOOL (WINAPI *pShellDDEInit)(BOOL start) = NULL;
|
|
|
|
|
|
|
|
BOOL WINAPI ShellDDEInit(BOOL start)
|
2003-05-13 06:44:39 +02:00
|
|
|
{
|
2003-10-02 06:31:06 +02:00
|
|
|
TRACE("(%d)\n", start);
|
|
|
|
|
|
|
|
if (!pShellDDEInit)
|
|
|
|
{
|
|
|
|
if (!SHDOCVW_LoadShell32())
|
|
|
|
return FALSE;
|
|
|
|
pShellDDEInit = GetProcAddress(SHDOCVW_hshell32, (LPCSTR)188);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (pShellDDEInit)
|
|
|
|
return pShellDDEInit(start);
|
|
|
|
else
|
|
|
|
return FALSE;
|
2003-05-13 06:44:39 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
/***********************************************************************
|
2003-09-11 03:04:24 +02:00
|
|
|
* @ (SHDOCVW.125)
|
2003-05-13 06:44:39 +02:00
|
|
|
*
|
|
|
|
* Called by Win98 explorer.exe main binary, definitely has 0
|
|
|
|
* parameters.
|
|
|
|
*/
|
2003-09-11 03:04:24 +02:00
|
|
|
DWORD WINAPI RunInstallUninstallStubs(void)
|
2003-05-13 06:44:39 +02:00
|
|
|
{
|
|
|
|
FIXME("(), stub!\n");
|
|
|
|
return 0x0deadbee;
|
|
|
|
}
|