Experimental option to allow moving the mouse outside the view, "Continuous Grab...
[blender.git] / intern / ghost / intern / GHOST_WindowX11.cpp
index faf6c5b2a99df239c4e91a8500fdb462d4443926..c2dc1048ea0db362f1d9db5f67ababe2ef25caca 100644 (file)
 #include <X11/cursorfont.h>
 #include <X11/Xatom.h>
 
-#include <cstdio>
-
 #if defined(__sun__) || defined( __sun ) || defined (__sparc) || defined (__sparc__)
 #include <strings.h>
 #endif
 
+#include <cstring>
+#include <cstdio>
+
+#include <algorithm>
+#include <string>
 
 // For obscure full screen mode stuuf
 // lifted verbatim from blut.
@@ -148,6 +151,7 @@ GHOST_WindowX11(
        GHOST_TUns32 width,     
        GHOST_TUns32 height,
        GHOST_TWindowState state,
+       const GHOST_TEmbedderWindowID parentWindow,
        GHOST_TDrawingContextType type,
        const bool stereoVisual
 ) :
@@ -165,7 +169,8 @@ GHOST_WindowX11(
        // X can find us a visual matching those requirements.
 
        int attributes[40], i = 0;
-       
+       Atom atoms[2];
+       int natom;      
        
        if(m_stereoVisual)
                attributes[i++] = GLX_STEREO;
@@ -185,6 +190,8 @@ GHOST_WindowX11(
                printf("%s:%d: X11 glxChooseVisual() failed for OpenGL, verify working openGL system!\n", __FILE__, __LINE__);
                return;
        }
+       
+       memset(&m_xtablet, 0, sizeof(m_xtablet));
 
        // Create a bunch of attributes needed to create an X window.
 
@@ -211,25 +218,60 @@ GHOST_WindowX11(
                KeyPressMask | KeyReleaseMask |
                EnterWindowMask | LeaveWindowMask |
                ButtonPressMask | ButtonReleaseMask |
-               PointerMotionMask | FocusChangeMask;
+               PointerMotionMask | FocusChangeMask | PropertyChangeMask;
 
        // create the window!
 
-       m_window = 
-               XCreateWindow(
-                       m_display, 
-                       RootWindow(m_display, m_visual->screen), 
-                       left,
-                       top,
-                       width,
-                       height,
-                       0, // no border.
-                       m_visual->depth,
-                       InputOutput, 
-                       m_visual->visual,
-                       CWBorderPixel|CWColormap|CWEventMask, 
-                       &xattributes
-               );
+       ;
+       if (parentWindow == 0) {
+               m_window = 
+                       XCreateWindow(
+                               m_display, 
+                               RootWindow(m_display, m_visual->screen), 
+                               left,
+                               top,
+                               width,
+                               height,
+                               0, // no border.
+                               m_visual->depth,
+                               InputOutput, 
+                               m_visual->visual,
+                               CWBorderPixel|CWColormap|CWEventMask, 
+                               &xattributes
+                       );
+       } else {
+
+               Window root_return;
+               int x_return,y_return;
+               unsigned int w_return,h_return,border_w_return,depth_return;
+               
+               XGetGeometry(m_display, parentWindow, &root_return, &x_return, &y_return,
+                       &w_return, &h_return, &border_w_return, &depth_return );
+
+               left = 0;
+               top = 0;
+               width = w_return;
+               height = h_return;
+
+
+               m_window = XCreateWindow(
+                               m_display, 
+                               parentWindow,  // reparent against embedder 
+                               left,
+                               top,
+                               width,
+                               height,
+                               0, // no border.
+                               m_visual->depth,
+                               InputOutput, 
+                               m_visual->visual,
+                               CWBorderPixel|CWColormap|CWEventMask, 
+                               &xattributes
+                       );
+
+               XSelectInput(m_display , parentWindow, SubstructureNotifyMask);
+               
+       }       
        
        /*
         * One of the problem with WM-spec is that can't set a property
@@ -252,7 +294,7 @@ GHOST_WindowX11(
        }
        
        // Create some hints for the window manager on how
-       // we want this window treated. 
+       // we want this window treated.
 
        XSizeHints * xsizehints = XAllocSizeHints();
        xsizehints->flags = USPosition | USSize;
@@ -273,6 +315,25 @@ GHOST_WindowX11(
        free(wmclass);
        XFree(xclasshint);
 
+       /* The basic for a good ICCCM "work" */
+       if (m_system->m_wm_protocols) {
+               natom= 0;
+
+               if (m_system->m_delete_window_atom) {
+                       atoms[natom]= m_system->m_delete_window_atom;
+                       natom++;
+               }
+
+               if (m_system->m_wm_take_focus) {
+                       atoms[natom]= m_system->m_wm_take_focus;
+                       natom++;
+               }
+
+               if (natom) {
+                       /* printf("Register atoms: %d\n", natom); */
+                       XSetWMProtocols(m_display, m_window, atoms, natom);
+               }
+       }
 
        // Set the window icon
        XWMHints *xwmhints = XAllocWMHints();
@@ -316,7 +377,8 @@ GHOST_WindowX11(
        XDestroyImage( mask_image );
        
        xwmhints->initial_state = NormalState;
-       xwmhints->flags         = IconPixmapHint|IconMaskHint|StateHint;
+       xwmhints->input= True;
+       xwmhints->flags= InputHint|IconPixmapHint|IconMaskHint|StateHint;
        XSetWMHints(display, m_window, xwmhints );
        XFree(xwmhints);
        // done setting the icon
@@ -352,6 +414,100 @@ static int ApplicationErrorHandler(Display *display, XErrorEvent *theEvent) {
        return 0 ;
 }
 
+/* These C functions are copied from Wine 1.1.13's wintab.c */
+#define BOOL int
+#define TRUE 1
+#define FALSE 0
+
+static bool match_token(const char *haystack, const char *needle)
+{
+       const char *p, *q;
+       for (p = haystack; *p; )
+       {
+               while (*p && isspace(*p))
+                       p++;
+               if (! *p)
+                       break;
+
+               for (q = needle; *q && *p && tolower(*p) == tolower(*q); q++)
+                       p++;
+               if (! *q && (isspace(*p) || !*p))
+                       return TRUE;
+
+               while (*p && ! isspace(*p))
+                       p++;
+       }
+       return FALSE;
+}
+
+/*     Determining if an X device is a Tablet style device is an imperfect science.
+**  We rely on common conventions around device names as well as the type reported
+**  by Wacom tablets.  This code will likely need to be expanded for alternate tablet types
+**
+**     Wintab refers to any device that interacts with the tablet as a cursor,
+**  (stylus, eraser, tablet mouse, airbrush, etc)
+**  this is not to be confused with wacom x11 configuration "cursor" device.
+**  Wacoms x11 config "cursor" refers to its device slot (which we mirror with
+**  our gSysCursors) for puck like devices (tablet mice essentially).
+*/
+#if 0 // unused
+static BOOL is_tablet_cursor(const char *name, const char *type)
+{
+       int i;
+       static const char *tablet_cursor_whitelist[] = {
+               "wacom",
+               "wizardpen",
+               "acecad",
+               "tablet",
+               "cursor",
+               "stylus",
+               "eraser",
+               "pad",
+               NULL
+       };
+
+       for (i=0; tablet_cursor_whitelist[i] != NULL; i++) {
+               if (name && match_token(name, tablet_cursor_whitelist[i]))
+                       return TRUE;
+               if (type && match_token(type, tablet_cursor_whitelist[i]))
+                       return TRUE;
+       }
+       return FALSE;
+}
+#endif
+static BOOL is_stylus(const char *name, const char *type)
+{
+       int i;
+       static const char* tablet_stylus_whitelist[] = {
+               "stylus",
+               "wizardpen",
+               "acecad",
+               NULL
+       };
+
+       for (i=0; tablet_stylus_whitelist[i] != NULL; i++) {
+               if (name && match_token(name, tablet_stylus_whitelist[i]))
+                       return TRUE;
+               if (type && match_token(type, tablet_stylus_whitelist[i]))
+                       return TRUE;
+       }
+
+       return FALSE;
+}
+
+static BOOL is_eraser(const char *name, const char *type)
+{
+       if (name && match_token(name, "eraser"))
+               return TRUE;
+       if (type && match_token(type, "eraser"))
+               return TRUE;
+       return FALSE;
+}
+#undef BOOL
+#undef TRUE
+#undef FALSE
+/* end code copied from wine */
+
 void GHOST_WindowX11::initXInputDevices()
 {
        static XErrorHandler old_handler = (XErrorHandler) 0 ;
@@ -361,15 +517,21 @@ void GHOST_WindowX11::initXInputDevices()
                if(version->present) {
                        int device_count;
                        XDeviceInfo* device_info = XListInputDevices(m_display, &device_count);
-                       m_xtablet.StylusDevice = 0;
-                       m_xtablet.EraserDevice = 0;
-                       m_xtablet.CommonData.Active= 0;
+                       m_xtablet.StylusDevice = NULL;
+                       m_xtablet.EraserDevice = NULL;
+                       m_xtablet.CommonData.Active= GHOST_kTabletModeNone;
 
                        /* Install our error handler to override Xlib's termination behavior */
                        old_handler = XSetErrorHandler(ApplicationErrorHandler) ;
 
                        for(int i=0; i<device_count; ++i) {
-                               if(!strcasecmp(device_info[i].name, "stylus")) {
+                               char *device_type = device_info[i].type ? XGetAtomName(m_display, device_info[i].type) : NULL;
+                               
+//                             printf("Tablet type:'%s', name:'%s', index:%d\n", device_type, device_info[i].name, i);
+
+
+                               if(m_xtablet.StylusDevice==NULL && is_stylus(device_info[i].name, device_type)) {
+//                                     printf("\tfound stylus\n");
                                        m_xtablet.StylusID= device_info[i].id;
                                        m_xtablet.StylusDevice = XOpenDevice(m_display, m_xtablet.StylusID);
 
@@ -378,6 +540,7 @@ void GHOST_WindowX11::initXInputDevices()
                                                XAnyClassPtr ici = device_info[i].inputclassinfo;
                                                for(int j=0; j<m_xtablet.StylusDevice->num_classes; ++j) {
                                                        if(ici->c_class==ValuatorClass) {
+//                                                             printf("\t\tfound ValuatorClass\n");
                                                                XValuatorInfo* xvi = (XValuatorInfo*)ici;
                                                                m_xtablet.PressureLevels = xvi->axes[2].max_value;
                                                        
@@ -394,11 +557,16 @@ void GHOST_WindowX11::initXInputDevices()
                                                m_xtablet.StylusID= 0;
                                        }
                                }
-                               if(!strcasecmp(device_info[i].name, "eraser")) {
+                               else if(m_xtablet.EraserDevice==NULL && is_eraser(device_info[i].name, device_type)) {
+//                                     printf("\tfound eraser\n");
                                        m_xtablet.EraserID= device_info[i].id;
                                        m_xtablet.EraserDevice = XOpenDevice(m_display, m_xtablet.EraserID);
                                        if (m_xtablet.EraserDevice == NULL) m_xtablet.EraserID= 0;
                                }
+
+                               if(device_type) {
+                                       XFree((void*)device_type);
+                               }
                        }
 
                        /* Restore handler */
@@ -439,7 +607,7 @@ GHOST_WindowX11::
 getXWindow(
 ){
        return m_window;
-}      
+}
 
        bool 
 GHOST_WindowX11::
@@ -453,7 +621,17 @@ GHOST_WindowX11::
 setTitle(
        const STR_String& title
 ){
+       Atom name = XInternAtom(m_display, "_NET_WM_NAME", 0);
+       Atom utf8str = XInternAtom(m_display, "UTF8_STRING", 0);
+       XChangeProperty(m_display, m_window,
+                       name, utf8str, 8, PropModeReplace,
+                       (const unsigned char*) title.ReadPtr(),
+                       strlen(title.ReadPtr()));
+
+// This should convert to valid x11 string
+//  and getTitle would need matching change
        XStoreName(m_display,m_window,title);
+
        XFlush(m_display);
 }
 
@@ -662,17 +840,17 @@ void GHOST_WindowX11::netwmMaximized(bool set)
 bool GHOST_WindowX11::netwmIsMaximized(void) const
 {
        unsigned char *prop_ret;
-       unsigned long bytes_after, num_ret;
+       unsigned long bytes_after, num_ret, i;
        Atom type_ret;
        bool st;
-       int format_ret, count, i;
+       int format_ret, ret, count;
 
        prop_ret = NULL;
        st = False;
-       i = XGetWindowProperty(m_display, m_window, m_system->m_net_state, 0,
+       ret = XGetWindowProperty(m_display, m_window, m_system->m_net_state, 0,
                        0x7fffffff, False, XA_ATOM, &type_ret, &format_ret,
                        &num_ret, &bytes_after, &prop_ret);
-       if ((i == Success) && (prop_ret) && (format_ret == 32)) {
+       if ((ret == Success) && (prop_ret) && (format_ret == 32)) {
                count = 0;
                for (i = 0; i < num_ret; i++) {
                        if (((unsigned long *) prop_ret)[i] == m_system->m_net_max_horz)
@@ -718,17 +896,17 @@ void GHOST_WindowX11::netwmFullScreen(bool set)
 bool GHOST_WindowX11::netwmIsFullScreen(void) const
 {
        unsigned char *prop_ret;
-       unsigned long bytes_after, num_ret;
+       unsigned long bytes_after, num_ret, i;
        Atom type_ret;
        bool st;
-       int format_ret, i;
+       int format_ret, ret;
 
        prop_ret = NULL;
        st = False;
-       i = XGetWindowProperty(m_display, m_window, m_system->m_net_state, 0,
+       ret = XGetWindowProperty(m_display, m_window, m_system->m_net_state, 0,
                        0x7fffffff, False, XA_ATOM, &type_ret, &format_ret,
                        &num_ret, &bytes_after, &prop_ret);
-       if ((i == Success) && (prop_ret) && (format_ret == 32)) {
+       if ((ret == Success) && (prop_ret) && (format_ret == 32)) {
                for (i = 0; i < num_ret; i++) {
                        if (((unsigned long *) prop_ret)[i] == m_system->m_net_fullscreen) {
                                st = True;
@@ -811,7 +989,6 @@ GHOST_TSuccess GHOST_WindowX11::setState(GHOST_TWindowState state)
 {
        GHOST_TWindowState cur_state;
        bool is_max, is_full, is_motif_full;
-       int icccm_state;
 
        cur_state = getState();
         if (state == (int)cur_state)
@@ -921,9 +1098,9 @@ setOrder(
                        xev.xclient.message_type = atom;
 
                        xev.xclient.format = 32;
-                       xev.xclient.data.l[0] = 0;
-                       xev.xclient.data.l[1] = 0;
-                       xev.xclient.data.l[2] = 0;
+                       xev.xclient.data.l[0] = 1;
+                       xev.xclient.data.l[1] = CurrentTime;
+                       xev.xclient.data.l[2] = m_window;
                        xev.xclient.data.l[3] = 0;
                        xev.xclient.data.l[4] = 0;
 
@@ -1020,6 +1197,15 @@ validate(
 GHOST_WindowX11::
 ~GHOST_WindowX11(
 ){
+       static Atom Primary_atom, Clipboard_atom;
+       Window p_owner, c_owner;
+       /*Change the owner of the Atoms to None if we are the owner*/
+       Primary_atom = XInternAtom(m_display, "PRIMARY", False);
+       Clipboard_atom = XInternAtom(m_display, "CLIPBOARD", False);
+       
+       p_owner = XGetSelectionOwner(m_display, Primary_atom);
+       c_owner = XGetSelectionOwner(m_display, Clipboard_atom);
+       
        std::map<unsigned int, Cursor>::iterator it = m_standard_cursors.begin();
        for (; it != m_standard_cursors.end(); it++) {
                XFreeCursor(m_display, it->second);
@@ -1032,12 +1218,27 @@ GHOST_WindowX11::
                XFreeCursor(m_display, m_custom_cursor);
        }
        
+       /* close tablet devices */
+       if(m_xtablet.StylusDevice)
+               XCloseDevice(m_display, m_xtablet.StylusDevice);
+       
+       if(m_xtablet.EraserDevice)
+               XCloseDevice(m_display, m_xtablet.EraserDevice);
+       
        if (m_context) {
                if (m_context == s_firstContext) {
                        s_firstContext = NULL;
                }
                glXDestroyContext(m_display, m_context);
        }
+       
+       if (p_owner == m_window) {
+               XSetSelectionOwner(m_display, Primary_atom, None, CurrentTime);
+       }
+       if (c_owner == m_window) {
+               XSetSelectionOwner(m_display, Clipboard_atom, None, CurrentTime);
+       }
+       
        XDestroyWindow(m_display, m_window);
        XFree(m_visual);
 }
@@ -1198,6 +1399,38 @@ setWindowCursorVisibility(
 
        GHOST_TSuccess
 GHOST_WindowX11::
+setWindowCursorGrab(
+       bool grab, bool warp
+){
+       if(grab) {
+               if(warp) {
+                       m_system->getCursorPosition(m_cursorWarpInitPos[0], m_cursorWarpInitPos[1]);
+
+                       setCursorWarpAccum(0, 0);
+                       setWindowCursorVisibility(false);
+                       m_cursorWarp= true;
+               }
+               XGrabPointer(m_display, m_window, True, ButtonPressMask| ButtonReleaseMask|PointerMotionMask, GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
+       }
+       else {
+               if(m_cursorWarp) { /* are we exiting warp */
+                       setWindowCursorVisibility(true);
+                       /* Almost works without but important otherwise the mouse GHOST location can be incorrect on exit */
+                       m_system->setCursorPosition(m_cursorWarpInitPos[0], m_cursorWarpInitPos[1]);
+
+                       setCursorWarpAccum(0, 0);
+                       m_cursorWarp= false;
+               }
+               XUngrabPointer(m_display, CurrentTime);
+       }
+
+       XFlush(m_display);
+       
+       return GHOST_kSuccess;
+}
+
+       GHOST_TSuccess
+GHOST_WindowX11::
 setWindowCursorShape(
        GHOST_TStandardCursor shape
 ){
@@ -1235,13 +1468,12 @@ setWindowCustomCursorShape(
        int fg_color, 
        int bg_color
 ){
+       Colormap colormap= DefaultColormap(m_display, DefaultScreen(m_display));
        Pixmap bitmap_pix, mask_pix;
        XColor fg, bg;
        
-       if(XAllocNamedColor(m_display, DefaultColormap(m_display, DefaultScreen(m_display)),
-               "White", &fg, &fg) == 0) return GHOST_kFailure;
-       if(XAllocNamedColor(m_display, DefaultColormap(m_display, DefaultScreen(m_display)),
-               "Black", &bg, &bg) == 0) return GHOST_kFailure;
+       if(XAllocNamedColor(m_display, colormap, "White", &fg, &fg) == 0) return GHOST_kFailure;
+       if(XAllocNamedColor(m_display, colormap, "Black", &bg, &bg) == 0) return GHOST_kFailure;
 
        if (m_custom_cursor) {
                XFreeCursor(m_display, m_custom_cursor);
@@ -1257,6 +1489,9 @@ setWindowCustomCursorShape(
        XFreePixmap(m_display, bitmap_pix);
        XFreePixmap(m_display, mask_pix);
 
+    XFreeColors(m_display, colormap, &fg.pixel, 1, 0L);
+    XFreeColors(m_display, colormap, &bg.pixel, 1, 0L);
+
        return GHOST_kSuccess;
 }