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
;
65 m_needResizeInIdle
= 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 void wxTopLevelWindowX11::OnInternalIdle()
230 wxWindow::OnInternalIdle();
232 if (m_needResizeInIdle
)
234 wxSizeEvent
event( GetClientSize(), GetId() );
235 event
.SetEventObject( this );
236 GetEventHandler()->ProcessEvent( event
);
240 // ----------------------------------------------------------------------------
241 // wxTopLevelWindowX11 showing
242 // ----------------------------------------------------------------------------
244 bool wxTopLevelWindowX11::Show(bool show
)
246 // Nano-X has to force a size event,
247 // else there's no initial size.
251 if (show
&& m_needResizeInIdle
)
254 wxSizeEvent
event(GetSize(), GetId());
255 event
.SetEventObject(this);
256 GetEventHandler()->ProcessEvent(event
);
259 return wxWindowX11::Show(show
);
262 // ----------------------------------------------------------------------------
263 // wxTopLevelWindowX11 maximize/minimize
264 // ----------------------------------------------------------------------------
266 void wxTopLevelWindowX11::Maximize(bool maximize
)
271 bool wxTopLevelWindowX11::IsMaximized() const
277 void wxTopLevelWindowX11::Iconize(bool iconize
)
279 if (!m_iconized
&& GetMainWindow())
281 if (XIconifyWindow(wxGlobalDisplay(),
282 (Window
) GetMainWindow(), DefaultScreen(wxGlobalDisplay())) != 0)
287 bool wxTopLevelWindowX11::IsIconized() const
292 void wxTopLevelWindowX11::Restore()
294 // This is the way to deiconify the window, according to the X FAQ
295 if (m_iconized
&& GetMainWindow())
297 XMapWindow(wxGlobalDisplay(), (Window
) GetMainWindow());
302 // ----------------------------------------------------------------------------
303 // wxTopLevelWindowX11 fullscreen
304 // ----------------------------------------------------------------------------
306 bool wxTopLevelWindowX11::ShowFullScreen(bool show
, long style
)
313 m_fsIsShowing
= TRUE
;
325 m_fsIsShowing
= FALSE
;
332 // ----------------------------------------------------------------------------
333 // wxTopLevelWindowX11 misc
334 // ----------------------------------------------------------------------------
336 void wxTopLevelWindowX11::SetIcon(const wxIcon
& icon
)
339 wxTopLevelWindowBase::SetIcon(icon
);
341 if (icon
.Ok() && GetMainWindow())
345 XWMHints
*wmHints
= XAllocWMHints();
346 wmHints
->icon_pixmap
= (Pixmap
) icon
.GetPixmap();
348 wmHints
->flags
= IconPixmapHint
;
352 wmHints
->flags
|= IconMaskHint
;
353 wmHints
->icon_mask
= (Pixmap
) icon
.GetMask()->GetBitmap();
356 XSetWMHints(wxGlobalDisplay(), (Window
) GetMainWindow(), wmHints
);
362 void wxTopLevelWindowX11::SetTitle(const wxString
& title
)
367 XStoreName(wxGlobalDisplay(), (Window
) GetMainWindow(),
368 (const char*) title
);
369 XSetIconName(wxGlobalDisplay(), (Window
) GetMainWindow(),
370 (const char*) title
);
372 // Use this if the platform doesn't supply the above functions.
374 XTextProperty textProperty
;
375 textProperty
.value
= (unsigned char*) title
;
376 textProperty
.encoding
= XA_STRING
;
377 textProperty
.format
= 8;
378 textProperty
.nitems
= 1;
380 XSetTextProperty(wxGlobalDisplay(), (Window
) GetMainWindow(),
381 & textProperty
, WM_NAME
);
386 wxString
wxTopLevelWindowX11::GetTitle() const
391 #ifndef MWM_DECOR_BORDER
392 /* bit definitions for MwmHints.flags */
393 #define MWM_HINTS_FUNCTIONS (1L << 0)
394 #define MWM_HINTS_DECORATIONS (1L << 1)
395 #define MWM_HINTS_INPUT_MODE (1L << 2)
396 #define MWM_HINTS_STATUS (1L << 3)
398 #define MWM_DECOR_ALL (1L << 0)
399 #define MWM_DECOR_BORDER (1L << 1)
400 #define MWM_DECOR_RESIZEH (1L << 2)
401 #define MWM_DECOR_TITLE (1L << 3)
402 #define MWM_DECOR_MENU (1L << 4)
403 #define MWM_DECOR_MINIMIZE (1L << 5)
404 #define MWM_DECOR_MAXIMIZE (1L << 6)
414 #define PROP_MOTIF_WM_HINTS_ELEMENTS 5
416 // Set the window manager decorations according to the
417 // given wxWindows style
418 bool wxSetWMDecorations(Window w
, long style
)
421 GR_WM_PROPERTIES wmProp
;
426 if (style
& wxRESIZE_BORDER
)
428 wmProp
.props
|= GR_WM_PROPS_APPFRAME
;
429 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
432 if (style
& wxSYSTEM_MENU
)
434 wmProp
.props
|= GR_WM_PROPS_CLOSEBOX
;
435 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
438 if ((style
& wxCAPTION
) ||
439 (style
& wxTINY_CAPTION_HORIZ
) ||
440 (style
& wxTINY_CAPTION_VERT
))
442 wmProp
.props
|= GR_WM_PROPS_CAPTION
;
443 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
445 // The default dialog style doesn't include any kind
446 // of border, which is a bit odd. Anyway, inclusion
447 // of a caption surely implies a border.
448 style
|= wxTHICK_FRAME
;
451 if (style
& wxTHICK_FRAME
)
453 wmProp
.props
|= GR_WM_PROPS_APPFRAME
;
454 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
457 if (style
& wxSIMPLE_BORDER
)
459 wmProp
.props
|= GR_WM_PROPS_BORDER
;
460 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
463 if (style
& wxMINIMIZE_BOX
)
467 if (style
& wxMAXIMIZE_BOX
)
469 wmProp
.props
|= GR_WM_PROPS_MAXIMIZE
;
470 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
473 if (((style
& wxBORDER
) != wxBORDER
) && ((style
& wxTHICK_FRAME
) != wxTHICK_FRAME
)
474 && ((style
& wxRESIZE_BORDER
) != wxRESIZE_BORDER
))
476 wmProp
.props
|= GR_WM_PROPS_NODECORATE
;
477 wmProp
.flags
|= GR_WM_FLAGS_PROPS
;
480 GrSetWMProperties(w
, & wmProp
);
483 if (!wxMWMIsRunning(w
))
486 Atom mwm_wm_hints
= XInternAtom(wxGlobalDisplay(),"_MOTIF_WM_HINTS", False
);
489 hints
.decorations
= 0;
491 if (style
& wxRESIZE_BORDER
)
493 // wxLogDebug("MWM_DECOR_RESIZEH");
494 hints
.flags
|= MWM_HINTS_DECORATIONS
;
495 hints
.decorations
|= MWM_DECOR_RESIZEH
;
498 if (style
& wxSYSTEM_MENU
)
500 // wxLogDebug("MWM_DECOR_MENU");
501 hints
.flags
|= MWM_HINTS_DECORATIONS
;
502 hints
.decorations
|= MWM_DECOR_MENU
;
505 if ((style
& wxCAPTION
) ||
506 (style
& wxTINY_CAPTION_HORIZ
) ||
507 (style
& wxTINY_CAPTION_VERT
))
509 // wxLogDebug("MWM_DECOR_TITLE");
510 hints
.flags
|= MWM_HINTS_DECORATIONS
;
511 hints
.decorations
|= MWM_DECOR_TITLE
;
514 if ((style
& wxTHICK_FRAME
) || (style
& wxCAPTION
))
516 // wxLogDebug("MWM_DECOR_BORDER");
517 hints
.flags
|= MWM_HINTS_DECORATIONS
;
518 hints
.decorations
|= MWM_DECOR_BORDER
;
521 if (style
& wxMINIMIZE_BOX
)
523 // wxLogDebug("MWM_DECOR_MINIMIZE");
524 hints
.flags
|= MWM_HINTS_DECORATIONS
;
525 hints
.decorations
|= MWM_DECOR_MINIMIZE
;
528 if (style
& wxMAXIMIZE_BOX
)
530 // wxLogDebug("MWM_DECOR_MAXIMIZE");
531 hints
.flags
|= MWM_HINTS_DECORATIONS
;
532 hints
.decorations
|= MWM_DECOR_MAXIMIZE
;
535 XChangeProperty(wxGlobalDisplay(),
537 mwm_wm_hints
, mwm_wm_hints
,
539 (unsigned char *) &hints
, PROP_MOTIF_WM_HINTS_ELEMENTS
);
545 bool wxMWMIsRunning(Window w
)
550 Display
*dpy
= (Display
*)wxGetDisplay();
551 Atom motifWmInfo
= XInternAtom(dpy
, "_MOTIF_WM_INFO", False
);
553 unsigned long length
, bytesafter
;
554 unsigned char value
[20];
555 unsigned char *ptr
= &value
[0];
559 type
= format
= length
= 0;
562 ret
= XGetWindowProperty(wxGlobalDisplay(), w
, motifWmInfo
,
563 0L, 2, False
, motifWmInfo
,
564 &type
, &format
, &length
, &bytesafter
, &ptr
);
566 return (ret
== Success
);
570 // For implementation purposes - sometimes decorations make the client area
572 wxPoint
wxTopLevelWindowX11::GetClientAreaOrigin() const
574 // wxFrame::GetClientAreaOrigin
575 // does the required calculation already.
576 return wxPoint(0, 0);
579 void wxTopLevelWindowX11::DoGetClientSize( int *width
, int *height
) const
581 XSync(wxGlobalDisplay(), False
);
582 wxWindowX11::DoGetClientSize(width
, height
);
585 void wxTopLevelWindowX11::DoSetClientSize(int width
, int height
)
587 wxWindowX11::DoSetClientSize(width
, height
);
590 // Set the top-level window size
591 XSizeHints size_hints
;
592 wxSize oldSize
= GetSize();
593 wxSize oldClientSize
= GetClientSize();
595 size_hints
.flags
= PSize
;
596 size_hints
.width
= width
+ (oldSize
.x
- oldClientSize
.x
);
597 size_hints
.height
= height
+ (oldSize
.y
- oldClientSize
.y
);
598 XSetWMNormalHints( (Display
*) GetXDisplay(), (Window
) GetMainWindow(),
601 // This seems to be necessary or resizes don't get performed
602 XSync(wxGlobalDisplay(), False
);
603 XSync(wxGlobalDisplay(), False
);
606 wxLogDebug("DoSetClientSize: Tried to set size to %d, %d", (int) size_hints
.width
, (int) size_hints
.height
);
608 XSync(wxGlobalDisplay(), False
);
609 wxSize newSize
= GetSize();
610 wxLogDebug("New size is %d, %d", (int) newSize
.x
, (int) newSize
.y
);
615 void wxTopLevelWindowX11::DoSetSize(int x
, int y
, int width
, int height
, int sizeFlags
)
618 // wxLogDebug( "Setting pos: %d, %d", x, y );
619 wxWindowX11::DoSetSize(x
, y
, width
, height
, sizeFlags
);
621 XSync(wxGlobalDisplay(), False
);
622 Window window
= (Window
) m_mainWidget
;
626 Display
*display
= (Display
*) GetXDisplay();
627 Window root
= RootWindowOfScreen(DefaultScreenOfDisplay(display
));
628 Window parent_window
= window
,
629 next_parent
= window
;
631 // search for the parent that is child of ROOT, because the WM may
632 // reparent twice and notify only the next parent (like FVWM)
633 while (next_parent
!= root
) {
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
);
676 XSizeHints size_hints
;
677 size_hints
.flags
= 0;
678 if (x
> -1 && y
> -1)
679 size_hints
.flags
|= PPosition
;
680 if (width
> -1 && height
> -1)
681 size_hints
.flags
|= PSize
;
682 size_hints
.width
= width
;
683 size_hints
.height
= height
;
686 XSetWMNormalHints( (Display
*) GetXDisplay(), (Window
) GetMainWindow(),
689 // This seems to be necessary or resizes don't get performed.
690 // Take them out (or even just one of them), and the About
691 // box of the minimal sample probably won't be resized right.
692 XSync(wxGlobalDisplay(), False
);
693 XSync(wxGlobalDisplay(), False
);
697 void wxTopLevelWindowX11::DoGetPosition(int *x
, int *y
) const
699 XSync(wxGlobalDisplay(), False
);
700 Window window
= (Window
) m_mainWidget
;
704 Display
*display
= (Display
*) GetXDisplay();
705 Window root
= RootWindowOfScreen(DefaultScreenOfDisplay(display
));
706 Window parent_window
= window
,
707 next_parent
= window
;
709 // search for the parent that is child of ROOT, because the WM may
710 // reparent twice and notify only the next parent (like FVWM)
711 while (next_parent
!= root
) {
718 parent_window
= next_parent
;
719 XQueryTree(display
, parent_window
, &root
,
720 &next_parent
, &theChildren
, &n
);
721 XFree(theChildren
); // not needed
724 int xx
, yy
; unsigned int dummy
;
725 XGetGeometry(display
, parent_window
, &root
,
726 &xx
, &yy
, &dummy
, &dummy
, &dummy
, &dummy
);
730 XWindowAttributes attr
;
731 Status status
= XGetWindowAttributes((Display
*) GetXDisplay(), parent_window
, & attr
);