Commiting re-baked files after wxListCtrl OS X additions.

[wxWidgets.git] / src / mgl / app.cpp

diff --git a/src/mgl/app.cpp b/src/mgl/app.cpp
index f1c96de5284e8e0d478676ae6e498aad76ec7ccf..53c61fad168072b3ccb2a0abf70686aa7a39051d 100644 (file)
--- a/src/mgl/app.cpp
+++ b/src/mgl/app.cpp
@@ -1,56 +1,196 @@
 /////////////////////////////////////////////////////////////////////////////
 /////////////////////////////////////////////////////////////////////////////

-// Name:        app.cpp
-// Purpose:
+// Name:        src/mgl/app.cpp

 // Author:      Vaclav Slavik
 // Author:      Vaclav Slavik

+//              based on GTK and MSW implementations

 // Id:          $Id$
 // Id:          $Id$

-// Copyright:   (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
+// Copyright:   (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)

 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 

-#ifdef __GNUG__
-    #pragma implementation "app.h"
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#ifdef __BORLANDC__
+    #pragma hdrstop

 #endif
 
 #include "wx/app.h"
 #endif
 
 #include "wx/app.h"

-#include "wx/settings.h"
-#include "wx/module.h"

 
 

-#include <mgraph.hpp>
+#ifndef WX_PRECOMP
+    #include "wx/settings.h"
+    #include "wx/frame.h"
+    #include "wx/dialog.h"
+    #include "wx/log.h"
+    #include "wx/intl.h"
+    #include "wx/module.h"
+#endif
+
+#include "wx/evtloop.h"
+#include "wx/fontutil.h"
+#include "wx/univ/theme.h"
+#include "wx/univ/renderer.h"
+#include "wx/univ/colschem.h"
+#include "wx/sysopt.h"
+#include "wx/mgl/private.h"
+
+//-----------------------------------------------------------------------------
+// wxApp::Exit()
+//-----------------------------------------------------------------------------
+
+void wxApp::Exit()
+{
+    MGL_exit();
+    exit(0);
+}

 
 //-----------------------------------------------------------------------------
 
 //-----------------------------------------------------------------------------

-// Global data
+// wxYield

 //-----------------------------------------------------------------------------
 
 //-----------------------------------------------------------------------------
 

-wxApp *wxTheApp = (wxApp *)  NULL;
-wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
+static bool gs_inYield = false;

 
 

-// FIXME_MGL - whole file
+bool wxApp::Yield(bool onlyIfNeeded)
+{
+    if ( gs_inYield )
+    {
+        if ( !onlyIfNeeded )
+        {
+            wxFAIL_MSG( wxT("wxYield called recursively" ) );
+        }

 
 

+        return false;
+    }

 
 

-extern bool g_isIdle;
+#if wxUSE_THREADS
+    if ( !wxThread::IsMain() )
+    {
+        // can't process events from other threads, MGL is thread-unsafe
+        return true;
+    }
+#endif // wxUSE_THREADS

 
 

-bool g_mainThreadLocked = FALSE;
+    gs_inYield = true;

 
 

-void wxExit()
-{
-    exit(0);
+    wxLog::Suspend();
+
+    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
+       OnUpdateUI() which is a nice (and desired) side effect) */
+    while (wxTheApp->ProcessIdle()) { }
+
+    wxLog::Resume();
+
+    gs_inYield = false;
+
+    return true;

 }
 
 }
 

+

 //-----------------------------------------------------------------------------
 //-----------------------------------------------------------------------------

-// wxYield
+// wxWakeUpIdle

 //-----------------------------------------------------------------------------
 
 //-----------------------------------------------------------------------------
 

-bool wxYield()
+void wxApp::WakeUpIdle()

 {
 {

-    return TRUE;
+#if wxUSE_THREADS
+    if (!wxThread::IsMain())
+        wxMutexGuiEnter();
+#endif
+
+    while (wxTheApp->ProcessIdle())
+        ;
+
+#if wxUSE_THREADS
+    if (!wxThread::IsMain())
+        wxMutexGuiLeave();
+#endif

 }
 
 //-----------------------------------------------------------------------------
 }
 
 //-----------------------------------------------------------------------------

-// wxWakeUpIdle
+// Root window

 //-----------------------------------------------------------------------------
 
 //-----------------------------------------------------------------------------
 

-void wxWakeUpIdle()
+class wxRootWindow : public wxWindow
+{
+    public:
+        wxRootWindow() : wxWindow(NULL, wxID_ANY)
+        {
+            SetMGLwindow_t(MGL_wmGetRootWindow(g_winMng));
+            SetBackgroundColour(wxTHEME_COLOUR(DESKTOP));
+        }
+        virtual ~wxRootWindow()
+        {
+            // we don't want to delete MGL_WM's rootWnd
+            m_wnd = NULL;
+        }
+
+        virtual bool AcceptsFocus() const { return false; }
+
+        DECLARE_DYNAMIC_CLASS(wxRootWindow)
+};
+
+IMPLEMENT_DYNAMIC_CLASS(wxRootWindow, wxWindow)
+
+static wxRootWindow *gs_rootWindow = NULL;
+
+//-----------------------------------------------------------------------------
+// MGL initialization
+//-----------------------------------------------------------------------------
+
+static bool wxCreateMGL_WM(const wxVideoMode& 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.GetWidth(),
+                        displayMode.GetHeight(),
+                        displayMode.GetDepth());
+    if ( mode == -1 )
+    {
+        wxLogError(_("Mode %ix%i-%i not available."),
+                     displayMode.GetWidth(),
+                     displayMode.GetHeight(),
+                     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;
+    }

 }
 
 //-----------------------------------------------------------------------------
 }
 
 //-----------------------------------------------------------------------------


