#pragma hdrstop
#endif
+
#ifndef WX_PRECOMP
#include "wx/settings.h"
#include "wx/module.h"
#include "wx/evtloop.h"
#include "wx/frame.h"
#include "wx/dialog.h"
+ #include "wx/log.h"
#include "wx/intl.h"
+ #include "wx/resource.h"
#endif
#include "wx/app.h"
+#include "wx/fontutil.h"
+#include "wx/univ/theme.h"
+#include "wx/univ/renderer.h"
+#include "wx/univ/colschem.h"
#include "wx/mgl/private.h"
+#define MGL_DEBUG
+
+#if defined(MGL_DEBUG) && !defined(__WXDEBUG__)
+#undef MGL_DEBUG
+#endif
+
//-----------------------------------------------------------------------------
// Global data
//-----------------------------------------------------------------------------
wxApp *wxTheApp = NULL;
wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
-static wxEventLoop *gs_mainEventLoop = NULL;
-
//-----------------------------------------------------------------------------
// wxExit
static bool gs_inYield = FALSE;
-bool wxYield()
+bool wxApp::Yield(bool onlyIfNeeded)
{
+ if ( gs_inYield )
+ {
+ if ( !onlyIfNeeded )
+ {
+ wxFAIL_MSG( wxT("wxYield called recursively" ) );
+ }
+
+ return FALSE;
+ }
+
#if wxUSE_THREADS
if ( !wxThread::IsMain() )
{
wxLog::Suspend();
- while (gs_mainEventLoop->Pending())
- gs_mainEventLoop->Dispatch();
+ if ( wxEventLoop::GetActive() )
+ {
+ while (wxEventLoop::GetActive()->Pending())
+ wxEventLoop::GetActive()->Dispatch();
+ }
/* it's necessary to call ProcessIdle() to update the frames sizes which
might have been changed (it also will update other things set from
return TRUE;
}
-bool wxYieldIfNeeded()
-{
- if (gs_inYield)
- return FALSE;
-
- return wxYield();
-}
-
//-----------------------------------------------------------------------------
// wxWakeUpIdle
#endif
}
+//-----------------------------------------------------------------------------
+// Root window
+//-----------------------------------------------------------------------------
+
+class wxRootWindow : public wxWindow
+{
+ public:
+ wxRootWindow() : wxWindow(NULL, -1)
+ {
+ SetMGLwindow_t(MGL_wmGetRootWindow(g_winMng));
+ SetBackgroundColour(wxTHEME_COLOUR(DESKTOP));
+ }
+ ~wxRootWindow()
+ {
+ // we don't want to delete MGL_WM's rootWnd
+ m_wnd = NULL;
+ }
+
+ virtual bool AcceptsFocus() { return FALSE; }
+};
+
+static wxRootWindow *gs_rootWindow = NULL;
+
+//-----------------------------------------------------------------------------
+// MGL initialization
+//-----------------------------------------------------------------------------
+
+static bool wxCreateMGL_WM(const wxDisplayModeInfo& displayMode)
+{
+ int mode;
+ int refresh = MGL_DEFAULT_REFRESH;
+
+#if wxUSE_SYSTEM_OPTIONS
+ if ( wxSystemOptions::HasOption(wxT("mgl.screen-refresh") )
+ refresh = wxSystemOptions::GetOptionInt(wxT("mgl.screen-refresh"));
+#endif
+
+ mode = MGL_findMode(displayMode.GetScreenSize().x,
+ displayMode.GetScreenSize().y,
+ displayMode.GetDepth());
+ if ( mode == -1 )
+ {
+ wxLogError(_("Mode %ix%i-%i not available."),
+ displayMode.GetScreenSize().x,
+ displayMode.GetScreenSize().y,
+ displayMode.GetDepth());
+ return FALSE;
+ }
+ g_displayDC = new MGLDisplayDC(mode, 1, refresh);
+ if ( !g_displayDC->isValid() )
+ {
+ delete g_displayDC;
+ g_displayDC = NULL;
+ return FALSE;
+ }
+
+ g_winMng = MGL_wmCreate(g_displayDC->getDC());
+ if (!g_winMng)
+ return FALSE;
+
+ return TRUE;
+}
+
+static void wxDestroyMGL_WM()
+{
+ if ( g_winMng )
+ {
+ MGL_wmDestroy(g_winMng);
+ g_winMng = NULL;
+ }
+ if ( g_displayDC )
+ {
+ delete g_displayDC;
+ g_displayDC = NULL;
+ }
+}
+
//-----------------------------------------------------------------------------
// wxApp
//-----------------------------------------------------------------------------
END_EVENT_TABLE()
-wxApp::wxApp()
+wxApp::wxApp() : m_mainLoop(NULL)
{
}
{
}
-bool wxApp::OnInitGui()
+bool wxApp::SetDisplayMode(const wxDisplayModeInfo& mode)
{
- if ( MGL_init(".", NULL) == 0 )
+ if ( !mode.IsOk() )
+ {
return FALSE;
- if ( !wxCreateMGL_WM() )
+ }
+ if ( g_displayDC != NULL )
+ {
+ // FIXME_MGL -- we currently don't allow to switch video mode
+ // more than once. This can hopefully be changed...
+ wxFAIL_MSG(wxT("Can't change display mode after intialization!"));
return FALSE;
+ }
+
+ if ( !wxCreateMGL_WM(mode) )
+ return FALSE;
+ gs_rootWindow = new wxRootWindow;
+
+ m_displayMode = mode;
- // This has to be done *after* wxCreateMGL_WM() because it initializes
- // wxUniv's themes
+ return TRUE;
+}
+
+bool wxApp::OnInitGui()
+{
if ( !wxAppBase::OnInitGui() )
return FALSE;
+#ifdef MGL_DEBUG
+ // That damn MGL redirects stdin and stdout to physical console
+ FILE *file = fopen("stderr", "wt");
+ wxLog::SetActiveTarget(new wxLogStderr(file));
+#endif
+
return TRUE;
}
win->GetEventHandler()->ProcessEvent(event);
-#if 0 // FIXME_MGL - what the hell it is?
- win->OnInternalIdle();
-
if ( event.MoreRequested() )
needMore = TRUE;
-#endif
wxNode* node = win->GetChildren().First();
while (node)
int wxApp::MainLoop()
{
- gs_mainEventLoop = new wxEventLoop;
- return gs_mainEventLoop->Run();
- delete gs_mainEventLoop;
- gs_mainEventLoop = NULL;
+ int rt;
+ m_mainLoop = new wxEventLoop;
+
+ rt = m_mainLoop->Run();
+
+ delete m_mainLoop;
+ m_mainLoop = NULL;
+ return rt;
}
void wxApp::ExitMainLoop()
{
- gs_mainEventLoop->Exit(0);
+ if ( m_mainLoop )
+ m_mainLoop->Exit(0);
}
bool wxApp::Initialized()
{
- return (GetTopWindow() != NULL);
+ return (wxTopLevelWindows.GetCount() != 0);
}
bool wxApp::Pending()
{
- return gs_mainEventLoop->Pending();
+ return wxEventLoop::GetActive()->Pending();
}
void wxApp::Dispatch()
{
- gs_mainEventLoop->Dispatch();
+ wxEventLoop::GetActive()->Dispatch();
}
void wxApp::DeletePendingObjects()
bool wxApp::Initialize()
{
+ if ( MGL_init(".", NULL) == 0 )
+ return FALSE;
+
wxBuffer = new wxChar[BUFSIZ + 512];
wxClassInfo::InitializeClasses();
wxTheColourDatabase = new wxColourDatabase(wxKEY_STRING);
wxTheColourDatabase->Initialize();
+
+ // Can't do this in wxModule, because fonts are needed by stock lists
+ wxTheFontsManager = new wxFontsManager;
wxInitializeStockLists();
wxInitializeStockObjects();
return TRUE;
}
-#include "info.xpm"
-#include "error.xpm"
-#include "question.xpm"
-#include "warning.xpm"
-
wxIcon wxApp::GetStdIcon(int which) const
{
- switch(which)
- {
- case wxICON_INFORMATION:
- return wxIcon(info_xpm);
- case wxICON_QUESTION:
- return wxIcon(question_xpm);
- case wxICON_EXCLAMATION:
- return wxIcon(warning_xpm);
- default:
- wxFAIL_MSG(wxT("requested non existent standard icon"));
- // still fall through
- case wxICON_HAND:
- return wxIcon(error_xpm);
- }
+ return wxTheme::Get()->GetRenderer()->GetStdIcon(which);
}
void wxApp::CleanUp()
{
+ delete gs_rootWindow;
+
#if wxUSE_LOG
// flush the logged messages if any
wxLog *log = wxLog::GetActiveTarget();
wxTheColourDatabase = (wxColourDatabase*) NULL;
wxDeleteStockObjects();
-
wxDeleteStockLists();
+ // Can't do this in wxModule, because fonts are needed by stock lists
+ delete wxTheFontsManager;
+ wxTheFontsManager = (wxFontsManager*) NULL;
+
delete wxTheApp;
wxTheApp = (wxApp*) NULL;
call OnRun() */
wxTheApp->DeletePendingObjects();
- if ( wxTheApp->Initialized() &&
- wxTopLevelWindows.GetCount() != 0 )
+ if ( wxTheApp->Initialized() )
{
wxTheApp->OnRun();