src/gtk1/app.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        app.cpp
   3 // Purpose:
   4 // Author:      Robert Roebling
   5 // Id:          $Id$
   6 // Copyright:   (c) 1998 Robert Roebling, Julian Smart
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 #ifdef __GNUG__
  11     #pragma implementation "app.h"
  12 #endif
  13
  14 #include "wx/app.h"
  15 #include "wx/gdicmn.h"
  16 #include "wx/utils.h"
  17 #include "wx/intl.h"
  18 #include "wx/log.h"
  19 #include "wx/memory.h"
  20 #include "wx/font.h"
  21 #include "wx/settings.h"
  22 #include "wx/dialog.h"
  23
  24 #if wxUSE_WX_RESOURCES
  25     #include "wx/resource.h"
  26 #endif
  27
  28 #include "wx/module.h"
  29 #include "wx/image.h"
  30
  31 #if wxUSE_THREADS
  32 #include "wx/thread.h"
  33 #endif
  34
  35 #include <unistd.h>
  36
  37 #include <glib.h>
  38 #include <gdk/gdk.h>
  39 #include <gtk/gtk.h>
  40
  41 #include "wx/gtk/win_gtk.h"
  42
  43 //-----------------------------------------------------------------------------
  44 // global data
  45 //-----------------------------------------------------------------------------
  46
  47 wxApp *wxTheApp = (wxApp *)  NULL;
  48 wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
  49
  50 extern bool g_isIdle;
  51
  52 bool g_mainThreadLocked = FALSE;
  53
  54 GtkWidget *wxRootWindow = (GtkWidget*) NULL;
  55
  56 //-----------------------------------------------------------------------------
  57 // local functions
  58 //-----------------------------------------------------------------------------
  59
  60 /* forward declaration */
  61 gint   wxapp_idle_callback( gpointer WXUNUSED(data) );
  62 void   wxapp_install_idle_handler();
  63
  64 #if wxUSE_THREADS
  65 gint   wxapp_wakeup_timerout_callback( gpointer WXUNUSED(data) );
  66 #endif
  67
  68 //-----------------------------------------------------------------------------
  69 // wxExit
  70 //-----------------------------------------------------------------------------
  71
  72 void wxExit()
  73 {
  74     gtk_main_quit();
  75 }
  76
  77 //-----------------------------------------------------------------------------
  78 // wxYield
  79 //-----------------------------------------------------------------------------
  80
  81 bool wxYield()
  82 {
  83     bool has_idle = (wxTheApp->m_idleTag != 0);
  84
  85     if (has_idle)
  86     {
  87         /* We need to temporarily remove idle callbacks or the loop will
  88            never finish. */
  89         gtk_idle_remove( wxTheApp->m_idleTag );
  90         wxTheApp->m_idleTag = 0;
  91     }
  92
  93     while (gtk_events_pending())
  94         gtk_main_iteration();
  95
  96     if (has_idle)
  97     {
  98         /* re-add idle handler (very low priority) */
  99         wxTheApp->m_idleTag = gtk_idle_add_priority( 500, wxapp_idle_callback, (gpointer) NULL );
 100     }
 101
 102     // disable log flushing from here because a call to wxYield() shouldn't
 103     // normally result in message boxes popping up &c
 104     wxLog::Suspend();
 105
 106     /* it's necessary to call ProcessIdle() to update the frames sizes which
 107        might have been changed (it also will update other things set from
 108        OnUpdateUI() which is a nice (and desired) side effect) */
 109     while (wxTheApp->ProcessIdle())
 110         ;
 111
 112     // let the logs be flashed again
 113     wxLog::Resume();
 114
 115     return TRUE;
 116 }
 117
 118 //-----------------------------------------------------------------------------
 119 // wxWakeUpIdle
 120 //-----------------------------------------------------------------------------
 121
 122 void wxWakeUpIdle()
 123 {
 124 #if wxUSE_THREADS
 125     if (!wxThread::IsMain())
 126         wxMutexGuiEnter();
 127 #endif
 128
 129     if (g_isIdle)
 130         wxapp_install_idle_handler();
 131
 132 #if wxUSE_THREADS
 133     if (!wxThread::IsMain())
 134         wxMutexGuiLeave();
 135 #endif
 136 }
 137
 138 //-----------------------------------------------------------------------------
 139 // local functions
 140 //-----------------------------------------------------------------------------
 141
 142 gint wxapp_idle_callback( gpointer WXUNUSED(data) )
 143 {
 144     if (!wxTheApp) return TRUE;
 145
 146     // when getting called from GDK's time-out handler
 147     // we are no longer within GDK's grab on the GUI
 148     // thread so we must lock it here ourselves
 149     gdk_threads_enter();
 150
 151     /* we don't want any more idle events until the next event is
 152        sent to wxGTK */
 153     gtk_idle_remove( wxTheApp->m_idleTag );
 154     wxTheApp->m_idleTag = 0;
 155
 156     /* indicate that we are now in idle mode - even so deeply
 157        in idle mode that we don't get any idle events anymore.
 158        this is like wxMSW where an idle event is sent only
 159        once each time after the event queue has been completely
 160        emptied */
 161     g_isIdle = TRUE;
 162
 163     /* sent idle event to all who request them */
 164     while (wxTheApp->ProcessIdle()) { }
 165
 166     // release lock again
 167     gdk_threads_leave();
 168
 169     return TRUE;
 170 }
 171
 172 void wxapp_install_idle_handler()
 173 {
 174     wxASSERT_MSG( wxTheApp->m_idleTag == 0, wxT("attempt to install idle handler twice") );
 175
 176     /* This routine gets called by all event handlers
 177        indicating that the idle is over. It may also
 178        get called from other thread for sending events
 179        to the main thread (and processing these in
 180        idle time). Very low priority. */
 181
 182     wxTheApp->m_idleTag = gtk_idle_add_priority( 500, wxapp_idle_callback, (gpointer) NULL );
 183
 184     g_isIdle = FALSE;
 185 }
 186
 187 #if wxUSE_THREADS
 188
 189 void wxapp_install_thread_wakeup()
 190 {
 191     if (wxTheApp->m_wakeUpTimerTag) return;
 192
 193     wxTheApp->m_wakeUpTimerTag = gtk_timeout_add( 50, wxapp_wakeup_timerout_callback, (gpointer) NULL );
 194 }
 195
 196 void wxapp_uninstall_thread_wakeup()
 197 {
 198     if (!wxTheApp->m_wakeUpTimerTag) return;
 199
 200     gtk_timeout_remove( wxTheApp->m_wakeUpTimerTag );
 201     wxTheApp->m_wakeUpTimerTag = 0;
 202 }
 203
 204 gint wxapp_wakeup_timerout_callback( gpointer WXUNUSED(data) )
 205 {
 206     // when getting called from GDK's time-out handler
 207     // we are no longer within GDK's grab on the GUI
 208     // thread so we must lock it here ourselves
 209     gdk_threads_enter();
 210
 211     wxapp_uninstall_thread_wakeup();
 212
 213     // unblock other threads wishing to do some GUI things
 214     wxMutexGuiLeave();
 215
 216     g_mainThreadLocked = TRUE;
 217
 218     // wake up other threads
 219     wxUsleep( 1 );
 220
 221     // block other thread again
 222     wxMutexGuiEnter();
 223
 224     g_mainThreadLocked = FALSE;
 225
 226     wxapp_install_thread_wakeup();
 227
 228     // release lock again
 229     gdk_threads_leave();
 230
 231     return TRUE;
 232 }
 233
 234 #endif // wxUSE_THREADS
 235
 236 //-----------------------------------------------------------------------------
 237 // wxApp
 238 //-----------------------------------------------------------------------------
 239
 240 IMPLEMENT_DYNAMIC_CLASS(wxApp,wxEvtHandler)
 241
 242 BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
 243     EVT_IDLE(wxApp::OnIdle)
 244 END_EVENT_TABLE()
 245
 246 wxApp::wxApp()
 247 {
 248     wxTheApp = this;
 249
 250     m_topWindow = (wxWindow *) NULL;
 251     m_exitOnFrameDelete = TRUE;
 252
 253     m_idleTag = gtk_idle_add( wxapp_idle_callback, (gpointer) NULL );
 254
 255 #if wxUSE_THREADS
 256     m_wakeUpTimerTag = 0;
 257     wxapp_install_thread_wakeup();
 258 #endif
 259
 260     m_colorCube = (unsigned char*) NULL;
 261
 262     m_useBestVisual = FALSE;
 263 }
 264
 265 wxApp::~wxApp()
 266 {
 267     if (m_idleTag) gtk_idle_remove( m_idleTag );
 268
 269 #if wxUSE_THREADS
 270     wxapp_uninstall_thread_wakeup();
 271 #endif
 272
 273     if (m_colorCube) free(m_colorCube);
 274 }
 275
 276 bool wxApp::OnInitGui()
 277 {
 278     GdkVisual *visual = gdk_visual_get_system();
 279
 280     /* on some machines, the default visual is just 256 colours, so
 281        we make sure we get the best. this can sometimes be wasteful,
 282        of course, but what do these guys pay $30.000 for? */
 283
 284     if ((gdk_visual_get_best() != gdk_visual_get_system()) &&
 285         (m_useBestVisual))
 286     {
 287         GdkVisual* vis = gdk_visual_get_best();
 288         gtk_widget_set_default_visual( vis );
 289
 290         GdkColormap *colormap = gdk_colormap_new( vis, FALSE );
 291         gtk_widget_set_default_colormap( colormap );
 292
 293         visual = vis;
 294     }
 295
 296     /* Nothing to do for 15, 16, 24, 32 bit displays */
 297     if (visual->depth > 8) return TRUE;
 298
 299     /* initialize color cube for 8-bit color reduction dithering */
 300
 301     GdkColormap *cmap = gtk_widget_get_default_colormap();
 302
 303     m_colorCube = (unsigned char*)malloc(32 * 32 * 32);
 304
 305     for (int r = 0; r < 32; r++)
 306     {
 307         for (int g = 0; g < 32; g++)
 308         {
 309             for (int b = 0; b < 32; b++)
 310             {
 311                 int rr = (r << 3) | (r >> 2);
 312                 int gg = (g << 3) | (g >> 2);
 313                 int bb = (b << 3) | (b >> 2);
 314
 315                 int index = -1;
 316
 317                 GdkColor *colors = cmap->colors;
 318                 if (colors)
 319                 {
 320                     int max = 3 * 65536;
 321
 322                     for (int i = 0; i < cmap->size; i++)
 323                     {
 324                         int rdiff = ((rr << 8) - colors[i].red);
 325                         int gdiff = ((gg << 8) - colors[i].green);
 326                         int bdiff = ((bb << 8) - colors[i].blue);
 327                         int sum = ABS (rdiff) + ABS (gdiff) + ABS (bdiff);
 328                         if (sum < max)
 329                         {
 330                             index = i; max = sum;
 331                         }
 332                     }
 333                 }
 334                 else
 335                 {
 336 #if (GTK_MINOR_VERSION > 0)
 337                     /* assume 8-bit true or static colors. this really
 338                        exists. */
 339                     GdkVisual* vis = gdk_colormap_get_visual( cmap );
 340                     index = (r >> (5 - vis->red_prec)) << vis->red_shift;
 341                     index |= (g >> (5 - vis->green_prec)) << vis->green_shift;
 342                     index |= (b >> (5 - vis->blue_prec)) << vis->blue_shift;
 343 #else
 344                     wxFAIL_MSG( wxT("Unsupported graphics hardware") );
 345 #endif
 346                 }
 347                 m_colorCube[ (r*1024) + (g*32) + b ] = index;
 348             }
 349         }
 350     }
 351
 352     return TRUE;
 353 }
 354
 355 bool wxApp::ProcessIdle()
 356 {
 357     wxIdleEvent event;
 358     event.SetEventObject( this );
 359     ProcessEvent( event );
 360
 361     return event.MoreRequested();
 362 }
 363
 364 void wxApp::OnIdle( wxIdleEvent &event )
 365 {
 366     static bool s_inOnIdle = FALSE;
 367
 368     /* Avoid recursion (via ProcessEvent default case) */
 369     if (s_inOnIdle)
 370         return;
 371
 372     s_inOnIdle = TRUE;
 373
 374     /* Resend in the main thread events which have been prepared in other
 375        threads */
 376     ProcessPendingEvents();
 377
 378     /* 'Garbage' collection of windows deleted with Close(). */
 379     DeletePendingObjects();
 380
 381     /* Send OnIdle events to all windows */
 382     bool needMore = SendIdleEvents();
 383
 384     if (needMore)
 385         event.RequestMore(TRUE);
 386
 387     s_inOnIdle = FALSE;
 388
 389     /* flush the logged messages if any */
 390 #if wxUSE_LOG
 391     wxLog::FlushActive();
 392 #endif // wxUSE_LOG
 393 }
 394
 395 bool wxApp::SendIdleEvents()
 396 {
 397     bool needMore = FALSE;
 398
 399     wxWindowList::Node* node = wxTopLevelWindows.GetFirst();
 400     while (node)
 401     {
 402         wxWindow* win = node->GetData();
 403         if (SendIdleEvents(win))
 404             needMore = TRUE;
 405         node = node->GetNext();
 406     }
 407
 408     return needMore;
 409 }
 410
 411 bool wxApp::SendIdleEvents( wxWindow* win )
 412 {
 413     bool needMore = FALSE;
 414
 415     wxIdleEvent event;
 416     event.SetEventObject(win);
 417
 418     win->ProcessEvent(event);
 419
 420     win->OnInternalIdle();
 421
 422     if (event.MoreRequested())
 423         needMore = TRUE;
 424
 425     wxNode* node = win->GetChildren().First();
 426     while (node)
 427     {
 428         wxWindow* win = (wxWindow*) node->Data();
 429         if (SendIdleEvents(win))
 430             needMore = TRUE;
 431
 432         node = node->Next();
 433     }
 434     return needMore ;
 435 }
 436
 437 int wxApp::MainLoop()
 438 {
 439     gtk_main();
 440     return 0;
 441 }
 442
 443 void wxApp::ExitMainLoop()
 444 {
 445     if (gtk_main_level() > 0)
 446         gtk_main_quit();
 447 }
 448
 449 bool wxApp::Initialized()
 450 {
 451     return m_initialized;
 452 }
 453
 454 bool wxApp::Pending()
 455 {
 456     return (gtk_events_pending() > 0);
 457 }
 458
 459 void wxApp::Dispatch()
 460 {
 461     gtk_main_iteration();
 462 }
 463
 464 void wxApp::DeletePendingObjects()
 465 {
 466     wxNode *node = wxPendingDelete.First();
 467     while (node)
 468     {
 469         wxObject *obj = (wxObject *)node->Data();
 470
 471         delete obj;
 472
 473         if (wxPendingDelete.Find(obj))
 474             delete node;
 475
 476         node = wxPendingDelete.First();
 477     }
 478 }
 479
 480 bool wxApp::Initialize()
 481 {
 482     wxBuffer = new wxChar[BUFSIZ + 512];
 483
 484     wxClassInfo::InitializeClasses();
 485
 486     wxSystemSettings::Init();
 487
 488     // GL: I'm annoyed ... I don't know where to put this and I don't want to
 489     // create a module for that as it's part of the core.
 490 #if wxUSE_THREADS
 491     wxPendingEvents = new wxList();
 492     wxPendingEventsLocker = new wxCriticalSection();
 493 #endif
 494
 495     wxTheColourDatabase = new wxColourDatabase( wxKEY_STRING );
 496     wxTheColourDatabase->Initialize();
 497
 498     wxInitializeStockLists();
 499     wxInitializeStockObjects();
 500
 501 #if wxUSE_WX_RESOURCES
 502     wxInitializeResourceSystem();
 503 #endif
 504
 505     wxModule::RegisterModules();
 506     if (!wxModule::InitializeModules()) return FALSE;
 507
 508     return TRUE;
 509 }
 510
 511 void wxApp::CleanUp()
 512 {
 513     wxModule::CleanUpModules();
 514
 515 #if wxUSE_WX_RESOURCES
 516     wxCleanUpResourceSystem();
 517 #endif
 518
 519     if (wxTheColourDatabase)
 520         delete wxTheColourDatabase;
 521
 522     wxTheColourDatabase = (wxColourDatabase*) NULL;
 523
 524     wxDeleteStockObjects();
 525
 526     wxDeleteStockLists();
 527
 528     delete wxTheApp;
 529     wxTheApp = (wxApp*) NULL;
 530
 531     // GL: I'm annoyed ... I don't know where to put this and I don't want to
 532     // create a module for that as it's part of the core.
 533 #if wxUSE_THREADS
 534     delete wxPendingEvents;
 535     delete wxPendingEventsLocker;
 536 #endif
 537
 538     wxSystemSettings::Done();
 539
 540     delete[] wxBuffer;
 541
 542     wxClassInfo::CleanUpClasses();
 543
 544     // check for memory leaks
 545 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
 546     if (wxDebugContext::CountObjectsLeft() > 0)
 547     {
 548         wxLogDebug(wxT("There were memory leaks.\n"));
 549         wxDebugContext::Dump();
 550         wxDebugContext::PrintStatistics();
 551     }
 552 #endif // Debug
 553
 554 #if wxUSE_LOG
 555     // do this as the very last thing because everything else can log messages
 556     wxLog::DontCreateOnDemand();
 557
 558     wxLog *oldLog = wxLog::SetActiveTarget( (wxLog*) NULL );
 559     if (oldLog)
 560         delete oldLog;
 561 #endif // wxUSE_LOG
 562 }
 563
 564 //-----------------------------------------------------------------------------
 565 // wxEntry
 566 //-----------------------------------------------------------------------------
 567
 568
 569 int wxEntryStart( int argc, char *argv[] )
 570 {
 571 #if wxUSE_THREADS
 572     /* GTK 1.2 up to version 1.2.3 has broken threads */
 573     if ((gtk_major_version == 1) &&
 574         (gtk_minor_version == 2) &&
 575         (gtk_micro_version < 4))
 576     {
 577         printf( "wxWindows warning: GUI threading disabled due to outdated GTK version\n" );
 578     }
 579     else
 580     {
 581         g_thread_init(NULL);
 582     }
 583 #endif
 584
 585     gtk_set_locale();
 586
 587 #if wxUSE_WCHAR_T
 588     if (!wxOKlibc()) wxConvCurrent = &wxConvLocal;
 589 #else
 590     if (!wxOKlibc()) wxConvCurrent = (wxMBConv*) NULL;
 591 #endif
 592
 593     gdk_threads_enter();
 594
 595     gtk_init( &argc, &argv );
 596
 597     wxSetDetectableAutoRepeat( TRUE );
 598
 599     if (!wxApp::Initialize())
 600     {
 601         gdk_threads_leave();
 602         return -1;
 603     }
 604
 605     return 0;
 606 }
 607
 608
 609 int wxEntryInitGui()
 610 {
 611     int retValue = 0;
 612
 613     if ( !wxTheApp->OnInitGui() )
 614         retValue = -1;
 615
 616     wxRootWindow = gtk_window_new( GTK_WINDOW_TOPLEVEL );
 617     gtk_widget_realize( wxRootWindow );
 618
 619     return retValue;
 620 }
 621
 622
 623 void wxEntryCleanup()
 624 {
 625 #if wxUSE_LOG
 626     // flush the logged messages if any
 627     wxLog *log = wxLog::GetActiveTarget();
 628     if (log != NULL && log->HasPendingMessages())
 629         log->Flush();
 630
 631     // continuing to use user defined log target is unsafe from now on because
 632     // some resources may be already unavailable, so replace it by something
 633     // more safe
 634     wxLog *oldlog = wxLog::SetActiveTarget(new wxLogStderr);
 635     if ( oldlog )
 636         delete oldlog;
 637 #endif // wxUSE_LOG
 638
 639     wxApp::CleanUp();
 640
 641     gdk_threads_leave();
 642 }
 643
 644
 645
 646 int wxEntry( int argc, char *argv[] )
 647 {
 648     int err;
 649
 650     err = wxEntryStart(argc, argv);
 651     if (err)
 652         return err;
 653
 654     if (!wxTheApp)
 655     {
 656         wxCHECK_MSG( wxApp::GetInitializerFunction(), -1,
 657                      wxT("wxWindows error: No initializer - use IMPLEMENT_APP macro.\n") );
 658
 659         wxAppInitializerFunction app_ini = wxApp::GetInitializerFunction();
 660
 661         wxObject *test_app = app_ini();
 662
 663         wxTheApp = (wxApp*) test_app;
 664     }
 665
 666     wxCHECK_MSG( wxTheApp, -1, wxT("wxWindows error: no application object") );
 667
 668     wxTheApp->argc = argc;
 669 #if wxUSE_UNICODE
 670     wxTheApp->argv = new wxChar*[argc+1];
 671     int mb_argc = 0;
 672     while (mb_argc < argc)
 673     {
 674         wxTheApp->argv[mb_argc] = wxStrdup(wxConvLibc.cMB2WX(argv[mb_argc]));
 675         mb_argc++;
 676     }
 677     wxTheApp->argv[mb_argc] = (wxChar *)NULL;
 678 #else
 679     wxTheApp->argv = argv;
 680 #endif
 681
 682     wxString name(wxFileNameFromPath(argv[0]));
 683     wxStripExtension( name );
 684     wxTheApp->SetAppName( name );
 685
 686     int retValue;
 687     retValue = wxEntryInitGui();
 688
 689     // Here frames insert themselves automatically into wxTopLevelWindows by
 690     // getting created in OnInit().
 691     if ( retValue == 0 )
 692     {
 693         if ( !wxTheApp->OnInit() )
 694             retValue = -1;
 695     }
 696
 697     if ( retValue == 0 )
 698     {
 699         /* delete pending toplevel windows (typically a single
 700            dialog) so that, if there isn't any left, we don't
 701            call OnRun() */
 702         wxTheApp->DeletePendingObjects();
 703
 704         wxTheApp->m_initialized = wxTopLevelWindows.GetCount() != 0;
 705
 706         if (wxTheApp->Initialized())
 707         {
 708             wxTheApp->OnRun();
 709
 710             wxWindow *topWindow = wxTheApp->GetTopWindow();
 711             if (topWindow)
 712             {
 713                 /* Forcibly delete the window. */
 714                 if (topWindow->IsKindOf(CLASSINFO(wxFrame)) ||
 715                     topWindow->IsKindOf(CLASSINFO(wxDialog)) )
 716                 {
 717                     topWindow->Close( TRUE );
 718                     wxTheApp->DeletePendingObjects();
 719                 }
 720                 else
 721                 {
 722                     delete topWindow;
 723                     wxTheApp->SetTopWindow( (wxWindow*) NULL );
 724                 }
 725             }
 726
 727             retValue = wxTheApp->OnExit();
 728         }
 729     }
 730
 731     wxEntryCleanup();
 732
 733     return retValue;
 734 }
 735
 736 #include "wx/gtk/info.xpm"
 737 #include "wx/gtk/error.xpm"
 738 #include "wx/gtk/question.xpm"
 739 #include "wx/gtk/warning.xpm"
 740
 741 wxIcon
 742 wxApp::GetStdIcon(int which) const
 743 {
 744     switch(which)
 745     {
 746         case wxICON_INFORMATION:
 747             return wxIcon(info_xpm);
 748
 749         case wxICON_QUESTION:
 750             return wxIcon(question_xpm);
 751
 752         case wxICON_EXCLAMATION:
 753             return wxIcon(warning_xpm);
 754
 755         default:
 756             wxFAIL_MSG(wxT("requested non existent standard icon"));
 757             // still fall through
 758
 759         case wxICON_HAND:
 760             return wxIcon(error_xpm);
 761     }
 762 }