src/motif/window.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        windows.cpp
   3 // Purpose:     wxWindow
   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 "window.h"
  14 #endif
  15
  16 #include "wx/setup.h"
  17 #include "wx/menu.h"
  18 #include "wx/dc.h"
  19 #include "wx/dcclient.h"
  20 #include "wx/utils.h"
  21 #include "wx/app.h"
  22 #include "wx/panel.h"
  23 #include "wx/layout.h"
  24 #include "wx/dialog.h"
  25 #include "wx/listbox.h"
  26 #include "wx/button.h"
  27 #include "wx/settings.h"
  28 #include "wx/msgdlg.h"
  29 #include "wx/frame.h"
  30
  31 #include "wx/menuitem.h"
  32 #include "wx/log.h"
  33
  34 #if  wxUSE_DRAG_AND_DROP
  35 #include "wx/dnd.h"
  36 #endif
  37
  38 #include <Xm/Xm.h>
  39
  40 #include <Xm/DrawingA.h>
  41 #include <Xm/ScrolledW.h>
  42 #include <Xm/ScrollBar.h>
  43 #include <Xm/Frame.h>
  44 #include <Xm/Label.h>
  45
  46 #include "wx/motif/private.h"
  47
  48 #include <string.h>
  49
  50 #define SCROLL_MARGIN 4
  51 void wxCanvasRepaintProc (Widget, XtPointer, XmDrawingAreaCallbackStruct * cbs);
  52 void wxCanvasInputEvent (Widget drawingArea, XtPointer data, XmDrawingAreaCallbackStruct * cbs);
  53 void wxCanvasMotionEvent (Widget, XButtonEvent * event);
  54 void wxCanvasEnterLeave (Widget drawingArea, XtPointer clientData, XCrossingEvent * event);
  55 static void wxScrollBarCallback(Widget widget, XtPointer clientData,
  56                         XmScaleCallbackStruct *cbs);
  57 void wxPanelItemEventHandler (Widget    wid,
  58                               XtPointer client_data,
  59                               XEvent*   event,
  60                               Boolean *continueToDispatch);
  61
  62 #define event_left_is_down(x) ((x)->xbutton.state & Button1Mask)
  63 #define event_middle_is_down(x) ((x)->xbutton.state & Button2Mask)
  64 #define event_right_is_down(x) ((x)->xbutton.state & Button3Mask)
  65
  66 extern wxList wxPendingDelete;
  67
  68 #if !USE_SHARED_LIBRARY
  69 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxEvtHandler)
  70
  71 BEGIN_EVENT_TABLE(wxWindow, wxEvtHandler)
  72   EVT_CHAR(wxWindow::OnChar)
  73   EVT_ERASE_BACKGROUND(wxWindow::OnEraseBackground)
  74   EVT_SYS_COLOUR_CHANGED(wxWindow::OnSysColourChanged)
  75   EVT_INIT_DIALOG(wxWindow::OnInitDialog)
  76   EVT_IDLE(wxWindow::OnIdle)
  77 END_EVENT_TABLE()
  78
  79 #endif
  80
  81
  82 // Constructor
  83 wxWindow::wxWindow()
  84 {
  85     // Generic
  86     m_windowId = 0;
  87     m_windowStyle = 0;
  88     m_windowParent = NULL;
  89     m_windowEventHandler = this;
  90     m_windowName = "";
  91     m_windowCursor = *wxSTANDARD_CURSOR;
  92     m_children = new wxList;
  93     m_constraints = NULL;
  94     m_constraintsInvolvedIn = NULL;
  95     m_windowSizer = NULL;
  96     m_sizerParent = NULL;
  97     m_autoLayout = FALSE;
  98     m_windowValidator = NULL;
  99     m_defaultItem = NULL;
 100     m_returnCode = 0;
 101     m_caretWidth = 0; m_caretHeight = 0;
 102     m_caretEnabled = FALSE;
 103     m_caretShown = FALSE;
 104     // m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW) ; ;
 105     m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE) ;
 106     m_foregroundColour = *wxBLACK;
 107
 108 #if  wxUSE_DRAG_AND_DROP
 109     m_pDropTarget = NULL;
 110 #endif
 111     m_clientObject = (wxClientData*) NULL;
 112     m_clientData = NULL;
 113
 114     /// Motif-specific
 115     m_mainWidget = (WXWidget) 0;
 116     m_button1Pressed = FALSE;
 117     m_button2Pressed = FALSE;
 118     m_button3Pressed = FALSE;
 119     m_winCaptured = FALSE;
 120     m_isShown = TRUE;
 121     m_hScrollBar = (WXWidget) 0;
 122     m_vScrollBar = (WXWidget) 0;
 123     m_borderWidget = (WXWidget) 0;
 124     m_scrolledWindow = (WXWidget) 0;
 125     m_drawingArea = (WXWidget) 0;
 126     m_hScroll = FALSE;
 127     m_vScroll = FALSE;
 128     m_backingPixmap = (WXPixmap) 0;
 129     m_pixmapWidth = 0;
 130     m_pixmapHeight = 0;
 131     m_pixmapOffsetX = 0;
 132     m_pixmapOffsetY = 0;
 133     m_lastTS = 0;
 134     m_lastButton = 0;
 135     m_canAddEventHandler = FALSE;
 136     m_scrollPosX = 0;
 137     m_scrollPosY = 0;
 138 }
 139
 140 // Destructor
 141 wxWindow::~wxWindow()
 142 {
 143     //// Motif-specific
 144
 145     if (GetMainWidget())
 146         DetachWidget(GetMainWidget()); // Removes event handlers
 147
 148     // If m_drawingArea, we're a fully-fledged window with drawing area, scrollbars etc. (what wxCanvas used to be)
 149     if (m_drawingArea)
 150     {
 151         // Destroy children before destroying self
 152         DestroyChildren();
 153
 154         if (m_backingPixmap)
 155         XFreePixmap (XtDisplay ((Widget) GetMainWidget()), (Pixmap) m_backingPixmap);
 156
 157         Widget w = (Widget) m_drawingArea;
 158         wxDeleteWindowFromTable(w);
 159
 160         if (w)
 161             XtDestroyWidget(w);
 162         m_mainWidget = (WXWidget) 0;
 163
 164         // Only if we're _really_ a canvas (not a dialog box/panel)
 165         if (m_scrolledWindow)
 166         {
 167             wxDeleteWindowFromTable((Widget) m_scrolledWindow);
 168         }
 169
 170         if (m_hScrollBar)
 171         {
 172             XtUnmanageChild ((Widget) m_hScrollBar);
 173             XtDestroyWidget ((Widget) m_hScrollBar);
 174         }
 175         if (m_vScrollBar)
 176         {
 177             XtUnmanageChild ((Widget) m_vScrollBar);
 178             XtDestroyWidget ((Widget) m_vScrollBar);
 179         }
 180         if (m_scrolledWindow)
 181         {
 182             XtUnmanageChild ((Widget) m_scrolledWindow);
 183             XtDestroyWidget ((Widget) m_scrolledWindow);
 184         }
 185
 186         if (m_borderWidget)
 187         {
 188             XtDestroyWidget ((Widget) m_borderWidget);
 189             m_borderWidget = (WXWidget) 0;
 190         }
 191     }
 192
 193     //// Generic stuff
 194
 195         // Have to delete constraints/sizer FIRST otherwise
 196         // sizers may try to look at deleted windows as they
 197         // delete themselves.
 198 #if wxUSE_CONSTRAINTS
 199     DeleteRelatedConstraints();
 200     if (m_constraints)
 201     {
 202         // This removes any dangling pointers to this window
 203         // in other windows' constraintsInvolvedIn lists.
 204         UnsetConstraints(m_constraints);
 205         delete m_constraints;
 206         m_constraints = NULL;
 207     }
 208     if (m_windowSizer)
 209     {
 210         delete m_windowSizer;
 211         m_windowSizer = NULL;
 212     }
 213     // If this is a child of a sizer, remove self from parent
 214     if (m_sizerParent)
 215         m_sizerParent->RemoveChild((wxWindow *)this);
 216 #endif
 217
 218     if (m_windowParent)
 219         m_windowParent->RemoveChild(this);
 220
 221     DestroyChildren();
 222
 223     // Destroy the window
 224     if (GetMainWidget())
 225     {
 226       wxDeleteWindowFromTable((Widget) GetMainWidget());
 227       XtDestroyWidget((Widget) GetMainWidget());
 228       SetMainWidget((WXWidget) NULL);
 229     }
 230
 231     delete m_children;
 232     m_children = NULL;
 233
 234     // Just in case the window has been Closed, but
 235     // we're then deleting immediately: don't leave
 236     // dangling pointers.
 237     wxPendingDelete.DeleteObject(this);
 238
 239     if ( m_windowValidator ) delete m_windowValidator;
 240     if (m_clientObject) delete m_clientObject;
 241
 242     ClearUpdateRects();
 243 }
 244
 245 // Destroy the window (delayed, if a managed window)
 246 bool wxWindow::Destroy()
 247 {
 248     delete this;
 249     return TRUE;
 250 }
 251
 252 // Constructor
 253 bool wxWindow::Create(wxWindow *parent, wxWindowID id,
 254            const wxPoint& pos,
 255            const wxSize& size,
 256            long style,
 257            const wxString& name)
 258 {
 259     // Generic
 260     m_windowId = 0;
 261     m_windowStyle = 0;
 262     m_windowParent = NULL;
 263     m_windowEventHandler = this;
 264     m_windowName = "";
 265     m_windowCursor = *wxSTANDARD_CURSOR;
 266     m_constraints = NULL;
 267     m_constraintsInvolvedIn = NULL;
 268     m_windowSizer = NULL;
 269     m_sizerParent = NULL;
 270     m_autoLayout = FALSE;
 271     m_windowValidator = NULL;
 272 #if wxUSE_DRAG_AND_DROP
 273     m_pDropTarget = NULL;
 274 #endif
 275     m_caretWidth = 0; m_caretHeight = 0;
 276     m_caretEnabled = FALSE;
 277     m_caretShown = FALSE;
 278     m_minSizeX = -1;
 279     m_minSizeY = -1;
 280     m_maxSizeX = -1;
 281     m_maxSizeY = -1;
 282     m_defaultItem = NULL;
 283     m_windowParent = NULL;
 284     m_clientObject = (wxClientData*) NULL;
 285     m_clientData = NULL;
 286
 287     // Motif-specific
 288     m_canAddEventHandler = FALSE;
 289     m_mainWidget = (WXWidget) 0;
 290     m_button1Pressed = FALSE;
 291     m_button2Pressed = FALSE;
 292     m_button3Pressed = FALSE;
 293     m_winCaptured = FALSE;
 294     m_isShown = TRUE;
 295     m_hScrollBar = (WXWidget) 0;
 296     m_vScrollBar = (WXWidget) 0;
 297     m_borderWidget = (WXWidget) 0;
 298     m_scrolledWindow = (WXWidget) 0;
 299     m_drawingArea = (WXWidget) 0;
 300     m_hScroll = FALSE;
 301     m_vScroll = FALSE;
 302     m_backingPixmap = (WXPixmap) 0;
 303     m_pixmapWidth = 0;
 304     m_pixmapHeight = 0;
 305     m_pixmapOffsetX = 0;
 306     m_pixmapOffsetY = 0;
 307     m_scrollPosX = 0;
 308     m_scrollPosY = 0;
 309
 310     if (!parent)
 311         return FALSE;
 312
 313     if (parent) parent->AddChild(this);
 314
 315     m_returnCode = 0;
 316
 317     SetName(name);
 318
 319     if ( id == -1 )
 320         m_windowId = (int)NewControlId();
 321     else
 322         m_windowId = id;
 323
 324     // m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW) ; ;
 325     m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE) ;
 326     m_foregroundColour = *wxBLACK;
 327
 328     m_windowStyle = style;
 329
 330     if ( id == -1 )
 331         m_windowId = (int)NewControlId();
 332     else
 333         m_windowId = id;
 334
 335     //// TODO: we should probably optimize by only creating a
 336     //// a drawing area if we have one or more scrollbars (wxVSCROLL/wxHSCROLL).
 337     //// But for now, let's simplify things by always creating the
 338     //// drawing area, since otherwise the translations are different.
 339
 340   // New translations for getting mouse motion feedback
 341   String translations =
 342   "<Btn1Motion>: wxCanvasMotionEvent() DrawingAreaInput() ManagerGadgetButtonMotion()\n\
 343      <Btn2Motion>: wxCanvasMotionEvent() DrawingAreaInput() ManagerGadgetButtonMotion()\n\
 344      <Btn3Motion>: wxCanvasMotionEvent() DrawingAreaInput() ManagerGadgetButtonMotion()\n\
 345      <BtnMotion>: wxCanvasMotionEvent() DrawingAreaInput() ManagerGadgetButtonMotion()\n\
 346      <Btn1Down>: DrawingAreaInput() ManagerGadgetArm()\n\
 347      <Btn2Down>: DrawingAreaInput() ManagerGadgetArm()\n\
 348      <Btn3Down>: DrawingAreaInput() ManagerGadgetArm()\n\
 349      <Btn1Up>: DrawingAreaInput() ManagerGadgetActivate()\n\
 350      <Btn2Up>: DrawingAreaInput() ManagerGadgetActivate()\n\
 351      <Btn3Up>: DrawingAreaInput() ManagerGadgetActivate()\n\
 352      <Motion>: wxCanvasMotionEvent() DrawingAreaInput()\n\
 353      <EnterWindow>: wxCanvasMotionEvent() DrawingAreaInput()\n\
 354      <LeaveWindow>: wxCanvasMotionEvent() DrawingAreaInput()\n\
 355      <Key>: DrawingAreaInput()";
 356
 357   XtActionsRec actions[1];
 358   actions[0].string = "wxCanvasMotionEvent";
 359   actions[0].proc = (XtActionProc) wxCanvasMotionEvent;
 360   XtAppAddActions ((XtAppContext) wxTheApp->GetAppContext(), actions, 1);
 361
 362   Widget parentWidget = (Widget) parent->GetClientWidget();
 363   if (style & wxBORDER)
 364     m_borderWidget = (WXWidget) XtVaCreateManagedWidget ("canvasBorder",
 365                                       xmFrameWidgetClass, parentWidget,
 366                                             XmNshadowType, XmSHADOW_IN,
 367                                             NULL);
 368
 369   m_scrolledWindow = (WXWidget) XtVaCreateManagedWidget ("scrolledWindow",
 370                                             xmScrolledWindowWidgetClass, m_borderWidget ? (Widget) m_borderWidget : parentWidget,
 371                                   XmNspacing, 0,
 372                                   XmNscrollingPolicy, XmAPPLICATION_DEFINED,
 373                                             NULL);
 374
 375   XtTranslations ptr;
 376   m_drawingArea = (WXWidget) XtVaCreateWidget ((char*) (const char*) name,
 377                                    xmDrawingAreaWidgetClass, (Widget) m_scrolledWindow,
 378                                          XmNunitType, XmPIXELS,
 379 //                                       XmNresizePolicy, XmRESIZE_ANY,
 380                                          XmNresizePolicy, XmRESIZE_NONE,
 381                                          XmNmarginHeight, 0,
 382                                          XmNmarginWidth, 0,
 383               XmNtranslations, ptr = XtParseTranslationTable (translations),
 384                                          NULL);
 385   /*
 386   if (GetWindowStyleFlag() & wxOVERRIDE_KEY_TRANSLATIONS)
 387   {
 388     XtFree ((char *) ptr);
 389     ptr = XtParseTranslationTable ("<Key>: DrawingAreaInput()");
 390     XtOverrideTranslations ((Widget) m_drawingArea, ptr);
 391     XtFree ((char *) ptr);
 392   }
 393   */
 394
 395   wxAddWindowToTable((Widget) m_drawingArea, this);
 396   wxAddWindowToTable((Widget) m_scrolledWindow, this);
 397
 398   /*
 399    * This order is very important in Motif 1.2.1
 400    *
 401    */
 402
 403   XtRealizeWidget ((Widget) m_scrolledWindow);
 404   XtRealizeWidget ((Widget) m_drawingArea);
 405   XtManageChild ((Widget) m_drawingArea);
 406
 407   XtOverrideTranslations ((Widget) m_drawingArea,
 408                    ptr = XtParseTranslationTable ("<Configure>: resize()"));
 409   XtFree ((char *) ptr);
 410
 411   XtAddCallback ((Widget) m_drawingArea, XmNexposeCallback, (XtCallbackProc) wxCanvasRepaintProc, (XtPointer) this);
 412   XtAddCallback ((Widget) m_drawingArea, XmNinputCallback, (XtCallbackProc) wxCanvasInputEvent, (XtPointer) this);
 413
 414   /* TODO?
 415   display = XtDisplay (scrolledWindow);
 416   xwindow = XtWindow (drawingArea);
 417   */
 418
 419   XtAddEventHandler ((Widget) m_drawingArea, PointerMotionHintMask | EnterWindowMask | LeaveWindowMask | FocusChangeMask,
 420     False, (XtEventHandler) wxCanvasEnterLeave, (XtPointer) this);
 421
 422   // Add scrollbars if required
 423   if (m_windowStyle & wxHSCROLL)
 424   {
 425       Widget hScrollBar = XtVaCreateManagedWidget ("hsb",
 426                                      xmScrollBarWidgetClass, (Widget) m_scrolledWindow,
 427                                                 XmNorientation, XmHORIZONTAL,
 428                                                 NULL);
 429       //          XtAddCallback (hScrollBar, XmNvalueChangedCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 430           XtAddCallback (hScrollBar, XmNdragCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 431           XtAddCallback (hScrollBar, XmNincrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 432           XtAddCallback (hScrollBar, XmNdecrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 433           XtAddCallback (hScrollBar, XmNpageIncrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 434           XtAddCallback (hScrollBar, XmNpageDecrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 435           XtAddCallback (hScrollBar, XmNtoTopCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 436           XtAddCallback (hScrollBar, XmNtoBottomCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmHORIZONTAL);
 437
 438       XtVaSetValues (hScrollBar,
 439                      XmNincrement, 1,
 440                      XmNvalue, 0,
 441                      NULL);
 442
 443       m_hScrollBar = (WXWidget) hScrollBar;
 444       m_hScroll = TRUE;
 445   }
 446   if (m_windowStyle & wxVSCROLL)
 447   {
 448       Widget vScrollBar = XtVaCreateManagedWidget ("vsb",
 449                                      xmScrollBarWidgetClass, (Widget) m_scrolledWindow,
 450                                                 XmNorientation, XmVERTICAL,
 451                                                 NULL);
 452       //          XtAddCallback (vScrollBar, XmNvalueChangedCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 453           XtAddCallback (vScrollBar, XmNdragCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 454           XtAddCallback (vScrollBar, XmNincrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 455           XtAddCallback (vScrollBar, XmNdecrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 456           XtAddCallback (vScrollBar, XmNpageIncrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 457           XtAddCallback (vScrollBar, XmNpageDecrementCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 458           XtAddCallback (vScrollBar, XmNtoTopCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 459           XtAddCallback (vScrollBar, XmNtoBottomCallback, (XtCallbackProc) wxScrollBarCallback, (XtPointer) XmVERTICAL);
 460
 461       XtVaSetValues (vScrollBar,
 462                      XmNincrement, 1,
 463                      XmNvalue, 0,
 464                      NULL);
 465
 466       m_vScrollBar = (WXWidget) vScrollBar;
 467       m_vScroll = TRUE;
 468   }
 469
 470   if (m_hScrollBar || m_vScrollBar)
 471     XmScrolledWindowSetAreas ((Widget) m_scrolledWindow, (Widget) m_hScrollBar, (Widget) m_vScrollBar, (Widget) m_drawingArea);
 472
 473   if (m_hScrollBar)
 474         XtRealizeWidget ((Widget) m_hScrollBar);
 475   if (m_vScrollBar)
 476         XtRealizeWidget ((Widget) m_vScrollBar);
 477
 478   // Without this, the cursor may not be restored properly
 479   // (e.g. in splitter sample).
 480   SetCursor(*wxSTANDARD_CURSOR);
 481   SetFont(wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT));
 482   SetSize(pos.x, pos.y, size.x, size.y);
 483
 484   return TRUE;
 485 }
 486
 487 void wxWindow::SetFocus()
 488 {
 489   XmProcessTraversal((Widget) GetMainWidget(), XmTRAVERSE_CURRENT);
 490   XmProcessTraversal((Widget) GetMainWidget(), XmTRAVERSE_CURRENT);
 491 }
 492
 493 void wxWindow::Enable(bool enable)
 494 {
 495   if (GetMainWidget())
 496   {
 497     XtSetSensitive((Widget) GetMainWidget(), enable);
 498     XmUpdateDisplay((Widget) GetMainWidget());
 499   }
 500 }
 501
 502 void wxWindow::CaptureMouse()
 503 {
 504   if (m_winCaptured)
 505     return;
 506
 507   if (GetMainWidget())
 508     XtAddGrab((Widget) GetMainWidget(), TRUE, FALSE);
 509
 510   m_winCaptured = TRUE;
 511 }
 512
 513 void wxWindow::ReleaseMouse()
 514 {
 515   if (!m_winCaptured)
 516     return;
 517
 518   if (GetMainWidget())
 519     XtRemoveGrab((Widget) GetMainWidget());
 520   m_winCaptured = FALSE;
 521 }
 522
 523 // Push/pop event handler (i.e. allow a chain of event handlers
 524 // be searched)
 525 void wxWindow::PushEventHandler(wxEvtHandler *handler)
 526 {
 527         handler->SetNextHandler(GetEventHandler());
 528         SetEventHandler(handler);
 529 }
 530
 531 wxEvtHandler *wxWindow::PopEventHandler(bool deleteHandler)
 532 {
 533         if ( GetEventHandler() )
 534         {
 535                 wxEvtHandler *handlerA = GetEventHandler();
 536                 wxEvtHandler *handlerB = handlerA->GetNextHandler();
 537                 handlerA->SetNextHandler(NULL);
 538                 SetEventHandler(handlerB);
 539                 if ( deleteHandler )
 540                 {
 541                         delete handlerA;
 542                         return NULL;
 543                 }
 544                 else
 545                         return handlerA;
 546         }
 547         else
 548                 return NULL;
 549 }
 550
 551 #if    wxUSE_DRAG_AND_DROP
 552
 553 void wxWindow::SetDropTarget(wxDropTarget *pDropTarget)
 554 {
 555   if ( m_pDropTarget != 0 ) {
 556     delete m_pDropTarget;
 557   }
 558
 559   m_pDropTarget = pDropTarget;
 560   if ( m_pDropTarget != 0 )
 561   {
 562     // TODO
 563   }
 564 }
 565
 566 #endif
 567
 568 // Old style file-manager drag&drop
 569 void wxWindow::DragAcceptFiles(bool accept)
 570 {
 571     // TODO
 572 }
 573
 574 // Get total size
 575 void wxWindow::GetSize(int *x, int *y) const
 576 {
 577   if (m_drawingArea)
 578   {
 579     CanvasGetSize(x, y);
 580     return;
 581   }
 582
 583   Widget widget = (Widget) GetTopWidget();
 584   Dimension xx, yy;
 585   XtVaGetValues(widget, XmNwidth, &xx, XmNheight, &yy, NULL);
 586   *x = xx; *y = yy;
 587 }
 588
 589 void wxWindow::GetPosition(int *x, int *y) const
 590 {
 591     if (m_drawingArea)
 592     {
 593         CanvasGetPosition(x, y);
 594         return;
 595     }
 596     Widget widget = (Widget) GetTopWidget();
 597     Position xx, yy;
 598     XtVaGetValues(widget, XmNx, &xx, XmNy, &yy, NULL);
 599
 600     // We may be faking the client origin.
 601     // So a window that's really at (0, 30) may appear
 602     // (to wxWin apps) to be at (0, 0).
 603     if (GetParent())
 604     {
 605         wxPoint pt(GetParent()->GetClientAreaOrigin());
 606         xx -= pt.x;
 607         yy -= pt.y;
 608     }
 609
 610     *x = xx; *y = yy;
 611 }
 612
 613 void wxWindow::ScreenToClient(int *x, int *y) const
 614 {
 615   Widget widget = (Widget) GetClientWidget();
 616   Display *display = XtDisplay((Widget) GetMainWidget());
 617   Window rootWindow = RootWindowOfScreen(XtScreen(widget));
 618   Window thisWindow = XtWindow(widget);
 619
 620   Window childWindow;
 621   int xx = *x;
 622   int yy = *y;
 623   XTranslateCoordinates(display, rootWindow, thisWindow, xx, yy, x, y, &childWindow);
 624 }
 625
 626 void wxWindow::ClientToScreen(int *x, int *y) const
 627 {
 628   Widget widget = (Widget) GetClientWidget();
 629   Display *display = XtDisplay(widget);
 630   Window rootWindow = RootWindowOfScreen(XtScreen(widget));
 631   Window thisWindow = XtWindow(widget);
 632
 633   Window childWindow;
 634   int xx = *x;
 635   int yy = *y;
 636   XTranslateCoordinates(display, thisWindow, rootWindow, xx, yy, x, y, &childWindow);
 637 }
 638
 639 void wxWindow::SetCursor(const wxCursor& cursor)
 640 {
 641   m_windowCursor = cursor;
 642   if (m_windowCursor.Ok())
 643   {
 644     WXDisplay *dpy = GetXDisplay();
 645     WXCursor x_cursor = ((wxCursor&)cursor).GetXCursor(dpy);
 646
 647     Widget w = (Widget) GetMainWidget();
 648     Window win = XtWindow(w);
 649     XDefineCursor((Display*) dpy, win, (Cursor) x_cursor);
 650   }
 651 }
 652
 653
 654 // Get size *available for subwindows* i.e. excluding menu bar etc.
 655 void wxWindow::GetClientSize(int *x, int *y) const
 656 {
 657   Widget widget = (Widget) GetClientWidget();
 658   Dimension xx, yy;
 659   XtVaGetValues(widget, XmNwidth, &xx, XmNheight, &yy, NULL);
 660   *x = xx; *y = yy;
 661 }
 662
 663 void wxWindow::SetSize(int x, int y, int width, int height, int sizeFlags)
 664 {
 665   // A bit of optimization to help sort out the flickers.
 666   int oldX, oldY, oldW, oldH;
 667   GetSize(& oldW, & oldH);
 668   GetPosition(& oldX, & oldY);
 669
 670   bool useOldPos = FALSE;
 671   bool useOldSize = FALSE;
 672
 673   if ((x == -1) && (x == -1) && ((sizeFlags & wxSIZE_ALLOW_MINUS_ONE) == 0))
 674     useOldPos = TRUE;
 675   else if (x == oldX && y == oldY)
 676     useOldPos = TRUE;
 677
 678   if ((width == -1) && (height == -1))
 679     useOldSize = TRUE;
 680   else if (width == oldW && height == oldH)
 681     useOldSize = TRUE;
 682
 683   if (useOldPos && useOldSize)
 684     return;
 685
 686   if (m_drawingArea)
 687   {
 688     CanvasSetSize(x, y, width, height, sizeFlags);
 689     return;
 690   }
 691   Widget widget = (Widget) GetTopWidget();
 692   if (!widget)
 693     return;
 694
 695   bool managed = XtIsManaged( widget );
 696   if (managed)
 697     XtUnmanageChild(widget);
 698
 699   int xx = x; int yy = y;
 700   AdjustForParentClientOrigin(xx, yy, sizeFlags);
 701
 702   if (!useOldPos)
 703   {
 704     if (x > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 705       XtVaSetValues(widget, XmNx, xx, NULL);
 706     if (y > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 707       XtVaSetValues(widget, XmNy, yy, NULL);
 708   }
 709   if (!useOldSize)
 710   {
 711     if (width > -1)
 712       XtVaSetValues(widget, XmNwidth, width, NULL);
 713     if (height > -1)
 714       XtVaSetValues(widget, XmNheight, height, NULL);
 715   }
 716
 717   if (managed)
 718     XtManageChild(widget);
 719
 720   // How about this bit. Maybe we don't need to generate size events
 721   // all the time -- they'll be generated when the window is sized anyway.
 722   /*
 723   wxSizeEvent sizeEvent(wxSize(width, height), GetId());
 724   sizeEvent.SetEventObject(this);
 725
 726   GetEventHandler()->ProcessEvent(sizeEvent);
 727   */
 728 }
 729
 730 void wxWindow::SetClientSize(int width, int height)
 731 {
 732   if (m_drawingArea)
 733   {
 734     CanvasSetClientSize(width, height);
 735     return;
 736   }
 737
 738   Widget widget = (Widget) GetTopWidget();
 739
 740   if (width > -1)
 741     XtVaSetValues(widget, XmNwidth, width, NULL);
 742   if (height > -1)
 743     XtVaSetValues(widget, XmNheight, height, NULL);
 744
 745   wxSizeEvent sizeEvent(wxSize(width, height), GetId());
 746   sizeEvent.SetEventObject(this);
 747
 748   GetEventHandler()->ProcessEvent(sizeEvent);
 749 }
 750
 751 // For implementation purposes - sometimes decorations make the client area
 752 // smaller
 753 wxPoint wxWindow::GetClientAreaOrigin() const
 754 {
 755     return wxPoint(0, 0);
 756 }
 757
 758 // Makes an adjustment to the window position (for example, a frame that has
 759 // a toolbar that it manages itself).
 760 void wxWindow::AdjustForParentClientOrigin(int& x, int& y, int sizeFlags)
 761 {
 762     if (((sizeFlags & wxSIZE_NO_ADJUSTMENTS) == 0) && GetParent())
 763     {
 764         wxPoint pt(GetParent()->GetClientAreaOrigin());
 765         x += pt.x; y += pt.y;
 766     }
 767 }
 768
 769 bool wxWindow::Show(bool show)
 770 {
 771     if (show)
 772     {
 773        if (m_borderWidget || m_scrolledWindow)
 774        {
 775            if (m_drawingArea)
 776              XtMapWidget((Widget) m_drawingArea);
 777            XtMapWidget(m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow);
 778        }
 779        else
 780        {
 781            WXWidget topWidget = GetTopWidget();
 782            if (GetTopWidget())
 783              XtMapWidget((Widget) GetTopWidget());
 784            else if (GetMainWidget())
 785              XtMapWidget((Widget) GetMainWidget());
 786        }
 787     }
 788     else
 789     {
 790        if (m_borderWidget || m_scrolledWindow)
 791        {
 792            if (m_drawingArea)
 793              XtUnmapWidget((Widget) m_drawingArea);
 794            XtUnmapWidget(m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow);
 795        }
 796        else
 797        {
 798            if (GetTopWidget())
 799              XtUnmapWidget((Widget) GetTopWidget());
 800            else if (GetMainWidget())
 801              XtUnmapWidget((Widget) GetMainWidget());
 802        }
 803     }
 804
 805   /*
 806     Window xwin = (Window) GetXWindow();
 807     Display *xdisp = (Display*) GetXDisplay();
 808     if (show)
 809         XMapWindow(xdisp, xwin);
 810     else
 811         XUnmapWindow(xdisp, xwin);
 812    */
 813
 814     m_isShown = show;
 815
 816     return TRUE;
 817 }
 818
 819 bool wxWindow::IsShown() const
 820 {
 821     return m_isShown;
 822 }
 823
 824 int wxWindow::GetCharHeight() const
 825 {
 826   if (!m_windowFont.Ok())
 827     return 0;
 828
 829   WXFontStructPtr pFontStruct = m_windowFont.GetFontStruct(1.0, GetXDisplay());
 830
 831   int direction, ascent, descent;
 832   XCharStruct overall;
 833   XTextExtents ((XFontStruct*) pFontStruct, "x", 1, &direction, &ascent,
 834         &descent, &overall);
 835 //  return (overall.ascent + overall.descent);
 836   return (ascent + descent);
 837 }
 838
 839 int wxWindow::GetCharWidth() const
 840 {
 841   if (!m_windowFont.Ok())
 842     return 0;
 843
 844   WXFontStructPtr pFontStruct = m_windowFont.GetFontStruct(1.0, GetXDisplay());
 845
 846   int direction, ascent, descent;
 847   XCharStruct overall;
 848   XTextExtents ((XFontStruct*) pFontStruct, "x", 1, &direction, &ascent,
 849         &descent, &overall);
 850   return overall.width;
 851 }
 852
 853 /* Helper function for 16-bit fonts */
 854 static int str16len(const char *s)
 855 {
 856   int count = 0;
 857
 858   while (s[0] && s[1]) {
 859     count++;
 860     s += 2;
 861   }
 862
 863   return count;
 864 }
 865
 866 void wxWindow::GetTextExtent(const wxString& string, int *x, int *y,
 867                            int *descent, int *externalLeading, const wxFont *theFont, bool use16) const
 868 {
 869   wxFont *fontToUse = (wxFont *)theFont;
 870   if (!fontToUse)
 871     fontToUse = (wxFont *) & m_windowFont;
 872
 873   if (!fontToUse->Ok())
 874     return;
 875
 876   WXFontStructPtr pFontStruct = theFont->GetFontStruct(1.0, GetXDisplay());
 877
 878   int direction, ascent, descent2;
 879   XCharStruct overall;
 880   int slen;
 881
 882   if (use16) slen = str16len(string); else slen = strlen(string);
 883
 884   if (use16)
 885     XTextExtents16((XFontStruct*) pFontStruct, (XChar2b *) (char*) (const char*) string, slen, &direction,
 886            &ascent, &descent2, &overall);
 887   else
 888      XTextExtents((XFontStruct*) pFontStruct, (char*) (const char*) string, slen, &direction,
 889          &ascent, &descent2, &overall);
 890
 891   *x = (overall.width);
 892   *y = (ascent + descent2);
 893   if (descent)
 894     *descent = descent2;
 895   if (externalLeading)
 896     *externalLeading = 0;
 897 }
 898
 899 void wxWindow::Refresh(bool eraseBack, const wxRect *rect)
 900 {
 901     Display *display = XtDisplay((Widget) GetMainWidget());
 902     Window thisWindow = XtWindow((Widget) GetMainWidget());
 903
 904     XExposeEvent dummyEvent;
 905     int width, height;
 906     GetSize(&width, &height);
 907
 908     dummyEvent.type = Expose;
 909     dummyEvent.display = display;
 910     dummyEvent.send_event = True;
 911     dummyEvent.window = thisWindow;
 912     if (rect)
 913     {
 914       dummyEvent.x = rect->x;
 915       dummyEvent.y = rect->y;
 916       dummyEvent.width = rect->width;
 917       dummyEvent.height = rect->height;
 918     }
 919     else
 920     {
 921       dummyEvent.x = 0;
 922       dummyEvent.y = 0;
 923       dummyEvent.width = width;
 924       dummyEvent.height = height;
 925     }
 926     dummyEvent.count = 0;
 927
 928     if (eraseBack)
 929     {
 930         wxClientDC dc(this);
 931         wxBrush backgroundBrush(GetBackgroundColour(), wxSOLID);
 932         dc.SetBackground(backgroundBrush);
 933         if (rect)
 934           dc.Clear(*rect);
 935         else
 936           dc.Clear();
 937     }
 938
 939     XSendEvent(display, thisWindow, False, ExposureMask, (XEvent *)&dummyEvent);
 940 }
 941
 942 // Responds to colour changes: passes event on to children.
 943 void wxWindow::OnSysColourChanged(wxSysColourChangedEvent& event)
 944 {
 945     wxNode *node = GetChildren().First();
 946     while ( node )
 947     {
 948         // Only propagate to non-top-level windows
 949         wxWindow *win = (wxWindow *)node->Data();
 950         if ( win->GetParent() )
 951         {
 952             wxSysColourChangedEvent event2;
 953             event.m_eventObject = win;
 954             win->GetEventHandler()->ProcessEvent(event2);
 955         }
 956
 957         node = node->Next();
 958     }
 959 }
 960
 961 // This can be called by the app (or wxWindows) to do default processing for the current
 962 // event. Save message/event info in wxWindow so they can be used in this function.
 963 long wxWindow::Default()
 964 {
 965     // TODO
 966     return 0;
 967 }
 968
 969 void wxWindow::InitDialog()
 970 {
 971   wxInitDialogEvent event(GetId());
 972   event.SetEventObject( this );
 973   GetEventHandler()->ProcessEvent(event);
 974 }
 975
 976 // Default init dialog behaviour is to transfer data to window
 977 void wxWindow::OnInitDialog(wxInitDialogEvent& event)
 978 {
 979   TransferDataToWindow();
 980 }
 981
 982 // Caret manipulation
 983 void wxWindow::CreateCaret(int w, int h)
 984 {
 985   m_caretWidth = w;
 986   m_caretHeight = h;
 987   m_caretEnabled = TRUE;
 988 }
 989
 990 void wxWindow::CreateCaret(const wxBitmap *WXUNUSED(bitmap))
 991 {
 992     // TODO
 993 }
 994
 995 void wxWindow::ShowCaret(bool show)
 996 {
 997     // TODO
 998 }
 999
1000 void wxWindow::DestroyCaret()
1001 {
1002     // TODO
1003     m_caretEnabled = FALSE;
1004 }
1005
1006 void wxWindow::SetCaretPos(int x, int y)
1007 {
1008     // TODO
1009 }
1010
1011 void wxWindow::GetCaretPos(int *x, int *y) const
1012 {
1013     // TODO
1014 }
1015
1016 wxWindow *wxGetActiveWindow()
1017 {
1018     // TODO
1019     return NULL;
1020 }
1021
1022 void wxWindow::SetSizeHints(int minW, int minH, int maxW, int maxH, int incW, int incH)
1023 {
1024     m_minSizeX = minW;
1025     m_minSizeY = minH;
1026     m_maxSizeX = maxW;
1027     m_maxSizeY = maxH;
1028
1029     if (!this->IsKindOf(CLASSINFO(wxFrame)))
1030       return;
1031
1032     wxFrame *frame = (wxFrame *)this;
1033     Widget widget = (Widget) frame->GetShellWidget();
1034
1035     if (minW > -1)
1036       XtVaSetValues(widget, XmNminWidth, minW, NULL);
1037     if (minH > -1)
1038       XtVaSetValues(widget, XmNminHeight, minH, NULL);
1039     if (maxW > -1)
1040       XtVaSetValues(widget, XmNmaxWidth, maxW, NULL);
1041     if (maxH > -1)
1042       XtVaSetValues(widget, XmNmaxHeight, maxH, NULL);
1043     if (incW > -1)
1044       XtVaSetValues(widget, XmNwidthInc, incW, NULL);
1045     if (incH > -1)
1046       XtVaSetValues(widget, XmNheightInc, incH, NULL);
1047 }
1048
1049 void wxWindow::Centre(int direction)
1050 {
1051   int x, y, width, height, panel_width, panel_height, new_x, new_y;
1052
1053   wxWindow *father = (wxWindow *)GetParent();
1054   if (!father)
1055     return;
1056
1057   father->GetClientSize(&panel_width, &panel_height);
1058   GetSize(&width, &height);
1059   GetPosition(&x, &y);
1060
1061   new_x = -1;
1062   new_y = -1;
1063
1064   if (direction & wxHORIZONTAL)
1065     new_x = (int)((panel_width - width)/2);
1066
1067   if (direction & wxVERTICAL)
1068     new_y = (int)((panel_height - height)/2);
1069
1070   SetSize(new_x, new_y, -1, -1);
1071
1072 }
1073
1074 // Coordinates relative to the window
1075 void wxWindow::WarpPointer (int x, int y)
1076 {
1077   XWarpPointer (XtDisplay((Widget) GetClientWidget()), None, XtWindow((Widget) GetClientWidget()), 0, 0, 0, 0, x, y);
1078 }
1079
1080 void wxWindow::OnEraseBackground(wxEraseEvent& event)
1081 {
1082     // TODO
1083     Default();
1084 }
1085
1086 int wxWindow::GetScrollPos(int orient) const
1087 {
1088     if (orient == wxHORIZONTAL)
1089         return m_scrollPosX;
1090     else
1091         return m_scrollPosY;
1092 /*
1093         Widget scrollBar = (Widget) ((orient == wxHORIZONTAL) ? m_hScrollBar : m_vScrollBar);
1094         if (scrollBar)
1095         {
1096         int pos;
1097         XtVaGetValues(scrollBar,
1098             XmNvalue, &pos, NULL);
1099         return pos;
1100     }
1101     else
1102         return 0;
1103 */
1104 }
1105
1106 // This now returns the whole range, not just the number
1107 // of positions that we can scroll.
1108 int wxWindow::GetScrollRange(int orient) const
1109 {
1110         Widget scrollBar = (Widget) ((orient == wxHORIZONTAL) ? m_hScrollBar : m_vScrollBar);
1111         if (scrollBar)
1112         {
1113         int range;
1114         XtVaGetValues(scrollBar,
1115             XmNmaximum, &range, NULL);
1116         return range;
1117     }
1118     else
1119         return 0;
1120 }
1121
1122 int wxWindow::GetScrollThumb(int orient) const
1123 {
1124         Widget scrollBar = (Widget) ((orient == wxHORIZONTAL) ? m_hScrollBar : m_vScrollBar);
1125         if (scrollBar)
1126         {
1127         int thumb;
1128         XtVaGetValues(scrollBar,
1129             XmNsliderSize, &thumb, NULL);
1130         return thumb;
1131     }
1132     else
1133         return 0;
1134 }
1135
1136 void wxWindow::SetScrollPos(int orient, int pos, bool WXUNUSED(refresh))
1137 {
1138         Widget scrollBar = (Widget) ((orient == wxHORIZONTAL) ? m_hScrollBar : m_vScrollBar);
1139         if (scrollBar)
1140         {
1141                 XtVaSetValues (scrollBar,
1142                                 XmNvalue, pos,
1143                                 NULL);
1144         }
1145         if (orient == wxHORIZONTAL)
1146           m_scrollPosX = pos;
1147         else
1148           m_scrollPosY = pos;
1149
1150 }
1151
1152 // New function that will replace some of the above.
1153 void wxWindow::SetScrollbar(int orient, int pos, int thumbVisible,
1154     int range, bool WXUNUSED(refresh))
1155 {
1156     Widget scrollBar = (Widget) ((orient == wxHORIZONTAL) ? m_hScrollBar : m_vScrollBar );
1157     if (!scrollBar)
1158         return;
1159
1160     if (range == 0)
1161       range = 1;
1162     if (thumbVisible == 0)
1163       thumbVisible = 1;
1164
1165     XtVaSetValues(scrollBar,
1166          XmNvalue, pos,
1167          XmNminimum, 0,
1168          XmNmaximum, range,
1169          XmNsliderSize, thumbVisible,
1170          NULL);
1171
1172     if (orient == wxHORIZONTAL)
1173         m_scrollPosX = pos;
1174     else
1175         m_scrollPosY = pos;
1176 }
1177
1178 // Does a physical scroll
1179 void wxWindow::ScrollWindow(int dx, int dy, const wxRect *rect)
1180 {
1181 //  cerr << "Scrolling. delta = " << dx << ", " << dy << endl;
1182   int x, y, w, h;
1183   if (rect)
1184   {
1185     // Use specified rectangle
1186     x = rect->x; y = rect->y; w = rect->width; h = rect->height;
1187   }
1188   else
1189   {
1190     // Use whole client area
1191     x = 0; y = 0;
1192     GetClientSize(& w, & h);
1193   }
1194
1195   int x1 = (dx >= 0) ? x : x - dx ;
1196   int y1 = (dy >= 0) ? y : y - dy;
1197   int w1 = w - abs(dx);
1198   int h1 = h - abs(dy);
1199   int x2 = (dx >= 0) ? x + dx : x;
1200   int y2 = (dy >= 0) ? y + dy : y;
1201
1202   wxClientDC dc(this);
1203
1204   dc.SetLogicalFunction (wxCOPY);
1205
1206   Widget widget = (Widget) GetMainWidget();
1207   Window window = XtWindow(widget);
1208   Display* display = XtDisplay(widget);
1209
1210   XCopyArea(display, window,
1211     window, (GC) dc.GetGC(),
1212     x1, y1,
1213     w1, h1,
1214     x2, y2);
1215
1216   dc.SetAutoSetting(TRUE);
1217   wxBrush brush(GetBackgroundColour(), wxSOLID);
1218   dc.SetBrush(brush); // ??
1219
1220   // We'll add rectangles to the list of update rectangles
1221   // according to which bits we've exposed.
1222   wxList updateRects;
1223
1224   if (dx > 0)
1225   {
1226     wxRect *rect = new wxRect;
1227     rect->x = x;
1228     rect->y = y;
1229     rect->width = dx;
1230     rect->height = h;
1231
1232     XFillRectangle(display, window,
1233       (GC) dc.GetGC(), rect->x, rect->y, rect->width, rect->height);
1234
1235     rect->x = rect->x;
1236     rect->y = rect->y;
1237     rect->width = rect->width;
1238     rect->height = rect->height;
1239
1240     updateRects.Append((wxObject*) rect);
1241   }
1242   else if (dx < 0)
1243   {
1244     wxRect *rect = new wxRect;
1245
1246     rect->x = x + w + dx;
1247     rect->y = y;
1248     rect->width = -dx;
1249     rect->height = h;
1250
1251     XFillRectangle(display, window,
1252       (GC) dc.GetGC(), rect->x, rect->y, rect->width,
1253       rect->height);
1254
1255     rect->x = rect->x;
1256     rect->y = rect->y;
1257     rect->width = rect->width;
1258     rect->height = rect->height;
1259
1260     updateRects.Append((wxObject*) rect);
1261   }
1262   if (dy > 0)
1263   {
1264     wxRect *rect = new wxRect;
1265
1266     rect->x = x;
1267     rect->y = y;
1268     rect->width = w;
1269     rect->height = dy;
1270
1271     XFillRectangle(display, window,
1272       (GC) dc.GetGC(), rect->x, rect->y, rect->width, rect->height);
1273
1274     rect->x = rect->x;
1275     rect->y = rect->y;
1276     rect->width = rect->width;
1277     rect->height = rect->height;
1278
1279     updateRects.Append((wxObject*) rect);
1280   }
1281   else if (dy < 0)
1282   {
1283     wxRect *rect = new wxRect;
1284
1285     rect->x = x;
1286     rect->y = y + h + dy;
1287     rect->width = w;
1288     rect->height = -dy;
1289
1290     XFillRectangle(display, window,
1291       (GC) dc.GetGC(), rect->x, rect->y, rect->width, rect->height);
1292
1293     rect->x = rect->x;
1294     rect->y = rect->y;
1295     rect->width = rect->width;
1296     rect->height = rect->height;
1297
1298     updateRects.Append((wxObject*) rect);
1299   }
1300   dc.SetBrush(wxNullBrush);
1301
1302   // Now send expose events
1303
1304   wxNode* node = updateRects.First();
1305   while (node)
1306   {
1307     wxRect* rect = (wxRect*) node->Data();
1308     XExposeEvent event;
1309
1310     event.type = Expose;
1311     event.display = display;
1312     event.send_event = True;
1313     event.window = window;
1314
1315     event.x = rect->x;
1316     event.y = rect->y;
1317     event.width = rect->width;
1318     event.height = rect->height;
1319
1320     event.count = 0;
1321
1322     XSendEvent(display, window, False, ExposureMask, (XEvent *)&event);
1323
1324     node = node->Next();
1325
1326   }
1327
1328   // Delete the update rects
1329   node = updateRects.First();
1330   while (node)
1331   {
1332     wxRect* rect = (wxRect*) node->Data();
1333     delete rect;
1334     node = node->Next();
1335   }
1336
1337 }
1338
1339 void wxWindow::OnChar(wxKeyEvent& event)
1340 {
1341     if ( event.KeyCode() == WXK_TAB ) {
1342         // propagate the TABs to the parent - it's up to it to decide what
1343         // to do with it
1344         if ( GetParent() ) {
1345             if ( GetParent()->ProcessEvent(event) )
1346                 return;
1347         }
1348     }
1349 }
1350
1351 void wxWindow::OnPaint(wxPaintEvent& event)
1352 {
1353         Default();
1354 }
1355
1356 bool wxWindow::IsEnabled() const
1357 {
1358     // TODO. Is this right?
1359     // return XtGetSensitive((Widget) GetMainWidget());
1360     return FALSE;
1361 }
1362
1363 // Dialog support: override these and call
1364 // base class members to add functionality
1365 // that can't be done using validators.
1366 // NOTE: these functions assume that controls
1367 // are direct children of this window, not grandchildren
1368 // or other levels of descendant.
1369
1370 // Transfer values to controls. If returns FALSE,
1371 // it's an application error (pops up a dialog)
1372 bool wxWindow::TransferDataToWindow()
1373 {
1374         wxNode *node = GetChildren().First();
1375         while ( node )
1376         {
1377                 wxWindow *child = (wxWindow *)node->Data();
1378                 if ( child->GetValidator() &&
1379                      !child->GetValidator()->TransferToWindow() )
1380                 {
1381                         wxMessageBox("Application Error", "Could not transfer data to window", wxOK|wxICON_EXCLAMATION);
1382                         return FALSE;
1383                 }
1384
1385                 node = node->Next();
1386         }
1387         return TRUE;
1388 }
1389
1390 // Transfer values from controls. If returns FALSE,
1391 // validation failed: don't quit
1392 bool wxWindow::TransferDataFromWindow()
1393 {
1394         wxNode *node = GetChildren().First();
1395         while ( node )
1396         {
1397                 wxWindow *child = (wxWindow *)node->Data();
1398                 if ( child->GetValidator() && !child->GetValidator()->TransferFromWindow() )
1399                 {
1400                         return FALSE;
1401                 }
1402
1403                 node = node->Next();
1404         }
1405         return TRUE;
1406 }
1407
1408 bool wxWindow::Validate()
1409 {
1410         wxNode *node = GetChildren().First();
1411         while ( node )
1412         {
1413                 wxWindow *child = (wxWindow *)node->Data();
1414                 if ( child->GetValidator() && /* child->GetValidator()->Ok() && */ !child->GetValidator()->Validate(this) )
1415                 {
1416                         return FALSE;
1417                 }
1418
1419                 node = node->Next();
1420         }
1421         return TRUE;
1422 }
1423
1424 // Get the window with the focus
1425 wxWindow *wxWindow::FindFocus()
1426 {
1427     // TODO
1428     return NULL;
1429 }
1430
1431 void wxWindow::AddChild(wxWindow *child)
1432 {
1433     GetChildren().Append(child);
1434     child->m_windowParent = this;
1435 }
1436
1437 void wxWindow::RemoveChild(wxWindow *child)
1438 {
1439     GetChildren().DeleteObject(child);
1440     child->m_windowParent = NULL;
1441 }
1442
1443 // Reparents this window to have the new parent.
1444 bool wxWindow::Reparent(wxWindow* WXUNUSED(parent))
1445 {
1446     // For now, we indicate that this isn't implemented.
1447     return FALSE;
1448 }
1449
1450 void wxWindow::DestroyChildren()
1451 {
1452     wxNode *node = GetChildren().First();
1453     while (node)
1454     {
1455       wxNode* next = node->Next();
1456       wxWindow* child = (wxWindow*) node->Data();
1457       delete child;
1458       node = next;
1459     }
1460     GetChildren().Clear();
1461 #if 0
1462     wxNode *node;
1463     while ((node = GetChildren().First()) != (wxNode *)NULL) {
1464       wxWindow *child;
1465       if ((child = (wxWindow *)node->Data()) != (wxWindow *)NULL) {
1466         delete child;
1467                 if ( GetChildren().Member(child) )
1468                         delete node;
1469       }
1470     } /* while */
1471 #endif
1472 }
1473
1474 void wxWindow::MakeModal(bool modal)
1475 {
1476   // Disable all other windows
1477   if (this->IsKindOf(CLASSINFO(wxDialog)) || this->IsKindOf(CLASSINFO(wxFrame)))
1478   {
1479     wxNode *node = wxTopLevelWindows.First();
1480     while (node)
1481     {
1482       wxWindow *win = (wxWindow *)node->Data();
1483       if (win != this)
1484         win->Enable(!modal);
1485
1486       node = node->Next();
1487     }
1488   }
1489 }
1490
1491 // If nothing defined for this, try the parent.
1492 // E.g. we may be a button loaded from a resource, with no callback function
1493 // defined.
1494 void wxWindow::OnCommand(wxWindow& win, wxCommandEvent& event)
1495 {
1496   if (GetEventHandler()->ProcessEvent(event) )
1497     return;
1498   if (m_windowParent)
1499     m_windowParent->GetEventHandler()->OnCommand(win, event);
1500 }
1501
1502 void wxWindow::SetConstraints(wxLayoutConstraints *c)
1503 {
1504   if (m_constraints)
1505   {
1506     UnsetConstraints(m_constraints);
1507     delete m_constraints;
1508   }
1509   m_constraints = c;
1510   if (m_constraints)
1511   {
1512     // Make sure other windows know they're part of a 'meaningful relationship'
1513     if (m_constraints->left.GetOtherWindow() && (m_constraints->left.GetOtherWindow() != this))
1514       m_constraints->left.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1515     if (m_constraints->top.GetOtherWindow() && (m_constraints->top.GetOtherWindow() != this))
1516       m_constraints->top.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1517     if (m_constraints->right.GetOtherWindow() && (m_constraints->right.GetOtherWindow() != this))
1518       m_constraints->right.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1519     if (m_constraints->bottom.GetOtherWindow() && (m_constraints->bottom.GetOtherWindow() != this))
1520       m_constraints->bottom.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1521     if (m_constraints->width.GetOtherWindow() && (m_constraints->width.GetOtherWindow() != this))
1522       m_constraints->width.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1523     if (m_constraints->height.GetOtherWindow() && (m_constraints->height.GetOtherWindow() != this))
1524       m_constraints->height.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1525     if (m_constraints->centreX.GetOtherWindow() && (m_constraints->centreX.GetOtherWindow() != this))
1526       m_constraints->centreX.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1527     if (m_constraints->centreY.GetOtherWindow() && (m_constraints->centreY.GetOtherWindow() != this))
1528       m_constraints->centreY.GetOtherWindow()->AddConstraintReference((wxWindow *)this);
1529   }
1530 }
1531
1532 // This removes any dangling pointers to this window
1533 // in other windows' constraintsInvolvedIn lists.
1534 void wxWindow::UnsetConstraints(wxLayoutConstraints *c)
1535 {
1536   if (c)
1537   {
1538     if (c->left.GetOtherWindow() && (c->top.GetOtherWindow() != this))
1539       c->left.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1540     if (c->top.GetOtherWindow() && (c->top.GetOtherWindow() != this))
1541       c->top.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1542     if (c->right.GetOtherWindow() && (c->right.GetOtherWindow() != this))
1543       c->right.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1544     if (c->bottom.GetOtherWindow() && (c->bottom.GetOtherWindow() != this))
1545       c->bottom.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1546     if (c->width.GetOtherWindow() && (c->width.GetOtherWindow() != this))
1547       c->width.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1548     if (c->height.GetOtherWindow() && (c->height.GetOtherWindow() != this))
1549       c->height.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1550     if (c->centreX.GetOtherWindow() && (c->centreX.GetOtherWindow() != this))
1551       c->centreX.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1552     if (c->centreY.GetOtherWindow() && (c->centreY.GetOtherWindow() != this))
1553       c->centreY.GetOtherWindow()->RemoveConstraintReference((wxWindow *)this);
1554   }
1555 }
1556
1557 // Back-pointer to other windows we're involved with, so if we delete
1558 // this window, we must delete any constraints we're involved with.
1559 void wxWindow::AddConstraintReference(wxWindow *otherWin)
1560 {
1561   if (!m_constraintsInvolvedIn)
1562     m_constraintsInvolvedIn = new wxList;
1563   if (!m_constraintsInvolvedIn->Member(otherWin))
1564     m_constraintsInvolvedIn->Append(otherWin);
1565 }
1566
1567 // REMOVE back-pointer to other windows we're involved with.
1568 void wxWindow::RemoveConstraintReference(wxWindow *otherWin)
1569 {
1570   if (m_constraintsInvolvedIn)
1571     m_constraintsInvolvedIn->DeleteObject(otherWin);
1572 }
1573
1574 // Reset any constraints that mention this window
1575 void wxWindow::DeleteRelatedConstraints()
1576 {
1577   if (m_constraintsInvolvedIn)
1578   {
1579     wxNode *node = m_constraintsInvolvedIn->First();
1580     while (node)
1581     {
1582       wxWindow *win = (wxWindow *)node->Data();
1583       wxNode *next = node->Next();
1584       wxLayoutConstraints *constr = win->GetConstraints();
1585
1586       // Reset any constraints involving this window
1587       if (constr)
1588       {
1589         constr->left.ResetIfWin((wxWindow *)this);
1590         constr->top.ResetIfWin((wxWindow *)this);
1591         constr->right.ResetIfWin((wxWindow *)this);
1592         constr->bottom.ResetIfWin((wxWindow *)this);
1593         constr->width.ResetIfWin((wxWindow *)this);
1594         constr->height.ResetIfWin((wxWindow *)this);
1595         constr->centreX.ResetIfWin((wxWindow *)this);
1596         constr->centreY.ResetIfWin((wxWindow *)this);
1597       }
1598       delete node;
1599       node = next;
1600     }
1601     delete m_constraintsInvolvedIn;
1602     m_constraintsInvolvedIn = NULL;
1603   }
1604 }
1605
1606 void wxWindow::SetSizer(wxSizer *sizer)
1607 {
1608   m_windowSizer = sizer;
1609   if (sizer)
1610     sizer->SetSizerParent((wxWindow *)this);
1611 }
1612
1613 /*
1614  * New version
1615  */
1616
1617 bool wxWindow::Layout()
1618 {
1619   if (GetConstraints())
1620   {
1621     int w, h;
1622     GetClientSize(&w, &h);
1623     GetConstraints()->width.SetValue(w);
1624     GetConstraints()->height.SetValue(h);
1625   }
1626
1627   // If top level (one sizer), evaluate the sizer's constraints.
1628   if (GetSizer())
1629   {
1630     int noChanges;
1631     GetSizer()->ResetConstraints();   // Mark all constraints as unevaluated
1632     GetSizer()->LayoutPhase1(&noChanges);
1633     GetSizer()->LayoutPhase2(&noChanges);
1634     GetSizer()->SetConstraintSizes(); // Recursively set the real window sizes
1635     return TRUE;
1636   }
1637   else
1638   {
1639     // Otherwise, evaluate child constraints
1640     ResetConstraints();   // Mark all constraints as unevaluated
1641     DoPhase(1);           // Just one phase need if no sizers involved
1642     DoPhase(2);
1643     SetConstraintSizes(); // Recursively set the real window sizes
1644   }
1645   return TRUE;
1646 }
1647
1648
1649 // Do a phase of evaluating constraints:
1650 // the default behaviour. wxSizers may do a similar
1651 // thing, but also impose their own 'constraints'
1652 // and order the evaluation differently.
1653 bool wxWindow::LayoutPhase1(int *noChanges)
1654 {
1655   wxLayoutConstraints *constr = GetConstraints();
1656   if (constr)
1657   {
1658     return constr->SatisfyConstraints((wxWindow *)this, noChanges);
1659   }
1660   else
1661     return TRUE;
1662 }
1663
1664 bool wxWindow::LayoutPhase2(int *noChanges)
1665 {
1666   *noChanges = 0;
1667
1668   // Layout children
1669   DoPhase(1);
1670   DoPhase(2);
1671   return TRUE;
1672 }
1673
1674 // Do a phase of evaluating child constraints
1675 bool wxWindow::DoPhase(int phase)
1676 {
1677   int noIterations = 0;
1678   int maxIterations = 500;
1679   int noChanges = 1;
1680   int noFailures = 0;
1681   wxList succeeded;
1682   while ((noChanges > 0) && (noIterations < maxIterations))
1683   {
1684     noChanges = 0;
1685     noFailures = 0;
1686     wxNode *node = GetChildren().First();
1687     while (node)
1688     {
1689       wxWindow *child = (wxWindow *)node->Data();
1690       if (!child->IsKindOf(CLASSINFO(wxFrame)) && !child->IsKindOf(CLASSINFO(wxDialog)))
1691       {
1692         wxLayoutConstraints *constr = child->GetConstraints();
1693         if (constr)
1694         {
1695           if (succeeded.Member(child))
1696           {
1697           }
1698           else
1699           {
1700             int tempNoChanges = 0;
1701             bool success = ( (phase == 1) ? child->LayoutPhase1(&tempNoChanges) : child->LayoutPhase2(&tempNoChanges) ) ;
1702             noChanges += tempNoChanges;
1703             if (success)
1704             {
1705               succeeded.Append(child);
1706             }
1707           }
1708         }
1709       }
1710       node = node->Next();
1711     }
1712     noIterations ++;
1713   }
1714   return TRUE;
1715 }
1716
1717 void wxWindow::ResetConstraints()
1718 {
1719   wxLayoutConstraints *constr = GetConstraints();
1720   if (constr)
1721   {
1722     constr->left.SetDone(FALSE);
1723     constr->top.SetDone(FALSE);
1724     constr->right.SetDone(FALSE);
1725     constr->bottom.SetDone(FALSE);
1726     constr->width.SetDone(FALSE);
1727     constr->height.SetDone(FALSE);
1728     constr->centreX.SetDone(FALSE);
1729     constr->centreY.SetDone(FALSE);
1730   }
1731   wxNode *node = GetChildren().First();
1732   while (node)
1733   {
1734     wxWindow *win = (wxWindow *)node->Data();
1735     if (!win->IsKindOf(CLASSINFO(wxFrame)) && !win->IsKindOf(CLASSINFO(wxDialog)))
1736       win->ResetConstraints();
1737     node = node->Next();
1738   }
1739 }
1740
1741 // Need to distinguish between setting the 'fake' size for
1742 // windows and sizers, and setting the real values.
1743 void wxWindow::SetConstraintSizes(bool recurse)
1744 {
1745   wxLayoutConstraints *constr = GetConstraints();
1746   if (constr && constr->left.GetDone() && constr->right.GetDone() &&
1747                 constr->width.GetDone() && constr->height.GetDone())
1748   {
1749     int x = constr->left.GetValue();
1750     int y = constr->top.GetValue();
1751     int w = constr->width.GetValue();
1752     int h = constr->height.GetValue();
1753
1754     // If we don't want to resize this window, just move it...
1755     if ((constr->width.GetRelationship() != wxAsIs) ||
1756         (constr->height.GetRelationship() != wxAsIs))
1757     {
1758       // Calls Layout() recursively. AAAGH. How can we stop that.
1759       // Simply take Layout() out of non-top level OnSizes.
1760       SizerSetSize(x, y, w, h);
1761     }
1762     else
1763     {
1764       SizerMove(x, y);
1765     }
1766   }
1767   else if (constr)
1768   {
1769     char *windowClass = this->GetClassInfo()->GetClassName();
1770
1771     wxString winName;
1772         if (GetName() == "")
1773                 winName = "unnamed";
1774         else
1775                 winName = GetName();
1776     wxDebugMsg("Constraint(s) not satisfied for window of type %s, name %s:\n", (const char *)windowClass, (const char *)winName);
1777     if (!constr->left.GetDone())
1778       wxDebugMsg("  unsatisfied 'left' constraint.\n");
1779     if (!constr->right.GetDone())
1780       wxDebugMsg("  unsatisfied 'right' constraint.\n");
1781     if (!constr->width.GetDone())
1782       wxDebugMsg("  unsatisfied 'width' constraint.\n");
1783     if (!constr->height.GetDone())
1784       wxDebugMsg("  unsatisfied 'height' constraint.\n");
1785     wxDebugMsg("Please check constraints: try adding AsIs() constraints.\n");
1786   }
1787
1788   if (recurse)
1789   {
1790     wxNode *node = GetChildren().First();
1791     while (node)
1792     {
1793       wxWindow *win = (wxWindow *)node->Data();
1794       if (!win->IsKindOf(CLASSINFO(wxFrame)) && !win->IsKindOf(CLASSINFO(wxDialog)))
1795         win->SetConstraintSizes();
1796       node = node->Next();
1797     }
1798   }
1799 }
1800
1801 // This assumes that all sizers are 'on' the same
1802 // window, i.e. the parent of this window.
1803 void wxWindow::TransformSizerToActual(int *x, int *y) const
1804 {
1805   if (!m_sizerParent || m_sizerParent->IsKindOf(CLASSINFO(wxDialog)) ||
1806                          m_sizerParent->IsKindOf(CLASSINFO(wxFrame)) )
1807     return;
1808
1809   int xp, yp;
1810   m_sizerParent->GetPosition(&xp, &yp);
1811   m_sizerParent->TransformSizerToActual(&xp, &yp);
1812   *x += xp;
1813   *y += yp;
1814 }
1815
1816 void wxWindow::SizerSetSize(int x, int y, int w, int h)
1817 {
1818         int xx = x;
1819         int yy = y;
1820   TransformSizerToActual(&xx, &yy);
1821   SetSize(xx, yy, w, h);
1822 }
1823
1824 void wxWindow::SizerMove(int x, int y)
1825 {
1826         int xx = x;
1827         int yy = y;
1828   TransformSizerToActual(&xx, &yy);
1829   Move(xx, yy);
1830 }
1831
1832 // Only set the size/position of the constraint (if any)
1833 void wxWindow::SetSizeConstraint(int x, int y, int w, int h)
1834 {
1835   wxLayoutConstraints *constr = GetConstraints();
1836   if (constr)
1837   {
1838     if (x != -1)
1839     {
1840       constr->left.SetValue(x);
1841       constr->left.SetDone(TRUE);
1842     }
1843     if (y != -1)
1844     {
1845       constr->top.SetValue(y);
1846       constr->top.SetDone(TRUE);
1847     }
1848     if (w != -1)
1849     {
1850       constr->width.SetValue(w);
1851       constr->width.SetDone(TRUE);
1852     }
1853     if (h != -1)
1854     {
1855       constr->height.SetValue(h);
1856       constr->height.SetDone(TRUE);
1857     }
1858   }
1859 }
1860
1861 void wxWindow::MoveConstraint(int x, int y)
1862 {
1863   wxLayoutConstraints *constr = GetConstraints();
1864   if (constr)
1865   {
1866     if (x != -1)
1867     {
1868       constr->left.SetValue(x);
1869       constr->left.SetDone(TRUE);
1870     }
1871     if (y != -1)
1872     {
1873       constr->top.SetValue(y);
1874       constr->top.SetDone(TRUE);
1875     }
1876   }
1877 }
1878
1879 void wxWindow::GetSizeConstraint(int *w, int *h) const
1880 {
1881   wxLayoutConstraints *constr = GetConstraints();
1882   if (constr)
1883   {
1884     *w = constr->width.GetValue();
1885     *h = constr->height.GetValue();
1886   }
1887   else
1888     GetSize(w, h);
1889 }
1890
1891 void wxWindow::GetClientSizeConstraint(int *w, int *h) const
1892 {
1893   wxLayoutConstraints *constr = GetConstraints();
1894   if (constr)
1895   {
1896     *w = constr->width.GetValue();
1897     *h = constr->height.GetValue();
1898   }
1899   else
1900     GetClientSize(w, h);
1901 }
1902
1903 void wxWindow::GetPositionConstraint(int *x, int *y) const
1904 {
1905   wxLayoutConstraints *constr = GetConstraints();
1906   if (constr)
1907   {
1908     *x = constr->left.GetValue();
1909     *y = constr->top.GetValue();
1910   }
1911   else
1912     GetPosition(x, y);
1913 }
1914
1915 bool wxWindow::Close(bool force)
1916 {
1917   wxCloseEvent event(wxEVT_CLOSE_WINDOW, m_windowId);
1918   event.SetEventObject(this);
1919   event.SetForce(force);
1920
1921   return GetEventHandler()->ProcessEvent(event);
1922 }
1923
1924 wxObject* wxWindow::GetChild(int number) const
1925 {
1926   // Return a pointer to the Nth object in the window
1927   wxNode *node = GetChildren().First();
1928   int n = number;
1929   while (node && n--)
1930     node = node->Next() ;
1931   if (node)
1932   {
1933     wxObject *obj = (wxObject *)node->Data();
1934     return(obj) ;
1935   }
1936   else
1937     return NULL ;
1938 }
1939
1940 void wxWindow::OnDefaultAction(wxControl *initiatingItem)
1941 {
1942     // Obsolete function
1943 }
1944
1945 void wxWindow::Clear()
1946 {
1947     wxClientDC dc(this);
1948     wxBrush brush(GetBackgroundColour(), wxSOLID);
1949     dc.SetBackground(brush);
1950     dc.Clear();
1951 }
1952
1953 // Fits the panel around the items
1954 void wxWindow::Fit()
1955 {
1956         int maxX = 0;
1957         int maxY = 0;
1958         wxNode *node = GetChildren().First();
1959         while ( node )
1960         {
1961                 wxWindow *win = (wxWindow *)node->Data();
1962                 int wx, wy, ww, wh;
1963                 win->GetPosition(&wx, &wy);
1964                 win->GetSize(&ww, &wh);
1965                 if ( wx + ww > maxX )
1966                         maxX = wx + ww;
1967                 if ( wy + wh > maxY )
1968                         maxY = wy + wh;
1969
1970                 node = node->Next();
1971         }
1972         SetClientSize(maxX + 5, maxY + 5);
1973 }
1974
1975 void wxWindow::SetValidator(const wxValidator& validator)
1976 {
1977         if ( m_windowValidator )
1978                 delete m_windowValidator;
1979         m_windowValidator = validator.Clone();
1980
1981         if ( m_windowValidator )
1982                 m_windowValidator->SetWindow(this) ;
1983 }
1984
1985 void wxWindow::SetClientObject( wxClientData *data )
1986 {
1987   if (m_clientObject) delete m_clientObject;
1988   m_clientObject = data;
1989 }
1990
1991 wxClientData *wxWindow::GetClientObject()
1992 {
1993   return m_clientObject;
1994 }
1995
1996 void wxWindow::SetClientData( void *data )
1997 {
1998   m_clientData = data;
1999 }
2000
2001 void *wxWindow::GetClientData()
2002 {
2003   return m_clientData;
2004 }
2005
2006 // Find a window by id or name
2007 wxWindow *wxWindow::FindWindow(long id)
2008 {
2009         if ( GetId() == id)
2010                 return this;
2011
2012         wxNode *node = GetChildren().First();
2013         while ( node )
2014         {
2015                 wxWindow *child = (wxWindow *)node->Data();
2016                 wxWindow *found = child->FindWindow(id);
2017                 if ( found )
2018                         return found;
2019                 node = node->Next();
2020         }
2021         return NULL;
2022 }
2023
2024 wxWindow *wxWindow::FindWindow(const wxString& name)
2025 {
2026         if ( GetName() == name)
2027                 return this;
2028
2029         wxNode *node = GetChildren().First();
2030         while ( node )
2031         {
2032                 wxWindow *child = (wxWindow *)node->Data();
2033                 wxWindow *found = child->FindWindow(name);
2034                 if ( found )
2035                         return found;
2036                 node = node->Next();
2037         }
2038         return NULL;
2039 }
2040
2041 void wxWindow::OnIdle(wxIdleEvent& event)
2042 {
2043     // This calls the UI-update mechanism (querying windows for
2044     // menu/toolbar/control state information)
2045     UpdateWindowUI();
2046 }
2047
2048 // Raise the window to the top of the Z order
2049 void wxWindow::Raise()
2050 {
2051     Window window = XtWindow((Widget) GetTopWidget());
2052     XRaiseWindow(XtDisplay((Widget) GetTopWidget()), window);
2053 }
2054
2055 // Lower the window to the bottom of the Z order
2056 void wxWindow::Lower()
2057 {
2058     Window window = XtWindow((Widget) GetTopWidget());
2059     XLowerWindow(XtDisplay((Widget) GetTopWidget()), window);
2060 }
2061
2062 bool wxWindow::AcceptsFocus() const
2063 {
2064   return IsShown() && IsEnabled();
2065 }
2066
2067 // Update region access
2068 wxRegion& wxWindow::GetUpdateRegion() const
2069 {
2070     return (wxRegion&) m_updateRegion;
2071 }
2072
2073 bool wxWindow::IsExposed(int x, int y, int w, int h) const
2074 {
2075     return (m_updateRegion.Contains(x, y, w, h) != wxOutRegion);
2076 }
2077
2078 bool wxWindow::IsExposed(const wxPoint& pt) const
2079 {
2080     return (m_updateRegion.Contains(pt) != wxOutRegion);
2081 }
2082
2083 bool wxWindow::IsExposed(const wxRect& rect) const
2084 {
2085     return (m_updateRegion.Contains(rect) != wxOutRegion);
2086 }
2087
2088 /*
2089  * Allocates control IDs
2090  */
2091
2092 int wxWindow::NewControlId()
2093 {
2094     static int s_controlId = 0;
2095     s_controlId ++;
2096     return s_controlId;
2097 }
2098
2099 void wxWindow::SetAcceleratorTable(const wxAcceleratorTable& accel)
2100 {
2101     m_acceleratorTable = accel;
2102 }
2103
2104 // All widgets should have this as their resize proc.
2105 // OnSize sent to wxWindow via client data.
2106 void wxWidgetResizeProc(Widget w, XConfigureEvent *event, String args[], int *num_args)
2107 {
2108     wxWindow *win = (wxWindow *)wxWidgetHashTable->Get((long)w);
2109     if (!win)
2110         return;
2111
2112     if (win->PreResize())
2113     {
2114         int width, height;
2115         win->GetSize(&width, &height);
2116         wxSizeEvent sizeEvent(wxSize(width, height), win->GetId());
2117         sizeEvent.SetEventObject(win);
2118         win->GetEventHandler()->ProcessEvent(sizeEvent);
2119     }
2120 }
2121
2122 bool wxAddWindowToTable(Widget w, wxWindow *win)
2123 {
2124   wxWindow *oldItem = NULL;
2125 //  printf("Adding widget %ld, name = %s\n", w, win->GetClassInfo()->GetClassName());
2126   if ((oldItem = (wxWindow *)wxWidgetHashTable->Get ((long) w)))
2127   {
2128     char buf[300];
2129     sprintf(buf, "Widget table clash: new widget is %ld, %s", (long)w, win->GetClassInfo()->GetClassName());
2130     wxError (buf);
2131     fflush(stderr);
2132     sprintf(buf, "Old widget was %s", oldItem->GetClassInfo()->GetClassName());
2133     wxError (buf);
2134     return FALSE;
2135   }
2136
2137   wxWidgetHashTable->Put ((long) w, win);
2138   return TRUE;
2139 }
2140
2141 wxWindow *wxGetWindowFromTable(Widget w)
2142 {
2143   return (wxWindow *)wxWidgetHashTable->Get ((long) w);
2144 }
2145
2146 void wxDeleteWindowFromTable(Widget w)
2147 {
2148   wxWidgetHashTable->Delete((long)w);
2149 }
2150
2151 // Get the underlying X window and display
2152 WXWindow wxWindow::GetXWindow() const
2153 {
2154     return (WXWindow) XtWindow((Widget) GetMainWidget());
2155 }
2156
2157 WXDisplay *wxWindow::GetXDisplay() const
2158 {
2159     return (WXDisplay*) XtDisplay((Widget) GetMainWidget());
2160 }
2161
2162 WXWidget wxWindow::GetMainWidget() const
2163 {
2164     if (m_drawingArea)
2165       return m_drawingArea;
2166     else
2167       return m_mainWidget;
2168 }
2169
2170 WXWidget wxWindow::GetClientWidget() const
2171 {
2172     if (m_drawingArea != (WXWidget) 0)
2173         return m_drawingArea;
2174     else
2175         return GetMainWidget();
2176 }
2177
2178 WXWidget wxWindow::GetTopWidget() const
2179 {
2180     return GetMainWidget();
2181 }
2182
2183 void wxCanvasRepaintProc (Widget drawingArea, XtPointer clientData,
2184  XmDrawingAreaCallbackStruct * cbs)
2185 {
2186     if (!wxWidgetHashTable->Get ((long) (Widget) drawingArea))
2187             return;
2188
2189     XEvent * event = cbs->event;
2190     wxWindow * win = (wxWindow *) clientData;
2191     Display * display = (Display *) win->GetXDisplay();
2192
2193     switch (event->type)
2194     {
2195         case Expose:
2196         {
2197             wxRect* rect = new wxRect(event->xexpose.x, event->xexpose.y,
2198                                        event->xexpose.width, event->xexpose.height);
2199             /*
2200             cout << "Expose proc. wxRect: " << rect->x << ", " << rect->y << ", ";
2201             cout << rect->width << ", " << rect->height << "\n\n";
2202             */
2203
2204             win->m_updateRects.Append((wxObject*) rect);
2205
2206             if (event -> xexpose.count == 0)
2207             {
2208                 wxPaintEvent event(win->GetId());
2209                 event.SetEventObject(win);
2210                 win->GetEventHandler()->ProcessEvent(event);
2211
2212                 win->ClearUpdateRects();
2213             }
2214             break;
2215         }
2216         default:
2217         {
2218                 cout << "\n\nNew Event ! is = " << event -> type << "\n";
2219                 break;
2220         }
2221     }
2222 }
2223
2224 // Unable to deal with Enter/Leave without a separate EventHandler (Motif 1.1.4)
2225 void
2226 wxCanvasEnterLeave (Widget drawingArea, XtPointer clientData, XCrossingEvent * event)
2227 {
2228   XmDrawingAreaCallbackStruct cbs;
2229   XEvent ev;
2230
2231   //if (event->mode!=NotifyNormal)
2232   //  return ;
2233
2234 //  ev = *((XEvent *) event); // Causes Purify error (copying too many bytes)
2235   ((XCrossingEvent &) ev) = *event;
2236
2237   cbs.reason = XmCR_INPUT;
2238   cbs.event = &ev;
2239
2240   wxCanvasInputEvent (drawingArea, (XtPointer) NULL, &cbs);
2241 }
2242
2243 // Fix to make it work under Motif 1.0 (!)
2244 void wxCanvasMotionEvent (Widget drawingArea, XButtonEvent * event)
2245 {
2246 #if   XmVersion<=1000
2247
2248   XmDrawingAreaCallbackStruct cbs;
2249   XEvent ev;
2250
2251   //ev.xbutton = *event;
2252   ev = *((XEvent *) event);
2253   cbs.reason = XmCR_INPUT;
2254   cbs.event = &ev;
2255
2256   wxCanvasInputEvent (drawingArea, (XtPointer) NULL, &cbs);
2257 #endif
2258 }
2259
2260 void wxCanvasInputEvent (Widget drawingArea, XtPointer data, XmDrawingAreaCallbackStruct * cbs)
2261 {
2262   wxWindow *canvas = (wxWindow *) wxWidgetHashTable->Get ((long) (Widget) drawingArea);
2263   XEvent local_event;
2264
2265   if (canvas==NULL)
2266     return ;
2267
2268   if (cbs->reason != XmCR_INPUT)
2269     return;
2270
2271   local_event = *(cbs->event);  // We must keep a copy!
2272
2273   /*
2274   switch (local_event.xany.type)
2275     {
2276     case EnterNotify:
2277       cout << "EnterNotify\n";
2278       break;
2279     case LeaveNotify:
2280       cout << "LeaveNotify\n";
2281       break;
2282     case ButtonPress:
2283       cout << "ButtonPress\n";
2284       break;
2285     case ButtonRelease:
2286       cout << "ButtonRelease\n";
2287       break;
2288     case MotionNotify:
2289       cout << "MotionNotify\n";
2290       break;
2291     default:
2292       cout << "Something else\n";
2293       break;
2294   }
2295   */
2296
2297   switch (local_event.xany.type)
2298     {
2299     case EnterNotify:
2300     case LeaveNotify:
2301     case ButtonPress:
2302     case ButtonRelease:
2303     case MotionNotify:
2304       {
2305         wxEventType eventType = wxEVT_NULL;
2306
2307         if (local_event.xany.type == EnterNotify)
2308           {
2309             //if (local_event.xcrossing.mode!=NotifyNormal)
2310             //  return ; // Ignore grab events
2311             eventType = wxEVT_ENTER_WINDOW;
2312 //            canvas->GetEventHandler()->OnSetFocus();
2313           }
2314         else if (local_event.xany.type == LeaveNotify)
2315           {
2316             //if (local_event.xcrossing.mode!=NotifyNormal)
2317             //  return ; // Ignore grab events
2318             eventType = wxEVT_LEAVE_WINDOW;
2319 //            canvas->GetEventHandler()->OnKillFocus();
2320           }
2321         else if (local_event.xany.type == MotionNotify)
2322           {
2323             eventType = wxEVT_MOTION;
2324             if (local_event.xmotion.is_hint == NotifyHint)
2325               {
2326                 Window root, child;
2327                 Display *dpy = XtDisplay (drawingArea);
2328
2329                 XQueryPointer (dpy, XtWindow (drawingArea),
2330                                &root, &child,
2331                                &local_event.xmotion.x_root,
2332                                &local_event.xmotion.y_root,
2333                                &local_event.xmotion.x,
2334                                &local_event.xmotion.y,
2335                                &local_event.xmotion.state);
2336               }
2337             else
2338               {
2339               }
2340           }
2341
2342         else if (local_event.xany.type == ButtonPress)
2343           {
2344             if (local_event.xbutton.button == Button1)
2345               {
2346                 eventType = wxEVT_LEFT_DOWN;
2347                 canvas->m_button1Pressed = TRUE;
2348               }
2349             else if (local_event.xbutton.button == Button2)
2350               {
2351                 eventType = wxEVT_MIDDLE_DOWN;
2352                 canvas->m_button2Pressed = TRUE;
2353               }
2354             else if (local_event.xbutton.button == Button3)
2355               {
2356                 eventType = wxEVT_RIGHT_DOWN;
2357                 canvas->m_button3Pressed = TRUE;
2358               }
2359           }
2360         else if (local_event.xany.type == ButtonRelease)
2361           {
2362             if (local_event.xbutton.button == Button1)
2363               {
2364                 eventType = wxEVT_LEFT_UP;
2365                 canvas->m_button1Pressed = FALSE;
2366               }
2367             else if (local_event.xbutton.button == Button2)
2368               {
2369                 eventType = wxEVT_MIDDLE_UP;
2370                 canvas->m_button2Pressed = FALSE;
2371               }
2372             else if (local_event.xbutton.button == Button3)
2373               {
2374                 eventType = wxEVT_RIGHT_UP;
2375                 canvas->m_button3Pressed = FALSE;
2376               }
2377           }
2378
2379         wxMouseEvent wxevent (eventType);
2380         wxevent.m_eventHandle = (char *) &local_event;
2381
2382         wxevent.m_leftDown = ((eventType == wxEVT_LEFT_DOWN)
2383                             || (event_left_is_down (&local_event)
2384                                 && (eventType != wxEVT_LEFT_UP)));
2385         wxevent.m_middleDown = ((eventType == wxEVT_MIDDLE_DOWN)
2386                               || (event_middle_is_down (&local_event)
2387                                   && (eventType != wxEVT_MIDDLE_UP)));
2388         wxevent.m_rightDown = ((eventType == wxEVT_RIGHT_DOWN)
2389                              || (event_right_is_down (&local_event)
2390                                  && (eventType != wxEVT_RIGHT_UP)));
2391
2392         wxevent.m_shiftDown = local_event.xbutton.state & ShiftMask;
2393         wxevent.m_controlDown = local_event.xbutton.state & ControlMask;
2394         wxevent.m_altDown = local_event.xbutton.state & Mod3Mask;
2395         wxevent.m_metaDown = local_event.xbutton.state & Mod1Mask;
2396         wxevent.SetTimestamp(local_event.xbutton.time);
2397
2398     // Now check if we need to translate this event into a double click
2399     if (TRUE) // canvas->doubleClickAllowed)
2400     {
2401        if (wxevent.ButtonDown())
2402        {
2403              long dclickTime = XtGetMultiClickTime((Display*) wxGetDisplay()) ;
2404
2405              // get button and time-stamp
2406              int button = 0;
2407              if      (wxevent.LeftDown())   button = 1;
2408              else if (wxevent.MiddleDown()) button = 2;
2409              else if (wxevent.RightDown())  button = 3;
2410              long ts = wxevent.GetTimestamp();
2411              // check, if single or double click
2412              if (canvas->m_lastButton && canvas->m_lastButton==button && (ts - canvas->m_lastTS) < dclickTime)
2413                {
2414                 // I have a dclick
2415                  canvas->m_lastButton = 0;
2416                  switch ( eventType )
2417                    {
2418                    case wxEVT_LEFT_DOWN:
2419                      wxevent.SetEventType(wxEVT_LEFT_DCLICK);
2420                      break;
2421                    case wxEVT_MIDDLE_DOWN:
2422                      wxevent.SetEventType(wxEVT_MIDDLE_DCLICK);
2423                      break;
2424                    case wxEVT_RIGHT_DOWN:
2425                      wxevent.SetEventType(wxEVT_RIGHT_DCLICK);
2426                      break;
2427
2428                    default :
2429                      break;
2430                    }
2431
2432                }
2433              else
2434                {
2435                  // not fast enough or different button
2436                  canvas->m_lastTS     = ts;
2437                  canvas->m_lastButton = button;
2438                }
2439        }
2440     }
2441
2442         wxevent.SetId(canvas->GetId());
2443         wxevent.SetEventObject(canvas);
2444         wxevent.m_x = local_event.xbutton.x;
2445         wxevent.m_y = local_event.xbutton.y;
2446         canvas->GetEventHandler()->ProcessEvent (wxevent);
2447         /*
2448         if (eventType == wxEVT_ENTER_WINDOW ||
2449             eventType == wxEVT_LEAVE_WINDOW ||
2450             eventType == wxEVT_MOTION
2451           )
2452           return;
2453           */
2454         break;
2455       }
2456     case KeyPress:
2457       {
2458         KeySym keySym;
2459 //      XComposeStatus compose;
2460 //      (void) XLookupString ((XKeyEvent *) & local_event, wxBuffer, 20, &keySym, &compose);
2461         (void) XLookupString ((XKeyEvent *) & local_event, wxBuffer, 20, &keySym, NULL);
2462         int id = wxCharCodeXToWX (keySym);
2463
2464         wxKeyEvent event (wxEVT_CHAR);
2465
2466         if (local_event.xkey.state & ShiftMask)
2467           event.m_shiftDown = TRUE;
2468         if (local_event.xkey.state & ControlMask)
2469           event.m_controlDown = TRUE;
2470         if (local_event.xkey.state & Mod3Mask)
2471           event.m_altDown = TRUE;
2472         if (local_event.xkey.state & Mod1Mask)
2473           event.m_metaDown = TRUE;
2474         event.SetEventObject(canvas);
2475         event.m_keyCode = id;
2476         event.SetTimestamp(local_event.xkey.time);
2477
2478         if (id > -1)
2479         {
2480           // Implement wxFrame::OnCharHook by checking ancestor.
2481           wxWindow *parent = canvas->GetParent();
2482           while (parent && !parent->IsKindOf(CLASSINFO(wxFrame)))
2483             parent = parent->GetParent();
2484
2485           if (parent)
2486           {
2487             event.SetEventType(wxEVT_CHAR_HOOK);
2488             if (parent->GetEventHandler()->ProcessEvent(event))
2489               return;
2490             event.SetEventType(wxEVT_CHAR);
2491           }
2492
2493           canvas->GetEventHandler()->ProcessEvent (event);
2494         }
2495         break;
2496       }
2497     case FocusIn:
2498       {
2499         if (local_event.xfocus.detail != NotifyPointer)
2500         {
2501           wxFocusEvent event(wxEVT_SET_FOCUS, canvas->GetId());
2502           event.SetEventObject(canvas);
2503           canvas->GetEventHandler()->ProcessEvent(event);
2504         }
2505         break;
2506       }
2507     case FocusOut:
2508       {
2509         if (local_event.xfocus.detail != NotifyPointer)
2510         {
2511           wxFocusEvent event(wxEVT_KILL_FOCUS, canvas->GetId());
2512           event.SetEventObject(canvas);
2513           canvas->GetEventHandler()->ProcessEvent(event);
2514         }
2515         break;
2516       }
2517     default:
2518       break;
2519     }
2520 }
2521
2522 void wxWindow::DoPaint()
2523 {
2524   //TODO : make a temporary gc so we can do the XCopyArea below
2525   if (0) // m_backingPixmap)
2526     {
2527       /*
2528       Widget drawingArea = (Widget) m_drawingArea;
2529       //      int orig = GetDC()->GetLogicalFunction();
2530       //      GetDC()->SetLogicalFunction (wxCOPY);
2531
2532       // TODO: it may not be necessary to store m_pixmapOffsetX/Y; we
2533       // should be able to calculate them.
2534       XCopyArea (XtDisplay (drawingArea), m_backingPixmap, XtWindow (drawingArea), GetDC ()->gc,
2535                  m_pixmapOffsetX, m_pixmapOffsetY,
2536                  m_pixmapWidth, m_pixmapHeight,
2537                  0, 0);
2538
2539       //      GetDC()->SetLogicalFunction (orig);
2540       */
2541     }
2542   else
2543     {
2544         wxPaintEvent event(GetId());
2545         event.SetEventObject(this);
2546         GetEventHandler()->ProcessEvent(event);
2547     }
2548 }
2549
2550 // SetSize, but as per old wxCanvas (with drawing widget etc.)
2551 void wxWindow::CanvasSetSize (int x, int y, int w, int h, int sizeFlags)
2552 {
2553   // A bit of optimization to help sort out the flickers.
2554   int oldX, oldY, oldW, oldH;
2555   GetSize(& oldW, & oldH);
2556   GetPosition(& oldX, & oldY);
2557
2558   bool useOldPos = FALSE;
2559   bool useOldSize = FALSE;
2560
2561   if ((x == -1) && (x == -1) && ((sizeFlags & wxSIZE_ALLOW_MINUS_ONE) == 0))
2562     useOldPos = TRUE;
2563   else if (x == oldX && y == oldY)
2564     useOldPos = TRUE;
2565
2566   if ((w == -1) && (h == -1))
2567     useOldSize = TRUE;
2568   else if (w == oldW && h == oldH)
2569     useOldSize = TRUE;
2570
2571   if (useOldPos && useOldSize)
2572     return;
2573
2574   Widget drawingArea = (Widget) m_drawingArea;
2575   bool managed = XtIsManaged(m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow);
2576
2577   if (managed)
2578     XtUnmanageChild (m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow);
2579   XtVaSetValues((Widget) m_drawingArea, XmNresizePolicy, XmRESIZE_ANY, NULL);
2580
2581   int xx = x; int yy = y;
2582   AdjustForParentClientOrigin(xx, yy, sizeFlags);
2583
2584   if (!useOldPos)
2585   {
2586     if (x > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
2587     {
2588       XtVaSetValues (m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow,
2589                      XmNx, xx, NULL);
2590     }
2591
2592     if (y > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
2593     {
2594       XtVaSetValues (m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow,
2595                      XmNy, yy, NULL);
2596     }
2597   }
2598
2599   if (!useOldSize)
2600   {
2601
2602     if (w > -1)
2603     {
2604       if (m_borderWidget)
2605         {
2606           XtVaSetValues ((Widget) m_borderWidget, XmNwidth, w, NULL);
2607           short thick, margin;
2608           XtVaGetValues ((Widget) m_borderWidget,
2609                          XmNshadowThickness, &thick,
2610                          XmNmarginWidth, &margin,
2611                          NULL);
2612           w -= 2 * (thick + margin);
2613         }
2614
2615       XtVaSetValues ((Widget) m_scrolledWindow, XmNwidth, w, NULL);
2616
2617       Dimension spacing;
2618       Widget sbar;
2619       XtVaGetValues ((Widget) m_scrolledWindow,
2620                      XmNspacing, &spacing,
2621                      XmNverticalScrollBar, &sbar,
2622                      NULL);
2623       Dimension wsbar;
2624       if (sbar)
2625         XtVaGetValues (sbar, XmNwidth, &wsbar, NULL);
2626       else
2627         wsbar = 0;
2628
2629       w -= (spacing + wsbar);
2630
2631       XtVaSetValues ((Widget) m_drawingArea, XmNwidth, w, NULL);
2632     }
2633   if (h > -1)
2634     {
2635       if (m_borderWidget)
2636         {
2637           XtVaSetValues ((Widget) m_borderWidget, XmNheight, h, NULL);
2638           short thick, margin;
2639           XtVaGetValues ((Widget) m_borderWidget,
2640                          XmNshadowThickness, &thick,
2641                          XmNmarginHeight, &margin,
2642                          NULL);
2643           h -= 2 * (thick + margin);
2644         }
2645
2646       XtVaSetValues ((Widget) m_scrolledWindow, XmNheight, h, NULL);
2647
2648       Dimension spacing;
2649       Widget sbar;
2650       XtVaGetValues ((Widget) m_scrolledWindow,
2651                      XmNspacing, &spacing,
2652                      XmNhorizontalScrollBar, &sbar,
2653                      NULL);
2654       Dimension wsbar;
2655       if (sbar)
2656         XtVaGetValues (sbar, XmNheight, &wsbar, NULL);
2657       else
2658         wsbar = 0;
2659
2660       h -= (spacing + wsbar);
2661
2662       XtVaSetValues ((Widget) m_drawingArea, XmNheight, h, NULL);
2663     }
2664   }
2665
2666   if (managed)
2667     XtManageChild (m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow);
2668   XtVaSetValues((Widget) m_drawingArea, XmNresizePolicy, XmRESIZE_NONE, NULL);
2669
2670   /*
2671   int ww, hh;
2672   GetClientSize (&ww, &hh);
2673   wxSizeEvent sizeEvent(wxSize(ww, hh), GetId());
2674   sizeEvent.SetEventObject(this);
2675
2676   GetEventHandler()->ProcessEvent(sizeEvent);
2677   */
2678
2679 }
2680
2681 void wxWindow::CanvasSetClientSize (int w, int h)
2682 {
2683   Widget drawingArea = (Widget) m_drawingArea;
2684
2685   XtVaSetValues((Widget) m_drawingArea, XmNresizePolicy, XmRESIZE_ANY, NULL);
2686
2687   if (w > -1)
2688     XtVaSetValues ((Widget) m_drawingArea, XmNwidth, w, NULL);
2689   if (h > -1)
2690     XtVaSetValues ((Widget) m_drawingArea, XmNheight, h, NULL);
2691   /* TODO: is this necessary?
2692   allowRepainting = FALSE;
2693
2694   XSync (XtDisplay (drawingArea), FALSE);
2695   XEvent event;
2696   while (XtAppPending (wxTheApp->appContext))
2697     {
2698       XFlush (XtDisplay (drawingArea));
2699       XtAppNextEvent (wxTheApp->appContext, &event);
2700       XtDispatchEvent (&event);
2701     }
2702     */
2703
2704   XtVaSetValues((Widget) m_drawingArea, XmNresizePolicy, XmRESIZE_NONE, NULL);
2705
2706   /* TODO
2707   allowRepainting = TRUE;
2708   DoRefresh ();
2709   */
2710
2711   /*
2712   wxSizeEvent sizeEvent(wxSize(w, h), GetId());
2713   sizeEvent.SetEventObject(this);
2714
2715   GetEventHandler()->ProcessEvent(sizeEvent);
2716   */
2717 }
2718
2719 void wxWindow::CanvasGetClientSize (int *w, int *h) const
2720 {
2721   // Must return the same thing that was set via SetClientSize
2722   Dimension xx, yy;
2723   XtVaGetValues ((Widget) m_drawingArea, XmNwidth, &xx, XmNheight, &yy, NULL);
2724   *w = xx;
2725   *h = yy;
2726 }
2727
2728 void wxWindow::CanvasGetSize (int *w, int *h) const
2729 {
2730   Dimension xx, yy;
2731   if ((Widget) m_borderWidget)
2732     XtVaGetValues ((Widget) m_borderWidget, XmNwidth, &xx, XmNheight, &yy, NULL);
2733   else if ((Widget) m_scrolledWindow)
2734     XtVaGetValues ((Widget) m_scrolledWindow, XmNwidth, &xx, XmNheight, &yy, NULL);
2735   else
2736     XtVaGetValues ((Widget) m_drawingArea, XmNwidth, &xx, XmNheight, &yy, NULL);
2737
2738   *w = xx;
2739   *h = yy;
2740 }
2741
2742 void wxWindow::CanvasGetPosition (int *x, int *y) const
2743 {
2744     Position xx, yy;
2745     XtVaGetValues (m_borderWidget ? (Widget) m_borderWidget : (Widget) m_scrolledWindow, XmNx, &xx, XmNy, &yy, NULL);
2746
2747     // We may be faking the client origin.
2748     // So a window that's really at (0, 30) may appear
2749     // (to wxWin apps) to be at (0, 0).
2750     if (GetParent())
2751     {
2752         wxPoint pt(GetParent()->GetClientAreaOrigin());
2753         xx -= pt.x;
2754         yy -= pt.y;
2755     }
2756
2757     *x = xx;
2758     *y = yy;
2759 }
2760
2761 // Add to hash table, add event handler
2762 bool wxWindow::AttachWidget (wxWindow* parent, WXWidget mainWidget,
2763               WXWidget formWidget, int x, int y, int width, int height)
2764 {
2765     wxAddWindowToTable((Widget) mainWidget, this);
2766     if (CanAddEventHandler())
2767     {
2768         XtAddEventHandler((Widget) mainWidget,
2769           ButtonPressMask | ButtonReleaseMask | PointerMotionMask, // | KeyPressMask,
2770         False,
2771         wxPanelItemEventHandler,
2772         (XtPointer) this);
2773     }
2774
2775     if (!formWidget)
2776     {
2777         XtTranslations ptr;
2778         XtOverrideTranslations ((Widget) mainWidget,
2779                ptr = XtParseTranslationTable ("<Configure>: resize()"));
2780         XtFree ((char *) ptr);
2781     }
2782
2783     // Some widgets have a parent form widget, e.g. wxRadioBox
2784     if (formWidget)
2785     {
2786       if (!wxAddWindowToTable((Widget) formWidget, this))
2787         return FALSE;
2788
2789       XtTranslations ptr;
2790       XtOverrideTranslations ((Widget) formWidget,
2791                    ptr = XtParseTranslationTable ("<Configure>: resize()"));
2792       XtFree ((char *) ptr);
2793     }
2794
2795     if (x == -1)
2796       x = 0;
2797     if (y == -1)
2798       y = 0;
2799     SetSize (x, y, width, height);
2800
2801     return TRUE;
2802 }
2803
2804 // Remove event handler, remove from hash table
2805 bool wxWindow::DetachWidget(WXWidget widget)
2806 {
2807     if (CanAddEventHandler())
2808     {
2809       XtRemoveEventHandler((Widget) widget,
2810          ButtonPressMask | ButtonReleaseMask | PointerMotionMask, // | KeyPressMask,
2811          False,
2812          wxPanelItemEventHandler,
2813          (XtPointer)this);
2814     }
2815
2816     wxDeleteWindowFromTable((Widget) widget);
2817     return TRUE;
2818 }
2819
2820 void wxPanelItemEventHandler (Widget    wid,
2821                               XtPointer client_data,
2822                               XEvent*   event,
2823                               Boolean *continueToDispatch)
2824 {
2825   // Widget can be a label or the actual widget.
2826
2827   wxWindow *window = (wxWindow *)wxWidgetHashTable->Get((long)wid);
2828   if (window)
2829   {
2830     wxMouseEvent wxevent(0);
2831     if (wxTranslateMouseEvent(wxevent, window, wid, event))
2832     {
2833       window->GetEventHandler()->ProcessEvent(wxevent);
2834     }
2835   }
2836   // TODO: probably the key to allowing default behaviour
2837   // to happen.
2838   // Say we set a m_doDefault flag to FALSE at the start of this
2839   // function. Then in e.g. wxWindow::OnMouseEvent we can
2840   // call Default() which sets this flag to TRUE, indicating
2841   // that default processing can happen. Thus, behaviour can appear
2842   // to be overridden just by adding an event handler and not calling
2843   // wxWindow::OnWhatever.
2844   // ALSO, maybe we can use this instead of the current way of handling
2845   // drawing area events, to simplify things.
2846   *continueToDispatch = True;
2847 }
2848
2849 static void wxScrollBarCallback(Widget scrollbar, XtPointer clientData,
2850                         XmScaleCallbackStruct *cbs)
2851 {
2852     Widget scrolledWindow = XtParent (scrollbar);
2853     wxWindow *win = (wxWindow *) wxWidgetHashTable->Get ((long) scrolledWindow);
2854     int orientation = (int) clientData;
2855
2856     wxEventType eventType = wxEVT_NULL;
2857     switch (cbs->reason)
2858     {
2859         case XmCR_INCREMENT:
2860         {
2861             eventType = wxEVT_SCROLL_LINEDOWN;
2862             break;
2863         }
2864         case XmCR_DECREMENT:
2865         {
2866             eventType = wxEVT_SCROLL_LINEUP;
2867             break;
2868         }
2869         case XmCR_DRAG:
2870         {
2871             eventType = wxEVT_SCROLL_THUMBTRACK;
2872             break;
2873         }
2874         case XmCR_VALUE_CHANGED:
2875         {
2876             // TODO: Should this be intercepted too, or will it cause
2877             // duplicate events?
2878             eventType = wxEVT_SCROLL_THUMBTRACK;
2879             break;
2880         }
2881         case XmCR_PAGE_INCREMENT:
2882         {
2883             eventType = wxEVT_SCROLL_PAGEDOWN;
2884             break;
2885         }
2886         case XmCR_PAGE_DECREMENT:
2887         {
2888             eventType = wxEVT_SCROLL_PAGEUP;
2889             break;
2890         }
2891         case XmCR_TO_TOP:
2892         {
2893             eventType = wxEVT_SCROLL_TOP;
2894             break;
2895         }
2896         case XmCR_TO_BOTTOM:
2897         {
2898             eventType = wxEVT_SCROLL_BOTTOM;
2899             break;
2900         }
2901         default:
2902         {
2903             // Should never get here
2904             wxFAIL_MSG("Unknown scroll event.");
2905             break;
2906         }
2907     }
2908
2909     wxScrollEvent event(eventType, win->GetId());
2910     event.SetEventObject(win);
2911     event.SetPosition(cbs->value);
2912     event.SetOrientation( (orientation == XmHORIZONTAL) ? wxHORIZONTAL : wxVERTICAL );
2913
2914     win->GetEventHandler()->ProcessEvent(event);
2915 }
2916
2917 bool wxTranslateMouseEvent(wxMouseEvent& wxevent, wxWindow *win, Widget widget, XEvent *xevent)
2918 {
2919   switch (xevent->xany.type)
2920   {
2921     case EnterNotify:
2922     case LeaveNotify:
2923     case ButtonPress:
2924     case ButtonRelease:
2925     case MotionNotify:
2926       {
2927         wxEventType eventType = wxEVT_NULL;
2928
2929         if (xevent->xany.type == LeaveNotify)
2930         {
2931           win->m_button1Pressed = FALSE;
2932           win->m_button2Pressed = FALSE;
2933           win->m_button3Pressed = FALSE;
2934           return FALSE;
2935         }
2936         else if (xevent->xany.type == MotionNotify)
2937           {
2938             eventType = wxEVT_MOTION;
2939           }
2940         else if (xevent->xany.type == ButtonPress)
2941           {
2942             if (xevent->xbutton.button == Button1)
2943               {
2944                 eventType = wxEVT_LEFT_DOWN;
2945                 win->m_button1Pressed = TRUE;
2946               }
2947             else if (xevent->xbutton.button == Button2)
2948               {
2949                 eventType = wxEVT_MIDDLE_DOWN;
2950                 win->m_button2Pressed = TRUE;
2951               }
2952             else if (xevent->xbutton.button == Button3)
2953               {
2954                 eventType = wxEVT_RIGHT_DOWN;
2955                 win->m_button3Pressed = TRUE;
2956               }
2957           }
2958         else if (xevent->xany.type == ButtonRelease)
2959           {
2960             if (xevent->xbutton.button == Button1)
2961               {
2962                 eventType = wxEVT_LEFT_UP;
2963                 win->m_button1Pressed = FALSE;
2964               }
2965             else if (xevent->xbutton.button == Button2)
2966               {
2967                 eventType = wxEVT_MIDDLE_UP;
2968                 win->m_button2Pressed = FALSE;
2969               }
2970             else if (xevent->xbutton.button == Button3)
2971               {
2972                 eventType = wxEVT_RIGHT_UP;
2973                 win->m_button3Pressed = FALSE;
2974               }
2975             else return FALSE;
2976           }
2977           else return FALSE;
2978
2979         wxevent.m_eventHandle = (char *)xevent;
2980         wxevent.SetEventType(eventType);
2981
2982         Position x1, y1;
2983         XtVaGetValues(widget, XmNx, &x1, XmNy, &y1, NULL);
2984
2985         int x2, y2;
2986         win->GetPosition(&x2, &y2);
2987
2988         // The button x/y must be translated to wxWindows
2989         // window space - the widget might be a label or button,
2990         // within a form.
2991         int dx = 0;
2992         int dy = 0;
2993         if (widget != (Widget)win->GetMainWidget())
2994         {
2995           dx = x1;
2996           dy = y1;
2997         }
2998
2999         wxevent.m_x = xevent->xbutton.x + dx;
3000         wxevent.m_y = xevent->xbutton.y + dy;
3001
3002         wxevent.m_leftDown = ((eventType == wxEVT_LEFT_DOWN)
3003                             || (event_left_is_down (xevent)
3004                                 && (eventType != wxEVT_LEFT_UP)));
3005         wxevent.m_middleDown = ((eventType == wxEVT_MIDDLE_DOWN)
3006                               || (event_middle_is_down (xevent)
3007                                   && (eventType != wxEVT_MIDDLE_UP)));
3008         wxevent.m_rightDown = ((eventType == wxEVT_RIGHT_DOWN)
3009                              || (event_right_is_down (xevent)
3010                                  && (eventType != wxEVT_RIGHT_UP)));
3011
3012         wxevent.m_shiftDown = xevent->xbutton.state & ShiftMask;
3013         wxevent.m_controlDown = xevent->xbutton.state & ControlMask;
3014         return TRUE;
3015     }
3016   }
3017   return FALSE;
3018 }
3019
3020 bool wxTranslateKeyEvent(wxKeyEvent& wxevent, wxWindow *win, Widget widget, XEvent *xevent)
3021 {
3022   switch (xevent->xany.type)
3023   {
3024     case KeyPress:
3025       {
3026         char buf[20];
3027
3028         KeySym keySym;
3029 //      XComposeStatus compose;
3030 //      (void) XLookupString ((XKeyEvent *) xevent, buf, 20, &keySym, &compose);
3031         (void) XLookupString ((XKeyEvent *) xevent, buf, 20, &keySym, NULL);
3032         int id = wxCharCodeXToWX (keySym);
3033
3034         if (xevent->xkey.state & ShiftMask)
3035           wxevent.m_shiftDown = TRUE;
3036         if (xevent->xkey.state & ControlMask)
3037           wxevent.m_controlDown = TRUE;
3038         if (xevent->xkey.state & Mod3Mask)
3039           wxevent.m_altDown = TRUE;
3040         if (xevent->xkey.state & Mod1Mask)
3041           wxevent.m_metaDown = TRUE;
3042         wxevent.SetEventObject(win);
3043         wxevent.m_keyCode = id;
3044         wxevent.SetTimestamp(xevent->xkey.time);
3045
3046         wxevent.m_x = xevent->xbutton.x;
3047         wxevent.m_y = xevent->xbutton.y;
3048
3049         if (id > -1)
3050           return TRUE;
3051         else
3052           return FALSE;
3053         break;
3054       }
3055     default:
3056       break;
3057   }
3058   return FALSE;
3059 }
3060
3061 #define YAllocColor XAllocColor
3062 XColor g_itemColors[5];
3063 int wxComputeColours (Display *display, wxColour * back, wxColour * fore)
3064 {
3065   int result;
3066   static XmColorProc colorProc;
3067
3068   result = wxNO_COLORS;
3069
3070   if (back)
3071     {
3072       g_itemColors[0].red = (((long) back->Red ()) << 8);
3073       g_itemColors[0].green = (((long) back->Green ()) << 8);
3074       g_itemColors[0].blue = (((long) back->Blue ()) << 8);
3075       g_itemColors[0].flags = DoRed | DoGreen | DoBlue;
3076       if (colorProc == (XmColorProc) NULL)
3077         {
3078           // Get a ptr to the actual function
3079           colorProc = XmSetColorCalculation ((XmColorProc) NULL);
3080           // And set it back to motif.
3081           XmSetColorCalculation (colorProc);
3082         }
3083       (*colorProc) (&g_itemColors[wxBACK_INDEX],
3084                     &g_itemColors[wxFORE_INDEX],
3085                     &g_itemColors[wxSELE_INDEX],
3086                     &g_itemColors[wxTOPS_INDEX],
3087                     &g_itemColors[wxBOTS_INDEX]);
3088       result = wxBACK_COLORS;
3089     }
3090   if (fore)
3091     {
3092       g_itemColors[wxFORE_INDEX].red = (((long) fore->Red ()) << 8);
3093       g_itemColors[wxFORE_INDEX].green = (((long) fore->Green ()) << 8);
3094       g_itemColors[wxFORE_INDEX].blue = (((long) fore->Blue ()) << 8);
3095       g_itemColors[wxFORE_INDEX].flags = DoRed | DoGreen | DoBlue;
3096       if (result == wxNO_COLORS)
3097         result = wxFORE_COLORS;
3098     }
3099
3100   Display *dpy = display;
3101   Colormap cmap = (Colormap) wxTheApp->GetMainColormap((WXDisplay*) dpy);
3102
3103   if (back)
3104     {
3105       /* 5 Colours to allocate */
3106       for (int i = 0; i < 5; i++)
3107         if (!YAllocColor (dpy, cmap, &g_itemColors[i]))
3108           result = wxNO_COLORS;
3109     }
3110   else if (fore)
3111     {
3112       /* Only 1 colour to allocate */
3113       if (!YAllocColor (dpy, cmap, &g_itemColors[wxFORE_INDEX]))
3114         result = wxNO_COLORS;
3115     }
3116
3117   return (result);
3118
3119 }
3120
3121 // Changes the foreground and background colours to be derived
3122 // from the current background colour.
3123 // To change the foreground colour, you must call SetForegroundColour
3124 // explicitly.
3125 void wxWindow::ChangeBackgroundColour()
3126 {
3127     if (GetMainWidget())
3128         DoChangeBackgroundColour(GetMainWidget(), m_backgroundColour);
3129 }
3130
3131 void wxWindow::ChangeForegroundColour()
3132 {
3133     if (GetMainWidget())
3134         DoChangeForegroundColour(GetMainWidget(), m_foregroundColour);
3135 }
3136
3137 // Change a widget's foreground and background colours.
3138
3139 void wxWindow::DoChangeForegroundColour(WXWidget widget, wxColour& foregroundColour)
3140 {
3141   // When should we specify the foreground, if it's calculated
3142   // by wxComputeColours?
3143   // Solution: say we start with the default (computed) foreground colour.
3144   // If we call SetForegroundColour explicitly for a control or window,
3145   // then the foreground is changed.
3146   // Therefore SetBackgroundColour computes the foreground colour, and
3147   // SetForegroundColour changes the foreground colour. The ordering is
3148   // important.
3149
3150   XtVaSetValues ((Widget) widget,
3151                    XmNforeground, foregroundColour.AllocColour(XtDisplay((Widget) widget)),
3152                    NULL);
3153 }
3154
3155 void wxWindow::DoChangeBackgroundColour(WXWidget widget, wxColour& backgroundColour, bool changeArmColour)
3156 {
3157   wxComputeColours (XtDisplay((Widget) widget), & backgroundColour,
3158                             (wxColour*) NULL);
3159
3160   XtVaSetValues ((Widget) widget,
3161                    XmNbackground, g_itemColors[wxBACK_INDEX].pixel,
3162                    XmNtopShadowColor, g_itemColors[wxTOPS_INDEX].pixel,
3163                    XmNbottomShadowColor, g_itemColors[wxBOTS_INDEX].pixel,
3164                    XmNforeground, g_itemColors[wxFORE_INDEX].pixel,
3165                    NULL);
3166
3167   if (changeArmColour)
3168     XtVaSetValues ((Widget) widget,
3169                    XmNarmColor, g_itemColors[wxSELE_INDEX].pixel,
3170                NULL);
3171 }
3172
3173 void wxWindow::SetBackgroundColour(const wxColour& col)
3174 {
3175     m_backgroundColour = col;
3176     ChangeBackgroundColour();
3177 }
3178
3179 void wxWindow::SetForegroundColour(const wxColour& col)
3180 {
3181     m_foregroundColour = col;
3182     ChangeForegroundColour();
3183 }
3184
3185 void wxWindow::ChangeFont(bool keepOriginalSize)
3186 {
3187     // Note that this causes the widget to be resized back
3188     // to its original size! We therefore have to set the size
3189     // back again. TODO: a better way in Motif?
3190     Widget w = (Widget) GetLabelWidget(); // Usually the main widget
3191     if (w && m_windowFont.Ok())
3192     {
3193         int width, height, width1, height1;
3194         GetSize(& width, & height);
3195
3196 // lesstif 0.87 hangs here
3197 #ifndef LESSTIF_VERSION
3198         XtVaSetValues (w,
3199                    XmNfontList, (XmFontList) m_windowFont.GetFontList(1.0, XtDisplay(w)),
3200                    NULL);
3201 #endif
3202
3203         GetSize(& width1, & height1);
3204         if (keepOriginalSize && (width != width1 || height != height1))
3205         {
3206             SetSize(-1, -1, width, height);
3207         }
3208     }
3209 }
3210
3211 void wxWindow::SetFont(const wxFont& font)
3212 {
3213     m_windowFont = font;
3214     ChangeFont();
3215 }
3216
3217 void wxWindow::ClearUpdateRects()
3218 {
3219     wxNode* node = m_updateRects.First();
3220     while (node)
3221     {
3222         wxRect* rect = (wxRect*) node->Data();
3223         delete rect;
3224         node = node->Next();
3225     }
3226     m_updateRects.Clear();
3227 }
3228
3229 bool wxWindow::ProcessAccelerator(wxKeyEvent& event)
3230 {
3231     if (!m_acceleratorTable.Ok())
3232         return FALSE;
3233
3234     int count = m_acceleratorTable.GetCount();
3235     wxAcceleratorEntry* entries = m_acceleratorTable.GetEntries();
3236     int i;
3237     for (i = 0; i < count; i++)
3238     {
3239         wxAcceleratorEntry* entry = & (entries[i]);
3240         if (entry->MatchesEvent(event))
3241         {
3242             // Bingo, we have a match. Now find a control
3243             // that matches the entry command id.
3244
3245             // Need to go up to the top of the window hierarchy,
3246             // since it might be e.g. a menu item
3247             wxWindow* parent = this;
3248             while (parent && !parent->IsKindOf(CLASSINFO(wxFrame)) && !parent->IsKindOf(CLASSINFO(wxDialog)))
3249                 parent = parent->GetParent();
3250
3251             if (!parent)
3252                 return FALSE;
3253
3254             if (parent->IsKindOf(CLASSINFO(wxFrame)))
3255             {
3256                 // Try for a menu command
3257                 wxFrame* frame = (wxFrame*) parent;
3258                 if (frame->GetMenuBar())
3259                 {
3260                     wxMenuItem* item = frame->GetMenuBar()->FindItemForId(entry->GetCommand());
3261                     if (item)
3262                     {
3263                         wxCommandEvent commandEvent(wxEVT_COMMAND_MENU_SELECTED, entry->GetCommand());
3264                         commandEvent.SetEventObject(frame);
3265
3266                         // If ProcessEvent returns TRUE (it was handled), then
3267                         // the calling code will skip the event handling.
3268                         return frame->GetEventHandler()->ProcessEvent(commandEvent);
3269                     }
3270                 }
3271             }
3272
3273             // Find a child matching the command id
3274             wxWindow* child = parent->FindWindow(entry->GetCommand());
3275
3276             // No such child
3277             if (!child)
3278                 return FALSE;
3279
3280             // Now we process those kinds of windows that we can.
3281             // For now, only buttons.
3282             if (child->IsKindOf(CLASSINFO(wxButton)))
3283             {
3284                 wxCommandEvent commandEvent (wxEVT_COMMAND_BUTTON_CLICKED, child->GetId());
3285                 commandEvent.SetEventObject(child);
3286                 return child->GetEventHandler()->ProcessEvent(commandEvent);
3287             }
3288
3289             return FALSE;
3290         } // matches event
3291     }// for
3292
3293     // We didn't match the key event against an accelerator.
3294     return FALSE;
3295 }
3296