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 Expose:
 480         {
 481             //wxLogDebug("Expose: %s", windowClass.c_str());
 482             win->GetUpdateRegion().Union( XExposeEventGetX(event), XExposeEventGetY(event),
 483                                           XExposeEventGetWidth(event), XExposeEventGetHeight(event));
 484
 485             win->GetClearRegion().Union( XExposeEventGetX(event), XExposeEventGetY(event),
 486                                          XExposeEventGetWidth(event), XExposeEventGetHeight(event));
 487
 488 #if !wxUSE_NANOX
 489             XEvent tmp_event;
 490             wxExposeInfo info;
 491             info.window = event->xexpose.window;
 492             info.found_non_matching = FALSE;
 493             while (XCheckIfEvent( wxGlobalDisplay(), &tmp_event, expose_predicate, (XPointer) &info ))
 494             {
 495                 win->GetUpdateRegion().Union( tmp_event.xexpose.x, tmp_event.xexpose.y,
 496                                               tmp_event.xexpose.width, tmp_event.xexpose.height );
 497
 498                 win->GetClearRegion().Union( tmp_event.xexpose.x, tmp_event.xexpose.y,
 499                                              tmp_event.xexpose.width, tmp_event.xexpose.height );
 500             }
 501 #endif
 502
 503             // Only erase background, paint in idle time.
 504             win->SendEraseEvents();
 505
 506             return TRUE;
 507         }
 508
 509 #if !wxUSE_NANOX
 510         case GraphicsExpose:
 511         {
 512             // wxLogDebug( "GraphicsExpose from %s", win->GetName().c_str(),
 513             //                              event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 514             //                              event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 515
 516             win->GetUpdateRegion().Union( event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 517                                           event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 518
 519             win->GetClearRegion().Union( event->xgraphicsexpose.x, event->xgraphicsexpose.y,
 520                                          event->xgraphicsexpose.width, event->xgraphicsexpose.height);
 521
 522             if (event->xgraphicsexpose.count == 0)
 523             {
 524                 // Only erase background, paint in idle time.
 525                 win->SendEraseEvents();
 526                 //win->Update();
 527             }
 528
 529             return TRUE;
 530         }
 531 #endif
 532
 533         case KeyPress:
 534         {
 535             if (!win->IsEnabled())
 536                 return FALSE;
 537
 538             wxKeyEvent keyEvent(wxEVT_KEY_DOWN);
 539             wxTranslateKeyEvent(keyEvent, win, window, event);
 540
 541             // wxLogDebug( "OnKey from %s", win->GetName().c_str() );
 542
 543             // We didn't process wxEVT_KEY_DOWN, so send wxEVT_CHAR
 544             if (win->GetEventHandler()->ProcessEvent( keyEvent ))
 545                 return TRUE;
 546
 547             keyEvent.SetEventType(wxEVT_CHAR);
 548             if (win->GetEventHandler()->ProcessEvent( keyEvent ))
 549                 return TRUE;
 550
 551             if ( (keyEvent.m_keyCode == WXK_TAB) &&
 552                  win->GetParent() && (win->GetParent()->HasFlag( wxTAB_TRAVERSAL)) )
 553             {
 554                 wxNavigationKeyEvent new_event;
 555                 new_event.SetEventObject( win->GetParent() );
 556                 /* GDK reports GDK_ISO_Left_Tab for SHIFT-TAB */
 557                 new_event.SetDirection( (keyEvent.m_keyCode == WXK_TAB) );
 558                 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
 559                 new_event.SetWindowChange( keyEvent.ControlDown() );
 560                 new_event.SetCurrentFocus( win );
 561                 return win->GetParent()->GetEventHandler()->ProcessEvent( new_event );
 562             }
 563
 564             return FALSE;
 565         }
 566         case KeyRelease:
 567         {
 568             if (!win->IsEnabled())
 569                 return FALSE;
 570
 571             wxKeyEvent keyEvent(wxEVT_KEY_UP);
 572             wxTranslateKeyEvent(keyEvent, win, window, event);
 573
 574             return win->GetEventHandler()->ProcessEvent( keyEvent );
 575         }
 576         case ConfigureNotify:
 577         {
 578 #if wxUSE_NANOX
 579             if (event->update.utype == GR_UPDATE_SIZE)
 580 #endif
 581             {
 582                 //wxLogDebug("ConfigureNotify: %s", windowClass.c_str());
 583                 if (win->IsTopLevel() && win->IsShown())
 584                 {
 585                     wxTopLevelWindowX11 *tlw = (wxTopLevelWindowX11 *) win;
 586                     tlw->SetNeedResizeInIdle();
 587                 }
 588                 else
 589                 {
 590                     wxSizeEvent sizeEvent( wxSize(XConfigureEventGetWidth(event), XConfigureEventGetHeight(event)), win->GetId() );
 591                     sizeEvent.SetEventObject( win );
 592
 593                     return win->GetEventHandler()->ProcessEvent( sizeEvent );
 594                 }
 595             }
 596             return FALSE;
 597             break;
 598         }
 599 #if !wxUSE_NANOX
 600         case PropertyNotify:
 601         {
 602             //wxLogDebug("PropertyNotify: %s", windowClass.c_str());
 603             return HandlePropertyChange(_event);
 604         }
 605         case ClientMessage:
 606         {
 607             if (!win->IsEnabled())
 608                 return FALSE;
 609
 610             Atom wm_delete_window = XInternAtom(wxGlobalDisplay(), "WM_DELETE_WINDOW", True);
 611             Atom wm_protocols = XInternAtom(wxGlobalDisplay(), "WM_PROTOCOLS", True);
 612
 613             if (event->xclient.message_type == wm_protocols)
 614             {
 615                 if ((Atom) (event->xclient.data.l[0]) == wm_delete_window)
 616                 {
 617                     win->Close(FALSE);
 618                     return TRUE;
 619                 }
 620             }
 621             return FALSE;
 622         }
 623 #if 0
 624         case DestroyNotify:
 625         {
 626             printf( "destroy from %s\n", win->GetName().c_str() );
 627             break;
 628         }
 629         case CreateNotify:
 630         {
 631             printf( "create from %s\n", win->GetName().c_str() );
 632             break;
 633         }
 634         case MapRequest:
 635         {
 636             printf( "map request from %s\n", win->GetName().c_str() );
 637             break;
 638         }
 639         case ResizeRequest:
 640         {
 641             printf( "resize request from %s\n", win->GetName().c_str() );
 642
 643             Display *disp = (Display*) wxGetDisplay();
 644             XEvent report;
 645
 646             //  to avoid flicker
 647             report = * event;
 648             while( XCheckTypedWindowEvent (disp, actualWindow, ResizeRequest, &report));
 649
 650             wxSize sz = win->GetSize();
 651             wxSizeEvent sizeEvent(sz, win->GetId());
 652             sizeEvent.SetEventObject(win);
 653
 654             return win->GetEventHandler()->ProcessEvent( sizeEvent );
 655         }
 656 #endif
 657 #endif
 658 #if wxUSE_NANOX
 659         case GR_EVENT_TYPE_CLOSE_REQ:
 660         {
 661             if (win)
 662             {
 663                 win->Close(FALSE);
 664                 return TRUE;
 665             }
 666             return FALSE;
 667             break;
 668         }
 669 #endif
 670         case EnterNotify:
 671         case LeaveNotify:
 672         case ButtonPress:
 673         case ButtonRelease:
 674         case MotionNotify:
 675         {
 676             if (!win->IsEnabled())
 677                 return FALSE;
 678
 679             // Here we check if the top level window is
 680             // disabled, which is one aspect of modality.
 681             wxWindow *tlw = win;
 682             while (tlw && !tlw->IsTopLevel())
 683                 tlw = tlw->GetParent();
 684             if (tlw && !tlw->IsEnabled())
 685                 return FALSE;
 686
 687             if (event->type == ButtonPress)
 688             {
 689                 if ((win != wxWindow::FindFocus()) && win->AcceptsFocus())
 690                 {
 691                     // This might actually be done in wxWindow::SetFocus()
 692                     // and not here. TODO.
 693                     g_prevFocus = wxWindow::FindFocus();
 694                     g_nextFocus = win;
 695
 696                     win->SetFocus();
 697                 }
 698             }
 699
 700 #if !wxUSE_NANOX
 701             if (event->type == LeaveNotify || event->type == EnterNotify)
 702             {
 703                 // Throw out NotifyGrab and NotifyUngrab
 704                 if (event->xcrossing.mode != NotifyNormal)
 705                     return FALSE;
 706             }
 707 #endif
 708             wxMouseEvent wxevent;
 709             wxTranslateMouseEvent(wxevent, win, window, event);
 710             return win->GetEventHandler()->ProcessEvent( wxevent );
 711         }
 712         case FocusIn:
 713             {
 714 #if !wxUSE_NANOX
 715                 if ((event->xfocus.detail != NotifyPointer) &&
 716                     (event->xfocus.mode == NotifyNormal))
 717 #endif
 718                 {
 719                     // wxLogDebug( "FocusIn from %s of type %s", win->GetName().c_str(), win->GetClassInfo()->GetClassName() );
 720
 721                     wxFocusEvent focusEvent(wxEVT_SET_FOCUS, win->GetId());
 722                     focusEvent.SetEventObject(win);
 723                     focusEvent.SetWindow( g_prevFocus );
 724                     g_prevFocus = NULL;
 725
 726                     return win->GetEventHandler()->ProcessEvent(focusEvent);
 727                 }
 728                 return FALSE;
 729                 break;
 730             }
 731         case FocusOut:
 732             {
 733 #if !wxUSE_NANOX
 734                 if ((event->xfocus.detail != NotifyPointer) &&
 735                     (event->xfocus.mode == NotifyNormal))
 736 #endif
 737                 {
 738                     // wxLogDebug( "FocusOut from %s of type %s", win->GetName().c_str(), win->GetClassInfo()->GetClassName() );
 739
 740                     wxFocusEvent focusEvent(wxEVT_KILL_FOCUS, win->GetId());
 741                     focusEvent.SetEventObject(win);
 742                     focusEvent.SetWindow( g_nextFocus );
 743                     g_nextFocus = NULL;
 744                     return win->GetEventHandler()->ProcessEvent(focusEvent);
 745                 }
 746                 return FALSE;
 747                 break;
 748             }
 749         default:
 750         {
 751 #ifdef __WXDEBUG__
 752             //wxString eventName = wxGetXEventName(XEvent& event);
 753             //wxLogDebug(wxT("Event %s not handled"), eventName.c_str());
 754 #endif
 755             return FALSE;
 756             break;
 757         }
 758     }
 759     return FALSE;
 760 }
 761
 762 // Returns TRUE if more time is needed.
 763 // Note that this duplicates wxEventLoopImpl::SendIdleEvent
 764 // but ProcessIdle may be needed by apps, so is kept.
 765 bool wxApp::ProcessIdle()
 766 {
 767     wxIdleEvent event;
 768     event.SetEventObject(this);
 769     ProcessEvent(event);
 770
 771     return event.MoreRequested();
 772 }
 773
 774 void wxApp::ExitMainLoop()
 775 {
 776     if (m_mainLoop)
 777         m_mainLoop->Exit(0);
 778 }
 779
 780 // Is a message/event pending?
 781 bool wxApp::Pending()
 782 {
 783     return wxEventLoop::GetActive()->Pending();
 784 }
 785
 786 // Dispatch a message.
 787 void wxApp::Dispatch()
 788 {
 789     wxEventLoop::GetActive()->Dispatch();
 790 }
 791
 792 // This should be redefined in a derived class for
 793 // handling property change events for XAtom IPC.
 794 bool wxApp::HandlePropertyChange(WXEvent *event)
 795 {
 796     // by default do nothing special
 797     // TODO: what to do for X11
 798     // XtDispatchEvent((XEvent*) event);
 799     return FALSE;
 800 }
 801
 802 void wxApp::OnIdle(wxIdleEvent& event)
 803 {
 804     static bool s_inOnIdle = FALSE;
 805
 806     // Avoid recursion (via ProcessEvent default case)
 807     if (s_inOnIdle)
 808         return;
 809
 810     s_inOnIdle = TRUE;
 811
 812     // Resend in the main thread events which have been prepared in other
 813     // threads
 814     ProcessPendingEvents();
 815
 816     // 'Garbage' collection of windows deleted with Close()
 817     DeletePendingObjects();
 818
 819     // Send OnIdle events to all windows
 820     bool needMore = SendIdleEvents();
 821
 822     if (needMore)
 823         event.RequestMore(TRUE);
 824
 825     s_inOnIdle = FALSE;
 826 }
 827
 828 void wxWakeUpIdle()
 829 {
 830     // **** please implement me! ****
 831     // Wake up the idle handler processor, even if it is in another thread...
 832 }
 833
 834
 835 // Send idle event to all top-level windows
 836 bool wxApp::SendIdleEvents()
 837 {
 838     bool needMore = FALSE;
 839
 840     wxWindowList::Node* node = wxTopLevelWindows.GetFirst();
 841     while (node)
 842     {
 843         wxWindow* win = node->GetData();
 844         if (SendIdleEvents(win))
 845             needMore = TRUE;
 846         node = node->GetNext();
 847     }
 848
 849     return needMore;
 850 }
 851
 852 // Send idle event to window and all subwindows
 853 bool wxApp::SendIdleEvents(wxWindow* win)
 854 {
 855     bool needMore = FALSE;
 856
 857     wxIdleEvent event;
 858     event.SetEventObject(win);
 859
 860     win->GetEventHandler()->ProcessEvent(event);
 861
 862     win->OnInternalIdle();
 863
 864     if (event.MoreRequested())
 865         needMore = TRUE;
 866
 867     wxNode* node = win->GetChildren().First();
 868     while (node)
 869     {
 870         wxWindow* win = (wxWindow*) node->Data();
 871         if (SendIdleEvents(win))
 872             needMore = TRUE;
 873
 874         node = node->Next();
 875     }
 876
 877     return needMore;
 878 }
 879
 880 void wxApp::DeletePendingObjects()
 881 {
 882     wxNode *node = wxPendingDelete.First();
 883     while (node)
 884     {
 885         wxObject *obj = (wxObject *)node->Data();
 886
 887         delete obj;
 888
 889         if (wxPendingDelete.Member(obj))
 890             delete node;
 891
 892         // Deleting one object may have deleted other pending
 893         // objects, so start from beginning of list again.
 894         node = wxPendingDelete.First();
 895     }
 896 }
 897
 898 // Create display, and other initialization
 899 bool wxApp::OnInitGui()
 900 {
 901     // Eventually this line will be removed, but for
 902     // now we don't want to try popping up a dialog
 903     // for error messages.
 904     delete wxLog::SetActiveTarget(new wxLogStderr);
 905
 906     if (!wxAppBase::OnInitGui())
 907     return FALSE;
 908
 909     GetMainColormap( wxApp::GetDisplay() );
 910
 911     m_maxRequestSize = XMaxRequestSize( (Display*) wxApp::GetDisplay() );
 912
 913     return TRUE;
 914 }
 915
 916 WXColormap wxApp::GetMainColormap(WXDisplay* display)
 917 {
 918     if (!display) /* Must be called first with non-NULL display */
 919         return m_mainColormap;
 920
 921     int defaultScreen = DefaultScreen((Display*) display);
 922     Screen* screen = XScreenOfDisplay((Display*) display, defaultScreen);
 923
 924     Colormap c = DefaultColormapOfScreen(screen);
 925
 926     if (!m_mainColormap)
 927         m_mainColormap = (WXColormap) c;
 928
 929     return (WXColormap) c;
 930 }
 931
 932 Window wxGetWindowParent(Window window)
 933 {
 934     wxASSERT_MSG( window, "invalid window" );
 935
 936     return (Window) 0;
 937
 938     Window parent, root = 0;
 939 #if wxUSE_NANOX
 940     int noChildren = 0;
 941 #else
 942     unsigned int noChildren = 0;
 943 #endif
 944     Window* children = NULL;
 945
 946     // #define XQueryTree(d,w,r,p,c,nc)     GrQueryTree(w,p,c,nc)
 947     int res = 1;
 948 #if !wxUSE_NANOX
 949     res =
 950 #endif
 951         XQueryTree((Display*) wxGetDisplay(), window, & root, & parent,
 952              & children, & noChildren);
 953     if (children)
 954         XFree(children);
 955     if (res)
 956         return parent;
 957     else
 958         return (Window) 0;
 959 }
 960
 961 void wxExit()
 962 {
 963     int retValue = 0;
 964     if (wxTheApp)
 965         retValue = wxTheApp->OnExit();
 966
 967     wxApp::CleanUp();
 968     /*
 969     * Exit in some platform-specific way. Not recommended that the app calls this:
 970     * only for emergencies.
 971     */
 972     exit(retValue);
 973 }
 974
 975 // Yield to other processes
 976
 977 bool wxApp::Yield(bool onlyIfNeeded)
 978 {
 979     bool s_inYield = FALSE;
 980
 981     if ( s_inYield )
 982     {
 983         if ( !onlyIfNeeded )
 984         {
 985             wxFAIL_MSG( wxT("wxYield called recursively" ) );
 986         }
 987
 988         return FALSE;
 989     }
 990
 991     s_inYield = TRUE;
 992
 993     while (wxTheApp && wxTheApp->Pending())
 994         wxTheApp->Dispatch();
 995
 996     s_inYield = FALSE;
 997
 998     return TRUE;
 999 }
1000
1001 wxIcon wxApp::GetStdIcon(int which) const
1002 {
1003     return wxTheme::Get()->GetRenderer()->GetStdIcon(which);
1004 }
1005
1006 void wxApp::OnAssert(const wxChar *file, int line, const wxChar *msg)
1007 {
1008     // While the GUI isn't working that well, just print out the
1009     // message.
1010 #if 0
1011     wxAppBase::OnAssert(file, line, msg);
1012 #else
1013     wxString msg2;
1014     msg2.Printf("At file %s:%d: %s", file, line, msg);
1015     wxLogDebug(msg2);
1016 #endif
1017 }
1018