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 #ifdef __VMS
  15 #include <vms_jackets.h>
  16 #endif
  17
  18 #include "wx/app.h"
  19 #include "wx/gdicmn.h"
  20 #include "wx/utils.h"
  21 #include "wx/intl.h"
  22 #include "wx/log.h"
  23 #include "wx/memory.h"
  24 #include "wx/font.h"
  25 #include "wx/settings.h"
  26 #include "wx/dialog.h"
  27
  28 #if wxUSE_WX_RESOURCES
  29     #include "wx/resource.h"
  30 #endif
  31
  32 #include "wx/module.h"
  33 #include "wx/image.h"
  34
  35 #ifdef __WXUNIVERSAL__
  36     #include "wx/univ/theme.h"
  37     #include "wx/univ/renderer.h"
  38 #endif
  39
  40 #if wxUSE_THREADS
  41     #include "wx/thread.h"
  42 #endif
  43
  44 #include <unistd.h>
  45 #ifdef __VMS
  46 # include <poll.h>
  47 #else
  48 # include <sys/poll.h>
  49 #endif
  50 #include "wx/gtk/win_gtk.h"
  51
  52 #include <gtk/gtk.h>
  53
  54
  55 //-----------------------------------------------------------------------------
  56 // global data
  57 //-----------------------------------------------------------------------------
  58
  59 wxApp *wxTheApp = (wxApp *)  NULL;
  60 wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
  61
  62 bool   g_mainThreadLocked = FALSE;
  63 gint   g_pendingTag = 0;
  64
  65 static GtkWidget *gs_RootWindow = (GtkWidget*) NULL;
  66
  67 //-----------------------------------------------------------------------------
  68 // idle system
  69 //-----------------------------------------------------------------------------
  70
  71 extern bool g_isIdle;
  72
  73 void wxapp_install_idle_handler();
  74
  75 //-----------------------------------------------------------------------------
  76 // wxExit
  77 //-----------------------------------------------------------------------------
  78
  79 void wxExit()
  80 {
  81     gtk_main_quit();
  82 }
  83
  84 //-----------------------------------------------------------------------------
  85 // wxYield
  86 //-----------------------------------------------------------------------------
  87
  88 bool wxApp::Yield(bool onlyIfNeeded)
  89 {
  90     // MT-FIXME
  91     static bool s_inYield = FALSE;
  92
  93     if ( s_inYield )
  94     {
  95         if ( !onlyIfNeeded )
  96         {
  97             wxFAIL_MSG( wxT("wxYield called recursively" ) );
  98         }
  99
 100         return FALSE;
 101     }
 102
 103 #if wxUSE_THREADS
 104     if ( !wxThread::IsMain() )
 105     {
 106         // can't call gtk_main_iteration() from other threads like this
 107         return TRUE;
 108     }
 109 #endif // wxUSE_THREADS
 110
 111     s_inYield = TRUE;
 112
 113     if (!g_isIdle)
 114     {
 115         // We need to remove idle callbacks or the loop will
 116         // never finish.
 117         gtk_idle_remove( m_idleTag );
 118         m_idleTag = 0;
 119         g_isIdle = TRUE;
 120     }
 121
 122     // disable log flushing from here because a call to wxYield() shouldn't
 123     // normally result in message boxes popping up &c
 124     wxLog::Suspend();
 125
 126     while (gtk_events_pending())
 127         gtk_main_iteration();
 128
 129     // It's necessary to call ProcessIdle() to update the frames sizes which
 130     // might have been changed (it also will update other things set from
 131     // OnUpdateUI() which is a nice (and desired) side effect). But we
 132     // call ProcessIdle() only once since this is not meant for longish
 133     // background jobs (controlled by wxIdleEvent::RequestMore() and the
 134     // return value of Processidle().
 135     ProcessIdle();
 136
 137     // let the logs be flashed again
 138     wxLog::Resume();
 139
 140     s_inYield = FALSE;
 141
 142     return TRUE;
 143 }
 144
 145 //-----------------------------------------------------------------------------
 146 // wxWakeUpIdle
 147 //-----------------------------------------------------------------------------
 148
 149 void wxWakeUpIdle()
 150 {
 151 #if wxUSE_THREADS
 152     if (!wxThread::IsMain())
 153         wxMutexGuiEnter();
 154 #endif
 155
 156     if (g_isIdle)
 157         wxapp_install_idle_handler();
 158
 159 #if wxUSE_THREADS
 160     if (!wxThread::IsMain())
 161         wxMutexGuiLeave();
 162 #endif
 163 }
 164
 165 //-----------------------------------------------------------------------------
 166 // local functions
 167 //-----------------------------------------------------------------------------
 168
 169 // the callback functions must be extern "C" to comply with GTK+ declarations
 170 extern "C"
 171 {
 172
 173 static gint wxapp_pending_callback( gpointer WXUNUSED(data) )
 174 {
 175     if (!wxTheApp) return TRUE;
 176
 177     // When getting called from GDK's time-out handler
 178     // we are no longer within GDK's grab on the GUI
 179     // thread so we must lock it here ourselves.
 180     gdk_threads_enter();
 181
 182     // Sent idle event to all who request them.
 183     wxTheApp->ProcessPendingEvents();
 184
 185     g_pendingTag = 0;
 186
 187     // Flush the logged messages if any.
 188 #if wxUSE_LOG
 189     wxLog::FlushActive();
 190 #endif // wxUSE_LOG
 191
 192     // Release lock again
 193     gdk_threads_leave();
 194
 195     // Return FALSE to indicate that no more idle events are
 196     // to be sent (single shot instead of continuous stream)
 197     return FALSE;
 198 }
 199
 200 static gint wxapp_idle_callback( gpointer WXUNUSED(data) )
 201 {
 202     if (!wxTheApp)
 203         return TRUE;
 204
 205 #ifdef __WXDEBUG__
 206     // don't generate the idle events while the assert modal dialog is shown,
 207     // this completely confuses the apps which don't expect to be reentered
 208     // from some safely-looking functions
 209     if ( wxTheApp->IsInAssert() )
 210     {
 211         return TRUE;
 212     }
 213 #endif // __WXDEBUG__
 214
 215     // When getting called from GDK's time-out handler
 216     // we are no longer within GDK's grab on the GUI
 217     // thread so we must lock it here ourselves.
 218     gdk_threads_enter();
 219
 220     // Indicate that we are now in idle mode and event handlers
 221     // will have to reinstall the idle handler again.
 222     g_isIdle = TRUE;
 223     wxTheApp->m_idleTag = 0;
 224
 225     // Send idle event to all who request them as long as
 226     // no events have popped up in the event queue.
 227     while (wxTheApp->ProcessIdle() && (gtk_events_pending() == 0))
 228         ;
 229
 230     // Release lock again
 231     gdk_threads_leave();
 232
 233     // Return FALSE to indicate that no more idle events are
 234     // to be sent (single shot instead of continuous stream).
 235     return FALSE;
 236 }
 237
 238 #if wxUSE_THREADS
 239
 240 static gint wxapp_poll_func( GPollFD *ufds, guint nfds, gint timeout )
 241 {
 242     gint res;
 243     gdk_threads_enter();
 244
 245     wxMutexGuiLeave();
 246     g_mainThreadLocked = TRUE;
 247
 248     res = poll( (struct pollfd*) ufds, nfds, timeout );
 249
 250     wxMutexGuiEnter();
 251     g_mainThreadLocked = FALSE;
 252
 253     gdk_threads_leave();
 254
 255     return res;
 256 }
 257
 258 #endif // wxUSE_THREADS
 259
 260 } // extern "C"
 261
 262 void wxapp_install_idle_handler()
 263 {
 264     wxASSERT_MSG( wxTheApp->m_idleTag == 0, wxT("attempt to install idle handler twice") );
 265
 266     g_isIdle = FALSE;
 267
 268     if (g_pendingTag == 0)
 269         g_pendingTag = gtk_idle_add_priority( 900, wxapp_pending_callback, (gpointer) NULL );
 270
 271     // This routine gets called by all event handlers
 272     // indicating that the idle is over. It may also
 273     // get called from other thread for sending events
 274     // to the main thread (and processing these in
 275     // idle time). Very low priority.
 276     wxTheApp->m_idleTag = gtk_idle_add_priority( 1000, wxapp_idle_callback, (gpointer) NULL );
 277 }
 278
 279 //-----------------------------------------------------------------------------
 280 // Access to the root window global
 281 //-----------------------------------------------------------------------------
 282
 283 GtkWidget* wxGetRootWindow()
 284 {
 285     if (gs_RootWindow == NULL)
 286     {
 287         gs_RootWindow = gtk_window_new( GTK_WINDOW_TOPLEVEL );
 288         gtk_widget_realize( gs_RootWindow );
 289     }
 290     return gs_RootWindow;
 291 }
 292
 293 //-----------------------------------------------------------------------------
 294 // wxApp
 295 //-----------------------------------------------------------------------------
 296
 297 IMPLEMENT_DYNAMIC_CLASS(wxApp,wxEvtHandler)
 298
 299 BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
 300     EVT_IDLE(wxApp::OnIdle)
 301 END_EVENT_TABLE()
 302
 303 wxApp::wxApp()
 304 {
 305     m_initialized = FALSE;
 306 #ifdef __WXDEBUG__
 307     m_isInAssert = FALSE;
 308 #endif // __WXDEBUG__
 309
 310     m_idleTag = 0;
 311     wxapp_install_idle_handler();
 312
 313 #if wxUSE_THREADS
 314     g_main_set_poll_func( wxapp_poll_func );
 315 #endif
 316
 317     m_colorCube = (unsigned char*) NULL;
 318
 319     // this is NULL for a "regular" wxApp, but is set (and freed) by a wxGLApp
 320     m_glVisualInfo = (void *) NULL;
 321 }
 322
 323 wxApp::~wxApp()
 324 {
 325     if (m_idleTag) gtk_idle_remove( m_idleTag );
 326
 327     if (m_colorCube) free(m_colorCube);
 328 }
 329
 330 bool wxApp::OnInitGui()
 331 {
 332     if ( !wxAppBase::OnInitGui() )
 333         return FALSE;
 334
 335     GdkVisual *visual = gdk_visual_get_system();
 336
 337     // if this is a wxGLApp (derived from wxApp), and we've already
 338     // chosen a specific visual, then derive the GdkVisual from that
 339     if (m_glVisualInfo != NULL)
 340     {
 341 #ifdef __WXGTK20__
 342         // seems gtk_widget_set_default_visual no longer exists?
 343         GdkVisual* vis = gtk_widget_get_default_visual();
 344 #else
 345         GdkVisual* vis = gdkx_visual_get(
 346             ((XVisualInfo *) m_glVisualInfo) ->visualid );
 347         gtk_widget_set_default_visual( vis );
 348 #endif
 349
 350         GdkColormap *colormap = gdk_colormap_new( vis, FALSE );
 351         gtk_widget_set_default_colormap( colormap );
 352
 353         visual = vis;
 354     }
 355
 356     // On some machines, the default visual is just 256 colours, so
 357     // we make sure we get the best. This can sometimes be wasteful.
 358
 359     else
 360     if ((gdk_visual_get_best() != gdk_visual_get_system()) && (m_useBestVisual))
 361     {
 362 #ifdef __WXGTK20__
 363         /* seems gtk_widget_set_default_visual no longer exists? */
 364         GdkVisual* vis = gtk_widget_get_default_visual();
 365 #else
 366         GdkVisual* vis = gdk_visual_get_best();
 367         gtk_widget_set_default_visual( vis );
 368 #endif
 369
 370         GdkColormap *colormap = gdk_colormap_new( vis, FALSE );
 371         gtk_widget_set_default_colormap( colormap );
 372
 373         visual = vis;
 374     }
 375
 376     // Nothing to do for 15, 16, 24, 32 bit displays
 377     if (visual->depth > 8) return TRUE;
 378
 379     // initialize color cube for 8-bit color reduction dithering
 380
 381     GdkColormap *cmap = gtk_widget_get_default_colormap();
 382
 383     m_colorCube = (unsigned char*)malloc(32 * 32 * 32);
 384
 385     for (int r = 0; r < 32; r++)
 386     {
 387         for (int g = 0; g < 32; g++)
 388         {
 389             for (int b = 0; b < 32; b++)
 390             {
 391                 int rr = (r << 3) | (r >> 2);
 392                 int gg = (g << 3) | (g >> 2);
 393                 int bb = (b << 3) | (b >> 2);
 394
 395                 int index = -1;
 396
 397                 GdkColor *colors = cmap->colors;
 398                 if (colors)
 399                 {
 400                     int max = 3 * 65536;
 401
 402                     for (int i = 0; i < cmap->size; i++)
 403                     {
 404                         int rdiff = ((rr << 8) - colors[i].red);
 405                         int gdiff = ((gg << 8) - colors[i].green);
 406                         int bdiff = ((bb << 8) - colors[i].blue);
 407                         int sum = ABS (rdiff) + ABS (gdiff) + ABS (bdiff);
 408                         if (sum < max)
 409                         {
 410                             index = i; max = sum;
 411                         }
 412                     }
 413                 }
 414                 else
 415                 {
 416                     // assume 8-bit true or static colors. this really exists
 417                     GdkVisual* vis = gdk_colormap_get_visual( cmap );
 418                     index = (r >> (5 - vis->red_prec)) << vis->red_shift;
 419                     index |= (g >> (5 - vis->green_prec)) << vis->green_shift;
 420                     index |= (b >> (5 - vis->blue_prec)) << vis->blue_shift;
 421                 }
 422                 m_colorCube[ (r*1024) + (g*32) + b ] = index;
 423             }
 424         }
 425     }
 426
 427     return TRUE;
 428 }
 429
 430 GdkVisual *wxApp::GetGdkVisual()
 431 {
 432     GdkVisual *visual = NULL;
 433
 434     if (m_glVisualInfo)
 435         visual = gdkx_visual_get( ((XVisualInfo *) m_glVisualInfo)->visualid );
 436     else
 437         visual = gdk_window_get_visual( wxGetRootWindow()->window );
 438
 439     wxASSERT( visual );
 440
 441     return visual;
 442 }
 443
 444 bool wxApp::ProcessIdle()
 445 {
 446     wxIdleEvent event;
 447     event.SetEventObject( this );
 448     ProcessEvent( event );
 449
 450     return event.MoreRequested();
 451 }
 452
 453 void wxApp::OnIdle( wxIdleEvent &event )
 454 {
 455     static bool s_inOnIdle = FALSE;
 456
 457     // Avoid recursion (via ProcessEvent default case)
 458     if (s_inOnIdle)
 459         return;
 460
 461     s_inOnIdle = TRUE;
 462
 463     // Resend in the main thread events which have been prepared in other
 464     // threads
 465     ProcessPendingEvents();
 466
 467     // 'Garbage' collection of windows deleted with Close()
 468     DeletePendingObjects();
 469
 470     // Send OnIdle events to all windows
 471     bool needMore = SendIdleEvents();
 472
 473     if (needMore)
 474         event.RequestMore(TRUE);
 475
 476     s_inOnIdle = FALSE;
 477 }
 478
 479 bool wxApp::SendIdleEvents()
 480 {
 481     bool needMore = FALSE;
 482
 483     wxWindowList::Node* node = wxTopLevelWindows.GetFirst();
 484     while (node)
 485     {
 486         wxWindow* win = node->GetData();
 487         if (SendIdleEvents(win))
 488             needMore = TRUE;
 489         node = node->GetNext();
 490     }
 491
 492     return needMore;
 493 }
 494
 495 bool wxApp::SendIdleEvents( wxWindow* win )
 496 {
 497     bool needMore = FALSE;
 498
 499     wxIdleEvent event;
 500     event.SetEventObject(win);
 501
 502     win->GetEventHandler()->ProcessEvent(event);
 503
 504     win->OnInternalIdle();
 505
 506     if (event.MoreRequested())
 507         needMore = TRUE;
 508
 509     wxNode* node = win->GetChildren().First();
 510     while (node)
 511     {
 512         wxWindow* win = (wxWindow*) node->Data();
 513         if (SendIdleEvents(win))
 514             needMore = TRUE;
 515
 516         node = node->Next();
 517     }
 518
 519     return needMore;
 520 }
 521
 522 int wxApp::MainLoop()
 523 {
 524     gtk_main();
 525     return 0;
 526 }
 527
 528 void wxApp::ExitMainLoop()
 529 {
 530     if (gtk_main_level() > 0)
 531         gtk_main_quit();
 532 }
 533
 534 bool wxApp::Initialized()
 535 {
 536     return m_initialized;
 537 }
 538
 539 bool wxApp::Pending()
 540 {
 541     return (gtk_events_pending() > 0);
 542 }
 543
 544 void wxApp::Dispatch()
 545 {
 546     gtk_main_iteration();
 547 }
 548
 549 void wxApp::DeletePendingObjects()
 550 {
 551     wxNode *node = wxPendingDelete.First();
 552     while (node)
 553     {
 554         wxObject *obj = (wxObject *)node->Data();
 555
 556         delete obj;
 557
 558         if (wxPendingDelete.Find(obj))
 559             delete node;
 560
 561         node = wxPendingDelete.First();
 562     }
 563 }
 564
 565 bool wxApp::Initialize()
 566 {
 567     wxBuffer = new wxChar[BUFSIZ + 512];
 568
 569     wxClassInfo::InitializeClasses();
 570
 571 #if wxUSE_INTL
 572     wxFont::SetDefaultEncoding(wxLocale::GetSystemEncoding());
 573 #endif
 574
 575     // GL: I'm annoyed ... I don't know where to put this and I don't want to
 576     // create a module for that as it's part of the core.
 577 #if wxUSE_THREADS
 578     wxPendingEvents = new wxList();
 579     wxPendingEventsLocker = new wxCriticalSection();
 580 #endif
 581
 582     wxTheColourDatabase = new wxColourDatabase( wxKEY_STRING );
 583     wxTheColourDatabase->Initialize();
 584
 585     wxInitializeStockLists();
 586     wxInitializeStockObjects();
 587
 588 #if wxUSE_WX_RESOURCES
 589     wxInitializeResourceSystem();
 590 #endif
 591
 592     wxModule::RegisterModules();
 593     if (!wxModule::InitializeModules()) return FALSE;
 594
 595     return TRUE;
 596 }
 597
 598 void wxApp::CleanUp()
 599 {
 600     wxModule::CleanUpModules();
 601
 602 #if wxUSE_WX_RESOURCES
 603     wxCleanUpResourceSystem();
 604 #endif
 605
 606     delete wxTheColourDatabase;
 607     wxTheColourDatabase = (wxColourDatabase*) NULL;
 608
 609     wxDeleteStockObjects();
 610
 611     wxDeleteStockLists();
 612
 613     delete wxTheApp;
 614     wxTheApp = (wxApp*) NULL;
 615
 616     delete[] wxBuffer;
 617     wxBuffer = NULL;
 618
 619     wxClassInfo::CleanUpClasses();
 620
 621 #if wxUSE_THREADS
 622     delete wxPendingEvents;
 623     delete wxPendingEventsLocker;
 624 #endif
 625
 626     // check for memory leaks
 627 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
 628     if (wxDebugContext::CountObjectsLeft(TRUE) > 0)
 629     {
 630         wxLogDebug(wxT("There were memory leaks.\n"));
 631         wxDebugContext::Dump();
 632         wxDebugContext::PrintStatistics();
 633     }
 634 #endif // Debug
 635
 636 #if wxUSE_LOG
 637     // do this as the very last thing because everything else can log messages
 638     wxLog::DontCreateOnDemand();
 639
 640     wxLog *oldLog = wxLog::SetActiveTarget( (wxLog*) NULL );
 641     if (oldLog)
 642         delete oldLog;
 643 #endif // wxUSE_LOG
 644 }
 645
 646 //-----------------------------------------------------------------------------
 647 // wxEntry
 648 //-----------------------------------------------------------------------------
 649
 650 // NB: argc and argv may be changed here, pass by reference!
 651 int wxEntryStart( int& argc, char *argv[] )
 652 {
 653 #if wxUSE_THREADS
 654     // GTK 1.2 up to version 1.2.3 has broken threads
 655     if ((gtk_major_version == 1) &&
 656         (gtk_minor_version == 2) &&
 657         (gtk_micro_version < 4))
 658     {
 659         printf( "wxWindows warning: GUI threading disabled due to outdated GTK version\n" );
 660     }
 661     else
 662     {
 663         g_thread_init(NULL);
 664     }
 665 #endif
 666
 667     gtk_set_locale();
 668
 669     // We should have the wxUSE_WCHAR_T test on the _outside_
 670 #if wxUSE_WCHAR_T
 671 #if defined(__WXGTK20__)
 672     // gtk+ 2.0 supports Unicode through UTF-8 strings
 673     wxConvCurrent = &wxConvUTF8;
 674 #else
 675     if (!wxOKlibc()) wxConvCurrent = &wxConvLocal;
 676 #endif
 677 #else
 678     if (!wxOKlibc()) wxConvCurrent = (wxMBConv*) NULL;
 679 #endif
 680
 681     gdk_threads_enter();
 682
 683     gtk_init( &argc, &argv );
 684
 685     wxSetDetectableAutoRepeat( TRUE );
 686
 687     if (!wxApp::Initialize())
 688     {
 689         gdk_threads_leave();
 690         return -1;
 691     }
 692
 693     return 0;
 694 }
 695
 696
 697 int wxEntryInitGui()
 698 {
 699     int retValue = 0;
 700
 701     if ( !wxTheApp->OnInitGui() )
 702         retValue = -1;
 703
 704     wxGetRootWindow();
 705
 706     return retValue;
 707 }
 708
 709
 710 void wxEntryCleanup()
 711 {
 712 #if wxUSE_LOG
 713     // flush the logged messages if any
 714     wxLog *log = wxLog::GetActiveTarget();
 715     if (log != NULL && log->HasPendingMessages())
 716         log->Flush();
 717
 718     // continuing to use user defined log target is unsafe from now on because
 719     // some resources may be already unavailable, so replace it by something
 720     // more safe
 721     wxLog *oldlog = wxLog::SetActiveTarget(new wxLogStderr);
 722     if ( oldlog )
 723         delete oldlog;
 724 #endif // wxUSE_LOG
 725
 726     wxApp::CleanUp();
 727
 728     gdk_threads_leave();
 729 }
 730
 731
 732 int wxEntry( int argc, char *argv[] )
 733 {
 734 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
 735     // This seems to be necessary since there are 'rogue'
 736     // objects present at this point (perhaps global objects?)
 737     // Setting a checkpoint will ignore them as far as the
 738     // memory checking facility is concerned.
 739     // Of course you may argue that memory allocated in globals should be
 740     // checked, but this is a reasonable compromise.
 741     wxDebugContext::SetCheckpoint();
 742 #endif
 743     int err = wxEntryStart(argc, argv);
 744     if (err)
 745         return err;
 746
 747     if (!wxTheApp)
 748     {
 749         wxCHECK_MSG( wxApp::GetInitializerFunction(), -1,
 750                      wxT("wxWindows error: No initializer - use IMPLEMENT_APP macro.\n") );
 751
 752         wxAppInitializerFunction app_ini = wxApp::GetInitializerFunction();
 753
 754         wxObject *test_app = app_ini();
 755
 756         wxTheApp = (wxApp*) test_app;
 757     }
 758
 759     wxCHECK_MSG( wxTheApp, -1, wxT("wxWindows error: no application object") );
 760
 761     wxTheApp->argc = argc;
 762 #if wxUSE_UNICODE
 763     wxTheApp->argv = new wxChar*[argc+1];
 764     int mb_argc = 0;
 765     while (mb_argc < argc)
 766     {
 767         wxTheApp->argv[mb_argc] = wxStrdup(wxConvLibc.cMB2WX(argv[mb_argc]));
 768         mb_argc++;
 769     }
 770     wxTheApp->argv[mb_argc] = (wxChar *)NULL;
 771 #else
 772     wxTheApp->argv = argv;
 773 #endif
 774
 775     wxString name(wxFileNameFromPath(argv[0]));
 776     wxStripExtension( name );
 777     wxTheApp->SetAppName( name );
 778
 779     int retValue;
 780     retValue = wxEntryInitGui();
 781
 782     // Here frames insert themselves automatically into wxTopLevelWindows by
 783     // getting created in OnInit().
 784     if ( retValue == 0 )
 785     {
 786         if ( !wxTheApp->OnInit() )
 787             retValue = -1;
 788     }
 789
 790     if ( retValue == 0 )
 791     {
 792         /* delete pending toplevel windows (typically a single
 793            dialog) so that, if there isn't any left, we don't
 794            call OnRun() */
 795         wxTheApp->DeletePendingObjects();
 796
 797         wxTheApp->m_initialized = wxTopLevelWindows.GetCount() != 0;
 798
 799         if (wxTheApp->Initialized())
 800         {
 801             wxTheApp->OnRun();
 802
 803             wxWindow *topWindow = wxTheApp->GetTopWindow();
 804             if (topWindow)
 805             {
 806                 /* Forcibly delete the window. */
 807                 if (topWindow->IsKindOf(CLASSINFO(wxFrame)) ||
 808                     topWindow->IsKindOf(CLASSINFO(wxDialog)) )
 809                 {
 810                     topWindow->Close( TRUE );
 811                     wxTheApp->DeletePendingObjects();
 812                 }
 813                 else
 814                 {
 815                     delete topWindow;
 816                     wxTheApp->SetTopWindow( (wxWindow*) NULL );
 817                 }
 818             }
 819
 820             retValue = wxTheApp->OnExit();
 821         }
 822     }
 823
 824     wxEntryCleanup();
 825
 826     return retValue;
 827 }
 828
 829 #ifndef __WXUNIVERSAL__
 830
 831 // XPM hack: make the arrays const
 832 #define static static const
 833
 834 #include "wx/gtk/info.xpm"
 835 #include "wx/gtk/error.xpm"
 836 #include "wx/gtk/question.xpm"
 837 #include "wx/gtk/warning.xpm"
 838
 839 #undef static
 840
 841 wxIcon wxApp::GetStdIcon(int which) const
 842 {
 843     switch(which)
 844     {
 845         case wxICON_INFORMATION:
 846             return wxIcon(info_xpm);
 847
 848         case wxICON_QUESTION:
 849             return wxIcon(question_xpm);
 850
 851         case wxICON_EXCLAMATION:
 852             return wxIcon(warning_xpm);
 853
 854         default:
 855             wxFAIL_MSG(wxT("requested non existent standard icon"));
 856             // still fall through
 857
 858         case wxICON_HAND:
 859             return wxIcon(error_xpm);
 860     }
 861 }
 862 #else
 863 wxIcon wxApp::GetStdIcon(int which) const
 864 {
 865     return wxTheme::Get()->GetRenderer()->GetStdIcon(which);
 866 }
 867 #endif // !__WXUNIVERSAL__
 868
 869
 870 #ifdef __WXDEBUG__
 871
 872 void wxApp::OnAssert(const wxChar *file, int line, const wxChar *msg)
 873 {
 874     m_isInAssert = TRUE;
 875
 876     wxAppBase::OnAssert(file, line, msg);
 877
 878     m_isInAssert = FALSE;
 879 }
 880
 881 #endif // __WXDEBUG__
 882