@@ -60,30 +200,132 @@ void wxWakeUpIdle()
 IMPLEMENT_DYNAMIC_CLASS(wxApp,wxEvtHandler)
 
 BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
 IMPLEMENT_DYNAMIC_CLASS(wxApp,wxEvtHandler)
 
 BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)

-    EVT_IDLE(wxApp::OnIdle)
+    EVT_IDLE(wxAppBase::OnIdle)

 END_EVENT_TABLE()
 
 
 END_EVENT_TABLE()
 
 

-int wxEntry( int argc, char *argv[] )
+wxApp::wxApp()

 {
 {

-    return 0;

 }
 
 }
 

+wxApp::~wxApp()
+{
+}
+
+wxVideoMode wxGetDefaultDisplayMode()
+{
+    wxString mode;
+    unsigned w, h, bpp;
+
+    if ( !wxGetEnv(wxT("WXMODE"), &mode) ||
+         (wxSscanf(mode.c_str(), _T("%ux%u-%u"), &w, &h, &bpp) != 3) )
+    {
+        w = 640, h = 480, bpp = 16;
+    }

 
 

-// FIXME_MGL - this is temporary solution, will be removed
-// once I have wxApp up and running
-bool wxMGL_Initialize()
+    return wxVideoMode(w, h, bpp);
+}
+
+bool wxApp::SetDisplayMode(const wxVideoMode& mode)

 {
 {

-    wxBuffer = new wxChar[BUFSIZ + 512];
-
-    wxClassInfo::InitializeClasses();
-    wxSystemSettings::Init();
-    wxTheColourDatabase = new wxColourDatabase( wxKEY_STRING );
-    wxTheColourDatabase->Initialize();
-    wxInitializeStockLists();
-    wxInitializeStockObjects();
-    wxModule::RegisterModules();
-    if (!wxModule::InitializeModules()) return FALSE;
-    return TRUE;
+    if ( !mode.IsOk() )
+    {
+        return false;
+    }
+    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;
+
+    return true;

 }
 
 }
 

+bool wxApp::OnInitGui()
+{
+    if ( !wxAppBase::OnInitGui() )
+        return false;
+
+#ifdef __WXDEBUG__
+    // MGL redirects stdout and stderr to physical console, so lets redirect
+    // it to file in debug build. Do it only when WXSTDERR environment variable is set
+    wxString redirect;
+    if ( wxGetEnv(wxT("WXSTDERR"), &redirect) )
+        freopen(redirect.mb_str(), "wt", stderr);
+#endif // __WXDEBUG__
+
+    wxLog *oldLog = wxLog::SetActiveTarget(new wxLogGui);
+    if ( oldLog ) delete oldLog;
+
+    return true;
+}
+
+bool wxApp::Initialize(int& argc, wxChar **argv)
+{
+#ifdef __DJGPP__
+    // VS: disable long filenames under DJGPP as the very first thing,
+    //     since SciTech MGL doesn't like them much...
+    wxSetEnv(wxT("LFN"), wxT("N"));
+#endif
+
+    // intialize MGL before creating wxFontsManager since it uses MGL funcs
+    if ( MGL_init(".", NULL) == 0 )
+    {
+        wxLogError(_("Cannot initialize SciTech MGL!"));
+        return false;
+    }
+
+    // must do it before calling wxAppBase::Initialize(), because fonts are
+    // needed by stock lists which are created there
+    wxTheFontsManager = new wxFontsManager;
+
+    if ( !wxAppBase::Initialize(argc, argv) )
+    {
+        delete wxTheFontsManager;
+        wxTheFontsManager = NULL;
+        MGL_exit();
+        return false;
+    }
+
+#if wxUSE_INTL
+    wxFont::SetDefaultEncoding(wxLocale::GetSystemEncoding());
+#endif
+
+    return true;
+}
+
+// Modules are cleaned up after wxApp::CleanUp(), and some modules may
+// require MGL to still be alive, e.g. the stock fonts need the fonts
+// manager. So append this module last minute in wxApp::CleanUp() to close
+// down MGL after all the other modules have been cleaned up.
+//
+struct wxMGLFinalCleanup: public wxModule
+{
+    bool OnInit() { return true; }
+
+    void OnExit()
+    {
+        delete wxTheFontsManager;
+        wxTheFontsManager = (wxFontsManager*) NULL;
+
+        wxDestroyMGL_WM();
+        MGL_exit();
+    }
+};
+
+void wxApp::CleanUp()
+{
+    delete gs_rootWindow;
+
+    wxAppBase::CleanUp();
+
+    wxModule::RegisterModule(new wxMGLFinalCleanup);
+}