+ if (icon.Ok() && GetMainWindow())
+ {
+#if wxUSE_NANOX
+#else
+ XWMHints *wmHints = XAllocWMHints();
+ wmHints->icon_pixmap = (Pixmap) icon.GetPixmap();
+
+ wmHints->flags = IconPixmapHint;
+
+ if (icon.GetMask())
+ {
+ wmHints->flags |= IconMaskHint;
+ wmHints->icon_mask = (Pixmap) icon.GetMask()->GetBitmap();
+ }
+
+ XSetWMHints(wxGlobalDisplay(), (Window) GetMainWindow(), wmHints);
+ XFree(wmHints);
+#endif
+ }
+}
+
+void wxTopLevelWindowX11::SetTitle(const wxString& title)
+{
+ m_title = title;
+ if (GetMainWindow())
+ {
+ XStoreName(wxGlobalDisplay(), (Window) GetMainWindow(),
+ (const char*) title);
+ XSetIconName(wxGlobalDisplay(), (Window) GetMainWindow(),
+ (const char*) title);
+
+ // Use this if the platform doesn't supply the above functions.
+#if 0
+ XTextProperty textProperty;
+ textProperty.value = (unsigned char*) title;
+ textProperty.encoding = XA_STRING;
+ textProperty.format = 8;
+ textProperty.nitems = 1;
+
+ XSetTextProperty(wxGlobalDisplay(), (Window) GetMainWindow(),
+ & textProperty, WM_NAME);
+#endif
+ }
+}
+
+wxString wxTopLevelWindowX11::GetTitle() const
+{
+ return m_title;
+}
+
+#ifndef MWM_DECOR_BORDER
+/* bit definitions for MwmHints.flags */
+#define MWM_HINTS_FUNCTIONS (1L << 0)
+#define MWM_HINTS_DECORATIONS (1L << 1)
+#define MWM_HINTS_INPUT_MODE (1L << 2)
+#define MWM_HINTS_STATUS (1L << 3)
+
+#define MWM_DECOR_ALL (1L << 0)
+#define MWM_DECOR_BORDER (1L << 1)
+#define MWM_DECOR_RESIZEH (1L << 2)
+#define MWM_DECOR_TITLE (1L << 3)
+#define MWM_DECOR_MENU (1L << 4)
+#define MWM_DECOR_MINIMIZE (1L << 5)
+#define MWM_DECOR_MAXIMIZE (1L << 6)
+#endif
+
+struct MwmHints {
+ long flags;
+ long functions;
+ long decorations;
+ long input_mode;
+};
+
+#define PROP_MOTIF_WM_HINTS_ELEMENTS 5
+
+// Set the window manager decorations according to the
+// given wxWindows style
+bool wxSetWMDecorations(Window w, long style)
+{
+#if wxUSE_NANOX
+ GR_WM_PROPERTIES wmProp;
+
+ wmProp.flags = 0;
+ wmProp.props = 0;
+
+ if (style & wxRESIZE_BORDER)
+ {
+ wmProp.props |= GR_WM_PROPS_APPFRAME ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ if (style & wxSYSTEM_MENU)
+ {
+ wmProp.props |= GR_WM_PROPS_CLOSEBOX ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ if ((style & wxCAPTION) ||
+ (style & wxTINY_CAPTION_HORIZ) ||
+ (style & wxTINY_CAPTION_VERT))
+ {
+ wmProp.props |= GR_WM_PROPS_CAPTION ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+
+ // The default dialog style doesn't include any kind
+ // of border, which is a bit odd. Anyway, inclusion
+ // of a caption surely implies a border.
+ style |= wxTHICK_FRAME;
+ }
+
+ if (style & wxTHICK_FRAME)
+ {
+ wmProp.props |= GR_WM_PROPS_APPFRAME ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ if (style & wxSIMPLE_BORDER)
+ {
+ wmProp.props |= GR_WM_PROPS_BORDER ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ if (style & wxMINIMIZE_BOX)
+ {
+ }
+
+ if (style & wxMAXIMIZE_BOX)
+ {
+ wmProp.props |= GR_WM_PROPS_MAXIMIZE ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ if (((style & wxBORDER) != wxBORDER) && ((style & wxTHICK_FRAME) != wxTHICK_FRAME)
+ && ((style & wxRESIZE_BORDER) != wxRESIZE_BORDER))
+ {
+ wmProp.props |= GR_WM_PROPS_NODECORATE ;
+ wmProp.flags |= GR_WM_FLAGS_PROPS ;
+ }
+
+ GrSetWMProperties(w, & wmProp);
+
+#else
+ if (!wxMWMIsRunning(w))
+ return FALSE;
+
+ Atom mwm_wm_hints = XInternAtom(wxGlobalDisplay(),"_MOTIF_WM_HINTS", False);
+ MwmHints hints;
+ hints.flags = 0;
+ hints.decorations = 0;
+
+ if (style & wxRESIZE_BORDER)
+ {
+ // wxLogDebug("MWM_DECOR_RESIZEH");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_RESIZEH;
+ }
+
+ if (style & wxSYSTEM_MENU)
+ {
+ // wxLogDebug("MWM_DECOR_MENU");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_MENU;
+ }
+
+ if ((style & wxCAPTION) ||
+ (style & wxTINY_CAPTION_HORIZ) ||
+ (style & wxTINY_CAPTION_VERT))
+ {
+ // wxLogDebug("MWM_DECOR_TITLE");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_TITLE;
+ }
+
+ if ((style & wxTHICK_FRAME) || (style & wxSIMPLE_BORDER) || (style & wxCAPTION))
+ {
+ // wxLogDebug("MWM_DECOR_BORDER");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_BORDER;
+ }
+
+ if (style & wxMINIMIZE_BOX)
+ {
+ // wxLogDebug("MWM_DECOR_MINIMIZE");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_MINIMIZE;
+ }
+
+ if (style & wxMAXIMIZE_BOX)
+ {
+ // wxLogDebug("MWM_DECOR_MAXIMIZE");
+ hints.flags |= MWM_HINTS_DECORATIONS;
+ hints.decorations |= MWM_DECOR_MAXIMIZE;
+ }
+
+ XChangeProperty(wxGlobalDisplay(),
+ w,
+ mwm_wm_hints, mwm_wm_hints,
+ 32, PropModeReplace,
+ (unsigned char *) &hints, PROP_MOTIF_WM_HINTS_ELEMENTS);
+
+#endif
+ return TRUE;
+}
+
+bool wxMWMIsRunning(Window w)
+{
+#if wxUSE_NANOX
+ return FALSE;
+#else
+ Display *dpy = (Display*)wxGetDisplay();
+ Atom motifWmInfo = XInternAtom(dpy, "_MOTIF_WM_INFO", False);
+
+ unsigned long length, bytesafter;
+ unsigned char value[20];
+ unsigned char *ptr = &value[0];
+ int ret, format;
+ Atom type;
+
+ type = format = length = 0;
+ value[0] = 0;
+
+ ret = XGetWindowProperty(wxGlobalDisplay(), w, motifWmInfo,
+ 0L, 2, False, motifWmInfo,
+ &type, &format, &length, &bytesafter, &ptr);
+
+ return (ret == Success);
+#endif
+}
+
+// For implementation purposes - sometimes decorations make the client area
+// smaller
+wxPoint wxTopLevelWindowX11::GetClientAreaOrigin() const
+{
+ // wxFrame::GetClientAreaOrigin
+ // does the required calculation already.
+ return wxPoint(0, 0);
+}
+
+void wxTopLevelWindowX11::DoGetClientSize( int *width, int *height ) const
+{
+ XSync(wxGlobalDisplay(), False);
+ wxWindowX11::DoGetClientSize(width, height);
+}
+
+void wxTopLevelWindowX11::DoSetClientSize(int width, int height)
+{
+ wxWindowX11::DoSetClientSize(width, height);
+
+ // Set the top-level window size
+ XSizeHints size_hints;
+ wxSize oldSize = GetSize();
+ wxSize oldClientSize = GetClientSize();
+
+ size_hints.flags = PSize;
+ size_hints.width = width + (oldSize.x - oldClientSize.x);
+ size_hints.height = height + (oldSize.y - oldClientSize.y);
+ XSetWMNormalHints( (Display*) GetXDisplay(), (Window) GetMainWindow(),
+ &size_hints);
+
+ // This seems to be necessary or resizes don't get performed
+ XSync(wxGlobalDisplay(), False);
+ XSync(wxGlobalDisplay(), False);
+
+#if 0
+ wxLogDebug("DoSetClientSize: Tried to set size to %d, %d", (int) size_hints.width, (int) size_hints.height);
+
+ XSync(wxGlobalDisplay(), False);
+ wxSize newSize = GetSize();
+ wxLogDebug("New size is %d, %d", (int) newSize.x, (int) newSize.y);
+#endif
+
+#if 0
+ if (!GetMainWindow())
+ return;
+
+ XWindowChanges windowChanges;
+ int valueMask = 0;
+
+ if (width != -1)
+ {
+ windowChanges.width = width ;
+ valueMask |= CWWidth;
+ }
+ if (height != -1)
+ {
+ windowChanges.height = height ;
+ valueMask |= CWHeight;
+ }
+ XConfigureWindow(wxGlobalDisplay(), (Window) GetMainWindow(),
+ valueMask, & windowChanges);
+#endif
+}
+
+void wxTopLevelWindowX11::DoSetSize(int x, int y, int width, int height, int sizeFlags)
+{
+ // wxLogDebug( "Setting pos: %d, %d", x, y );
+ wxWindowX11::DoSetSize(x, y, width, height, sizeFlags);
+
+ XSizeHints size_hints;
+ size_hints.flags = 0;
+ if (x > -1 && y > -1)
+ size_hints.flags |= PPosition;
+ if (width > -1 && height > -1)
+ size_hints.flags |= PSize;
+ size_hints.width = width;
+ size_hints.height = height;
+ size_hints.x = x;
+ size_hints.y = y;
+ XSetWMNormalHints( (Display*) GetXDisplay(), (Window) GetMainWindow(),
+ &size_hints);
+
+ // This seems to be necessary or resizes don't get performed.
+ // Take them out (or even just one of them), and the About
+ // box of the minimal sample probably won't be resized right.
+ XSync(wxGlobalDisplay(), False);
+ XSync(wxGlobalDisplay(), False);
+
+#if 0
+ wxLogDebug("DoSetSize: Tried to set size to %d, %d", (int) size_hints.width, (int) size_hints.height);
+
+ XSync(wxGlobalDisplay(), False);
+ wxSize newSize = GetSize();
+ wxLogDebug("New size is %d, %d", (int) newSize.x, (int) newSize.y);
+#endif
+
+#if 0
+ wxPoint pt = GetPosition();
+ // wxLogDebug( "After, pos: %d, %d", pt.x, pt.y );
+
+ XSync(wxGlobalDisplay(), False);
+ int w, h;
+ GetSize(& w, & h);
+ wxString msg;
+ msg.Printf("Before setting size: %d, %d", w, h);
+ wxLogDebug(msg);
+ if (!GetMainWindow())
+ return;
+
+ XWindowChanges windowChanges;
+ int valueMask = 0;
+
+ if (x != -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
+ {
+ int yy = 0;
+ AdjustForParentClientOrigin( x, yy, sizeFlags);
+ windowChanges.x = x;
+ valueMask |= CWX;
+ }
+ if (y != -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
+ {
+ int xx = 0;
+ AdjustForParentClientOrigin( xx, y, sizeFlags);
+ windowChanges.y = y;
+ valueMask |= CWY;
+ }
+ if (width != -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
+ {
+ windowChanges.width = width /* - m_borderSize*2 */;
+ valueMask |= CWWidth;
+ }
+ if (height != -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
+ {
+ windowChanges.height = height /* -m_borderSize*2*/;
+ valueMask |= CWHeight;
+ }
+
+ XConfigureWindow(wxGlobalDisplay(), (Window) GetMainWindow(),
+ valueMask, & windowChanges);
+ XSync(wxGlobalDisplay(), False);
+ GetSize(& w, & h);
+ msg.Printf("Tried to set to %d, %d. After setting size: %d, %d", width, height, w, h);
+ wxLogDebug(msg);
+#endif
+}
+
+void wxTopLevelWindowX11::DoGetPosition(int *x, int *y) const
+{
+ XSync(wxGlobalDisplay(), False);
+ Window window = (Window) m_mainWidget;
+ if (window)
+ {
+ int offsetX = 0;
+ int offsetY = 0;
+
+#if !wxUSE_NANOX
+ // wxLogDebug("Translating...");
+ Window childWindow;
+ XTranslateCoordinates(wxGlobalDisplay(), window, XDefaultRootWindow(wxGlobalDisplay()),
+ 0, 0, & offsetX, & offsetY, & childWindow);
+
+ // wxLogDebug("Offset: %d, %d", offsetX, offsetY);
+#endif
+
+ XWindowAttributes attr;
+ Status status = XGetWindowAttributes(wxGlobalDisplay(), window, & attr);
+ wxASSERT(status);
+
+ if (status)
+ {
+ *x = attr.x + offsetX;
+ *y = attr.y + offsetY;
+ }
+ }
projects / wxWidgets.git / blobdiff