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