]>
Commit | Line | Data |
---|---|---|
1 | ///////////////////////////////////////////////////////////////////////////// | |
2 | // Name: src/msw/main.cpp | |
3 | // Purpose: WinMain/DllMain | |
4 | // Author: Julian Smart | |
5 | // Modified by: | |
6 | // Created: 04/01/98 | |
7 | // RCS-ID: $Id$ | |
8 | // Copyright: (c) Julian Smart | |
9 | // Licence: wxWindows licence | |
10 | ///////////////////////////////////////////////////////////////////////////// | |
11 | ||
12 | // ============================================================================ | |
13 | // declarations | |
14 | // ============================================================================ | |
15 | ||
16 | // ---------------------------------------------------------------------------- | |
17 | // headers | |
18 | // ---------------------------------------------------------------------------- | |
19 | ||
20 | // For compilers that support precompilation, includes "wx.h". | |
21 | #include "wx/wxprec.h" | |
22 | ||
23 | #ifdef __BORLANDC__ | |
24 | #pragma hdrstop | |
25 | #endif | |
26 | ||
27 | #ifndef WX_PRECOMP | |
28 | #include "wx/event.h" | |
29 | #include "wx/app.h" | |
30 | #endif //WX_PRECOMP | |
31 | ||
32 | #include "wx/cmdline.h" | |
33 | #include "wx/scopeguard.h" | |
34 | ||
35 | #include "wx/msw/private.h" | |
36 | #include "wx/msw/seh.h" | |
37 | ||
38 | #if wxUSE_ON_FATAL_EXCEPTION | |
39 | #include "wx/datetime.h" | |
40 | #include "wx/msw/crashrpt.h" | |
41 | #endif // wxUSE_ON_FATAL_EXCEPTION | |
42 | ||
43 | #ifdef __WXWINCE__ | |
44 | // there is no ExitProcess() under CE but exiting the main thread has the | |
45 | // same effect | |
46 | #ifndef ExitProcess | |
47 | #define ExitProcess ExitThread | |
48 | #endif | |
49 | #endif // __WXWINCE__ | |
50 | ||
51 | #ifdef __BORLANDC__ | |
52 | // BC++ has to be special: its run-time expects the DLL entry point to be | |
53 | // named DllEntryPoint instead of the (more) standard DllMain | |
54 | #define DllMain DllEntryPoint | |
55 | #endif // __BORLANDC__ | |
56 | ||
57 | #if defined(__WXMICROWIN__) | |
58 | #define HINSTANCE HANDLE | |
59 | #endif | |
60 | ||
61 | // defined in common/init.cpp | |
62 | extern int wxEntryReal(int& argc, wxChar **argv); | |
63 | ||
64 | // ============================================================================ | |
65 | // implementation: various entry points | |
66 | // ============================================================================ | |
67 | ||
68 | #if wxUSE_BASE | |
69 | ||
70 | #if wxUSE_ON_FATAL_EXCEPTION && defined(__VISUALC__) && !defined(__WXWINCE__) | |
71 | // VC++ (at least from 4.0 up to version 7.1) is incredibly broken in that | |
72 | // a "catch ( ... )" will *always* catch SEH exceptions in it even though | |
73 | // it should have never been the case... to prevent such catches from | |
74 | // stealing the exceptions from our wxGlobalSEHandler which is only called | |
75 | // if the exception is not handled elsewhere, we have to also call it from | |
76 | // a special SEH translator function which is called by VC CRT when a Win32 | |
77 | // exception occurs | |
78 | ||
79 | // this warns that /EHa (async exceptions) should be used when using | |
80 | // _set_se_translator but, in fact, this doesn't seem to change anything | |
81 | // with VC++ up to 7.1 -- to be confirmed with VC++ 8 | |
82 | #if _MSC_VER <= 1310 | |
83 | #pragma warning(disable:4535) | |
84 | #endif | |
85 | ||
86 | // note that the SE translator must be called wxSETranslator! | |
87 | #define DisableAutomaticSETranslator() _set_se_translator(wxSETranslator) | |
88 | #else // !__VISUALC__ | |
89 | #define DisableAutomaticSETranslator() | |
90 | #endif // __VISUALC__/!__VISUALC__ | |
91 | ||
92 | // ---------------------------------------------------------------------------- | |
93 | // wrapper wxEntry catching all Win32 exceptions occurring in a wx program | |
94 | // ---------------------------------------------------------------------------- | |
95 | ||
96 | // wrap real wxEntry in a try-except block to be able to call | |
97 | // OnFatalException() if necessary | |
98 | #if wxUSE_ON_FATAL_EXCEPTION | |
99 | ||
100 | // global pointer to exception information, only valid inside OnFatalException, | |
101 | // used by wxStackWalker and wxCrashReport | |
102 | extern EXCEPTION_POINTERS *wxGlobalSEInformation = NULL; | |
103 | ||
104 | // flag telling us whether the application wants to handle exceptions at all | |
105 | static bool gs_handleExceptions = false; | |
106 | ||
107 | static void wxFatalExit() | |
108 | { | |
109 | // use the same exit code as abort() | |
110 | ::ExitProcess(3); | |
111 | } | |
112 | ||
113 | unsigned long wxGlobalSEHandler(EXCEPTION_POINTERS *pExcPtrs) | |
114 | { | |
115 | if ( gs_handleExceptions && wxTheApp ) | |
116 | { | |
117 | // store the pointer to exception info | |
118 | wxGlobalSEInformation = pExcPtrs; | |
119 | ||
120 | // give the user a chance to do something special about this | |
121 | wxSEH_TRY | |
122 | { | |
123 | wxTheApp->OnFatalException(); | |
124 | } | |
125 | wxSEH_IGNORE // ignore any exceptions inside the exception handler | |
126 | ||
127 | wxGlobalSEInformation = NULL; | |
128 | ||
129 | // this will execute our handler and terminate the process | |
130 | return EXCEPTION_EXECUTE_HANDLER; | |
131 | } | |
132 | ||
133 | return EXCEPTION_CONTINUE_SEARCH; | |
134 | } | |
135 | ||
136 | #ifdef __VISUALC__ | |
137 | ||
138 | void wxSETranslator(unsigned int WXUNUSED(code), EXCEPTION_POINTERS *ep) | |
139 | { | |
140 | switch ( wxGlobalSEHandler(ep) ) | |
141 | { | |
142 | default: | |
143 | wxFAIL_MSG( _T("unexpected wxGlobalSEHandler() return value") ); | |
144 | // fall through | |
145 | ||
146 | case EXCEPTION_EXECUTE_HANDLER: | |
147 | // if wxApp::OnFatalException() had been called we should exit the | |
148 | // application -- but we shouldn't kill our host when we're a DLL | |
149 | #ifndef WXMAKINGDLL | |
150 | wxFatalExit(); | |
151 | #endif // not a DLL | |
152 | break; | |
153 | ||
154 | case EXCEPTION_CONTINUE_SEARCH: | |
155 | // we're called for each "catch ( ... )" and if we (re)throw from | |
156 | // here, the catch handler body is not executed, so the effect is | |
157 | // as if had inhibited translation of SE to C++ ones because the | |
158 | // handler will never see any structured exceptions | |
159 | throw; | |
160 | } | |
161 | } | |
162 | ||
163 | #endif // __VISUALC__ | |
164 | ||
165 | bool wxHandleFatalExceptions(bool doit) | |
166 | { | |
167 | // assume this can only be called from the main thread | |
168 | gs_handleExceptions = doit; | |
169 | ||
170 | #if wxUSE_CRASHREPORT | |
171 | if ( doit ) | |
172 | { | |
173 | // try to find a place where we can put out report file later | |
174 | wxChar fullname[MAX_PATH]; | |
175 | if ( !::GetTempPath(WXSIZEOF(fullname), fullname) ) | |
176 | { | |
177 | wxLogLastError(_T("GetTempPath")); | |
178 | ||
179 | // when all else fails... | |
180 | wxStrcpy(fullname, _T("c:\\")); | |
181 | } | |
182 | ||
183 | // use PID and date to make the report file name more unique | |
184 | wxString name = wxString::Format | |
185 | ( | |
186 | _T("%s_%s_%lu.dmp"), | |
187 | wxTheApp ? wxTheApp->GetAppName().c_str() | |
188 | : _T("wxwindows"), | |
189 | wxDateTime::Now().Format(_T("%Y%m%dT%H%M%S")).c_str(), | |
190 | ::GetCurrentProcessId() | |
191 | ); | |
192 | ||
193 | wxStrncat(fullname, name, WXSIZEOF(fullname) - wxStrlen(fullname) - 1); | |
194 | ||
195 | wxCrashReport::SetFileName(fullname); | |
196 | } | |
197 | #endif // wxUSE_CRASHREPORT | |
198 | ||
199 | return true; | |
200 | } | |
201 | ||
202 | int wxEntry(int& argc, wxChar **argv) | |
203 | { | |
204 | DisableAutomaticSETranslator(); | |
205 | ||
206 | wxSEH_TRY | |
207 | { | |
208 | return wxEntryReal(argc, argv); | |
209 | } | |
210 | wxSEH_HANDLE(-1) | |
211 | } | |
212 | ||
213 | #else // !wxUSE_ON_FATAL_EXCEPTION | |
214 | ||
215 | #if defined(__VISUALC__) && !defined(__WXWINCE__) | |
216 | ||
217 | static void | |
218 | wxSETranslator(unsigned int WXUNUSED(code), EXCEPTION_POINTERS * WXUNUSED(ep)) | |
219 | { | |
220 | // see wxSETranslator() version for wxUSE_ON_FATAL_EXCEPTION above | |
221 | throw; | |
222 | } | |
223 | ||
224 | #endif // __VISUALC__ | |
225 | ||
226 | int wxEntry(int& argc, wxChar **argv) | |
227 | { | |
228 | DisableAutomaticSETranslator(); | |
229 | ||
230 | return wxEntryReal(argc, argv); | |
231 | } | |
232 | ||
233 | #endif // wxUSE_ON_FATAL_EXCEPTION/!wxUSE_ON_FATAL_EXCEPTION | |
234 | ||
235 | #endif // wxUSE_BASE | |
236 | ||
237 | #if wxUSE_GUI && defined(__WXMSW__) | |
238 | ||
239 | #if wxUSE_UNICODE && !defined(__WXWINCE__) | |
240 | #define NEED_UNICODE_CHECK | |
241 | #endif | |
242 | ||
243 | #ifdef NEED_UNICODE_CHECK | |
244 | ||
245 | // check whether Unicode is available | |
246 | static bool wxIsUnicodeAvailable() | |
247 | { | |
248 | static const wchar_t *ERROR_STRING = L"wxWidgets Fatal Error"; | |
249 | ||
250 | if ( wxGetOsVersion() != wxOS_WINDOWS_NT ) | |
251 | { | |
252 | // we need to be built with MSLU support | |
253 | #if !wxUSE_UNICODE_MSLU | |
254 | // note that we can use MessageBoxW() as it's implemented even under | |
255 | // Win9x - OTOH, we can't use wxGetTranslation() because the file APIs | |
256 | // used by wxLocale are not | |
257 | ::MessageBox | |
258 | ( | |
259 | NULL, | |
260 | L"This program uses Unicode and requires Windows NT/2000/XP.\n" | |
261 | L"\n" | |
262 | L"Program aborted.", | |
263 | ERROR_STRING, | |
264 | MB_ICONERROR | MB_OK | |
265 | ); | |
266 | ||
267 | return false; | |
268 | #else // wxUSE_UNICODE_MSLU | |
269 | // and the MSLU DLL must also be available | |
270 | HMODULE hmod = ::LoadLibraryA("unicows.dll"); | |
271 | if ( !hmod ) | |
272 | { | |
273 | ::MessageBox | |
274 | ( | |
275 | NULL, | |
276 | L"This program uses Unicode and requires unicows.dll to work " | |
277 | L"under current operating system.\n" | |
278 | L"\n" | |
279 | L"Please install unicows.dll and relaunch the program.", | |
280 | ERROR_STRING, | |
281 | MB_ICONERROR | MB_OK | |
282 | ); | |
283 | return false; | |
284 | } | |
285 | ||
286 | // this is not really necessary but be tidy | |
287 | ::FreeLibrary(hmod); | |
288 | ||
289 | // finally do the last check: has unicows.lib initialized correctly? | |
290 | hmod = ::LoadLibraryW(L"unicows.dll"); | |
291 | if ( !hmod ) | |
292 | { | |
293 | ::MessageBox | |
294 | ( | |
295 | NULL, | |
296 | L"This program uses Unicode but is not using unicows.dll\n" | |
297 | L"correctly and so cannot work under current operating system.\n" | |
298 | L"Please contact the program author for an updated version.\n" | |
299 | L"\n" | |
300 | L"Program aborted.", | |
301 | ERROR_STRING, | |
302 | MB_ICONERROR | MB_OK | |
303 | ); | |
304 | ||
305 | return false; | |
306 | } | |
307 | ||
308 | ::FreeLibrary(hmod); | |
309 | #endif // !wxUSE_UNICODE_MSLU | |
310 | } | |
311 | ||
312 | return true; | |
313 | } | |
314 | ||
315 | #endif // NEED_UNICODE_CHECK | |
316 | ||
317 | // ---------------------------------------------------------------------------- | |
318 | // Windows-specific wxEntry | |
319 | // ---------------------------------------------------------------------------- | |
320 | ||
321 | // helper function used to clean up in wxEntry() just below | |
322 | // | |
323 | // notice that argv elements are supposed to be allocated using malloc() while | |
324 | // argv array itself is allocated with new | |
325 | static void wxFreeArgs(int argc, wxChar **argv) | |
326 | { | |
327 | for ( int i = 0; i < argc; i++ ) | |
328 | { | |
329 | free(argv[i]); | |
330 | } | |
331 | ||
332 | delete [] argv; | |
333 | } | |
334 | ||
335 | WXDLLEXPORT int wxEntry(HINSTANCE hInstance, | |
336 | HINSTANCE WXUNUSED(hPrevInstance), | |
337 | wxCmdLineArgType WXUNUSED(pCmdLine), | |
338 | int nCmdShow) | |
339 | { | |
340 | // the first thing to do is to check if we're trying to run an Unicode | |
341 | // program under Win9x w/o MSLU emulation layer - if so, abort right now | |
342 | // as it has no chance to work and has all chances to crash | |
343 | #ifdef NEED_UNICODE_CHECK | |
344 | if ( !wxIsUnicodeAvailable() ) | |
345 | return -1; | |
346 | #endif // NEED_UNICODE_CHECK | |
347 | ||
348 | ||
349 | // remember the parameters Windows gave us | |
350 | wxSetInstance(hInstance); | |
351 | wxApp::m_nCmdShow = nCmdShow; | |
352 | ||
353 | // parse the command line: we can't use pCmdLine in Unicode build so it is | |
354 | // simpler to never use it at all (this also results in a more correct | |
355 | // argv[0]) | |
356 | ||
357 | // break the command line in words | |
358 | wxArrayString args; | |
359 | ||
360 | const wxChar *cmdLine = ::GetCommandLine(); | |
361 | if ( cmdLine ) | |
362 | { | |
363 | args = wxCmdLineParser::ConvertStringToArgs(cmdLine); | |
364 | } | |
365 | ||
366 | #ifdef __WXWINCE__ | |
367 | // WinCE doesn't insert the program itself, so do it ourselves. | |
368 | args.Insert(wxGetFullModuleName(), 0); | |
369 | #endif | |
370 | ||
371 | int argc = args.GetCount(); | |
372 | ||
373 | // +1 here for the terminating NULL | |
374 | wxChar **argv = new wxChar *[argc + 1]; | |
375 | for ( int i = 0; i < argc; i++ ) | |
376 | { | |
377 | argv[i] = wxStrdup(args[i]); | |
378 | } | |
379 | ||
380 | // argv[] must be NULL-terminated | |
381 | argv[argc] = NULL; | |
382 | ||
383 | wxON_BLOCK_EXIT2(wxFreeArgs, argc, argv); | |
384 | ||
385 | return wxEntry(argc, argv); | |
386 | } | |
387 | ||
388 | #endif // wxUSE_GUI && __WXMSW__ | |
389 | ||
390 | // ---------------------------------------------------------------------------- | |
391 | // global HINSTANCE | |
392 | // ---------------------------------------------------------------------------- | |
393 | ||
394 | #if wxUSE_BASE | |
395 | ||
396 | HINSTANCE wxhInstance = 0; | |
397 | ||
398 | extern "C" HINSTANCE wxGetInstance() | |
399 | { | |
400 | return wxhInstance; | |
401 | } | |
402 | ||
403 | void wxSetInstance(HINSTANCE hInst) | |
404 | { | |
405 | wxhInstance = hInst; | |
406 | } | |
407 | ||
408 | #endif // wxUSE_BASE |