crypt32: Don't abort early if encoding type is 0 for CryptRegisterOIDFunction/CryptUn...
[wine] / dlls / shdocvw / shdocvw_main.c
1 /*
2  * SHDOCVW - Internet Explorer Web Control
3  *
4  * Copyright 2001 John R. Sheets (for CodeWeavers)
5  * Copyright 2004 Mike McCormack (for CodeWeavers)
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "config.h"
23
24 #include <stdarg.h>
25 #include <stdio.h>
26
27 #include "wine/unicode.h"
28 #include "wine/debug.h"
29
30 #include "shdocvw.h"
31
32 #include "winreg.h"
33 #include "shlwapi.h"
34
35 #include "initguid.h"
36
37 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
38
39 LONG SHDOCVW_refCount = 0;
40
41 HINSTANCE shdocvw_hinstance = 0;
42 static HMODULE SHDOCVW_hshell32 = 0;
43 static ITypeInfo *wb_typeinfo = NULL;
44
45 HRESULT get_typeinfo(ITypeInfo **typeinfo)
46 {
47     ITypeLib *typelib;
48     HRESULT hres;
49
50     if(wb_typeinfo) {
51         *typeinfo = wb_typeinfo;
52         return S_OK;
53     }
54
55     hres = LoadRegTypeLib(&LIBID_SHDocVw, 1, 1, LOCALE_SYSTEM_DEFAULT, &typelib);
56     if(FAILED(hres)) {
57         ERR("LoadRegTypeLib failed: %08x\n", hres);
58         return hres;
59     }
60
61     hres = ITypeLib_GetTypeInfoOfGuid(typelib, &IID_IWebBrowser2, &wb_typeinfo);
62     ITypeLib_Release(typelib);
63
64     *typeinfo = wb_typeinfo;
65     return hres;
66 }
67
68 /*************************************************************************
69  * SHDOCVW DllMain
70  */
71 BOOL WINAPI DllMain(HINSTANCE hinst, DWORD fdwReason, LPVOID fImpLoad)
72 {
73     TRACE("%p 0x%x %p\n", hinst, fdwReason, fImpLoad);
74     switch (fdwReason)
75     {
76         case DLL_PROCESS_ATTACH:
77         shdocvw_hinstance = hinst;
78         register_iewindow_class();
79         break;
80     case DLL_PROCESS_DETACH:
81         if (SHDOCVW_hshell32) FreeLibrary(SHDOCVW_hshell32);
82         unregister_iewindow_class();
83         if(wb_typeinfo)
84             ITypeInfo_Release(wb_typeinfo);
85         break;
86     }
87     return TRUE;
88 }
89
90 /*************************************************************************
91  *              DllCanUnloadNow (SHDOCVW.@)
92  */
93 HRESULT WINAPI DllCanUnloadNow(void)
94 {
95     return SHDOCVW_refCount ? S_FALSE : S_OK;
96 }
97
98 /***********************************************************************
99  *              DllGetVersion (SHDOCVW.@)
100  */
101 HRESULT WINAPI DllGetVersion(DLLVERSIONINFO *info)
102 {
103     if (info->cbSize != sizeof(DLLVERSIONINFO)) FIXME("support DLLVERSIONINFO2\n");
104
105     /* this is what IE6 on Windows 98 reports */
106     info->dwMajorVersion = 6;
107     info->dwMinorVersion = 0;
108     info->dwBuildNumber = 2600;
109     info->dwPlatformID = DLLVER_PLATFORM_WINDOWS;
110
111     return NOERROR;
112 }
113
114 /*************************************************************************
115  *              DllInstall (SHDOCVW.@)
116  */
117 HRESULT WINAPI DllInstall(BOOL bInstall, LPCWSTR cmdline)
118 {
119    FIXME("(%s, %s): stub!\n", bInstall ? "TRUE":"FALSE", debugstr_w(cmdline));
120
121    return S_OK;
122 }
123
124 /*************************************************************************
125  * SHDOCVW_LoadShell32
126  *
127  * makes sure the handle to shell32 is valid
128  */
129 static BOOL SHDOCVW_LoadShell32(void)
130 {
131      if (SHDOCVW_hshell32)
132        return TRUE;
133      return ((SHDOCVW_hshell32 = LoadLibraryA("shell32.dll")) != NULL);
134 }
135
136 /***********************************************************************
137  *              @ (SHDOCVW.110)
138  *
139  * Called by Win98 explorer.exe main binary, definitely has 0
140  * parameters.
141  */
142 DWORD WINAPI WinList_Init(void)
143 {
144     FIXME("(), stub!\n");
145     return 0x0deadfeed;
146 }
147
148 /***********************************************************************
149  *              @ (SHDOCVW.118)
150  *
151  * Called by Win98 explorer.exe main binary, definitely has only one
152  * parameter.
153  */
154 static BOOL (WINAPI *pShellDDEInit)(BOOL start) = NULL;
155
156 BOOL WINAPI ShellDDEInit(BOOL start)
157 {
158     TRACE("(%d)\n", start);
159
160     if (!pShellDDEInit)
161     {
162       if (!SHDOCVW_LoadShell32())
163         return FALSE;
164       pShellDDEInit = (void *)GetProcAddress(SHDOCVW_hshell32, (LPCSTR)188);
165     }
166
167     if (pShellDDEInit)
168       return pShellDDEInit(start);
169     else
170       return FALSE;
171 }
172
173 /***********************************************************************
174  *              @ (SHDOCVW.125)
175  *
176  * Called by Win98 explorer.exe main binary, definitely has 0
177  * parameters.
178  */
179 DWORD WINAPI RunInstallUninstallStubs(void)
180 {
181     FIXME("(), stub!\n");
182     return 0x0deadbee;
183 }
184
185 /***********************************************************************
186  *              SetQueryNetSessionCount (SHDOCVW.@)
187  */
188 DWORD WINAPI SetQueryNetSessionCount(DWORD arg)
189 {
190     FIXME("(%u), stub!\n", arg);
191     return 0;
192 }
193
194 /**********************************************************************
195  * OpenURL  (SHDOCVW.@)
196  */
197 void WINAPI OpenURL(HWND hWnd, HINSTANCE hInst, LPCSTR lpcstrUrl, int nShowCmd)
198 {
199     FIXME("%p %p %s %d\n", hWnd, hInst, debugstr_a(lpcstrUrl), nShowCmd);
200 }
201
202 /**********************************************************************
203  * Some forwards (by ordinal) to SHLWAPI
204  */
205
206 static void* fetch_shlwapi_ordinal(unsigned ord)
207 {
208     static const WCHAR shlwapiW[] = {'s','h','l','w','a','p','i','.','d','l','l','\0'};
209     static HANDLE h;
210
211     if (!h && !(h = GetModuleHandleW(shlwapiW))) return NULL;
212     return (void*)GetProcAddress(h, (const char*)ord);
213 }
214
215 /******************************************************************
216  *              WhichPlatformFORWARD            (SHDOCVW.@)
217  */
218 DWORD WINAPI WhichPlatformFORWARD(void)
219 {
220     static DWORD (*WINAPI p)(void);
221
222     if (p || (p = fetch_shlwapi_ordinal(276))) return p();
223     return 1; /* not integrated, see shlwapi.WhichPlatform */
224 }
225
226 /******************************************************************
227  *              StopWatchModeFORWARD            (SHDOCVW.@)
228  */
229 void WINAPI StopWatchModeFORWARD(void)
230 {
231     static void (*WINAPI p)(void);
232
233     if (p || (p = fetch_shlwapi_ordinal(241))) p();
234 }
235
236 /******************************************************************
237  *              StopWatchFlushFORWARD            (SHDOCVW.@)
238  */
239 void WINAPI StopWatchFlushFORWARD(void)
240 {
241     static void (*WINAPI p)(void);
242
243     if (p || (p = fetch_shlwapi_ordinal(242))) p();
244 }
245
246 /******************************************************************
247  *              StopWatchWFORWARD            (SHDOCVW.@)
248  */
249 DWORD WINAPI StopWatchWFORWARD(DWORD dwClass, LPCWSTR lpszStr, DWORD dwUnknown,
250                                DWORD dwMode, DWORD dwTimeStamp)
251 {
252     static DWORD (*WINAPI p)(DWORD, LPCWSTR, DWORD, DWORD, DWORD);
253
254     if (p || (p = fetch_shlwapi_ordinal(243)))
255         return p(dwClass, lpszStr, dwUnknown, dwMode, dwTimeStamp);
256     return ERROR_CALL_NOT_IMPLEMENTED;
257 }
258
259 /******************************************************************
260  *              StopWatchAFORWARD            (SHDOCVW.@)
261  */
262 DWORD WINAPI StopWatchAFORWARD(DWORD dwClass, LPCSTR lpszStr, DWORD dwUnknown,
263                                DWORD dwMode, DWORD dwTimeStamp)
264 {
265     static DWORD (*WINAPI p)(DWORD, LPCSTR, DWORD, DWORD, DWORD);
266
267     if (p || (p = fetch_shlwapi_ordinal(244)))
268         return p(dwClass, lpszStr, dwUnknown, dwMode, dwTimeStamp);
269     return ERROR_CALL_NOT_IMPLEMENTED;
270 }