/////////////////////////////////////////////////////////////////////////////
// Name: msw/main.cpp
-// Purpose: Main/DllMain
+// Purpose: WinMain/DllMain
// Author: Julian Smart
// Modified by:
// Created: 04/01/98
// RCS-ID: $Id$
-// Copyright: (c) Julian Smart and Markus Holzem
-// Licence: wxWindows license
+// Copyright: (c) Julian Smart
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// ============================================================================
// headers
// ----------------------------------------------------------------------------
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation
#endif
#include "wx/event.h"
#include "wx/app.h"
+#include "wx/cmdline.h"
#include "wx/msw/private.h"
-// from src/msw/app.cpp
-extern void WXDLLEXPORT wxEntryCleanup();
+#if wxUSE_ON_FATAL_EXCEPTION
+ #include "wx/datetime.h"
+ #include "wx/msw/crashrpt.h"
-// ----------------------------------------------------------------------------
-// globals
-// ----------------------------------------------------------------------------
+ #ifdef __VISUALC__
+ #include <eh.h>
+ #endif // __VISUALC__
+#endif // wxUSE_ON_FATAL_EXCEPTION
-HINSTANCE wxhInstance = 0;
+#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 // __BORLANDC__
+
+#if defined(__WXMICROWIN__)
+ #define HINSTANCE HANDLE
+#endif
+
+// defined in common/init.cpp
+extern int wxEntryReal(int& argc, wxChar **argv);
// ============================================================================
-// implementation
+// implementation: various entry points
// ============================================================================
+#if wxUSE_BASE
+
+#if defined(__VISUALC__) && !defined(__WXWINCE__)
+ // VC++ (at least from 4.0 up to version 7.1) is incredibly broken in that
+ // a "catch ( ... )" will *always* catch SEH exceptions in it even though
+ // it should have never been the case... to prevent such catches from
+ // stealing the exceptions from our wxGlobalSEHandler which is only called
+ // if the exception is not handled elsewhere, we have to also call it from
+ // a special SEH translator function which is called by VC CRT when a Win32
+ // exception occurs
+
+ // this warns that /EHa (async exceptions) should be used when using
+ // _set_se_translator but, in fact, this doesn't seem to change anything
+ // with VC++ up to 7.1 -- to be confirmed with VC++ 8
+ #if _MSC_VER <= 1310
+ #pragma warning(disable:4535)
+ #endif
+
+ // note that the SE translator must be called wxSETranslator!
+ #define DisableAutomaticSETranslator() _set_se_translator(wxSETranslator)
+#else // !__VISUALC__
+ #define DisableAutomaticSETranslator()
+#endif // __VISUALC__/!__VISUALC__
+
// ----------------------------------------------------------------------------
-// various entry points
+// wrapper wxEntry catching all Win32 exceptions occuring in a wx program
// ----------------------------------------------------------------------------
-// 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 wxUSE_GUI && !defined(NOMAIN)
+// wrap real wxEntry in a try-except block to be able to call
+// OnFatalException() if necessary
+#if wxUSE_ON_FATAL_EXCEPTION
-// NT defines APIENTRY, 3.x not
-#if !defined(APIENTRY)
- #define APIENTRY FAR PASCAL
-#endif
+// global pointer to exception information, only valid inside OnFatalException,
+// used by wxStackWalker and wxCrashReport
+extern EXCEPTION_POINTERS *wxGlobalSEInformation = NULL;
-/////////////////////////////////////////////////////////////////////////////////
-// WinMain
-// Note that WinMain is also defined in dummy.obj, which is linked to
-// an application that is using the DLL version of wxWindows.
+// flag telling us whether the application wants to handle exceptions at all
+static bool gs_handleExceptions = false;
+
+static void wxFatalExit()
+{
+ // use the same exit code as abort()
+ ::ExitProcess(3);
+}
-#if !defined(_WINDLL)
+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
+ __try
+ {
+ wxTheApp->OnFatalException();
+ }
+ __except ( EXCEPTION_EXECUTE_HANDLER )
+ {
+ // nothing to do here, just ignore the exception inside the
+ // exception handler
+ ;
+ }
+
+ wxGlobalSEInformation = NULL;
+
+ // this will execute our handler and terminate the process
+ return EXCEPTION_EXECUTE_HANDLER;
+ }
-#if defined(__WXWINE__)
- #define HINSTANCE HINSTANCE__*
+ return EXCEPTION_CONTINUE_SEARCH;
+}
- extern "C"
-#elif defined(__TWIN32__) || defined(__WXMICROWIN__)
- #define HINSTANCE HANDLE
+#ifdef __VISUALC__
+
+static void wxSETranslator(unsigned int WXUNUSED(code), EXCEPTION_POINTERS *ep)
+{
+ switch ( wxGlobalSEHandler(ep) )
+ {
+ default:
+ wxFAIL_MSG( _T("unexpected wxGlobalSEHandler() return value") );
+ // fall through
+
+ 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;
+
+ 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;
+ }
+}
+
+#endif // __VISUALC__
+
+bool wxHandleFatalExceptions(bool doit)
+{
+ // 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(_T("GetTempPath"));
+
+ // when all else fails...
+ wxStrcpy(fullname, _T("c:\\"));
+ }
+
+ // use PID and date to make the report file name more unique
+ wxString name = wxString::Format
+ (
+ _T("%s_%s_%lu.dmp"),
+ wxTheApp ? wxTheApp->GetAppName().c_str()
+ : _T("wxwindows"),
+ wxDateTime::Now().Format(_T("%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;
+}
+
+int wxEntry(int& argc, wxChar **argv)
+{
+ DisableAutomaticSETranslator();
+
+ __try
+ {
+ return wxEntryReal(argc, argv);
+ }
+ __except ( wxGlobalSEHandler(GetExceptionInformation()) )
+ {
+ wxFatalExit();
+
+ // this code is unreachable but put it here to suppress warnings
+ return -1;
+ }
+}
+
+#else // !wxUSE_ON_FATAL_EXCEPTION
- extern "C"
-#endif // WINE
+#if defined(__VISUALC__) && !defined(__WXWINCE__)
-int PASCAL WinMain(HINSTANCE hInstance,
- HINSTANCE hPrevInstance,
- LPSTR lpCmdLine,
- int nCmdShow)
+static void
+wxSETranslator(unsigned int WXUNUSED(code), EXCEPTION_POINTERS * WXUNUSED(ep))
{
- return wxEntry((WXHINSTANCE) hInstance, (WXHINSTANCE) hPrevInstance,
- lpCmdLine, nCmdShow);
+ // see wxSETranslator() version for wxUSE_ON_FATAL_EXCEPTION above
+ throw;
}
-#endif // !defined(_WINDLL)
+#endif // __VISUALC__
-/////////////////////////////////////////////////////////////////////////////////
-// DllMain
+int wxEntry(int& argc, wxChar **argv)
+{
+ DisableAutomaticSETranslator();
+
+ return wxEntryReal(argc, argv);
+}
+
+#endif // wxUSE_ON_FATAL_EXCEPTION/!wxUSE_ON_FATAL_EXCEPTION
+
+#endif // wxUSE_BASE
+
+#if wxUSE_GUI
+
+// ----------------------------------------------------------------------------
+// Windows-specific wxEntry
+// ----------------------------------------------------------------------------
+
+WXDLLEXPORT int wxEntry(HINSTANCE hInstance,
+ HINSTANCE WXUNUSED(hPrevInstance),
+ wxCmdLineArgType WXUNUSED(pCmdLine),
+ int nCmdShow)
+{
+ // 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;
+
+ const wxChar *cmdLine = ::GetCommandLine();
+ if ( cmdLine )
+ {
+ args = wxCmdLineParser::ConvertStringToArgs(cmdLine);
+ }
+
+#ifdef __WXWINCE__
+ // WinCE doesn't insert the program itself, so do it ourselves.
+ args.Insert(wxGetFullModuleName(), 0);
+#endif
+
+ int argc = args.GetCount();
+
+ // +1 here for the terminating NULL
+ wxChar **argv = new wxChar *[argc + 1];
+ for ( int i = 0; i < argc; i++ )
+ {
+ argv[i] = wxStrdup(args[i]);
+ }
+
+ // argv[] must be NULL-terminated
+ argv[argc] = NULL;
+
+ return wxEntry(argc, argv);
+}
+
+// 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)
+
+extern "C"
+{
+
+// ----------------------------------------------------------------------------
+// WinMain
+// ----------------------------------------------------------------------------
+
+// Note that WinMain is also defined in dummy.obj, which is linked to
+// an application that is using the DLL version of wxWidgets.
#if defined(_WINDLL)
// DLL entry point
-extern "C"
-#ifdef __BORLANDC__
-// SCD: I don't know why, but also OWL uses this function
-BOOL WINAPI DllEntryPoint (HANDLE hModule, DWORD fdwReason, LPVOID lpReserved)
-#else
-BOOL WINAPI DllMain (HANDLE hModule, DWORD fdwReason, LPVOID lpReserved)
-#endif
+BOOL WINAPI
+DllMain(HANDLE hModule, DWORD fdwReason, LPVOID WXUNUSED(lpReserved))
{
+ // Only call wxEntry if the application itself is part of the DLL.
+ // If only the wxWidgets library is in the DLL, then the
+ // initialisation will be called when the application implicitly
+ // calls WinMain.
#ifndef WXMAKINGDLL
switch (fdwReason)
{
case DLL_PROCESS_ATTACH:
- // 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.
- return wxEntry((WXHINSTANCE) hModule);
+ return wxEntry(hModule);
case DLL_PROCESS_DETACH:
- if ( wxTheApp )
- wxTheApp->OnExit();
- wxEntryCleanup();
- break;
+ wxEntryCleanup();
+ break;
}
#else
- (void)hModule;
- (void)fdwReason;
+ (void)hModule;
+ (void)fdwReason;
#endif // !WXMAKINGDLL
- (void)lpReserved;
+
return TRUE;
}
#endif // _WINDLL
+} // extern "C"
+
#endif // !NOMAIN
+#endif // wxUSE_GUI
+
// ----------------------------------------------------------------------------
-// global functions
+// global HINSTANCE
// ----------------------------------------------------------------------------
-HINSTANCE wxGetInstance()
+#if wxUSE_BASE
+
+HINSTANCE wxhInstance = 0;
+
+extern "C" HINSTANCE wxGetInstance()
{
return wxhInstance;
}
wxhInstance = hInst;
}
+#endif // wxUSE_BASE
+