1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: x11/toplevel.cpp
3 // Purpose: implements wxTopLevelWindow for X11
4 // Author: Julian Smart
8 // Copyright: (c) 2002 Julian Smart
9 // License: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
21 #pragma implementation "toplevel.h"
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
33 #include "wx/toplevel.h"
34 #include "wx/string.h"
39 #include "wx/statusbr.h"
42 #include "wx/settings.h"
43 #include "wx/x11/private.h"
44 #include "X11/Xutil.h"
46 bool wxMWMIsRunning(Window w
);
48 // ----------------------------------------------------------------------------
49 // wxTopLevelWindowX11 creation
50 // ----------------------------------------------------------------------------
52 void wxTopLevelWindowX11::Init()
55 m_maximizeOnShow
= FALSE
;
57 // unlike (almost?) all other windows, frames are created hidden
60 // Data to save/restore when calling ShowFullScreen
62 m_fsIsMaximized
= FALSE
;
63 m_fsIsShowing
= FALSE
;
68 bool wxTopLevelWindowX11::Create(wxWindow
*parent
,
70 const wxString
& title
,
79 m_windowStyle
= style
;
84 m_windowId
= id
== -1 ? NewControlId() : id
;
87 parent
->AddChild(this);
89 wxTopLevelWindows
.Append(this);
91 Display
*xdisplay
= wxGlobalDisplay();
92 int xscreen
= DefaultScreen( xdisplay
);
93 Visual
*xvisual
= DefaultVisual( xdisplay
, xscreen
);
94 Window xparent
= RootWindow( xdisplay
, xscreen
);
95 Colormap cm
= DefaultColormap( xdisplay
, xscreen
);
97 if (GetExtraStyle() & wxTOPLEVEL_EX_DIALOG
)
98 m_backgroundColour
= wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE
);
100 m_backgroundColour
= wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE
);
101 m_backgroundColour
.CalcPixel( (WXColormap
) cm
);
117 XSetWindowAttributes xattributes
;
118 XSizeHints size_hints
;
120 long xattributes_mask
=
122 CWBorderPixel
| CWBackPixel
;
124 xattributes
.background_pixel
= m_backgroundColour
.GetPixel();
125 xattributes
.border_pixel
= BlackPixel( xdisplay
, xscreen
);
127 // TODO: if we want no border, caption etc.,
128 // I think we set this to True to remove decorations
130 xattributes
.override_redirect
= False
;
134 long backColor
, foreColor
;
135 backColor
= GR_RGB(m_backgroundColour
.Red(), m_backgroundColour
.Green(), m_backgroundColour
.Blue());
136 foreColor
= GR_RGB(m_foregroundColour
.Red(), m_foregroundColour
.Green(), m_foregroundColour
.Blue());
138 Window xwindow
= XCreateWindowWithColor( xdisplay
, xparent
, pos2
.x
, pos2
.y
, size2
.x
, size2
.y
,
139 0, 0, InputOutput
, xvisual
, backColor
, foreColor
);
141 Window xwindow
= XCreateWindow( xdisplay
, xparent
, pos2
.x
, pos2
.y
, size2
.x
, size2
.y
,
142 0, DefaultDepth(xdisplay
,xscreen
), InputOutput
, xvisual
, xattributes_mask
, &xattributes
);
144 m_mainWidget
= (WXWindow
) xwindow
;
148 extraFlags
|= GR_EVENT_MASK_CLOSE_REQ
;
151 XSelectInput( xdisplay
, xwindow
,
165 StructureNotifyMask
|
169 wxAddWindowToTable( xwindow
, (wxWindow
*) this );
171 // Set background to None which will prevent X11 from clearing the
172 // background completely.
173 XSetWindowBackgroundPixmap( xdisplay
, xwindow
, None
);
176 if (GetExtraStyle() & wxTOPLEVEL_EX_DIALOG
)
178 if (GetParent() && GetParent()->GetMainWindow())
180 Window xparentwindow
= (Window
) GetParent()->GetMainWindow();
181 XSetTransientForHint( xdisplay
, xwindow
, xparentwindow
);
185 size_hints
.flags
= PSize
| PPosition
;
186 size_hints
.x
= pos2
.x
;
187 size_hints
.y
= pos2
.y
;
188 size_hints
.width
= size2
.x
;
189 size_hints
.height
= size2
.y
;
190 XSetWMNormalHints( xdisplay
, xwindow
, &size_hints
);
193 wm_hints
.flags
= InputHint
| StateHint
/* | WindowGroupHint */;
194 wm_hints
.input
= True
;
195 wm_hints
.initial_state
= NormalState
;
196 XSetWMHints( xdisplay
, xwindow
, &wm_hints
);
198 Atom wm_protocols
[2];
199 wm_protocols
[0] = XInternAtom( xdisplay
, "WM_DELETE_WINDOW", False
);
200 wm_protocols
[1] = XInternAtom( xdisplay
, "WM_TAKE_FOCUS", False
);
201 XSetWMProtocols( xdisplay
, xwindow
, wm_protocols
, 2);
204 wxSetWMDecorations( xwindow
, style
);
211 wxTopLevelWindowX11::~wxTopLevelWindowX11()
213 wxTopLevelWindows
.DeleteObject(this);
215 // If this is the last top-level window, exit.
216 if ( wxTheApp
&& (wxTopLevelWindows
.Number() == 0) )
218 wxTheApp
->SetTopWindow(NULL
);
220 if (wxTheApp
->GetExitOnFrameDelete())
222 // Signal to the app that we're going to close
223 wxTheApp
->ExitMainLoop();
228 // ----------------------------------------------------------------------------
229 // wxTopLevelWindowX11 showing
230 // ----------------------------------------------------------------------------
232 bool wxTopLevelWindowX11::Show(bool show
)
234 // Nano-X has to force a size event,
235 // else there's no initial size.
239 wxSizeEvent
event(GetSize(), GetId());
240 event
.SetEventObject(this);
241 GetEventHandler()->ProcessEvent(event
);
245 return wxWindowX11::Show(show
);
248 // ----------------------------------------------------------------------------
249 // wxTopLevelWindowX11 maximize/minimize
250 // ----------------------------------------------------------------------------
252 void wxTopLevelWindowX11::Maximize(bool maximize
)
257 bool wxTopLevelWindowX11::IsMaximized() const
263 void wxTopLevelWindowX11::Iconize(bool iconize
)
265 if (!m_iconized
&& GetMainWindow())
267 if (XIconifyWindow(wxGlobalDisplay(),
268 (Window
) GetMainWindow(), DefaultScreen(wxGlobalDisplay())) != 0)
273 bool wxTopLevelWindowX11::IsIconized() const
278 void wxTopLevelWindowX11::Restore()
280 // This is the way to deiconify the window, according to the X FAQ
281 if (m_iconized
&& GetMainWindow())
283 XMapWindow(wxGlobalDisplay(), (Window
) GetMainWindow());
288 // ----------------------------------------------------------------------------
289 // wxTopLevelWindowX11 fullscreen
290 // ----------------------------------------------------------------------------
292 bool wxTopLevelWindowX11::ShowFullScreen(bool show
, long style
)
299 m_fsIsShowing
= TRUE
;
311 m_fsIsShowing
= FALSE
;
318 // ----------------------------------------------------------------------------
319 // wxTopLevelWindowX11 misc
320 // ----------------------------------------------------------------------------
322 void wxTopLevelWindowX11::SetIcon(const wxIcon
& icon
)
325 wxTopLevelWindowBase::SetIcon(icon
);
327 if (icon
.Ok() && GetMainWindow())
331 XWMHints
*wmHints
= XAllocWMHints();
332 wmHints
->icon_pixmap
= (Pixmap
) icon
.GetPixmap();
334 wmHints
->flags
= IconPixmapHint
;
338 wmHints
->flags
|= IconMaskHint
;
339 wmHints
->icon_mask
= (Pixmap
) icon
.GetMask()->GetBitmap();
342 XSetWMHints(wxGlobalDisplay(), (Window
) GetMainWindow(), wmHints
);
348 void wxTopLevelWindowX11::SetTitle(const wxString
& title
)
353 XStoreName(wxGlobalDisplay(), (Window
) GetMainWindow(),
354 (const char*) title
);
355 XSetIconName(wxGlobalDisplay(), (Window
) GetMainWindow(),
356 (const char*) title
);
358 // Use this if the platform doesn't supply the above functions.
360 XTextProperty textProperty
;
361 textProperty
.value
= (unsigned char*) title
;
362 textProperty
.encoding
= XA_STRING
;
363 textProperty
.format
= 8;
364 textProperty
.nitems
= 1;
366 XSetTextProperty(wxGlobalDisplay(), (Window
) GetMainWindow(),
367 & textProperty
, WM_NAME
);
372 wxString
wxTopLevelWindowX11::GetTitle() const
377 #ifndef MWM_DECOR_BORDER
378 /* bit definitions for MwmHints.flags */
379 #define MWM_HINTS_FUNCTIONS (1L << 0)
380 #define MWM_HINTS_DECORATIONS (1L << 1)
381 #define MWM_HINTS_INPUT_MODE (1L << 2)
382 #define MWM_HINTS_STATUS (1L << 3)
384 #define MWM_DECOR_ALL (1L << 0)
385 #define MWM_DECOR_BORDER (1L << 1)
386 #define MWM_DECOR_RESIZEH (1L << 2)
387 #define MWM_DECOR_TITLE (1L << 3)
388 #define MWM_DECOR_MENU (1L << 4)
389 #define MWM_DECOR_MINIMIZE (1L << 5)
390 #define MWM_DECOR_MAXIMIZE (1L << 6)
400 #define PROP_MOTIF_WM_HINTS_ELEMENTS 5
402 // Set the window manager decorations according to the
403 // given wxWindows style
404 bool wxSetWMDecorations(Window w
, long style
)
407 GR_WM_PROPERTIES wmProp
;
412 if (style
& wxRESIZE_BORDER
)
414 wmProp
.props
|= GR_WM_PROPS_APPFRAME
;
415 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
418 if (style
& wxSYSTEM_MENU
)
420 wmProp
.props
|= GR_WM_PROPS_CLOSEBOX
;
421 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
424 if ((style
& wxCAPTION
) ||
425 (style
& wxTINY_CAPTION_HORIZ
) ||
426 (style
& wxTINY_CAPTION_VERT
))
428 wmProp
.props
|= GR_WM_PROPS_CAPTION
;
429 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
431 // The default dialog style doesn't include any kind
432 // of border, which is a bit odd. Anyway, inclusion
433 // of a caption surely implies a border.
434 style
|= wxTHICK_FRAME
;
437 if (style
& wxTHICK_FRAME
)
439 wmProp
.props
|= GR_WM_PROPS_APPFRAME
;
440 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
443 if (style
& wxSIMPLE_BORDER
)
445 wmProp
.props
|= GR_WM_PROPS_BORDER
;
446 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
449 if (style
& wxMINIMIZE_BOX
)
453 if (style
& wxMAXIMIZE_BOX
)
455 wmProp
.props
|= GR_WM_PROPS_MAXIMIZE
;
456 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
459 if (((style
& wxBORDER
) != wxBORDER
) && ((style
& wxTHICK_FRAME
) != wxTHICK_FRAME
)
460 && ((style
& wxRESIZE_BORDER
) != wxRESIZE_BORDER
))
462 wmProp
.props
|= GR_WM_PROPS_NODECORATE
;
463 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
466 GrSetWMProperties(w
, & wmProp
);
469 if (!wxMWMIsRunning(w
))
472 Atom mwm_wm_hints
= XInternAtom(wxGlobalDisplay(),"_MOTIF_WM_HINTS", False
);
475 hints
.decorations
= 0;
477 if (style
& wxRESIZE_BORDER
)
479 // wxLogDebug("MWM_DECOR_RESIZEH");
480 hints
.flags
|= MWM_HINTS_DECORATIONS
;
481 hints
.decorations
|= MWM_DECOR_RESIZEH
;
484 if (style
& wxSYSTEM_MENU
)
486 // wxLogDebug("MWM_DECOR_MENU");
487 hints
.flags
|= MWM_HINTS_DECORATIONS
;
488 hints
.decorations
|= MWM_DECOR_MENU
;
491 if ((style
& wxCAPTION
) ||
492 (style
& wxTINY_CAPTION_HORIZ
) ||
493 (style
& wxTINY_CAPTION_VERT
))
495 // wxLogDebug("MWM_DECOR_TITLE");
496 hints
.flags
|= MWM_HINTS_DECORATIONS
;
497 hints
.decorations
|= MWM_DECOR_TITLE
;
500 if ((style
& wxTHICK_FRAME
) || (style
& wxSIMPLE_BORDER
) || (style
& wxCAPTION
))
502 // wxLogDebug("MWM_DECOR_BORDER");
503 hints
.flags
|= MWM_HINTS_DECORATIONS
;
504 hints
.decorations
|= MWM_DECOR_BORDER
;
507 if (style
& wxMINIMIZE_BOX
)
509 // wxLogDebug("MWM_DECOR_MINIMIZE");
510 hints
.flags
|= MWM_HINTS_DECORATIONS
;
511 hints
.decorations
|= MWM_DECOR_MINIMIZE
;
514 if (style
& wxMAXIMIZE_BOX
)
516 // wxLogDebug("MWM_DECOR_MAXIMIZE");
517 hints
.flags
|= MWM_HINTS_DECORATIONS
;
518 hints
.decorations
|= MWM_DECOR_MAXIMIZE
;
521 XChangeProperty(wxGlobalDisplay(),
523 mwm_wm_hints
, mwm_wm_hints
,
525 (unsigned char *) &hints
, PROP_MOTIF_WM_HINTS_ELEMENTS
);
531 bool wxMWMIsRunning(Window w
)
536 Display
*dpy
= (Display
*)wxGetDisplay();
537 Atom motifWmInfo
= XInternAtom(dpy
, "_MOTIF_WM_INFO", False
);
539 unsigned long length
, bytesafter
;
540 unsigned char value
[20];
541 unsigned char *ptr
= &value
[0];
545 type
= format
= length
= 0;
548 ret
= XGetWindowProperty(wxGlobalDisplay(), w
, motifWmInfo
,
549 0L, 2, False
, motifWmInfo
,
550 &type
, &format
, &length
, &bytesafter
, &ptr
);
552 return (ret
== Success
);
556 // For implementation purposes - sometimes decorations make the client area
558 wxPoint
wxTopLevelWindowX11::GetClientAreaOrigin() const
560 // wxFrame::GetClientAreaOrigin
561 // does the required calculation already.
562 return wxPoint(0, 0);
565 void wxTopLevelWindowX11::DoGetClientSize( int *width
, int *height
) const
567 XSync(wxGlobalDisplay(), False
);
568 wxWindowX11::DoGetClientSize(width
, height
);
571 void wxTopLevelWindowX11::DoSetClientSize(int width
, int height
)
573 wxWindowX11::DoSetClientSize(width
, height
);
575 // Set the top-level window size
576 XSizeHints size_hints
;
577 wxSize oldSize
= GetSize();
578 wxSize oldClientSize
= GetClientSize();
580 size_hints
.flags
= PSize
;
581 size_hints
.width
= width
+ (oldSize
.x
- oldClientSize
.x
);
582 size_hints
.height
= height
+ (oldSize
.y
- oldClientSize
.y
);
583 XSetWMNormalHints( (Display
*) GetXDisplay(), (Window
) GetMainWindow(),
586 // This seems to be necessary or resizes don't get performed
587 XSync(wxGlobalDisplay(), False
);
588 XSync(wxGlobalDisplay(), False
);
591 wxLogDebug("DoSetClientSize: Tried to set size to %d, %d", (int) size_hints
.width
, (int) size_hints
.height
);
593 XSync(wxGlobalDisplay(), False
);
594 wxSize newSize
= GetSize();
595 wxLogDebug("New size is %d, %d", (int) newSize
.x
, (int) newSize
.y
);
599 if (!GetMainWindow())
602 XWindowChanges windowChanges
;
607 windowChanges
.width
= width
;
608 valueMask
|= CWWidth
;
612 windowChanges
.height
= height
;
613 valueMask
|= CWHeight
;
615 XConfigureWindow(wxGlobalDisplay(), (Window
) GetMainWindow(),
616 valueMask
, & windowChanges
);
620 void wxTopLevelWindowX11::DoSetSize(int x
, int y
, int width
, int height
, int sizeFlags
)
623 // wxLogDebug( "Setting pos: %d, %d", x, y );
624 wxWindowX11::DoSetSize(x
, y
, width
, height
, sizeFlags
);
626 XSync(wxGlobalDisplay(), False
);
627 Window window
= (Window
) m_mainWidget
;
631 Display
*display
= (Display
*) GetXDisplay();
632 Window root
= RootWindowOfScreen(DefaultScreenOfDisplay(display
));
633 Window parent_window
= window
,
634 next_parent
= window
;
636 // search for the parent that is child of ROOT, because the WM may
637 // reparent twice and notify only the next parent (like FVWM)
638 while (next_parent
!= root
) {
639 Window
*theChildren
; unsigned int n
;
640 parent_window
= next_parent
;
641 XQueryTree(display
, parent_window
, &root
,
642 &next_parent
, &theChildren
, &n
);
643 XFree(theChildren
); // not needed
646 XWindowChanges windowChanges
;
649 windowChanges
.width
= width
;
650 windowChanges
.height
= height
;
651 windowChanges
.stack_mode
= 0;
652 int valueMask
= CWX
| CWY
| CWWidth
| CWHeight
;
654 if (x
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
658 if (y
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
664 windowChanges
.width
= wxMax(1, width
);
665 valueMask
|= CWWidth
;
669 windowChanges
.height
= wxMax(1, height
);
670 valueMask
|= CWHeight
;
673 XConfigureWindow( display
, parent_window
, valueMask
, &windowChanges
);
675 XSizeHints size_hints
;
676 size_hints
.flags
= 0;
677 if (x
> -1 && y
> -1)
678 size_hints
.flags
|= PPosition
;
679 if (width
> -1 && height
> -1)
680 size_hints
.flags
|= PSize
;
681 size_hints
.width
= width
;
682 size_hints
.height
= height
;
685 XSetWMNormalHints( (Display
*) GetXDisplay(), (Window
) GetMainWindow(),
688 // This seems to be necessary or resizes don't get performed.
689 // Take them out (or even just one of them), and the About
690 // box of the minimal sample probably won't be resized right.
691 XSync(wxGlobalDisplay(), False
);
692 XSync(wxGlobalDisplay(), False
);
695 wxLogDebug("DoSetSize: Tried to set size to %d, %d", (int) size_hints
.width
, (int) size_hints
.height
);
697 XSync(wxGlobalDisplay(), False
);
698 wxSize newSize
= GetSize();
699 wxLogDebug("New size is %d, %d", (int) newSize
.x
, (int) newSize
.y
);
703 wxPoint pt
= GetPosition();
704 // wxLogDebug( "After, pos: %d, %d", pt.x, pt.y );
706 XSync(wxGlobalDisplay(), False
);
710 msg
.Printf("Before setting size: %d, %d", w
, h
);
712 if (!GetMainWindow())
715 XWindowChanges windowChanges
;
718 if (x
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
721 AdjustForParentClientOrigin( x
, yy
, sizeFlags
);
725 if (y
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
728 AdjustForParentClientOrigin( xx
, y
, sizeFlags
);
732 if (width
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
734 windowChanges
.width
= width
/* - m_borderSize*2 */;
735 valueMask
|= CWWidth
;
737 if (height
!= -1 || (sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
739 windowChanges
.height
= height
/* -m_borderSize*2*/;
740 valueMask
|= CWHeight
;
743 XConfigureWindow(wxGlobalDisplay(), (Window
) GetMainWindow(),
744 valueMask
, & windowChanges
);
745 XSync(wxGlobalDisplay(), False
);
747 msg
.Printf("Tried to set to %d, %d. After setting size: %d, %d", width
, height
, w
, h
);
752 void wxTopLevelWindowX11::DoGetPosition(int *x
, int *y
) const
754 XSync(wxGlobalDisplay(), False
);
755 Window window
= (Window
) m_mainWidget
;
759 Display
*display
= (Display
*) GetXDisplay();
760 Window root
= RootWindowOfScreen(DefaultScreenOfDisplay(display
));
761 Window parent_window
= window
,
762 next_parent
= window
;
764 // search for the parent that is child of ROOT, because the WM may
765 // reparent twice and notify only the next parent (like FVWM)
766 while (next_parent
!= root
) {
767 Window
*theChildren
; unsigned int n
;
768 parent_window
= next_parent
;
769 XQueryTree(display
, parent_window
, &root
,
770 &next_parent
, &theChildren
, &n
);
771 XFree(theChildren
); // not needed
773 int xx
, yy
; unsigned int dummy
;
774 XGetGeometry(display
, parent_window
, &root
,
775 &xx
, &yy
, &dummy
, &dummy
, &dummy
, &dummy
);
786 // wxLogDebug("Translating...");
788 XTranslateCoordinates(wxGlobalDisplay(), window
, XDefaultRootWindow(wxGlobalDisplay()),
789 0, 0, & offsetX
, & offsetY
, & childWindow
);
791 // wxLogDebug("Offset: %d, %d", offsetX, offsetY);
794 XWindowAttributes attr
;
795 Status status
= XGetWindowAttributes(wxGlobalDisplay(), window
, & attr
);
800 *x
= attr
.x
+ offsetX
;
801 *y
= attr
.y
+ offsetY
;