X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/f3e28ade43cf9d6bd1c158280939870249cc9d2a..96c9640205933ad0673d5af2c96af0816c50160c:/src/msw/main.cpp diff --git a/src/msw/main.cpp b/src/msw/main.cpp index c293e7c511..3e4338ee95 100644 --- a/src/msw/main.cpp +++ b/src/msw/main.cpp @@ -1,5 +1,5 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: msw/main.cpp +// Name: src/msw/main.cpp // Purpose: WinMain/DllMain // Author: Julian Smart // Modified by: @@ -17,10 +17,6 @@ // headers // ---------------------------------------------------------------------------- -#ifdef __GNUG__ - #pragma implementation -#endif - // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" @@ -28,165 +24,397 @@ #pragma hdrstop #endif -#include "wx/event.h" -#include "wx/app.h" +#ifndef WX_PRECOMP + #include "wx/event.h" + #include "wx/app.h" + #include "wx/utils.h" +#endif //WX_PRECOMP + #include "wx/cmdline.h" +#include "wx/dynlib.h" +#include "wx/scopeguard.h" #include "wx/msw/private.h" +#include "wx/msw/seh.h" -// Don't implement WinMain if we're building an MFC/wxWindows hybrid app. -#if wxUSE_MFC && !defined(NOMAIN) - #define NOMAIN 1 -#endif +#if wxUSE_ON_FATAL_EXCEPTION + #include "wx/datetime.h" + #include "wx/msw/crashrpt.h" +#endif // wxUSE_ON_FATAL_EXCEPTION + +#ifdef __WXWINCE__ + // there is no ExitProcess() under CE but exiting the main thread has the + // same effect + #ifndef ExitProcess + #define ExitProcess ExitThread + #endif +#endif // __WXWINCE__ #ifdef __BORLANDC__ // BC++ has to be special: its run-time expects the DLL entry point to be // named DllEntryPoint instead of the (more) standard DllMain #define DllMain DllEntryPoint -#endif +#endif // __BORLANDC__ #if defined(__WXMICROWIN__) #define HINSTANCE HANDLE #endif -#if wxUSE_GUI - -// ---------------------------------------------------------------------------- -// function prototypes -// ---------------------------------------------------------------------------- - -static wxChar **ConvertToStandardCommandArgs(const wxChar *p, int& argc); +// defined in common/init.cpp +extern int wxEntryReal(int& argc, wxChar **argv); +extern int wxEntryCleanupReal(int& argc, wxChar **argv); // ============================================================================ // implementation: various entry points // ============================================================================ +#if wxUSE_BASE + // ---------------------------------------------------------------------------- -// Windows-specific wxEntry +// wrapper wxEntry catching all Win32 exceptions occurring in a wx program // ---------------------------------------------------------------------------- -WXDLLEXPORT int wxEntry(HINSTANCE hInstance, - HINSTANCE WXUNUSED(hPrevInstance), - char *pCmdLine, - int nCmdShow) +// wrap real wxEntry in a try-except block to be able to call +// OnFatalException() if necessary +#if wxUSE_ON_FATAL_EXCEPTION + +// global pointer to exception information, only valid inside OnFatalException, +// used by wxStackWalker and wxCrashReport +extern EXCEPTION_POINTERS *wxGlobalSEInformation = NULL; + +// flag telling us whether the application wants to handle exceptions at all +static bool gs_handleExceptions = false; + +static void wxFatalExit() { - // remember the parameters Windows gave us - wxSetInstance(hInstance); - wxApp::m_nCmdShow = nCmdShow; + // use the same exit code as abort() + ::ExitProcess(3); +} - // parse the command line - int argc; - wxChar **argv = ConvertToStandardCommandArgs(wxConvertMB2WX(pCmdLine), argc); +unsigned long wxGlobalSEHandler(EXCEPTION_POINTERS *pExcPtrs) +{ + if ( gs_handleExceptions && wxTheApp ) + { + // store the pointer to exception info + wxGlobalSEInformation = pExcPtrs; + + // give the user a chance to do something special about this + wxSEH_TRY + { + wxTheApp->OnFatalException(); + } + wxSEH_IGNORE // ignore any exceptions inside the exception handler - return wxEntry(argc, argv); + wxGlobalSEInformation = NULL; + + // this will execute our handler and terminate the process + return EXCEPTION_EXECUTE_HANDLER; + } + + return EXCEPTION_CONTINUE_SEARCH; } -// May wish not to have a DllMain or WinMain, e.g. if we're programming -// a Netscape plugin or if we're writing a console application -#if !defined(NOMAIN) +#ifdef __VISUALC__ -extern "C" +void wxSETranslator(unsigned int WXUNUSED(code), EXCEPTION_POINTERS *ep) { + switch ( wxGlobalSEHandler(ep) ) + { + default: + wxFAIL_MSG( wxT("unexpected wxGlobalSEHandler() return value") ); + // fall through -// ---------------------------------------------------------------------------- -// WinMain -// ---------------------------------------------------------------------------- + case EXCEPTION_EXECUTE_HANDLER: + // if wxApp::OnFatalException() had been called we should exit the + // application -- but we shouldn't kill our host when we're a DLL +#ifndef WXMAKINGDLL + wxFatalExit(); +#endif // not a DLL + break; -// Note that WinMain is also defined in dummy.obj, which is linked to -// an application that is using the DLL version of wxWindows. + case EXCEPTION_CONTINUE_SEARCH: + // we're called for each "catch ( ... )" and if we (re)throw from + // here, the catch handler body is not executed, so the effect is + // as if had inhibited translation of SE to C++ ones because the + // handler will never see any structured exceptions + throw; + } +} -#if !defined(_WINDLL) +#endif // __VISUALC__ -#ifdef __WXWINCE__ -int WINAPI WinMain(HINSTANCE hInstance, - HINSTANCE hPrevInstance, - LPWSTR lpCmdLine, - int nCmdShow) +bool wxHandleFatalExceptions(bool doit) { - return wxEntry(hInstance, hPrevInstance, (char*) lpCmdLine, nCmdShow); + // assume this can only be called from the main thread + gs_handleExceptions = doit; + +#if wxUSE_CRASHREPORT + if ( doit ) + { + // try to find a place where we can put out report file later + wxChar fullname[MAX_PATH]; + if ( !::GetTempPath(WXSIZEOF(fullname), fullname) ) + { + wxLogLastError(wxT("GetTempPath")); + + // when all else fails... + wxStrcpy(fullname, wxT("c:\\")); + } + + // use PID and date to make the report file name more unique + wxString name = wxString::Format + ( + wxT("%s_%s_%lu.dmp"), + wxTheApp ? (const wxChar*)wxTheApp->GetAppDisplayName().c_str() + : wxT("wxwindows"), + wxDateTime::Now().Format(wxT("%Y%m%dT%H%M%S")).c_str(), + ::GetCurrentProcessId() + ); + + wxStrncat(fullname, name, WXSIZEOF(fullname) - wxStrlen(fullname) - 1); + + wxCrashReport::SetFileName(fullname); + } +#endif // wxUSE_CRASHREPORT + + return true; } -#else -int PASCAL WinMain(HINSTANCE hInstance, - HINSTANCE hPrevInstance, - LPSTR lpCmdLine, - int nCmdShow) + +int wxEntry(int& argc, wxChar **argv) { - return wxEntry(hInstance, hPrevInstance, lpCmdLine, nCmdShow); + DisableAutomaticSETranslator(); + + wxSEH_TRY + { + return wxEntryReal(argc, argv); + } + wxSEH_HANDLE(-1) +} + +#else // !wxUSE_ON_FATAL_EXCEPTION + +int wxEntry(int& argc, wxChar **argv) +{ + return wxEntryReal(argc, argv); } + +#endif // wxUSE_ON_FATAL_EXCEPTION/!wxUSE_ON_FATAL_EXCEPTION + +#endif // wxUSE_BASE + +#if wxUSE_GUI && defined(__WXMSW__) + +namespace +{ + +#if wxUSE_UNICODE && !defined(__WXWINCE__) + #define NEED_UNICODE_CHECK #endif -#else // _WINDLL +#ifdef NEED_UNICODE_CHECK + +// check whether Unicode is available +bool wxIsUnicodeAvailable() +{ + static const wchar_t *ERROR_STRING = L"wxWidgets Fatal Error"; + + if ( wxGetOsVersion() != wxOS_WINDOWS_NT ) + { + // we need to be built with MSLU support +#if !wxUSE_UNICODE_MSLU + // note that we can use MessageBoxW() as it's implemented even under + // Win9x - OTOH, we can't use wxGetTranslation() because the file APIs + // used by wxLocale are not + ::MessageBox + ( + NULL, + L"This program uses Unicode and requires Windows NT/2000/XP.\n" + L"\n" + L"Program aborted.", + ERROR_STRING, + MB_ICONERROR | MB_OK + ); + + return false; +#else // wxUSE_UNICODE_MSLU + // and the MSLU DLL must also be available + HMODULE hmod = ::LoadLibraryA("unicows.dll"); + if ( !hmod ) + { + ::MessageBox + ( + NULL, + L"This program uses Unicode and requires unicows.dll to work " + L"under current operating system.\n" + L"\n" + L"Please install unicows.dll and relaunch the program.", + ERROR_STRING, + MB_ICONERROR | MB_OK + ); + return false; + } + + // this is not really necessary but be tidy + ::FreeLibrary(hmod); + + // finally do the last check: has unicows.lib initialized correctly? + hmod = ::LoadLibraryW(L"unicows.dll"); + if ( !hmod ) + { + ::MessageBox + ( + NULL, + L"This program uses Unicode but is not using unicows.dll\n" + L"correctly and so cannot work under current operating system.\n" + L"Please contact the program author for an updated version.\n" + L"\n" + L"Program aborted.", + ERROR_STRING, + MB_ICONERROR | MB_OK + ); + + return false; + } + + ::FreeLibrary(hmod); +#endif // !wxUSE_UNICODE_MSLU + } + + return true; +} + +#endif // NEED_UNICODE_CHECK + +void wxSetProcessDPIAware() +{ +#if wxUSE_DYNLIB_CLASS + typedef BOOL (WINAPI *SetProcessDPIAware_t)(void); + wxDynamicLibrary dllUser32(wxT("user32.dll")); + SetProcessDPIAware_t pfnSetProcessDPIAware = + (SetProcessDPIAware_t)dllUser32.RawGetSymbol(wxT("SetProcessDPIAware")); + + if ( pfnSetProcessDPIAware ) + pfnSetProcessDPIAware(); +#endif // wxUSE_DYNLIB_CLASS +} -// DLL entry point +} //anonymous namespace -BOOL WINAPI -DllMain(HANDLE hModule, DWORD fdwReason, LPVOID WXUNUSED(lpReserved)) +// ---------------------------------------------------------------------------- +// Windows-specific wxEntry +// ---------------------------------------------------------------------------- + +struct wxMSWCommandLineArguments { - // Only call wxEntry if the application itself is part of the DLL. - // If only the wxWindows library is in the DLL, then the - // initialisation will be called when the application implicitly - // calls WinMain. -#ifndef WXMAKINGDLL - switch (fdwReason) + wxMSWCommandLineArguments() { argc = 0; argv = NULL; } + + void Init(const wxArrayString& args) { - case DLL_PROCESS_ATTACH: - return wxEntry(hModule); + argc = args.size(); - case DLL_PROCESS_DETACH: - wxEntryCleanup(); - break; + // +1 here for the terminating NULL + argv = new wxChar *[argc + 1]; + for ( int i = 0; i < argc; i++ ) + { + argv[i] = wxStrdup(args[i].wx_str()); + } + + // argv[] must be NULL-terminated + argv[argc] = NULL; } -#else - (void)hModule; - (void)fdwReason; -#endif // !WXMAKINGDLL - return TRUE; -} + void Free() + { + if ( !argc ) + return; -#endif // _WINDLL/!_WINDLL + for ( int i = 0; i < argc; i++ ) + { + free(argv[i]); + } -} // extern "C" + wxDELETEA(argv); + argc = 0; + } -#endif // !NOMAIN + int argc; + wxChar **argv; +}; -// --------------------------------------------------------------------------- -// Convert Windows to argc, argv style -// --------------------------------------------------------------------------- +static wxMSWCommandLineArguments wxArgs; -wxChar **ConvertToStandardCommandArgs(const wxChar *p, int& argc) +// common part of wxMSW-specific wxEntryStart() and wxEntry() overloads +static bool +wxMSWEntryCommon(HINSTANCE hInstance, int nCmdShow) { + // the first thing to do is to check if we're trying to run an Unicode + // program under Win9x w/o MSLU emulation layer - if so, abort right now + // as it has no chance to work and has all chances to crash +#ifdef NEED_UNICODE_CHECK + if ( !wxIsUnicodeAvailable() ) + return false; +#endif // NEED_UNICODE_CHECK + + + // remember the parameters Windows gave us + wxSetInstance(hInstance); + wxApp::m_nCmdShow = nCmdShow; + + // parse the command line: we can't use pCmdLine in Unicode build so it is + // simpler to never use it at all (this also results in a more correct + // argv[0]) + // break the command line in words wxArrayString args; - if ( p ) + + const wxChar *cmdLine = ::GetCommandLine(); + if ( cmdLine ) { - args = wxCmdLineParser::ConvertStringToArgs(p); + args = wxCmdLineParser::ConvertStringToArgs(cmdLine); } - // +1 here for the program name - argc = args.GetCount() + 1; +#ifdef __WXWINCE__ + // WinCE doesn't insert the program itself, so do it ourselves. + args.Insert(wxGetFullModuleName(), 0); +#endif + + wxArgs.Init(args); - // and +1 here for the terminating NULL - wxChar **argv = new wxChar *[argc + 1]; + return true; +} - // as we use wxStrdup below we must allocate the first argument using - // malloc(), not new[], as well - argv[0] = (wxChar *)malloc(MAX_PATH * sizeof(wxChar)); - ::GetModuleFileName(wxhInstance, argv[0], MAX_PATH); +WXDLLEXPORT bool wxEntryStart(HINSTANCE hInstance, + HINSTANCE WXUNUSED(hPrevInstance), + wxCmdLineArgType WXUNUSED(pCmdLine), + int nCmdShow) +{ + if ( !wxMSWEntryCommon(hInstance, nCmdShow) ) + return false; - // copy all the other arguments to wxApp::argv[] - for ( int i = 1; i < argc; i++ ) - { - argv[i] = wxStrdup(args[i - 1]); - } + return wxEntryStart(wxArgs.argc, wxArgs.argv); +} - // argv[] must be NULL-terminated - argv[argc] = NULL; +WXDLLEXPORT int wxEntry(HINSTANCE hInstance, + HINSTANCE WXUNUSED(hPrevInstance), + wxCmdLineArgType WXUNUSED(pCmdLine), + int nCmdShow) +{ + // wxWidgets library doesn't have problems with non-default DPI settings, + // so we can mark the app as "DPI aware" for Vista/Win7 (see + // http://msdn.microsoft.com/en-us/library/dd464659%28VS.85%29.aspx). + // Note that we intentionally do it here and not in wxApp, so that it + // doesn't happen if wx code is hosted in another app (e.g. a plugin). + wxSetProcessDPIAware(); - return argv; + if ( !wxMSWEntryCommon(hInstance, nCmdShow) ) + return -1; + + wxON_BLOCK_EXIT_OBJ0(wxArgs, wxMSWCommandLineArguments::Free); + + return wxEntry(wxArgs.argc, wxArgs.argv); } -#endif // wxUSE_GUI +#endif // wxUSE_GUI && __WXMSW__ // ---------------------------------------------------------------------------- // global HINSTANCE @@ -196,7 +424,7 @@ wxChar **ConvertToStandardCommandArgs(const wxChar *p, int& argc) HINSTANCE wxhInstance = 0; -HINSTANCE wxGetInstance() +extern "C" HINSTANCE wxGetInstance() { return wxhInstance; } @@ -207,4 +435,3 @@ void wxSetInstance(HINSTANCE hInst) } #endif // wxUSE_BASE -