src/x11/app.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        app.cpp
   3 // Purpose:     wxApp
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     17/09/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13     #pragma implementation "app.h"
  14 #endif
  15
  16 #include "wx/frame.h"
  17 #include "wx/app.h"
  18 #include "wx/utils.h"
  19 #include "wx/gdicmn.h"
  20 #include "wx/icon.h"
  21 #include "wx/dialog.h"
  22 #include "wx/log.h"
  23 #include "wx/module.h"
  24 #include "wx/memory.h"
  25 #include "wx/log.h"
  26 #include "wx/intl.h"
  27 #include "wx/evtloop.h"
  28
  29 #include "wx/univ/theme.h"
  30 #include "wx/univ/renderer.h"
  31
  32 #if wxUSE_THREADS
  33     #include "wx/thread.h"
  34 #endif
  35
  36 #if wxUSE_WX_RESOURCES
  37     #include "wx/resource.h"
  38 #endif
  39
  40 #include "wx/x11/private.h"
  41
  42 #include <string.h>
  43
  44 //------------------------------------------------------------------------
  45 //   global data
  46 //------------------------------------------------------------------------
  47
  48 extern wxList wxPendingDelete;
  49
  50 wxHashTable *wxWidgetHashTable = NULL;
  51
  52 wxApp *wxTheApp = NULL;
  53
  54 // This is set within wxEntryStart -- too early on
  55 // to put these in wxTheApp
  56 static int g_newArgc = 0;
  57 static wxChar** g_newArgv = NULL;
  58 static bool g_showIconic = FALSE;
  59 static wxSize g_initialSize = wxDefaultSize;
  60
  61 // This is required for wxFocusEvent::SetWindow(). It will only
  62 // work for focus events which we provoke ourselves (by calling
  63 // SetFocus()). It will not work for those events, which X11
  64 // generates itself.
  65 static wxWindow *g_nextFocus = NULL;
  66 static wxWindow *g_prevFocus = NULL;
  67
  68 //------------------------------------------------------------------------
  69 //   X11 error handling
  70 //------------------------------------------------------------------------
  71
  72 #ifdef __WXDEBUG__
  73 typedef int (*XErrorHandlerFunc)(Display *, XErrorEvent *);
  74
  75 XErrorHandlerFunc gs_pfnXErrorHandler = 0;
  76
  77 static int wxXErrorHandler(Display *dpy, XErrorEvent *xevent)
  78 {
  79     // just forward to the default handler for now
  80     if (gs_pfnXErrorHandler)
  81         return gs_pfnXErrorHandler(dpy, xevent);
  82     else
  83         return 0;
  84 }
  85 #endif // __WXDEBUG__
  86
  87 //------------------------------------------------------------------------
  88 //   wxApp
  89 //------------------------------------------------------------------------
  90
  91 long wxApp::sm_lastMessageTime = 0;
  92 WXDisplay *wxApp::ms_display = NULL;
  93
  94 IMPLEMENT_DYNAMIC_CLASS(wxApp, wxEvtHandler)
  95
  96 BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
  97     EVT_IDLE(wxApp::OnIdle)
  98 END_EVENT_TABLE()
  99
 100 bool wxApp::Initialize()
 101 {
 102     wxClassInfo::InitializeClasses();
 103
 104     // GL: I'm annoyed ... I don't know where to put this and I don't want to
 105     // create a module for that as it's part of the core.
 106 #if wxUSE_THREADS
 107     wxPendingEventsLocker = new wxCriticalSection();
 108 #endif
 109
 110     wxTheColourDatabase = new wxColourDatabase(wxKEY_STRING);
 111     wxTheColourDatabase->Initialize();
 112
 113     wxInitializeStockLists();
 114     wxInitializeStockObjects();
 115
 116 #if wxUSE_WX_RESOURCES
 117     wxInitializeResourceSystem();
 118 #endif
 119
 120     wxWidgetHashTable = new wxHashTable(wxKEY_INTEGER);
 121
 122     wxModule::RegisterModules();
 123     if (!wxModule::InitializeModules()) return FALSE;
 124
 125     return TRUE;
 126 }
 127
 128 void wxApp::CleanUp()
 129 {
 130     if (g_newArgv)
 131         delete[] g_newArgv;
 132     g_newArgv = NULL;
 133
 134     delete wxWidgetHashTable;
 135     wxWidgetHashTable = NULL;
 136
 137     wxModule::CleanUpModules();
 138
 139 #if wxUSE_WX_RESOURCES
 140     wxCleanUpResourceSystem();
 141 #endif
 142
 143     delete wxTheColourDatabase;
 144     wxTheColourDatabase = NULL;
 145
 146     wxDeleteStockObjects();
 147
 148     wxDeleteStockLists();
 149
 150     delete wxTheApp;
 151     wxTheApp = NULL;
 152
 153     wxClassInfo::CleanUpClasses();
 154
 155 #if wxUSE_THREADS
 156     delete wxPendingEvents;
 157     delete wxPendingEventsLocker;
 158 #endif
 159
 160 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
 161     // At this point we want to check if there are any memory
 162     // blocks that aren't part of the wxDebugContext itself,
 163     // as a special case. Then when dumping we need to ignore
 164     // wxDebugContext, too.
 165     if (wxDebugContext::CountObjectsLeft(TRUE) > 0)
 166     {
 167         wxLogDebug("There were memory leaks.");
 168         wxDebugContext::Dump();
 169         wxDebugContext::PrintStatistics();
 170     }
 171 #endif
 172
 173     // do it as the very last thing because everything else can log messages
 174     wxLog::DontCreateOnDemand();
 175     // do it as the very last thing because everything else can log messages
 176     delete wxLog::SetActiveTarget(NULL);
 177 }
 178
 179 // NB: argc and argv may be changed here, pass by reference!
 180 int wxEntryStart( int& argc, char *argv[] )
 181 {
 182 #ifdef __WXDEBUG__
 183 #if !wxUSE_NANOX
 184     // install the X error handler
 185     gs_pfnXErrorHandler = XSetErrorHandler( wxXErrorHandler );
 186 #endif
 187 #endif // __WXDEBUG__
 188
 189     wxString displayName;
 190     bool syncDisplay = FALSE;
 191
 192     // Parse the arguments.
 193     // We can't use wxCmdLineParser or OnInitCmdLine and friends because
 194     // we have to create the Display earlier. If we can find a way to
 195     // use the wxAppBase API then I'll be quite happy to change it.
 196     g_newArgv = new wxChar*[argc];
 197     g_newArgc = 0;
 198     int i;
 199     for (i = 0; i < argc; i++)
 200     {
 201         wxString arg(argv[i]);
 202         if (arg == wxT("-display"))
 203         {
 204             if (i < (argc - 1))
 205             {
 206                 i ++;
 207                 displayName = argv[i];
 208                 continue;
 209             }
 210         }
 211         else if (arg == wxT("-geometry"))
 212         {
 213             if (i < (argc - 1))
 214             {
 215                 i ++;
 216                 wxString windowGeometry = argv[i];
 217                 int w, h;
 218                 if (wxSscanf(windowGeometry.c_str(), _T("%dx%d"), &w, &h) != 2)
 219                 {
 220                     wxLogError(_("Invalid geometry specification '%s'"), windowGeometry.c_str());
 221                 }
 222                 else
 223                 {
 224                     g_initialSize = wxSize(w, h);
 225                 }
 226                 continue;
 227             }
 228         }
 229         else if (arg == wxT("-sync"))
 230         {
 231             syncDisplay = TRUE;
 232             continue;
 233         }
 234         else if (arg == wxT("-iconic"))
 235         {
 236             g_showIconic = TRUE;
 237
 238             continue;
 239         }
 240
 241         // Not eaten by wxWindows, so pass through
 242         g_newArgv[g_newArgc] = argv[i];
 243         g_newArgc ++;
 244     }
 245
 246     Display* xdisplay = NULL;
 247     if (displayName.IsEmpty())
 248         xdisplay = XOpenDisplay(NULL);
 249     else
 250         xdisplay = XOpenDisplay((char*) displayName.c_str());
 251
 252     if (!xdisplay)
 253     {
 254         wxLogError( _("wxWindows could not open display. Exiting.") );
 255         return -1;
 256     }
 257
 258     if (syncDisplay)
 259     {
 260         XSynchronize(xdisplay, True);
 261     }
 262
 263     wxApp::ms_display = (WXDisplay*) xdisplay;
 264
 265     XSelectInput( xdisplay, XDefaultRootWindow(xdisplay), PropertyChangeMask);
 266
 267     wxSetDetectableAutoRepeat( TRUE );
 268
 269     if (!wxApp::Initialize())
 270         return -1;
 271
 272     return 0;
 273 }
 274
 275 int wxEntryInitGui()
 276 {
 277     int retValue = 0;
 278
 279     if ( !wxTheApp->OnInitGui() )
 280         retValue = -1;
 281
 282     return retValue;
 283 }
 284
 285
 286 int wxEntry( int argc, char *argv[] )
 287 {
 288 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
 289     // This seems to be necessary since there are 'rogue'
 290     // objects present at this point (perhaps global objects?)
 291     // Setting a checkpoint will ignore them as far as the
 292     // memory checking facility is concerned.
 293     // Of course you may argue that memory allocated in globals should be
 294     // checked, but this is a reasonable compromise.
 295     wxDebugContext::SetCheckpoint();
 296 #endif
 297     int err = wxEntryStart(argc, argv);
 298     if (err)
 299         return err;
 300
 301     if (!wxTheApp)
 302     {
 303         if (!wxApp::GetInitializerFunction())
 304         {
 305             printf( "wxWindows error: No initializer - use IMPLEMENT_APP macro.\n" );
 306             return 0;
 307         };
 308
 309         wxTheApp = (wxApp*) (* wxApp::GetInitializerFunction()) ();
 310     };
 311
 312     if (!wxTheApp)
 313     {
 314         printf( "wxWindows error: wxTheApp == NULL\n" );
 315         return 0;
 316     };
 317
 318     wxTheApp->SetClassName(wxFileNameFromPath(argv[0]));
 319     wxTheApp->SetAppName(wxFileNameFromPath(argv[0]));
 320
 321     // The command line may have been changed
 322     // by stripping out -display etc.
 323     if (g_newArgc > 0)
 324     {
 325         wxTheApp->argc = g_newArgc;
 326         wxTheApp->argv = g_newArgv;
 327     }
 328     else
 329     {
 330         wxTheApp->argc = argc;
 331         wxTheApp->argv = argv;
 332     }
 333     wxTheApp->m_showIconic = g_showIconic;
 334     wxTheApp->m_initialSize = g_initialSize;
 335
 336     int retValue;
 337     retValue = wxEntryInitGui();
 338
 339     // Here frames insert themselves automatically into wxTopLevelWindows by
 340     // getting created in OnInit().
 341     if ( retValue == 0 )
 342     {
 343         if ( !wxTheApp->OnInit() )
 344             retValue = -1;
 345     }
 346
 347     if ( retValue == 0 )
 348     {
 349         if (wxTheApp->Initialized()) retValue = wxTheApp->OnRun();
 350     }
 351
 352     // flush the logged messages if any
 353     wxLog *pLog = wxLog::GetActiveTarget();
 354     if ( pLog != NULL && pLog->HasPendingMessages() )
 355         pLog->Flush();
 356
 357     delete wxLog::SetActiveTarget(new wxLogStderr); // So dialog boxes aren't used
 358     // for further messages
 359
 360     if (wxTheApp->GetTopWindow())
 361     {
 362         delete wxTheApp->GetTopWindow();
 363         wxTheApp->SetTopWindow(NULL);
 364     }
 365
 366     wxTheApp->DeletePendingObjects();
 367
 368     wxTheApp->OnExit();
 369
 370     wxApp::CleanUp();
 371
 372     return retValue;
 373 };
 374
 375 // Static member initialization
 376 wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
 377
 378 wxApp::wxApp()
 379 {
 380     m_topWindow = NULL;
 381     wxTheApp = this;
 382     m_className = "";
 383     m_wantDebugOutput = TRUE ;
 384     m_appName = "";
 385     argc = 0;
 386     argv = NULL;
 387     m_exitOnFrameDelete = TRUE;
 388     m_mainColormap = (WXColormap) NULL;
 389     m_topLevelWidget = (WXWindow) NULL;
 390     m_maxRequestSize = 0;
 391     m_mainLoop = NULL;
 392     m_showIconic = FALSE;
 393     m_initialSize = wxDefaultSize;
 394 }
 395
 396 bool wxApp::Initialized()
 397 {
 398     if (GetTopWindow())
 399         return TRUE;
 400     else
 401         return FALSE;
 402 }
 403
 404 int wxApp::MainLoop()
 405 {
 406     int rt;
 407     m_mainLoop = new wxEventLoop;
 408
 409     rt = m_mainLoop->Run();
 410
 411     delete m_mainLoop;
 412     m_mainLoop = NULL;
 413     return rt;
 414 }
 415
 416 #if !wxUSE_NANOX
 417 //-----------------------------------------------------------------------
 418 // X11 predicate function for exposure compression
 419 //-----------------------------------------------------------------------
 420
 421 struct wxExposeInfo
 422 {
 423     Window window;
 424     Bool found_non_matching;
 425 };
 426
 427 static Bool expose_predicate (Display *display, XEvent *xevent, XPointer arg)
 428 {
 429     wxExposeInfo *info = (wxExposeInfo*) arg;
 430
 431     if (info->found_non_matching)
 432        return FALSE;
 433
 434     if (xevent->xany.type != Expose)
 435     {
 436         info->found_non_matching = TRUE;
 437         return FALSE;
 438     }
 439
 440     if (xevent->xexpose.window != info->window)
 441     {
 442         info->found_non_matching = TRUE;
 443         return FALSE;
 444     }
 445
 446     return TRUE;
 447 }
 448 #endif
 449     // wxUSE_NANOX
 450
 451 //-----------------------------------------------------------------------
 452 // Processes an X event, returning TRUE if the event was processed.
 453 //-----------------------------------------------------------------------
 454
 455 bool wxApp::ProcessXEvent(WXEvent* _event)
 456 {
 457     XEvent* event = (XEvent*) _event;
 458
 459     wxWindow* win = NULL;
 460     Window window = XEventGetWindow(event);
 461     Window actualWindow = window;
 462
 463     // Find the first wxWindow that corresponds to this event window
 464     // Because we're receiving events after a window
 465     // has been destroyed, assume a 1:1 match between
 466     // Window and wxWindow, so if it's not in the table,
 467     // it must have been destroyed.
 468
 469     win = wxGetWindowFromTable(window);
 470     if (!win)
 471         return FALSE;
 472
 473 #ifdef __WXDEBUG__
 474     wxString windowClass = win->GetClassInfo()->GetClassName();
 475 #endif
 476
 477     switch (event->type)
 478     {
 479         case KeyPress:
 480         {
 481             if (!win->IsEnabled())
 482                 return FALSE;
 483
 484             wxKeyEvent keyEvent(wxEVT_KEY_DOWN);
 485             wxTranslateKeyEvent(keyEvent, win, window, event);
 486
 487             // wxLogDebug( "OnKey from %s", win->GetName().c_str() );
 488
 489             // We didn't process wxEVT_KEY_DOWN, so send wxEVT_CHAR
 490             if (win->GetEventHandler()->ProcessEvent( keyEvent ))
 491                 return TRUE;
 492
 493             keyEvent.SetEventType(wxEVT_CHAR);
 494             if (win->GetEventHandler()->ProcessEvent( keyEvent ))
 495                 return TRUE;
 496
 497             if ( (keyEvent.m_keyCode == WXK_TAB) &&
 498                  win->GetParent() && (win->GetParent()->HasFlag( wxTAB_TRAVERSAL)) )
 499             {
 500                 wxNavigationKeyEvent new_event;
 501                 new_event.SetEventObject( win->GetParent() );
 502                 /* GDK reports GDK_ISO_Left_Tab for SHIFT-TAB */
 503                 new_event.SetDirection( (keyEvent.m_keyCode == WXK_TAB) );
 504                 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
 505                 new_event.SetWindowChange( keyEvent.ControlDown() );
 506                 new_event.SetCurrentFocus( win );
 507                 return win->GetParent()->GetEventHandler()->ProcessEvent( new_event );
 508             }
 509
 510             return FALSE;
 511         }
 512         case KeyRelease:
 513         {
 514             if (!win->IsEnabled())
 515                 return FALSE;
 516
 517             wxKeyEvent keyEvent(wxEVT_KEY_UP);
 518             wxTranslateKeyEvent(keyEvent, win, window, event);
 519
 520             return win->GetEventHandler()->ProcessEvent( keyEvent );
 521         }
 522         case ConfigureNotify:
 523         {
 524 #if wxUSE_NANOX
 525             if (event->update.utype == GR_UPDATE_SIZE)
 526 #endif
 527             {
 528                 //wxLogDebug("ConfigureNotify: %s", windowClass.c_str());
 529                 wxSizeEvent sizeEvent( wxSize(XConfigureEventGetWidth(event), XConfigureEventGetHeight(event)), win->GetId() );
 530                 sizeEvent.SetEventObject( win );
 531
 532                 return win->GetEventHandler()->ProcessEvent( sizeEvent );
 533             }
 534             return FALSE;
 535             break;
 536         }
 537 #if !wxUSE_NANOX
 538         case PropertyNotify:
 539         {
 540             //wxLogDebug("PropertyNotify: %s", windowClass.c_str());
 541             return HandlePropertyChange(_event);
 542         }
 543         case ClientMessage:
 544         {
 545             if (!win->IsEnabled())
 546                 return FALSE;
 547
 548             Atom wm_delete_window = XInternAtom(wxGlobalDisplay(), "WM_DELETE_WINDOW", True);
 549             Atom wm_protocols = XInternAtom(wxGlobalDisplay(), "WM_PROTOCOLS", True);
 550
 551             if (event->xclient.message_type == wm_protocols)
 552             {
 553                 if ((Atom) (event->xclient.data.l[0]) == wm_delete_window)
 554                 {
 555                     win->Close(FALSE);
 556                     return TRUE;
 557                 }
 558             }
 559             return FALSE;
 560         }
 561 #if 1
 562         case ResizeRequest:
 563         {
 564             /*
 565             * If resize event, don't resize until the last resize event for this
 566             * window is recieved. Prevents flicker as windows are resized.
 567             */
 568
 569             Display *disp = (Display*) wxGetDisplay();
 570             XEvent report;
 571
 572             //  to avoid flicker
 573             report = * event;
 574             while( XCheckTypedWindowEvent (disp, actualWindow, ResizeRequest, &report));
 575
 576             wxSize sz = win->GetSize();
 577             wxSizeEvent sizeEvent(sz, win->GetId());
 578             sizeEvent.SetEventObject(win);
 579
 580             return win->GetEventHandler()->ProcessEvent( sizeEvent );
 581         }
 582 #endif
 583 #endif
 584 #if wxUSE_NANOX
 585         case GR_EVENT_TYPE_CLOSE_REQ:
 586         {
 587             if (win)
 588             {
 589                 win->Close(FALSE);
 590                 return TRUE;
 591             }
 592             return FALSE;
 593             break;
 594         }
 595 #endif
 596         case Expose:
 597         {
 598             //wxLogDebug("Expose: %s", windowClass.c_str());
 599             win->GetUpdateRegion().Union( XExposeEventGetX(event), XExposeEventGetY(event),
 600                                           XExposeEventGetWidth(event), XExposeEventGetHeight(event));
 601
 602             win->GetClearRegion().Union( XExposeEventGetX(event), XExposeEventGetY(event),
 603                                          XExposeEventGetWidth(event), XExposeEventGetHeight(event));
 604
 605
 606 #if !wxUSE_NANOX
 607             XEvent tmp_event;
 608             wxExposeInfo info;
 609             info.window = event->xexpose.window;
 610             info.found_non_matching = FALSE;
 611             while (XCheckIfEvent( wxGlobalDisplay(), &tmp_event, expose_predicate, (XPointer) &info ))
 612             {
 613                 win->GetUpdateRegion().Union( tmp_event.xexpose.x, tmp_event.xexpose.y,
 614                                               tmp_event.xexpose.width, tmp_event.xexpose.height );
 615
 616                 win->GetClearRegion().Union( tmp_event.xexpose.x, tmp_event.xexpose.y,
 617                                              tmp_event.xexpose.width, tmp_event.xexpose.height );
 618             }
 619 #endif
 620
 621             // Only erase background, paint in idle time.
 622             win->SendEraseEvents();
 623
 624             return TRUE;
 625         }
 626 #if !wxUSE_NANOX
 627         case GraphicsExpose:
 628         {
 629             // wxLogDebug( "GraphicsExpose from %s", win->GetName().c_str(),
 630             //                              event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 631             //                              event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 632
 633             win->GetUpdateRegion().Union( event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 634                                           event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 635
 636             win->GetClearRegion().Union( event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 637                                          event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 638
 639             if (event->xgraphicsexpose.count == 0)
 640             {
 641                 // Only erase background, paint in idle time.
 642                 win->SendEraseEvents();
 643             }
 644
 645             return TRUE;
 646         }
 647 #endif
 648         case EnterNotify:
 649         case LeaveNotify:
 650         case ButtonPress:
 651         case ButtonRelease:
 652         case MotionNotify:
 653         {
 654             if (!win->IsEnabled())
 655                 return FALSE;
 656
 657             // Here we check if the top level window is
 658             // disabled, which is one aspect of modality.
 659             wxWindow *tlw = win;
 660             while (tlw && !tlw->IsTopLevel())
 661                 tlw = tlw->GetParent();
 662             if (tlw && !tlw->IsEnabled())
 663                 return FALSE;
 664
 665             if (event->type == ButtonPress)
 666             {
 667                 if ((win != wxWindow::FindFocus()) && win->AcceptsFocus())
 668                 {
 669                     // This might actually be done in wxWindow::SetFocus()
 670                     // and not here. TODO.
 671                     g_prevFocus = wxWindow::FindFocus();
 672                     g_nextFocus = win;
 673
 674                     win->SetFocus();
 675                 }
 676             }
 677
 678 #if !wxUSE_NANOX
 679             if (event->type == LeaveNotify || event->type == EnterNotify)
 680             {
 681                 // Throw out NotifyGrab and NotifyUngrab
 682                 if (event->xcrossing.mode != NotifyNormal)
 683                     return FALSE;
 684             }
 685 #endif
 686             wxMouseEvent wxevent;
 687             wxTranslateMouseEvent(wxevent, win, window, event);
 688             return win->GetEventHandler()->ProcessEvent( wxevent );
 689         }
 690         case FocusIn:
 691             {
 692 #if !wxUSE_NANOX
 693                 if ((event->xfocus.detail != NotifyPointer) &&
 694                     (event->xfocus.mode == NotifyNormal))
 695 #endif
 696                 {
 697                     // wxLogDebug( "FocusIn from %s of type %s", win->GetName().c_str(), win->GetClassInfo()->GetClassName() );
 698
 699                     wxFocusEvent focusEvent(wxEVT_SET_FOCUS, win->GetId());
 700                     focusEvent.SetEventObject(win);
 701                     focusEvent.SetWindow( g_prevFocus );
 702                     g_prevFocus = NULL;
 703
 704                     return win->GetEventHandler()->ProcessEvent(focusEvent);
 705                 }
 706                 return FALSE;
 707                 break;
 708             }
 709         case FocusOut:
 710             {
 711 #if !wxUSE_NANOX
 712                 if ((event->xfocus.detail != NotifyPointer) &&
 713                     (event->xfocus.mode == NotifyNormal))
 714 #endif
 715                 {
 716                     // wxLogDebug( "FocusOut from %s of type %s", win->GetName().c_str(), win->GetClassInfo()->GetClassName() );
 717
 718                     wxFocusEvent focusEvent(wxEVT_KILL_FOCUS, win->GetId());
 719                     focusEvent.SetEventObject(win);
 720                     focusEvent.SetWindow( g_nextFocus );
 721                     g_nextFocus = NULL;
 722                     return win->GetEventHandler()->ProcessEvent(focusEvent);
 723                 }
 724                 return FALSE;
 725                 break;
 726             }
 727 #ifndef wxUSE_NANOX
 728          case DestroyNotify:
 729             {
 730                 // Do we want to process this (for top-level windows)?
 731                 // But we want to be able to veto closes, anyway
 732                 return FALSE;
 733                 break;
 734             }
 735 #endif
 736         default:
 737         {
 738 #ifdef __WXDEBUG__
 739             //wxString eventName = wxGetXEventName(XEvent& event);
 740             //wxLogDebug(wxT("Event %s not handled"), eventName.c_str());
 741 #endif
 742             return FALSE;
 743             break;
 744         }
 745     }
 746     return FALSE;
 747 }
 748
 749 // Returns TRUE if more time is needed.
 750 // Note that this duplicates wxEventLoopImpl::SendIdleEvent
 751 // but ProcessIdle may be needed by apps, so is kept.
 752 bool wxApp::ProcessIdle()
 753 {
 754     wxIdleEvent event;
 755     event.SetEventObject(this);
 756     ProcessEvent(event);
 757
 758     return event.MoreRequested();
 759 }
 760
 761 void wxApp::ExitMainLoop()
 762 {
 763     if (m_mainLoop)
 764         m_mainLoop->Exit(0);
 765 }
 766
 767 // Is a message/event pending?
 768 bool wxApp::Pending()
 769 {
 770     return wxEventLoop::GetActive()->Pending();
 771 }
 772
 773 // Dispatch a message.
 774 void wxApp::Dispatch()
 775 {
 776     wxEventLoop::GetActive()->Dispatch();
 777 }
 778
 779 // This should be redefined in a derived class for
 780 // handling property change events for XAtom IPC.
 781 bool wxApp::HandlePropertyChange(WXEvent *event)
 782 {
 783     // by default do nothing special
 784     // TODO: what to do for X11
 785     // XtDispatchEvent((XEvent*) event);
 786     return FALSE;
 787 }
 788
 789 void wxApp::OnIdle(wxIdleEvent& event)
 790 {
 791     static bool s_inOnIdle = FALSE;
 792
 793     // Avoid recursion (via ProcessEvent default case)
 794     if (s_inOnIdle)
 795         return;
 796
 797     s_inOnIdle = TRUE;
 798
 799     // Resend in the main thread events which have been prepared in other
 800     // threads
 801     ProcessPendingEvents();
 802
 803     // 'Garbage' collection of windows deleted with Close()
 804     DeletePendingObjects();
 805
 806     // Send OnIdle events to all windows
 807     bool needMore = SendIdleEvents();
 808
 809     if (needMore)
 810         event.RequestMore(TRUE);
 811
 812     s_inOnIdle = FALSE;
 813 }
 814
 815 void wxWakeUpIdle()
 816 {
 817     // **** please implement me! ****
 818     // Wake up the idle handler processor, even if it is in another thread...
 819 }
 820
 821
 822 // Send idle event to all top-level windows
 823 bool wxApp::SendIdleEvents()
 824 {
 825     bool needMore = FALSE;
 826
 827     wxWindowList::Node* node = wxTopLevelWindows.GetFirst();
 828     while (node)
 829     {
 830         wxWindow* win = node->GetData();
 831         if (SendIdleEvents(win))
 832             needMore = TRUE;
 833         node = node->GetNext();
 834     }
 835
 836     return needMore;
 837 }
 838
 839 // Send idle event to window and all subwindows
 840 bool wxApp::SendIdleEvents(wxWindow* win)
 841 {
 842     bool needMore = FALSE;
 843
 844     wxIdleEvent event;
 845     event.SetEventObject(win);
 846
 847     win->GetEventHandler()->ProcessEvent(event);
 848
 849     win->OnInternalIdle();
 850
 851     if (event.MoreRequested())
 852         needMore = TRUE;
 853
 854     wxNode* node = win->GetChildren().First();
 855     while (node)
 856     {
 857         wxWindow* win = (wxWindow*) node->Data();
 858         if (SendIdleEvents(win))
 859             needMore = TRUE;
 860
 861         node = node->Next();
 862     }
 863
 864     return needMore;
 865 }
 866
 867 void wxApp::DeletePendingObjects()
 868 {
 869     wxNode *node = wxPendingDelete.First();
 870     while (node)
 871     {
 872         wxObject *obj = (wxObject *)node->Data();
 873
 874         delete obj;
 875
 876         if (wxPendingDelete.Member(obj))
 877             delete node;
 878
 879         // Deleting one object may have deleted other pending
 880         // objects, so start from beginning of list again.
 881         node = wxPendingDelete.First();
 882     }
 883 }
 884
 885 // Create display, and other initialization
 886 bool wxApp::OnInitGui()
 887 {
 888     // Eventually this line will be removed, but for
 889     // now we don't want to try popping up a dialog
 890     // for error messages.
 891     delete wxLog::SetActiveTarget(new wxLogStderr);
 892
 893     if (!wxAppBase::OnInitGui())
 894     return FALSE;
 895
 896     GetMainColormap( wxApp::GetDisplay() );
 897
 898     m_maxRequestSize = XMaxRequestSize( (Display*) wxApp::GetDisplay() );
 899
 900     return TRUE;
 901 }
 902
 903 WXColormap wxApp::GetMainColormap(WXDisplay* display)
 904 {
 905     if (!display) /* Must be called first with non-NULL display */
 906         return m_mainColormap;
 907
 908     int defaultScreen = DefaultScreen((Display*) display);
 909     Screen* screen = XScreenOfDisplay((Display*) display, defaultScreen);
 910
 911     Colormap c = DefaultColormapOfScreen(screen);
 912
 913     if (!m_mainColormap)
 914         m_mainColormap = (WXColormap) c;
 915
 916     return (WXColormap) c;
 917 }
 918
 919 Window wxGetWindowParent(Window window)
 920 {
 921     wxASSERT_MSG( window, "invalid window" );
 922
 923     return (Window) 0;
 924
 925     Window parent, root = 0;
 926 #if wxUSE_NANOX
 927     int noChildren = 0;
 928 #else
 929     unsigned int noChildren = 0;
 930 #endif
 931     Window* children = NULL;
 932
 933     // #define XQueryTree(d,w,r,p,c,nc)     GrQueryTree(w,p,c,nc)
 934     int res = 1;
 935 #if !wxUSE_NANOX
 936     res =
 937 #endif
 938         XQueryTree((Display*) wxGetDisplay(), window, & root, & parent,
 939              & children, & noChildren);
 940     if (children)
 941         XFree(children);
 942     if (res)
 943         return parent;
 944     else
 945         return (Window) 0;
 946 }
 947
 948 void wxExit()
 949 {
 950     int retValue = 0;
 951     if (wxTheApp)
 952         retValue = wxTheApp->OnExit();
 953
 954     wxApp::CleanUp();
 955     /*
 956     * Exit in some platform-specific way. Not recommended that the app calls this:
 957     * only for emergencies.
 958     */
 959     exit(retValue);
 960 }
 961
 962 // Yield to other processes
 963
 964 bool wxApp::Yield(bool onlyIfNeeded)
 965 {
 966     bool s_inYield = FALSE;
 967
 968     if ( s_inYield )
 969     {
 970         if ( !onlyIfNeeded )
 971         {
 972             wxFAIL_MSG( wxT("wxYield called recursively" ) );
 973         }
 974
 975         return FALSE;
 976     }
 977
 978     s_inYield = TRUE;
 979
 980     while (wxTheApp && wxTheApp->Pending())
 981         wxTheApp->Dispatch();
 982
 983     s_inYield = FALSE;
 984
 985     return TRUE;
 986 }
 987
 988 wxIcon wxApp::GetStdIcon(int which) const
 989 {
 990     return wxTheme::Get()->GetRenderer()->GetStdIcon(which);
 991 }
 992
 993 void wxApp::OnAssert(const wxChar *file, int line, const wxChar *msg)
 994 {
 995     // While the GUI isn't working that well, just print out the
 996     // message.
 997 #if 0
 998     wxAppBase::OnAssert(file, line, msg);
 999 #else
1000     wxString msg2;
1001     msg2.Printf("At file %s:%d: %s", file, line, msg);
1002     wxLogDebug(msg2);
1003 #endif
1004 }
1005