mirror of
https://gitlab.gnome.org/GNOME/gtk.git
synced 2024-11-10 10:50:10 +00:00
1fd7a6e491
Tue Jan 5 15:03:47 1999 Owen Taylor <otaylor@redhat.com> * gtk/gtkmain.c (gtk_propagate_event): Make gtk_propagate_event() non-static, we need it in gtkdnd.c so that the button-release we synthesize gets propagated correctly. * gtk/gtkdnd.c: Use gtk_propagate_event() so release gets to a GtkList. But we can't really get this right without access to the windows event masks and doing X-style propagation ourselves. Tue Jan 5 11:31:55 1999 Owen Taylor <otaylor@redhat.com> * gtk/gtkselection.c (gtk_target_list_unref): Free memory allocated for target lists. * gtk/gtkdnd.c (gtk_drag_drop_finished): Release selections before destroying info structure. * gdk/gdkdnd.c gdktypes.h (gdk_drag_get_protocol): Add new value GDK_DRAG_PROTO_NONE, use it for non-drag targets, to quiet Purify. * gdk/gdkdnd.c (gdk_window_register_dnd): Set size of property properly.
2978 lines
74 KiB
C
2978 lines
74 KiB
C
/* GDK - The GIMP Drawing Kit
|
|
* Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Library General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Library General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Library General Public
|
|
* License along with this library; if not, write to the
|
|
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
#include <X11/Xlib.h>
|
|
#include <X11/Xatom.h>
|
|
#include <string.h>
|
|
#include "gdkx.h"
|
|
#include "gdk/gdkprivate.h"
|
|
#include "gdk.h"
|
|
|
|
typedef struct _GdkDragContextPrivate GdkDragContextPrivate;
|
|
|
|
typedef enum {
|
|
GDK_DRAG_STATUS_DRAG,
|
|
GDK_DRAG_STATUS_MOTION_WAIT,
|
|
GDK_DRAG_STATUS_ACTION_WAIT,
|
|
GDK_DRAG_STATUS_DROP
|
|
} GtkDragStatus;
|
|
|
|
typedef struct {
|
|
guint32 xid;
|
|
gint x, y, width, height;
|
|
gboolean mapped;
|
|
} GdkCacheChild;
|
|
|
|
typedef struct {
|
|
GList *children;
|
|
GHashTable *child_hash;
|
|
guint old_event_mask;
|
|
} GdkWindowCache;
|
|
|
|
/* Structure that holds information about a drag in progress.
|
|
* this is used on both source and destination sides.
|
|
*/
|
|
struct _GdkDragContextPrivate {
|
|
GdkDragContext context;
|
|
|
|
GdkAtom motif_selection;
|
|
GdkAtom xdnd_selection;
|
|
guint ref_count;
|
|
|
|
guint16 last_x; /* Coordinates from last event */
|
|
guint16 last_y;
|
|
GdkDragAction old_action; /* The last action we sent to the source */
|
|
|
|
Window dest_xid;
|
|
guint xdnd_targets_set : 1; /* Whether we've already set XdndTypeList */
|
|
guint motif_targets_set : 1; /* Whether we've already set motif initiator info */
|
|
guint drag_status : 4; /* current status of drag */
|
|
|
|
GdkWindowCache *window_cache;
|
|
};
|
|
|
|
GdkDragContext *current_dest_drag = NULL;
|
|
|
|
/* Forward declarations */
|
|
|
|
static void gdk_window_cache_destroy (GdkWindowCache *cache);
|
|
|
|
static void motif_read_target_table (void);
|
|
static GdkFilterReturn motif_dnd_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_enter_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_leave_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_position_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_status_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_finished_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
static GdkFilterReturn xdnd_drop_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data);
|
|
|
|
/* Drag Contexts */
|
|
|
|
static GList *contexts;
|
|
|
|
GdkDragContext *
|
|
gdk_drag_context_new (void)
|
|
{
|
|
GdkDragContextPrivate *result;
|
|
|
|
result = g_new0 (GdkDragContextPrivate, 1);
|
|
|
|
result->ref_count = 1;
|
|
|
|
contexts = g_list_prepend (contexts, result);
|
|
|
|
return (GdkDragContext *)result;
|
|
}
|
|
|
|
void
|
|
gdk_drag_context_ref (GdkDragContext *context)
|
|
{
|
|
g_return_if_fail (context != NULL);
|
|
|
|
((GdkDragContextPrivate *)context)->ref_count++;
|
|
}
|
|
|
|
void
|
|
gdk_drag_context_unref (GdkDragContext *context)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
private->ref_count--;
|
|
|
|
g_return_if_fail (context != NULL);
|
|
|
|
if (private->ref_count == 0)
|
|
{
|
|
g_dataset_destroy (private);
|
|
|
|
g_list_free (context->targets);
|
|
|
|
if (context->source_window)
|
|
gdk_window_unref (context->source_window);
|
|
|
|
if (context->dest_window)
|
|
gdk_window_unref (context->dest_window);
|
|
|
|
if (private->window_cache)
|
|
gdk_window_cache_destroy (private->window_cache);
|
|
|
|
contexts = g_list_remove (contexts, private);
|
|
g_free (private);
|
|
}
|
|
}
|
|
|
|
static GdkDragContext *
|
|
gdk_drag_context_find (gboolean is_source,
|
|
Window source_xid,
|
|
Window dest_xid)
|
|
{
|
|
GList *tmp_list = contexts;
|
|
GdkDragContext *context;
|
|
|
|
while (tmp_list)
|
|
{
|
|
context = (GdkDragContext *)tmp_list->data;
|
|
|
|
if ((!context->is_source == !is_source) &&
|
|
((source_xid == None) || (context->source_window &&
|
|
(GDK_WINDOW_XWINDOW (context->source_window) == source_xid))) &&
|
|
((dest_xid == None) || (context->dest_window &&
|
|
(GDK_WINDOW_XWINDOW (context->dest_window) == dest_xid))))
|
|
return context;
|
|
|
|
tmp_list = tmp_list->next;
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
/* Utility functions */
|
|
|
|
static void
|
|
gdk_window_cache_add (GdkWindowCache *cache,
|
|
guint32 xid,
|
|
gint x, gint y, gint width, gint height,
|
|
gboolean mapped)
|
|
{
|
|
GdkCacheChild *child = g_new (GdkCacheChild, 1);
|
|
|
|
child->xid = xid;
|
|
child->x = x;
|
|
child->y = y;
|
|
child->width = width;
|
|
child->height = height;
|
|
child->mapped = mapped;
|
|
|
|
cache->children = g_list_prepend (cache->children, child);
|
|
g_hash_table_insert (cache->child_hash, GUINT_TO_POINTER (xid),
|
|
cache->children);
|
|
}
|
|
|
|
static GdkFilterReturn
|
|
gdk_window_cache_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
GdkWindowCache *cache = data;
|
|
|
|
switch (xevent->type)
|
|
{
|
|
case CirculateNotify:
|
|
break;
|
|
case ConfigureNotify:
|
|
{
|
|
XConfigureEvent *xce = &xevent->xconfigure;
|
|
GList *node;
|
|
|
|
node = g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xce->window));
|
|
if (node)
|
|
{
|
|
GdkCacheChild *child = node->data;
|
|
child->x = xce->x;
|
|
child->y = xce->y;
|
|
child->width = xce->width;
|
|
child->height = xce->height;
|
|
if (xce->above == None && (node->next))
|
|
{
|
|
GList *last = g_list_last (cache->children);
|
|
cache->children = g_list_remove_link (cache->children, node);
|
|
last->next = node;
|
|
node->next = NULL;
|
|
node->prev = last;
|
|
}
|
|
else
|
|
{
|
|
GList *above_node = g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xce->above));
|
|
if (above_node && node->prev != above_node)
|
|
{
|
|
cache->children = g_list_remove_link (cache->children, node);
|
|
node->next = above_node->next;
|
|
node->prev = above_node;
|
|
above_node->next = node;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
case CreateNotify:
|
|
{
|
|
XCreateWindowEvent *xcwe = &xevent->xcreatewindow;
|
|
if (!g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xcwe->window)))
|
|
gdk_window_cache_add (cache, xcwe->window,
|
|
xcwe->x, xcwe->y, xcwe->width, xcwe->height,
|
|
FALSE);
|
|
break;
|
|
}
|
|
case DestroyNotify:
|
|
{
|
|
XDestroyWindowEvent *xdwe = &xevent->xdestroywindow;
|
|
GList *node;
|
|
|
|
node = g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xdwe->window));
|
|
if (node)
|
|
{
|
|
g_hash_table_remove (cache->child_hash,
|
|
GUINT_TO_POINTER (xdwe->window));
|
|
cache->children = g_list_remove_link (cache->children, node);
|
|
g_free (node->data);
|
|
g_list_free_1 (node);
|
|
}
|
|
break;
|
|
}
|
|
case MapNotify:
|
|
{
|
|
XMapEvent *xme = &xevent->xmap;
|
|
GList *node;
|
|
|
|
node = g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xme->window));
|
|
if (node)
|
|
{
|
|
GdkCacheChild *child = node->data;
|
|
child->mapped = TRUE;
|
|
}
|
|
break;
|
|
}
|
|
case ReparentNotify:
|
|
break;
|
|
case UnmapNotify:
|
|
{
|
|
XMapEvent *xume = &xevent->xmap;
|
|
GList *node;
|
|
|
|
node = g_hash_table_lookup (cache->child_hash,
|
|
GUINT_TO_POINTER (xume->window));
|
|
if (node)
|
|
{
|
|
GdkCacheChild *child = node->data;
|
|
child->mapped = FALSE;
|
|
}
|
|
break;
|
|
}
|
|
default:
|
|
return GDK_FILTER_CONTINUE;
|
|
}
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static GdkWindowCache *
|
|
gdk_window_cache_new (void)
|
|
{
|
|
XWindowAttributes xwa;
|
|
Window root, parent, *children;
|
|
unsigned int nchildren;
|
|
int i;
|
|
|
|
gint old_warnings = gdk_error_warnings;
|
|
|
|
GdkWindowCache *result = g_new (GdkWindowCache, 1);
|
|
|
|
result->children = NULL;
|
|
result->child_hash = g_hash_table_new (g_direct_hash, NULL);
|
|
|
|
XGetWindowAttributes (gdk_display, gdk_root_window, &xwa);
|
|
result->old_event_mask = xwa.your_event_mask;
|
|
XSelectInput (gdk_display, gdk_root_window,
|
|
result->old_event_mask | SubstructureNotifyMask);
|
|
gdk_window_add_filter ((GdkWindow *)&gdk_root_parent,
|
|
gdk_window_cache_filter, result);
|
|
|
|
gdk_error_code = 0;
|
|
gdk_error_warnings = 0;
|
|
|
|
if (XQueryTree(gdk_display, gdk_root_window,
|
|
&root, &parent, &children, &nchildren) == 0)
|
|
return result;
|
|
|
|
for (i = 0; i < nchildren ; i++)
|
|
{
|
|
XGetWindowAttributes (gdk_display, children[i], &xwa);
|
|
|
|
gdk_window_cache_add (result, children[i],
|
|
xwa.x, xwa.y, xwa.width, xwa.height,
|
|
xwa.map_state != IsUnmapped);
|
|
|
|
if (gdk_error_code != 0)
|
|
gdk_error_code = 0;
|
|
else
|
|
{
|
|
gdk_window_cache_add (result, children[i],
|
|
xwa.x, xwa.y, xwa.width, xwa.height,
|
|
(xwa.map_state != IsUnmapped));
|
|
}
|
|
}
|
|
|
|
XFree (children);
|
|
|
|
gdk_error_warnings = old_warnings;
|
|
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
gdk_window_cache_destroy (GdkWindowCache *cache)
|
|
{
|
|
XSelectInput (gdk_display, gdk_root_window, cache->old_event_mask);
|
|
gdk_window_remove_filter ((GdkWindow *)&gdk_root_parent,
|
|
gdk_window_cache_filter, cache);
|
|
|
|
g_list_foreach (cache->children, (GFunc)g_free, NULL);
|
|
g_list_free (cache->children);
|
|
g_hash_table_destroy (cache->child_hash);
|
|
}
|
|
|
|
static Window
|
|
get_client_window_at_coords_recurse (Window win,
|
|
gint x,
|
|
gint y)
|
|
{
|
|
Window root, tmp_parent, *children;
|
|
unsigned int nchildren;
|
|
int i;
|
|
Window child = None;
|
|
Atom type = None;
|
|
int format;
|
|
unsigned long nitems, after;
|
|
unsigned char *data;
|
|
|
|
static Atom wm_state_atom = None;
|
|
|
|
if (!wm_state_atom)
|
|
wm_state_atom = gdk_atom_intern ("WM_STATE", FALSE);
|
|
|
|
XGetWindowProperty (gdk_display, win,
|
|
wm_state_atom, 0, 0, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after, &data);
|
|
|
|
if (gdk_error_code != 0)
|
|
{
|
|
gdk_error_code = 0;
|
|
return None;
|
|
}
|
|
|
|
if (type != None)
|
|
{
|
|
XFree (data);
|
|
return win;
|
|
}
|
|
|
|
#if 0
|
|
/* This is beautiful! Damn Enlightenment and click-to-focus */
|
|
XTranslateCoordinates (gdk_display, gdk_root_window, win,
|
|
x_root, y_root, &dest_x, &dest_y, &child);
|
|
|
|
if (gdk_error_code != 0)
|
|
{
|
|
gdk_error_code = 0;
|
|
return None;
|
|
}
|
|
|
|
#else
|
|
if (XQueryTree(gdk_display, win,
|
|
&root, &tmp_parent, &children, &nchildren) == 0)
|
|
return 0;
|
|
|
|
if (gdk_error_code == 0)
|
|
{
|
|
for (i = nchildren - 1; (i >= 0) && (child == None); i--)
|
|
{
|
|
XWindowAttributes xwa;
|
|
|
|
XGetWindowAttributes (gdk_display, children[i], &xwa);
|
|
|
|
if (gdk_error_code != 0)
|
|
gdk_error_code = 0;
|
|
else if ((xwa.map_state == IsViewable) && (xwa.class == InputOutput) &&
|
|
(x >= xwa.x) && (x < xwa.x + (gint)xwa.width) &&
|
|
(y >= xwa.y) && (y < xwa.y + (gint)xwa.height))
|
|
{
|
|
x -= xwa.x;
|
|
y -= xwa.y;
|
|
child = children[i];
|
|
}
|
|
}
|
|
|
|
XFree (children);
|
|
}
|
|
else
|
|
gdk_error_code = 0;
|
|
#endif
|
|
|
|
if (child)
|
|
return get_client_window_at_coords_recurse (child, x, y);
|
|
else
|
|
return None;
|
|
}
|
|
|
|
static Window
|
|
get_client_window_at_coords (GdkWindowCache *cache,
|
|
Window ignore,
|
|
gint x_root,
|
|
gint y_root)
|
|
{
|
|
GList *tmp_list;
|
|
Window retval = None;
|
|
|
|
gint old_warnings = gdk_error_warnings;
|
|
|
|
gdk_error_code = 0;
|
|
gdk_error_warnings = 0;
|
|
|
|
tmp_list = cache->children;
|
|
|
|
while (tmp_list && !retval)
|
|
{
|
|
GdkCacheChild *child = tmp_list->data;
|
|
|
|
if ((child->xid != ignore) && (child->mapped))
|
|
{
|
|
if ((x_root >= child->x) && (x_root < child->x + child->width) &&
|
|
(y_root >= child->y) && (y_root < child->y + child->height))
|
|
{
|
|
retval = get_client_window_at_coords_recurse (child->xid,
|
|
x_root - child->x,
|
|
y_root - child->y);
|
|
if (!retval)
|
|
retval = child->xid;
|
|
}
|
|
|
|
}
|
|
tmp_list = tmp_list->next;
|
|
}
|
|
|
|
gdk_error_warnings = old_warnings;
|
|
if (retval)
|
|
return retval;
|
|
else
|
|
return gdk_root_window;
|
|
}
|
|
|
|
#if 0
|
|
static Window
|
|
get_client_window_at_coords_recurse (Window win,
|
|
gint x_root,
|
|
gint y_root)
|
|
{
|
|
Window child;
|
|
Atom type = None;
|
|
int format;
|
|
unsigned long nitems, after;
|
|
unsigned char *data;
|
|
int dest_x, dest_y;
|
|
|
|
static Atom wm_state_atom = None;
|
|
|
|
if (!wm_state_atom)
|
|
wm_state_atom = gdk_atom_intern ("WM_STATE", FALSE);
|
|
|
|
XGetWindowProperty (gdk_display, win,
|
|
wm_state_atom, 0, 0, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after, &data);
|
|
|
|
if (gdk_error_code != 0)
|
|
{
|
|
gdk_error_code = 0;
|
|
return None;
|
|
}
|
|
|
|
if (type != None)
|
|
{
|
|
XFree (data);
|
|
return win;
|
|
}
|
|
|
|
XTranslateCoordinates (gdk_display, gdk_root_window, win,
|
|
x_root, y_root, &dest_x, &dest_y, &child);
|
|
|
|
if (gdk_error_code != 0)
|
|
{
|
|
gdk_error_code = 0;
|
|
return None;
|
|
}
|
|
|
|
if (child)
|
|
return get_client_window_at_coords_recurse (child, x_root, y_root);
|
|
else
|
|
return None;
|
|
}
|
|
|
|
static Window
|
|
get_client_window_at_coords (Window ignore,
|
|
gint x_root,
|
|
gint y_root)
|
|
{
|
|
Window root, parent, *children;
|
|
unsigned int nchildren;
|
|
int i;
|
|
Window retval = None;
|
|
|
|
gint old_warnings = gdk_error_warnings;
|
|
|
|
gdk_error_code = 0;
|
|
gdk_error_warnings = 0;
|
|
|
|
if (XQueryTree(gdk_display, gdk_root_window,
|
|
&root, &parent, &children, &nchildren) == 0)
|
|
return 0;
|
|
|
|
for (i = nchildren - 1; (i >= 0) && (retval == None); i--)
|
|
{
|
|
if (children[i] != ignore)
|
|
{
|
|
XWindowAttributes xwa;
|
|
|
|
XGetWindowAttributes (gdk_display, children[i], &xwa);
|
|
|
|
if (gdk_error_code != 0)
|
|
gdk_error_code = 0;
|
|
else if ((xwa.map_state == IsViewable) &&
|
|
(x_root >= xwa.x) && (x_root < xwa.x + (gint)xwa.width) &&
|
|
(y_root >= xwa.y) && (y_root < xwa.y + (gint)xwa.height))
|
|
{
|
|
retval = get_client_window_at_coords_recurse (children[i],
|
|
x_root, y_root);
|
|
if (!retval)
|
|
retval = children[i];
|
|
}
|
|
}
|
|
}
|
|
|
|
XFree (children);
|
|
|
|
gdk_error_warnings = old_warnings;
|
|
if (retval)
|
|
return retval;
|
|
else
|
|
return gdk_root_window;
|
|
}
|
|
#endif
|
|
|
|
/*************************************************************
|
|
***************************** MOTIF *************************
|
|
*************************************************************/
|
|
|
|
/* values used in the message type for Motif DND */
|
|
enum {
|
|
XmTOP_LEVEL_ENTER,
|
|
XmTOP_LEVEL_LEAVE,
|
|
XmDRAG_MOTION,
|
|
XmDROP_SITE_ENTER,
|
|
XmDROP_SITE_LEAVE,
|
|
XmDROP_START,
|
|
XmDROP_FINISH,
|
|
XmDRAG_DROP_FINISH,
|
|
XmOPERATION_CHANGED
|
|
};
|
|
|
|
/* Values used to specify type of protocol to use */
|
|
enum {
|
|
XmDRAG_NONE,
|
|
XmDRAG_DROP_ONLY,
|
|
XmDRAG_PREFER_PREREGISTER,
|
|
XmDRAG_PREREGISTER,
|
|
XmDRAG_PREFER_DYNAMIC,
|
|
XmDRAG_DYNAMIC,
|
|
XmDRAG_PREFER_RECEIVER
|
|
};
|
|
|
|
/* Operation codes */
|
|
enum {
|
|
XmDROP_NOOP,
|
|
XmDROP_MOVE = 0x01,
|
|
XmDROP_COPY = 0x02,
|
|
XmDROP_LINK = 0x04
|
|
};
|
|
|
|
/* Drop site status */
|
|
enum {
|
|
XmNO_DROP_SITE = 0x01,
|
|
XmDROP_SITE_INVALID = 0x02,
|
|
XmDROP_SITE_VALID = 0x03
|
|
};
|
|
|
|
/* completion status */
|
|
enum {
|
|
XmDROP,
|
|
XmDROP_HELP,
|
|
XmDROP_CANCEL,
|
|
XmDROP_INTERRUPT
|
|
};
|
|
|
|
/* Static data for MOTIF DND */
|
|
static GList **motif_target_lists = NULL;
|
|
static gint motif_n_target_lists = -1;
|
|
|
|
/* Byte swapping routines. The motif specification leaves it
|
|
* up to us to save a few bytes in the client messages
|
|
*/
|
|
static gchar local_byte_order = '\0';
|
|
|
|
#ifdef G_ENABLE_DEBUG
|
|
static void
|
|
print_target_list (GList *targets)
|
|
{
|
|
while (targets)
|
|
{
|
|
gchar *name = gdk_atom_name (GPOINTER_TO_INT (targets->data));
|
|
g_message ("\t%s", name);
|
|
g_free (name);
|
|
targets = targets->next;
|
|
}
|
|
}
|
|
#endif /* G_ENABLE_DEBUG */
|
|
|
|
static void
|
|
init_byte_order (void)
|
|
{
|
|
guint32 myint = 0x01020304;
|
|
local_byte_order = (*(gchar *)&myint == 1) ? 'B' : 'l';
|
|
}
|
|
|
|
static guint16
|
|
card16_to_host (guint16 x, gchar byte_order) {
|
|
if (byte_order == local_byte_order)
|
|
return x;
|
|
else
|
|
return (x << 8) | (x >> 8);
|
|
}
|
|
|
|
static guint32
|
|
card32_to_host (guint32 x, gchar byte_order) {
|
|
if (byte_order == local_byte_order)
|
|
return x;
|
|
else
|
|
return (x << 24) | ((x & 0xff00) << 8) | ((x & 0xff0000) >> 8) | (x >> 24);
|
|
}
|
|
|
|
|
|
/***** Dest side ***********/
|
|
|
|
/* Property placed on source windows */
|
|
typedef struct _MotifDragInitiatorInfo {
|
|
guint8 byte_order;
|
|
guint8 protocol_version;
|
|
guint16 targets_index;
|
|
guint32 selection_atom;
|
|
} MotifDragInitiatorInfo;
|
|
|
|
/* Header for target table on the drag window */
|
|
typedef struct _MotifTargetTableHeader {
|
|
guchar byte_order;
|
|
guchar protocol_version;
|
|
guint16 n_lists;
|
|
guint32 total_size;
|
|
} MotifTargetTableHeader;
|
|
|
|
/* Property placed on target windows */
|
|
typedef struct _MotifDragReceiverInfo {
|
|
guint8 byte_order;
|
|
guint8 protocol_version;
|
|
guint8 protocol_style;
|
|
guint8 pad;
|
|
guint32 proxy_window;
|
|
guint16 num_drop_sites;
|
|
guint16 padding;
|
|
guint32 total_size;
|
|
} MotifDragReceiverInfo;
|
|
|
|
static Window motif_drag_window = None;
|
|
static GdkWindow *motif_drag_gdk_window = NULL;
|
|
|
|
static GdkAtom motif_drag_targets_atom = GDK_NONE;
|
|
static GdkAtom motif_drag_receiver_info_atom = GDK_NONE;
|
|
|
|
/* Target table handling */
|
|
|
|
GdkFilterReturn
|
|
motif_drag_window_filter (GdkXEvent *xevent,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xev = (XEvent *)xevent;
|
|
|
|
switch (xev->xany.type)
|
|
{
|
|
case DestroyNotify:
|
|
motif_drag_window = None;
|
|
motif_drag_gdk_window = NULL;
|
|
break;
|
|
case PropertyNotify:
|
|
if (motif_target_lists &&
|
|
motif_drag_targets_atom &&
|
|
(xev->xproperty.atom == motif_drag_targets_atom))
|
|
motif_read_target_table();
|
|
break;
|
|
}
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static GdkAtom motif_drag_window_atom = GDK_NONE;
|
|
|
|
static Window
|
|
motif_lookup_drag_window (Display *display)
|
|
{
|
|
Window retval = None;
|
|
gulong bytes_after, nitems;
|
|
GdkAtom type;
|
|
gint format;
|
|
guchar *data;
|
|
|
|
XGetWindowProperty (gdk_display, gdk_root_window, motif_drag_window_atom,
|
|
0, sizeof(Window)/4, FALSE,
|
|
XA_WINDOW, &type, &format, &nitems, &bytes_after,
|
|
&data);
|
|
|
|
if ((format == 8*sizeof(Window)) && (nitems == 1) && (bytes_after == 0))
|
|
{
|
|
retval = *(Window *)data;
|
|
GDK_NOTE(DND,
|
|
g_message ("Found drag window %#lx\n", motif_drag_window));
|
|
}
|
|
|
|
if (type != None)
|
|
XFree (data);
|
|
|
|
return retval;
|
|
}
|
|
|
|
/* Finds the window where global Motif drag information is stored.
|
|
* If it doesn't exist and 'create' is TRUE, create one.
|
|
*/
|
|
Window
|
|
motif_find_drag_window (gboolean create)
|
|
{
|
|
if (!motif_drag_window)
|
|
{
|
|
if (!motif_drag_window_atom)
|
|
motif_drag_window_atom = gdk_atom_intern ("_MOTIF_DRAG_WINDOW", TRUE);
|
|
|
|
motif_drag_window = motif_lookup_drag_window (gdk_display);
|
|
|
|
if (!motif_drag_window && create)
|
|
{
|
|
/* Create a persistant window. (Copied from LessTif) */
|
|
|
|
Display *display;
|
|
XSetWindowAttributes attr;
|
|
display = XOpenDisplay (NULL);
|
|
XSetCloseDownMode (display, RetainPermanent);
|
|
|
|
XGrabServer (display);
|
|
|
|
motif_drag_window = motif_lookup_drag_window (display);
|
|
|
|
if (!motif_drag_window)
|
|
{
|
|
attr.override_redirect = True;
|
|
attr.event_mask = PropertyChangeMask;
|
|
|
|
motif_drag_window =
|
|
XCreateWindow(display, DefaultRootWindow(display),
|
|
-100, -100, 10, 10, 0, 0,
|
|
InputOnly, CopyFromParent,
|
|
(CWOverrideRedirect | CWEventMask), &attr);
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("Created drag window %#lx\n", motif_drag_window));
|
|
|
|
XChangeProperty (display, gdk_root_window,
|
|
motif_drag_window_atom, XA_WINDOW,
|
|
32, PropModeReplace,
|
|
(guchar *)&motif_drag_window_atom, 1);
|
|
|
|
}
|
|
XUngrabServer (display);
|
|
XCloseDisplay (display);
|
|
}
|
|
|
|
/* There is a miniscule race condition here if the drag window
|
|
* gets destroyed exactly now.
|
|
*/
|
|
if (motif_drag_window)
|
|
{
|
|
motif_drag_gdk_window = gdk_window_foreign_new (motif_drag_window);
|
|
gdk_window_add_filter (motif_drag_gdk_window,
|
|
motif_drag_window_filter,
|
|
NULL);
|
|
}
|
|
}
|
|
|
|
return motif_drag_window;
|
|
}
|
|
|
|
static void
|
|
motif_read_target_table (void)
|
|
{
|
|
gulong bytes_after, nitems;
|
|
GdkAtom type;
|
|
gint format;
|
|
gint i, j;
|
|
|
|
if (!motif_drag_targets_atom)
|
|
motif_drag_targets_atom = gdk_atom_intern ("_MOTIF_DRAG_TARGETS", FALSE);
|
|
|
|
if (motif_target_lists)
|
|
{
|
|
for (i=0; i<motif_n_target_lists; i++)
|
|
g_list_free (motif_target_lists[i]);
|
|
|
|
g_free (motif_target_lists);
|
|
motif_target_lists = NULL;
|
|
motif_n_target_lists = 0;
|
|
}
|
|
|
|
if (motif_find_drag_window (FALSE))
|
|
{
|
|
MotifTargetTableHeader *header = NULL;
|
|
guchar *target_bytes = NULL;
|
|
guchar *p;
|
|
gboolean success = FALSE;
|
|
|
|
XGetWindowProperty (gdk_display, motif_drag_window,
|
|
motif_drag_targets_atom,
|
|
0, (sizeof(MotifTargetTableHeader)+3)/4, FALSE,
|
|
motif_drag_targets_atom,
|
|
&type, &format, &nitems, &bytes_after,
|
|
(guchar **)&header);
|
|
|
|
if ((format != 8) || (nitems < sizeof (MotifTargetTableHeader)))
|
|
goto error;
|
|
|
|
header->n_lists = card16_to_host (header->n_lists, header->byte_order);
|
|
header->total_size = card32_to_host (header->total_size, header->byte_order);
|
|
|
|
XGetWindowProperty (gdk_display, motif_drag_window, motif_drag_targets_atom,
|
|
(sizeof(MotifTargetTableHeader)+3)/4,
|
|
(header->total_size - sizeof(MotifTargetTableHeader) + 3)/4,
|
|
FALSE,
|
|
motif_drag_targets_atom, &type, &format, &nitems,
|
|
&bytes_after, &target_bytes);
|
|
|
|
if ((format != 8) || (bytes_after != 0) ||
|
|
(nitems != header->total_size - sizeof(MotifTargetTableHeader)))
|
|
goto error;
|
|
|
|
motif_n_target_lists = header->n_lists;
|
|
motif_target_lists = g_new0 (GList *, motif_n_target_lists);
|
|
|
|
p = target_bytes;
|
|
for (i=0; i<header->n_lists; i++)
|
|
{
|
|
gint n_targets;
|
|
guint32 *targets;
|
|
|
|
if (p + sizeof(guint16) - target_bytes > nitems)
|
|
goto error;
|
|
|
|
n_targets = card16_to_host (*(gushort *)p, header->byte_order);
|
|
|
|
/* We need to make a copy of the targets, since it may
|
|
* be unaligned
|
|
*/
|
|
targets = g_new (guint32, n_targets);
|
|
memcpy (targets, p + sizeof(guint16), sizeof(guint32) * n_targets);
|
|
|
|
p += sizeof(guint16) + n_targets * sizeof(guint32);
|
|
if (p - target_bytes > nitems)
|
|
goto error;
|
|
|
|
for (j=0; j<n_targets; j++)
|
|
motif_target_lists[i] =
|
|
g_list_prepend (motif_target_lists[i],
|
|
GUINT_TO_POINTER (card32_to_host (targets[j],
|
|
header->byte_order)));
|
|
g_free (targets);
|
|
motif_target_lists[i] = g_list_reverse (motif_target_lists[i]);
|
|
}
|
|
|
|
success = TRUE;
|
|
|
|
error:
|
|
if (header)
|
|
XFree (header);
|
|
|
|
if (target_bytes)
|
|
XFree (target_bytes);
|
|
|
|
if (!success)
|
|
{
|
|
if (motif_target_lists)
|
|
{
|
|
g_free (motif_target_lists);
|
|
motif_target_lists = NULL;
|
|
motif_n_target_lists = 0;
|
|
}
|
|
g_warning ("Error reading Motif target table\n");
|
|
}
|
|
}
|
|
}
|
|
|
|
static gint
|
|
targets_sort_func (gconstpointer a, gconstpointer b)
|
|
{
|
|
return (GPOINTER_TO_UINT (a) < GPOINTER_TO_UINT (b)) ?
|
|
-1 : ((GPOINTER_TO_UINT (a) > GPOINTER_TO_UINT (b)) ? 1 : 0);
|
|
}
|
|
|
|
/* Check if given (sorted) list is in the targets table */
|
|
static gboolean
|
|
motif_target_table_check (GList *sorted)
|
|
{
|
|
GList *tmp_list1, *tmp_list2;
|
|
gint i;
|
|
|
|
for (i=0; i<motif_n_target_lists; i++)
|
|
{
|
|
tmp_list1 = motif_target_lists[i];
|
|
tmp_list2 = sorted;
|
|
|
|
while (tmp_list1 && tmp_list2)
|
|
{
|
|
if (tmp_list1->data != tmp_list2->data)
|
|
break;
|
|
|
|
tmp_list1 = tmp_list1->next;
|
|
tmp_list2 = tmp_list2->next;
|
|
}
|
|
if (!tmp_list1 && !tmp_list2) /* Found it */
|
|
return i;
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
static gint
|
|
motif_add_to_target_table (GList *targets)
|
|
{
|
|
GList *sorted = NULL;
|
|
gint index = -1;
|
|
gint i;
|
|
GList *tmp_list;
|
|
|
|
/* make a sorted copy of the list */
|
|
|
|
while (targets)
|
|
{
|
|
sorted = g_list_insert_sorted (sorted, targets->data, targets_sort_func);
|
|
targets = targets->next;
|
|
}
|
|
|
|
/* First check if it is their already */
|
|
|
|
if (motif_target_lists)
|
|
index = motif_target_table_check (sorted);
|
|
|
|
/* We need to grab the server while doing this, to ensure
|
|
* atomiticity. Ugh
|
|
*/
|
|
|
|
if (index < 0)
|
|
{
|
|
/* We need to make sure that it exists _before_ we grab the
|
|
* server, since we can't open a new connection after we
|
|
* grab the server.
|
|
*/
|
|
motif_find_drag_window (TRUE);
|
|
|
|
XGrabServer(gdk_display);
|
|
motif_read_target_table();
|
|
|
|
/* Check again, in case it was added in the meantime */
|
|
|
|
if (motif_target_lists)
|
|
index = motif_target_table_check (sorted);
|
|
|
|
if (index < 0)
|
|
{
|
|
guint32 total_size = 0;
|
|
guchar *data;
|
|
guchar *p;
|
|
guint16 *p16;
|
|
MotifTargetTableHeader *header;
|
|
|
|
if (!motif_target_lists)
|
|
{
|
|
motif_target_lists = g_new (GList *, 1);
|
|
motif_n_target_lists = 1;
|
|
}
|
|
else
|
|
{
|
|
motif_n_target_lists++;
|
|
motif_target_lists = g_realloc (motif_target_lists,
|
|
sizeof(GList *) * motif_n_target_lists);
|
|
}
|
|
motif_target_lists[motif_n_target_lists - 1] = sorted;
|
|
sorted = NULL;
|
|
index = motif_n_target_lists - 1;
|
|
|
|
total_size = sizeof (MotifTargetTableHeader);
|
|
for (i = 0; i < motif_n_target_lists ; i++)
|
|
total_size += sizeof(guint16) + sizeof(guint32) * g_list_length (motif_target_lists[i]);
|
|
|
|
data = g_malloc (total_size);
|
|
|
|
header = (MotifTargetTableHeader *)data;
|
|
p = data + sizeof(MotifTargetTableHeader);
|
|
|
|
header->byte_order = local_byte_order;
|
|
header->protocol_version = 0;
|
|
header->n_lists = motif_n_target_lists;
|
|
header->total_size = total_size;
|
|
|
|
for (i = 0; i < motif_n_target_lists ; i++)
|
|
{
|
|
guint16 n_targets = g_list_length (motif_target_lists[i]);
|
|
guint32 *targets = g_new (guint32, n_targets);
|
|
guint32 *p32 = targets;
|
|
|
|
tmp_list = motif_target_lists[i];
|
|
while (tmp_list)
|
|
{
|
|
*p32 = GPOINTER_TO_UINT (tmp_list->data);
|
|
|
|
tmp_list = tmp_list->next;
|
|
p32++;
|
|
}
|
|
|
|
p16 = (guint16 *)p;
|
|
p += sizeof(guint16);
|
|
|
|
memcpy (p, targets, n_targets * sizeof(guint32));
|
|
|
|
*p16 = n_targets;
|
|
p += sizeof(guint32) * n_targets;
|
|
g_free (targets);
|
|
}
|
|
|
|
XChangeProperty (gdk_display, motif_drag_window,
|
|
motif_drag_targets_atom,
|
|
motif_drag_targets_atom,
|
|
8, PropModeReplace,
|
|
data, total_size);
|
|
}
|
|
XUngrabServer(gdk_display);
|
|
}
|
|
|
|
g_list_free (sorted);
|
|
return index;
|
|
}
|
|
|
|
/* Translate flags */
|
|
|
|
static void
|
|
motif_dnd_translate_flags (GdkDragContext *context, guint16 flags)
|
|
{
|
|
guint recommended_op = flags & 0x000f;
|
|
guint possible_ops = (flags & 0x0f0) >> 4;
|
|
|
|
switch (recommended_op)
|
|
{
|
|
case XmDROP_MOVE:
|
|
context->suggested_action = GDK_ACTION_MOVE;
|
|
break;
|
|
case XmDROP_COPY:
|
|
context->suggested_action = GDK_ACTION_COPY;
|
|
break;
|
|
case XmDROP_LINK:
|
|
context->suggested_action = GDK_ACTION_LINK;
|
|
break;
|
|
default:
|
|
context->suggested_action = GDK_ACTION_COPY;
|
|
break;
|
|
}
|
|
|
|
context->actions = 0;
|
|
if (possible_ops & XmDROP_MOVE)
|
|
context->actions |= GDK_ACTION_MOVE;
|
|
if (possible_ops & XmDROP_COPY)
|
|
context->actions |= GDK_ACTION_COPY;
|
|
if (possible_ops & XmDROP_LINK)
|
|
context->actions |= GDK_ACTION_LINK;
|
|
}
|
|
|
|
static guint16
|
|
motif_dnd_get_flags (GdkDragContext *context)
|
|
{
|
|
guint16 flags = 0;
|
|
|
|
switch (context->suggested_action)
|
|
{
|
|
case GDK_ACTION_MOVE:
|
|
flags = XmDROP_MOVE;
|
|
break;
|
|
case GDK_ACTION_COPY:
|
|
flags = XmDROP_COPY;
|
|
break;
|
|
case GDK_ACTION_LINK:
|
|
flags = XmDROP_LINK;
|
|
break;
|
|
default:
|
|
flags = XmDROP_NOOP;
|
|
break;
|
|
}
|
|
|
|
if (context->actions & GDK_ACTION_MOVE)
|
|
flags |= XmDROP_MOVE << 8;
|
|
if (context->actions & GDK_ACTION_COPY)
|
|
flags |= XmDROP_COPY << 8;
|
|
if (context->actions & GDK_ACTION_LINK)
|
|
flags |= XmDROP_LINK << 8;
|
|
|
|
return flags;
|
|
}
|
|
|
|
/* Source Side */
|
|
|
|
static void
|
|
motif_set_targets (GdkDragContext *context)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
MotifDragInitiatorInfo info;
|
|
gint i;
|
|
static GdkAtom motif_drag_initiator_info = GDK_NONE;
|
|
|
|
if (!motif_drag_initiator_info)
|
|
motif_drag_initiator_info = gdk_atom_intern ("_MOTIF_DRAG_INITIATOR_INFO", FALSE);
|
|
|
|
info.byte_order = local_byte_order;
|
|
info.protocol_version = 0;
|
|
|
|
info.targets_index = motif_add_to_target_table (context->targets);
|
|
|
|
for (i=0; ; i++)
|
|
{
|
|
gchar buf[20];
|
|
g_snprintf(buf, 20, "_GDK_SELECTION_%d", i);
|
|
|
|
private->motif_selection = gdk_atom_intern (buf, FALSE);
|
|
if (!XGetSelectionOwner (gdk_display, private->motif_selection))
|
|
break;
|
|
}
|
|
|
|
info.selection_atom = private->motif_selection;
|
|
|
|
XChangeProperty (GDK_WINDOW_XDISPLAY (context->source_window),
|
|
GDK_WINDOW_XWINDOW (context->source_window),
|
|
private->motif_selection,
|
|
motif_drag_initiator_info, 8, PropModeReplace,
|
|
(guchar *)&info, sizeof (info));
|
|
|
|
private->motif_targets_set = 1;
|
|
}
|
|
|
|
guint32
|
|
motif_check_dest (Window win)
|
|
{
|
|
gboolean retval = FALSE;
|
|
MotifDragReceiverInfo *info;
|
|
Atom type = None;
|
|
int format;
|
|
unsigned long nitems, after;
|
|
|
|
if (!motif_drag_receiver_info_atom)
|
|
motif_drag_receiver_info_atom = gdk_atom_intern ("_MOTIF_DRAG_RECEIVER_INFO", FALSE);
|
|
|
|
XGetWindowProperty (gdk_display, win,
|
|
motif_drag_receiver_info_atom,
|
|
0, (sizeof(*info)+3)/4, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after,
|
|
(guchar **)&info);
|
|
|
|
if (type != None)
|
|
{
|
|
if ((format == 8) && (nitems == sizeof(*info)))
|
|
{
|
|
if ((info->protocol_version == 0) &&
|
|
((info->protocol_style == XmDRAG_PREFER_PREREGISTER) ||
|
|
(info->protocol_style == XmDRAG_PREFER_DYNAMIC) ||
|
|
(info->protocol_style == XmDRAG_DYNAMIC)))
|
|
retval = TRUE;
|
|
}
|
|
else
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_warning ("Invalid Motif drag receiver property on window %ld\n", win));
|
|
}
|
|
|
|
XFree (info);
|
|
}
|
|
|
|
return retval ? win : GDK_NONE;
|
|
|
|
}
|
|
|
|
static void
|
|
motif_send_enter (GdkDragContext *context,
|
|
guint32 time)
|
|
{
|
|
XEvent xev;
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
|
|
xev.xclient.data.b[0] = XmTOP_LEVEL_ENTER;
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
xev.xclient.data.s[1] = 0;
|
|
xev.xclient.data.l[1] = time;
|
|
xev.xclient.data.l[2] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
|
|
if (!private->motif_targets_set)
|
|
motif_set_targets (context);
|
|
|
|
xev.xclient.data.l[3] = private->motif_selection;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
}
|
|
|
|
static void
|
|
motif_send_leave (GdkDragContext *context,
|
|
guint32 time)
|
|
{
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
|
|
xev.xclient.data.b[0] = XmTOP_LEVEL_LEAVE;
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
xev.xclient.data.s[1] = 0;
|
|
xev.xclient.data.l[1] = time;
|
|
xev.xclient.data.l[2] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
xev.xclient.data.l[3] = 0;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
}
|
|
|
|
static gboolean
|
|
motif_send_motion (GdkDragContext *context,
|
|
gint x_root,
|
|
gint y_root,
|
|
GdkDragAction action,
|
|
guint32 time)
|
|
{
|
|
gboolean retval;
|
|
XEvent xev;
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
xev.xclient.data.s[1] = motif_dnd_get_flags (context);
|
|
xev.xclient.data.l[1] = time;
|
|
|
|
if (context->suggested_action != private->old_action)
|
|
{
|
|
xev.xclient.data.b[0] = XmOPERATION_CHANGED;
|
|
|
|
private->drag_status = GDK_DRAG_STATUS_ACTION_WAIT;
|
|
retval = TRUE;
|
|
}
|
|
else
|
|
{
|
|
xev.xclient.data.b[0] = XmDRAG_MOTION;
|
|
|
|
xev.xclient.data.s[4] = x_root;
|
|
xev.xclient.data.s[5] = y_root;
|
|
|
|
private->drag_status = GDK_DRAG_STATUS_MOTION_WAIT;
|
|
retval = FALSE;
|
|
}
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
|
|
return retval;
|
|
}
|
|
|
|
static void
|
|
motif_send_drop (GdkDragContext *context, guint32 time)
|
|
{
|
|
XEvent xev;
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
|
|
xev.xclient.data.b[0] = XmDROP_START;
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
xev.xclient.data.s[1] = motif_dnd_get_flags (context);
|
|
xev.xclient.data.l[1] = time;
|
|
|
|
xev.xclient.data.s[4] = private->last_x;
|
|
xev.xclient.data.s[5] = private->last_y;
|
|
|
|
xev.xclient.data.l[3] = private->motif_selection;
|
|
xev.xclient.data.l[4] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
}
|
|
|
|
/* Target Side */
|
|
|
|
static gboolean
|
|
motif_read_initiator_info (Window source_window,
|
|
Atom atom,
|
|
GList **targets,
|
|
GdkAtom *selection)
|
|
{
|
|
GList *tmp_list;
|
|
static GdkAtom motif_drag_initiator_info = GDK_NONE;
|
|
GdkAtom type;
|
|
gint format;
|
|
gulong nitems;
|
|
gulong bytes_after;
|
|
|
|
MotifDragInitiatorInfo *initiator_info;
|
|
|
|
if (!motif_drag_initiator_info)
|
|
motif_drag_initiator_info = gdk_atom_intern ("_MOTIF_DRAG_INITIATOR_INFO", FALSE);
|
|
|
|
XGetWindowProperty (gdk_display, source_window, atom,
|
|
0, sizeof(*initiator_info), FALSE,
|
|
motif_drag_initiator_info,
|
|
&type, &format, &nitems, &bytes_after,
|
|
(guchar **)&initiator_info);
|
|
|
|
if ((format != 8) || (nitems != sizeof (MotifDragInitiatorInfo)) || (bytes_after != 0))
|
|
{
|
|
g_warning ("Error reading initiator info\n");
|
|
return FALSE;
|
|
}
|
|
|
|
motif_read_target_table ();
|
|
|
|
if (initiator_info->targets_index >= motif_n_target_lists)
|
|
{
|
|
g_warning ("Invalid target index in TOP_LEVEL_ENTER MESSAGE");
|
|
XFree (initiator_info);
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
tmp_list = g_list_last (motif_target_lists[initiator_info->targets_index]);
|
|
|
|
*targets = NULL;
|
|
while (tmp_list)
|
|
{
|
|
*targets = g_list_prepend (*targets,
|
|
tmp_list->data);
|
|
tmp_list = tmp_list->prev;
|
|
}
|
|
|
|
#ifdef G_ENABLE_DEBUG
|
|
if (gdk_debug_flags & GDK_DEBUG_DND)
|
|
print_target_list (*targets);
|
|
#endif /* G_ENABLE_DEBUG */
|
|
|
|
*selection = initiator_info->selection_atom;
|
|
|
|
XFree (initiator_info);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static GdkDragContext *
|
|
motif_drag_context_new (GdkWindow *dest_window,
|
|
guint32 timestamp,
|
|
guint32 source_window,
|
|
guint32 atom)
|
|
{
|
|
GdkDragContext *new_context;
|
|
GdkDragContextPrivate *private;
|
|
|
|
/* FIXME, current_dest_drag really shouldn't be NULL'd
|
|
* if we error below.
|
|
*/
|
|
if (current_dest_drag != NULL)
|
|
{
|
|
if (timestamp >= current_dest_drag->start_time)
|
|
{
|
|
gdk_drag_context_unref (current_dest_drag);
|
|
current_dest_drag = NULL;
|
|
}
|
|
else
|
|
return NULL;
|
|
}
|
|
|
|
new_context = gdk_drag_context_new ();
|
|
private = (GdkDragContextPrivate *)new_context;
|
|
|
|
new_context->protocol = GDK_DRAG_PROTO_MOTIF;
|
|
new_context->is_source = FALSE;
|
|
|
|
new_context->source_window = gdk_window_lookup (source_window);
|
|
if (new_context->source_window)
|
|
gdk_window_ref (new_context->source_window);
|
|
else
|
|
{
|
|
new_context->source_window = gdk_window_foreign_new (source_window);
|
|
if (!new_context->source_window)
|
|
{
|
|
gdk_drag_context_unref (new_context);
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
new_context->dest_window = dest_window;
|
|
gdk_window_ref (dest_window);
|
|
new_context->start_time = timestamp;
|
|
|
|
if (!motif_read_initiator_info(source_window,
|
|
atom,
|
|
&new_context->targets,
|
|
&private->motif_selection))
|
|
{
|
|
gdk_drag_context_unref (new_context);
|
|
return NULL;
|
|
}
|
|
|
|
return new_context;
|
|
}
|
|
|
|
/*
|
|
* The MOTIF drag protocol has no real provisions for distinguishing
|
|
* multiple simultaneous drops. If the sources grab the pointer
|
|
* when doing drags, that shouldn't happen, in any case. If it
|
|
* does, we can't do much except hope for the best.
|
|
*/
|
|
|
|
static GdkFilterReturn
|
|
motif_top_level_enter (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp,
|
|
guint32 source_window,
|
|
guint32 atom)
|
|
{
|
|
GdkDragContext *new_context;
|
|
|
|
GDK_NOTE(DND, g_message ("Motif DND top level enter: flags: %#4x time: %d source_widow: %#4x atom: %d",
|
|
flags, timestamp, source_window, atom));
|
|
|
|
new_context = motif_drag_context_new (event->any.window, timestamp, source_window, atom);
|
|
if (!new_context)
|
|
return GDK_FILTER_REMOVE;
|
|
|
|
event->dnd.type = GDK_DRAG_ENTER;
|
|
event->dnd.context = new_context;
|
|
gdk_drag_context_ref (new_context);
|
|
|
|
current_dest_drag = new_context;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_top_level_leave (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp)
|
|
{
|
|
GDK_NOTE(DND, g_message ("Motif DND top level leave: flags: %#4x time: %d",
|
|
flags, timestamp));
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_MOTIF) &&
|
|
(timestamp >= current_dest_drag->start_time))
|
|
{
|
|
event->dnd.type = GDK_DRAG_LEAVE;
|
|
/* Pass ownership of context to the event */
|
|
event->dnd.context = current_dest_drag;
|
|
|
|
current_dest_drag = NULL;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
else
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_motion (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp,
|
|
gint16 x_root,
|
|
gint16 y_root)
|
|
{
|
|
GdkDragContextPrivate *private;
|
|
|
|
GDK_NOTE(DND, g_message ("Motif DND motion: flags: %#4x time: %d (%d, %d)",
|
|
flags, timestamp, x_root, y_root));
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_MOTIF) &&
|
|
(timestamp >= current_dest_drag->start_time))
|
|
{
|
|
private = (GdkDragContextPrivate *)current_dest_drag;
|
|
|
|
event->dnd.type = GDK_DRAG_MOTION;
|
|
event->dnd.context = current_dest_drag;
|
|
gdk_drag_context_ref (current_dest_drag);
|
|
|
|
event->dnd.time = timestamp;
|
|
|
|
motif_dnd_translate_flags (current_dest_drag, flags);
|
|
|
|
event->dnd.x_root = x_root;
|
|
event->dnd.y_root = y_root;
|
|
|
|
private->last_x = x_root;
|
|
private->last_y = y_root;
|
|
|
|
private->drag_status = GDK_DRAG_STATUS_MOTION_WAIT;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_operation_changed (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp)
|
|
{
|
|
GdkDragContextPrivate *private;
|
|
|
|
GDK_NOTE(DND, g_message ("Motif DND operation changed: flags: %#4x time: %d",
|
|
flags, timestamp));
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_MOTIF) &&
|
|
(timestamp >= current_dest_drag->start_time))
|
|
{
|
|
event->dnd.type = GDK_DRAG_MOTION;
|
|
event->dnd.send_event = FALSE;
|
|
event->dnd.context = current_dest_drag;
|
|
gdk_drag_context_ref (current_dest_drag);
|
|
|
|
event->dnd.time = timestamp;
|
|
private = (GdkDragContextPrivate *)current_dest_drag;
|
|
|
|
motif_dnd_translate_flags (current_dest_drag, flags);
|
|
|
|
event->dnd.x_root = private->last_x;
|
|
event->dnd.y_root = private->last_y;
|
|
|
|
private->drag_status = GDK_DRAG_STATUS_ACTION_WAIT;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_drop_start (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp,
|
|
guint32 source_window,
|
|
guint32 atom,
|
|
gint16 x_root,
|
|
gint16 y_root)
|
|
{
|
|
GdkDragContext *new_context;
|
|
|
|
|
|
GDK_NOTE(DND, g_message ("Motif DND drop start: flags: %#4x time: %d (%d, %d) source_widow: %#4x atom: %d",
|
|
flags, timestamp, x_root, y_root, source_window, atom));
|
|
|
|
new_context = motif_drag_context_new (event->any.window, timestamp, source_window, atom);
|
|
if (!new_context)
|
|
return GDK_FILTER_REMOVE;
|
|
|
|
motif_dnd_translate_flags (new_context, flags);
|
|
|
|
event->dnd.type = GDK_DROP_START;
|
|
event->dnd.context = new_context;
|
|
event->dnd.time = timestamp;
|
|
event->dnd.x_root = x_root;
|
|
event->dnd.y_root = y_root;
|
|
|
|
gdk_drag_context_ref (new_context);
|
|
current_dest_drag = new_context;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_drag_status (GdkEvent *event,
|
|
guint16 flags,
|
|
guint32 timestamp)
|
|
{
|
|
GdkDragContext *context;
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("Motif status message: flags %x", flags));
|
|
|
|
context = gdk_drag_context_find (TRUE,
|
|
GDK_WINDOW_XWINDOW (event->any.window),
|
|
None);
|
|
|
|
if (context)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
if (private->drag_status == GDK_DRAG_STATUS_MOTION_WAIT)
|
|
private->drag_status = GDK_DRAG_STATUS_DRAG;
|
|
|
|
event->dnd.type = GDK_DRAG_STATUS;
|
|
event->dnd.send_event = FALSE;
|
|
event->dnd.context = context;
|
|
gdk_drag_context_ref (context);
|
|
|
|
event->dnd.time = timestamp;
|
|
|
|
if ((flags & 0x00f0) >> 4 == XmDROP_SITE_VALID)
|
|
{
|
|
switch (flags & 0x000f)
|
|
{
|
|
case XmDROP_NOOP:
|
|
context->action = 0;
|
|
break;
|
|
case XmDROP_MOVE:
|
|
context->action = GDK_ACTION_MOVE;
|
|
break;
|
|
case XmDROP_COPY:
|
|
context->action = GDK_ACTION_COPY;
|
|
break;
|
|
case XmDROP_LINK:
|
|
context->action = GDK_ACTION_LINK;
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
context->action = 0;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
GdkFilterReturn
|
|
motif_dnd_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
XClientMessageEvent *xce = &xevent->xclient;
|
|
|
|
guint8 reason;
|
|
gchar byte_order;
|
|
guint16 flags;
|
|
guint32 timestamp;
|
|
guint32 source_window;
|
|
GdkAtom atom;
|
|
gint16 x_root, y_root;
|
|
gboolean is_reply;
|
|
|
|
/* First read some fields common to all Motif DND messages */
|
|
|
|
reason = xce->data.b[0];
|
|
byte_order = xce->data.b[1];
|
|
flags = card16_to_host (xce->data.s[1], byte_order);
|
|
timestamp = card32_to_host (xce->data.l[1], byte_order);
|
|
|
|
is_reply = ((reason & 0x80) != 0);
|
|
|
|
switch (reason & 0x7f)
|
|
{
|
|
case XmTOP_LEVEL_ENTER:
|
|
source_window = card32_to_host (xce->data.l[2], byte_order);
|
|
atom = card32_to_host (xce->data.l[3], byte_order);
|
|
return motif_top_level_enter (event, flags, timestamp, source_window, atom);
|
|
case XmTOP_LEVEL_LEAVE:
|
|
return motif_top_level_leave (event, flags, timestamp);
|
|
|
|
case XmDRAG_MOTION:
|
|
x_root = card16_to_host (xce->data.s[4], byte_order);
|
|
y_root = card16_to_host (xce->data.s[5], byte_order);
|
|
|
|
if (!is_reply)
|
|
return motif_motion (event, flags, timestamp, x_root, y_root);
|
|
else
|
|
return motif_drag_status (event, flags, timestamp);
|
|
|
|
case XmDROP_SITE_ENTER:
|
|
return motif_drag_status (event, flags, timestamp);
|
|
|
|
case XmDROP_SITE_LEAVE:
|
|
return motif_drag_status (event,
|
|
XmNO_DROP_SITE << 8 | XmDROP_NOOP,
|
|
timestamp);
|
|
case XmDROP_START:
|
|
x_root = card16_to_host (xce->data.s[4], byte_order);
|
|
y_root = card16_to_host (xce->data.s[5], byte_order);
|
|
atom = card32_to_host (xce->data.l[3], byte_order);
|
|
source_window = card32_to_host (xce->data.l[4], byte_order);
|
|
|
|
if (!is_reply)
|
|
return motif_drop_start (event, flags, timestamp, source_window, atom, x_root, y_root);
|
|
|
|
break;
|
|
case XmOPERATION_CHANGED:
|
|
if (!is_reply)
|
|
return motif_operation_changed (event, flags, timestamp);
|
|
else
|
|
return motif_drag_status (event, flags, timestamp);
|
|
|
|
break;
|
|
/* To the best of my knowledge, these next two messages are
|
|
* not part of the protocol, though they are defined in
|
|
* the header files.
|
|
*/
|
|
case XmDROP_FINISH:
|
|
case XmDRAG_DROP_FINISH:
|
|
break;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
/*************************************************************
|
|
***************************** XDND **************************
|
|
*************************************************************/
|
|
|
|
/* Utility functions */
|
|
|
|
static struct {
|
|
gchar *name;
|
|
GdkAtom atom;
|
|
GdkDragAction action;
|
|
} xdnd_actions_table[] = {
|
|
{ "XdndActionCopy", GDK_NONE, GDK_ACTION_COPY },
|
|
{ "XdndActionMove", GDK_NONE, GDK_ACTION_MOVE },
|
|
{ "XdndActionLink", GDK_NONE, GDK_ACTION_LINK },
|
|
{ "XdndActionAsk", GDK_NONE, GDK_ACTION_ASK },
|
|
{ "XdndActionPrivate", GDK_NONE, GDK_ACTION_COPY },
|
|
};
|
|
|
|
static const gint xdnd_n_actions = sizeof(xdnd_actions_table) / sizeof(xdnd_actions_table[0]);
|
|
static gboolean xdnd_actions_initialized = FALSE;
|
|
|
|
static void
|
|
xdnd_initialize_actions (void)
|
|
{
|
|
gint i;
|
|
|
|
xdnd_actions_initialized = TRUE;
|
|
for (i=0; i < xdnd_n_actions; i++)
|
|
xdnd_actions_table[i].atom = gdk_atom_intern (xdnd_actions_table[i].name, FALSE);
|
|
}
|
|
|
|
static GdkDragAction
|
|
xdnd_action_from_atom (GdkAtom atom)
|
|
{
|
|
gint i;
|
|
|
|
if (!xdnd_actions_initialized)
|
|
xdnd_initialize_actions();
|
|
|
|
for (i=0; i<xdnd_n_actions; i++)
|
|
if (atom == xdnd_actions_table[i].atom)
|
|
return xdnd_actions_table[i].action;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static GdkAtom
|
|
xdnd_action_to_atom (GdkDragAction action)
|
|
{
|
|
gint i;
|
|
|
|
if (!xdnd_actions_initialized)
|
|
xdnd_initialize_actions();
|
|
|
|
for (i=0; i<xdnd_n_actions; i++)
|
|
if (action == xdnd_actions_table[i].action)
|
|
return xdnd_actions_table[i].atom;
|
|
|
|
return GDK_NONE;
|
|
}
|
|
|
|
static GdkAtom xdnd_aware_atom = GDK_NONE;
|
|
|
|
/* Source side */
|
|
|
|
static GdkFilterReturn
|
|
xdnd_status_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
guint32 dest_window = xevent->xclient.data.l[0];
|
|
guint32 flags = xevent->xclient.data.l[1];
|
|
GdkAtom action = xevent->xclient.data.l[4];
|
|
GdkDragContext *context;
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndStatus: dest_window: %#x action: %ld",
|
|
dest_window, action));
|
|
|
|
|
|
context = gdk_drag_context_find (TRUE, xevent->xclient.window, dest_window);
|
|
if (context)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
if (private->drag_status == GDK_DRAG_STATUS_MOTION_WAIT)
|
|
private->drag_status = GDK_DRAG_STATUS_DRAG;
|
|
|
|
event->dnd.send_event = FALSE;
|
|
event->dnd.type = GDK_DRAG_STATUS;
|
|
event->dnd.context = context;
|
|
gdk_drag_context_ref (context);
|
|
|
|
event->dnd.time = GDK_CURRENT_TIME; /* FIXME? */
|
|
if (!(action != 0) != !(flags & 1))
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_warning ("Received status event with flags not corresponding to action!\n"));
|
|
action = 0;
|
|
}
|
|
|
|
context->action = xdnd_action_from_atom (action);
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static GdkFilterReturn
|
|
xdnd_finished_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
guint32 dest_window = xevent->xclient.data.l[0];
|
|
GdkDragContext *context;
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndFinished: dest_window: %#x", dest_window));
|
|
|
|
context = gdk_drag_context_find (TRUE, xevent->xclient.window, dest_window);
|
|
if (context)
|
|
{
|
|
event->dnd.type = GDK_DROP_FINISHED;
|
|
event->dnd.context = context;
|
|
gdk_drag_context_ref (context);
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static void
|
|
xdnd_set_targets (GdkDragContext *context)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
GdkAtom *typelist;
|
|
GList *tmp_list = context->targets;
|
|
gint i;
|
|
gint n_targets = g_list_length (context->targets);
|
|
|
|
typelist = g_new (GdkAtom, n_targets);
|
|
i = 0;
|
|
while (tmp_list)
|
|
{
|
|
typelist[i] = GPOINTER_TO_INT (tmp_list->data);
|
|
tmp_list = tmp_list->next;
|
|
i++;
|
|
}
|
|
|
|
XChangeProperty (GDK_WINDOW_XDISPLAY (context->source_window),
|
|
GDK_WINDOW_XWINDOW (context->source_window),
|
|
gdk_atom_intern ("XdndTypeList", FALSE),
|
|
XA_ATOM, 32, PropModeReplace,
|
|
(guchar *)typelist, n_targets);
|
|
|
|
private->xdnd_targets_set = 1;
|
|
}
|
|
|
|
static void
|
|
xdnd_send_enter (GdkDragContext *context)
|
|
{
|
|
XEvent xev;
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndEnter", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
xev.xclient.data.l[1] = (3 << 24); /* version */
|
|
xev.xclient.data.l[2] = 0;
|
|
xev.xclient.data.l[3] = 0;
|
|
xev.xclient.data.l[4] = 0;
|
|
|
|
if (!private->xdnd_selection)
|
|
private->xdnd_selection = gdk_atom_intern ("XdndSelection", FALSE);
|
|
|
|
if (g_list_length (context->targets) > 3)
|
|
{
|
|
if (!private->xdnd_targets_set)
|
|
xdnd_set_targets (context);
|
|
xev.xclient.data.l[1] |= 1;
|
|
}
|
|
else
|
|
{
|
|
GList *tmp_list = context->targets;
|
|
gint i = 2;
|
|
|
|
while (tmp_list)
|
|
{
|
|
xev.xclient.data.l[i] = GPOINTER_TO_INT (tmp_list->data);
|
|
tmp_list = tmp_list->next;
|
|
i++;
|
|
}
|
|
}
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
gdk_window_unref (context->dest_window);
|
|
context->dest_window = NULL;
|
|
}
|
|
}
|
|
|
|
static void
|
|
xdnd_send_leave (GdkDragContext *context)
|
|
{
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndLeave", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
xev.xclient.data.l[1] = 0;
|
|
xev.xclient.data.l[2] = 0;
|
|
xev.xclient.data.l[3] = 0;
|
|
xev.xclient.data.l[4] = 0;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
gdk_window_unref (context->dest_window);
|
|
context->dest_window = NULL;
|
|
}
|
|
}
|
|
|
|
static void
|
|
xdnd_send_drop (GdkDragContext *context, guint32 time)
|
|
{
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndDrop", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
xev.xclient.data.l[1] = 0;
|
|
xev.xclient.data.l[2] = time;
|
|
xev.xclient.data.l[3] = 0;
|
|
xev.xclient.data.l[4] = 0;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
gdk_window_unref (context->dest_window);
|
|
context->dest_window = NULL;
|
|
}
|
|
}
|
|
|
|
static void
|
|
xdnd_send_motion (GdkDragContext *context,
|
|
gint x_root,
|
|
gint y_root,
|
|
GdkDragAction action,
|
|
guint32 time)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndPosition", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->source_window);
|
|
xev.xclient.data.l[1] = 0;
|
|
xev.xclient.data.l[2] = (x_root << 16) | y_root;
|
|
xev.xclient.data.l[3] = time;
|
|
xev.xclient.data.l[4] = xdnd_action_to_atom (action);
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->dest_window),
|
|
FALSE, 0, &xev))
|
|
{
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->dest_window)));
|
|
gdk_window_unref (context->dest_window);
|
|
context->dest_window = NULL;
|
|
}
|
|
private->drag_status = GDK_DRAG_STATUS_MOTION_WAIT;
|
|
}
|
|
|
|
static guint32
|
|
xdnd_check_dest (Window win)
|
|
{
|
|
gboolean retval = FALSE;
|
|
Atom type = None;
|
|
int format;
|
|
unsigned long nitems, after;
|
|
GdkAtom *version;
|
|
Window *proxy_data;
|
|
Window proxy;
|
|
static GdkAtom xdnd_proxy_atom = GDK_NONE;
|
|
|
|
gint old_warnings = gdk_error_warnings;
|
|
|
|
if (!xdnd_proxy_atom)
|
|
xdnd_proxy_atom = gdk_atom_intern ("XdndProxy", FALSE);
|
|
|
|
if (!xdnd_aware_atom)
|
|
xdnd_aware_atom = gdk_atom_intern ("XdndAware", FALSE);
|
|
|
|
proxy = GDK_NONE;
|
|
|
|
gdk_error_code = 0;
|
|
gdk_error_warnings = 0;
|
|
|
|
XGetWindowProperty (gdk_display, win,
|
|
xdnd_proxy_atom, 0,
|
|
1, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after,
|
|
(guchar **)&proxy_data);
|
|
|
|
if (!gdk_error_code)
|
|
{
|
|
if (type != None)
|
|
{
|
|
if ((format == 32) && (nitems == 1))
|
|
{
|
|
proxy = *proxy_data;
|
|
}
|
|
else
|
|
GDK_NOTE (DND,
|
|
g_warning ("Invalid XdndOwner property on window %ld\n", win));
|
|
|
|
XFree (proxy_data);
|
|
}
|
|
|
|
XGetWindowProperty (gdk_display, proxy ? proxy : win,
|
|
xdnd_aware_atom, 0,
|
|
1, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after,
|
|
(guchar **)&version);
|
|
|
|
if (!gdk_error_code && type != None)
|
|
{
|
|
if ((format == 32) && (nitems == 1))
|
|
{
|
|
if (*version == 3)
|
|
retval = TRUE;
|
|
}
|
|
else
|
|
GDK_NOTE (DND,
|
|
g_warning ("Invalid XdndAware property on window %ld\n", win));
|
|
|
|
XFree (version);
|
|
}
|
|
|
|
}
|
|
|
|
gdk_error_warnings = old_warnings;
|
|
gdk_error_code = 0;
|
|
|
|
return retval ? (proxy ? proxy : win) : GDK_NONE;
|
|
}
|
|
|
|
/* Target side */
|
|
|
|
static GdkFilterReturn
|
|
xdnd_enter_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
GdkDragContext *new_context;
|
|
gint i;
|
|
|
|
guint32 source_window = xevent->xclient.data.l[0];
|
|
gboolean get_types = ((xevent->xclient.data.l[1] & 1) != 0);
|
|
gint version = (xevent->xclient.data.l[1] & 0xff000000) >> 24;
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndEnter: source_window: %#x, version: %#x",
|
|
source_window, version));
|
|
|
|
if (version != 3)
|
|
{
|
|
/* Old source ignore */
|
|
GDK_NOTE (DND, g_message ("Ignored old XdndEnter message"));
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
if (current_dest_drag != NULL)
|
|
{
|
|
gdk_drag_context_unref (current_dest_drag);
|
|
current_dest_drag = NULL;
|
|
}
|
|
|
|
new_context = gdk_drag_context_new ();
|
|
new_context->protocol = GDK_DRAG_PROTO_XDND;
|
|
new_context->is_source = FALSE;
|
|
|
|
new_context->source_window = gdk_window_lookup (source_window);
|
|
if (new_context->source_window)
|
|
gdk_window_ref (new_context->source_window);
|
|
else
|
|
{
|
|
new_context->source_window = gdk_window_foreign_new (source_window);
|
|
if (!new_context->source_window)
|
|
{
|
|
gdk_drag_context_unref (new_context);
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
}
|
|
new_context->dest_window = event->any.window;
|
|
gdk_window_ref (new_context->dest_window);
|
|
|
|
new_context->targets = NULL;
|
|
if (get_types)
|
|
{
|
|
Atom type;
|
|
int format;
|
|
gulong nitems, after;
|
|
Atom *data;
|
|
|
|
XGetWindowProperty (GDK_WINDOW_XDISPLAY (event->any.window),
|
|
source_window,
|
|
gdk_atom_intern ("XdndTypeList", FALSE), 0, 65536,
|
|
False, XA_ATOM, &type, &format, &nitems,
|
|
&after, (guchar **)&data);
|
|
|
|
if ((format != 32) || (type != XA_ATOM))
|
|
{
|
|
gdk_drag_context_unref (new_context);
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
for (i=0; i<nitems; i++)
|
|
new_context->targets = g_list_append (new_context->targets,
|
|
GUINT_TO_POINTER (data[i]));
|
|
|
|
XFree(data);
|
|
}
|
|
else
|
|
{
|
|
for (i=0; i<3; i++)
|
|
if (xevent->xclient.data.l[2+i])
|
|
new_context->targets = g_list_append (new_context->targets,
|
|
GUINT_TO_POINTER (xevent->xclient.data.l[2+i]));
|
|
}
|
|
|
|
#ifdef G_ENABLE_DEBUG
|
|
if (gdk_debug_flags & GDK_DEBUG_DND)
|
|
print_target_list (new_context->targets);
|
|
#endif /* G_ENABLE_DEBUG */
|
|
|
|
event->dnd.type = GDK_DRAG_ENTER;
|
|
event->dnd.context = new_context;
|
|
gdk_drag_context_ref (new_context);
|
|
|
|
current_dest_drag = new_context;
|
|
((GdkDragContextPrivate *)new_context)->xdnd_selection =
|
|
gdk_atom_intern ("XdndSelection", FALSE);
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
static GdkFilterReturn
|
|
xdnd_leave_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
guint32 source_window = xevent->xclient.data.l[0];
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndLeave: source_window: %#x",
|
|
source_window));
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_XDND) &&
|
|
(GDK_WINDOW_XWINDOW (current_dest_drag->source_window) == source_window))
|
|
{
|
|
event->dnd.type = GDK_DRAG_LEAVE;
|
|
/* Pass ownership of context to the event */
|
|
event->dnd.context = current_dest_drag;
|
|
|
|
current_dest_drag = NULL;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
else
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static GdkFilterReturn
|
|
xdnd_position_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
guint32 source_window = xevent->xclient.data.l[0];
|
|
gint16 x_root = xevent->xclient.data.l[2] >> 16;
|
|
gint16 y_root = xevent->xclient.data.l[2] & 0xffff;
|
|
guint32 time = xevent->xclient.data.l[3];
|
|
GdkAtom action = xevent->xclient.data.l[4];
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndPosition: source_window: %#x position: (%d, %d) time: %d action: %ld",
|
|
source_window, x_root, y_root, time, action));
|
|
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_XDND) &&
|
|
(GDK_WINDOW_XWINDOW (current_dest_drag->source_window) == source_window))
|
|
{
|
|
event->dnd.type = GDK_DRAG_MOTION;
|
|
event->dnd.context = current_dest_drag;
|
|
gdk_drag_context_ref (current_dest_drag);
|
|
|
|
event->dnd.time = time;
|
|
|
|
current_dest_drag->suggested_action = xdnd_action_from_atom (action);
|
|
|
|
event->dnd.x_root = x_root;
|
|
event->dnd.y_root = y_root;
|
|
|
|
((GdkDragContextPrivate *)current_dest_drag)->last_x = x_root;
|
|
((GdkDragContextPrivate *)current_dest_drag)->last_y = y_root;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
static GdkFilterReturn
|
|
xdnd_drop_filter (GdkXEvent *xev,
|
|
GdkEvent *event,
|
|
gpointer data)
|
|
{
|
|
XEvent *xevent = (XEvent *)xev;
|
|
guint32 source_window = xevent->xclient.data.l[0];
|
|
guint32 time = xevent->xclient.data.l[2];
|
|
|
|
GDK_NOTE (DND,
|
|
g_message ("XdndDrop: source_window: %#x time: %d",
|
|
source_window, time));
|
|
|
|
if ((current_dest_drag != NULL) &&
|
|
(current_dest_drag->protocol == GDK_DRAG_PROTO_XDND) &&
|
|
(GDK_WINDOW_XWINDOW (current_dest_drag->source_window) == source_window))
|
|
{
|
|
GdkDragContextPrivate *private;
|
|
private = (GdkDragContextPrivate *)current_dest_drag;
|
|
|
|
event->dnd.type = GDK_DROP_START;
|
|
|
|
event->dnd.context = current_dest_drag;
|
|
gdk_drag_context_ref (current_dest_drag);
|
|
|
|
event->dnd.time = time;
|
|
event->dnd.x_root = private->last_x;
|
|
event->dnd.y_root = private->last_y;
|
|
|
|
return GDK_FILTER_TRANSLATE;
|
|
}
|
|
|
|
return GDK_FILTER_REMOVE;
|
|
}
|
|
|
|
/*************************************************************
|
|
************************** Public API ***********************
|
|
*************************************************************/
|
|
|
|
void
|
|
gdk_dnd_init (void)
|
|
{
|
|
init_byte_order();
|
|
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE),
|
|
motif_dnd_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndEnter", FALSE),
|
|
xdnd_enter_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndLeave", FALSE),
|
|
xdnd_leave_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndPosition", FALSE),
|
|
xdnd_position_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndStatus", FALSE),
|
|
xdnd_status_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndFinished", FALSE),
|
|
xdnd_finished_filter, NULL);
|
|
gdk_add_client_message_filter (
|
|
gdk_atom_intern ("XdndDrop", FALSE),
|
|
xdnd_drop_filter, NULL);
|
|
}
|
|
|
|
/* Source side */
|
|
|
|
static void
|
|
gdk_drag_do_leave (GdkDragContext *context, guint32 time)
|
|
{
|
|
if (context->dest_window)
|
|
{
|
|
switch (context->protocol)
|
|
{
|
|
case GDK_DRAG_PROTO_MOTIF:
|
|
motif_send_leave (context, time);
|
|
break;
|
|
case GDK_DRAG_PROTO_XDND:
|
|
xdnd_send_leave (context);
|
|
break;
|
|
case GDK_DRAG_PROTO_ROOTWIN:
|
|
break;
|
|
}
|
|
|
|
gdk_window_unref (context->dest_window);
|
|
context->dest_window = NULL;
|
|
}
|
|
}
|
|
|
|
GdkDragContext *
|
|
gdk_drag_begin (GdkWindow *window,
|
|
GList *targets,
|
|
GdkDragAction actions)
|
|
{
|
|
GList *tmp_list;
|
|
GdkDragContext *new_context;
|
|
|
|
g_return_val_if_fail (window != NULL, NULL);
|
|
|
|
new_context = gdk_drag_context_new ();
|
|
new_context->is_source = TRUE;
|
|
new_context->source_window = window;
|
|
gdk_window_ref (window);
|
|
|
|
tmp_list = g_list_last (targets);
|
|
new_context->targets = NULL;
|
|
while (tmp_list)
|
|
{
|
|
new_context->targets = g_list_prepend (new_context->targets,
|
|
tmp_list->data);
|
|
tmp_list = tmp_list->prev;
|
|
}
|
|
|
|
new_context->actions = actions;
|
|
|
|
return new_context;
|
|
}
|
|
|
|
guint32
|
|
gdk_drag_get_protocol (guint32 xid,
|
|
GdkDragProtocol *protocol)
|
|
{
|
|
guint32 retval;
|
|
|
|
if ((retval = xdnd_check_dest (xid)))
|
|
{
|
|
*protocol = GDK_DRAG_PROTO_XDND;
|
|
GDK_NOTE (DND, g_message ("Entering dnd window %#x\n", xid));
|
|
return retval;
|
|
}
|
|
else if ((retval = motif_check_dest (xid)))
|
|
{
|
|
*protocol = GDK_DRAG_PROTO_MOTIF;
|
|
GDK_NOTE (DND, g_message ("Entering motif window %#x\n", xid));
|
|
return retval;
|
|
}
|
|
else
|
|
{
|
|
/* Check if this is a root window */
|
|
|
|
gboolean rootwin = FALSE;
|
|
gint old_warnings = gdk_error_warnings;
|
|
Atom type = None;
|
|
int format;
|
|
unsigned long nitems, after;
|
|
unsigned char *data;
|
|
|
|
if (xid == gdk_root_window)
|
|
rootwin = TRUE;
|
|
|
|
if (!rootwin)
|
|
{
|
|
gdk_error_code = 0;
|
|
|
|
XGetWindowProperty (gdk_display, xid,
|
|
gdk_atom_intern ("ENLIGHTENMENT_DESKTOP", FALSE),
|
|
0, 0, False, AnyPropertyType,
|
|
&type, &format, &nitems, &after, &data);
|
|
if ((gdk_error_code == 0) && type != None)
|
|
{
|
|
XFree (data);
|
|
rootwin = TRUE;
|
|
}
|
|
}
|
|
|
|
/* Until I find out what window manager the next one is for,
|
|
* I'm leaving it commented out. It's supported in the
|
|
* xscreensaver sources, though.
|
|
*/
|
|
#if 0
|
|
if (!rootwin)
|
|
{
|
|
gdk_error_code = 0;
|
|
|
|
XGetWindowProperty (gdk_display, win,
|
|
gdk_atom_intern ("__SWM_VROOT", FALSE),
|
|
0, 0, False, AnyPropertyType,
|
|
&type, &format, &nitems, &data);
|
|
if ((gdk_error_code == 0) && type != None)
|
|
rootwin = TRUE;
|
|
}
|
|
#endif
|
|
|
|
gdk_error_warnings = old_warnings;
|
|
|
|
if (rootwin)
|
|
{
|
|
*protocol = GDK_DRAG_PROTO_ROOTWIN;
|
|
return xid;
|
|
}
|
|
}
|
|
|
|
*protocol = GDK_DRAG_PROTO_NONE;
|
|
return GDK_NONE;
|
|
}
|
|
|
|
void
|
|
gdk_drag_find_window (GdkDragContext *context,
|
|
GdkWindow *drag_window,
|
|
gint x_root,
|
|
gint y_root,
|
|
GdkWindow **dest_window,
|
|
GdkDragProtocol *protocol)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
Window dest;
|
|
|
|
g_return_if_fail (context != NULL);
|
|
|
|
if (!private->window_cache)
|
|
private->window_cache = gdk_window_cache_new();
|
|
|
|
dest = get_client_window_at_coords (private->window_cache,
|
|
drag_window ?
|
|
GDK_WINDOW_XWINDOW (drag_window) : GDK_NONE,
|
|
x_root, y_root);
|
|
|
|
if (private->dest_xid != dest)
|
|
{
|
|
Window recipient;
|
|
private->dest_xid = dest;
|
|
|
|
/* Check if new destination accepts drags, and which protocol */
|
|
|
|
if ((recipient = gdk_drag_get_protocol (dest, protocol)))
|
|
{
|
|
*dest_window = gdk_window_lookup (recipient);
|
|
if (*dest_window)
|
|
gdk_window_ref (*dest_window);
|
|
else
|
|
*dest_window = gdk_window_foreign_new (recipient);
|
|
}
|
|
else
|
|
*dest_window = NULL;
|
|
}
|
|
else
|
|
{
|
|
*dest_window = context->dest_window;
|
|
if (*dest_window)
|
|
gdk_window_ref (*dest_window);
|
|
*protocol = context->protocol;
|
|
}
|
|
}
|
|
|
|
gboolean
|
|
gdk_drag_motion (GdkDragContext *context,
|
|
GdkWindow *dest_window,
|
|
GdkDragProtocol protocol,
|
|
gint x_root,
|
|
gint y_root,
|
|
GdkDragAction action,
|
|
guint32 time)
|
|
{
|
|
GdkDragContextPrivate *private = (GdkDragContextPrivate *)context;
|
|
|
|
g_return_val_if_fail (context != NULL, FALSE);
|
|
|
|
if (context->dest_window != dest_window)
|
|
{
|
|
GdkEvent temp_event;
|
|
|
|
/* Send a leave to the last destination */
|
|
gdk_drag_do_leave (context, time);
|
|
private->drag_status = GDK_DRAG_STATUS_DRAG;
|
|
|
|
/* Check if new destination accepts drags, and which protocol */
|
|
|
|
if (dest_window)
|
|
{
|
|
context->dest_window = dest_window;
|
|
gdk_window_ref (context->dest_window);
|
|
context->protocol = protocol;
|
|
|
|
switch (protocol)
|
|
{
|
|
case GDK_DRAG_PROTO_MOTIF:
|
|
motif_send_enter (context, time);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_XDND:
|
|
xdnd_send_enter (context);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_ROOTWIN:
|
|
break;
|
|
}
|
|
private->old_action = action;
|
|
context->suggested_action = action;
|
|
}
|
|
else
|
|
{
|
|
context->dest_window = NULL;
|
|
context->action = 0;
|
|
}
|
|
|
|
/* Push a status event, to let the client know that
|
|
* the drag changed
|
|
*/
|
|
|
|
temp_event.dnd.type = GDK_DRAG_STATUS;
|
|
temp_event.dnd.window = context->source_window;
|
|
/* We use this to signal a synthetic status. Perhaps
|
|
* we should use an extra field...
|
|
*/
|
|
temp_event.dnd.send_event = TRUE;
|
|
|
|
temp_event.dnd.context = context;
|
|
temp_event.dnd.time = time;
|
|
|
|
gdk_event_put (&temp_event);
|
|
}
|
|
else
|
|
{
|
|
private->old_action = context->suggested_action;
|
|
context->suggested_action = action;
|
|
}
|
|
|
|
/* Send a drag-motion event */
|
|
|
|
private->last_x = x_root;
|
|
private->last_y = y_root;
|
|
|
|
if (context->dest_window)
|
|
{
|
|
if (private->drag_status == GDK_DRAG_STATUS_DRAG)
|
|
{
|
|
switch (context->protocol)
|
|
{
|
|
case GDK_DRAG_PROTO_MOTIF:
|
|
motif_send_motion (context, x_root, y_root, action, time);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_XDND:
|
|
xdnd_send_motion (context, x_root, y_root, action, time);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_ROOTWIN:
|
|
{
|
|
GdkEvent temp_event;
|
|
|
|
if (g_list_find (context->targets,
|
|
GUINT_TO_POINTER (gdk_atom_intern ("application/x-rootwin-drop", FALSE))))
|
|
context->action = context->suggested_action;
|
|
else
|
|
context->action = 0;
|
|
|
|
temp_event.dnd.type = GDK_DRAG_STATUS;
|
|
temp_event.dnd.window = context->source_window;
|
|
temp_event.dnd.send_event = FALSE;
|
|
temp_event.dnd.context = context;
|
|
temp_event.dnd.time = time;
|
|
|
|
gdk_event_put (&temp_event);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
return TRUE;
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
void
|
|
gdk_drag_drop (GdkDragContext *context,
|
|
guint32 time)
|
|
{
|
|
g_return_if_fail (context != NULL);
|
|
|
|
if (context->dest_window)
|
|
{
|
|
switch (context->protocol)
|
|
{
|
|
case GDK_DRAG_PROTO_MOTIF:
|
|
motif_send_leave (context, time);
|
|
motif_send_drop (context, time);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_XDND:
|
|
xdnd_send_drop (context, time);
|
|
break;
|
|
|
|
case GDK_DRAG_PROTO_ROOTWIN:
|
|
g_warning ("Drops for GDK_DRAG_PROTO_ROOTWIN must be handled internally");
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
gdk_drag_abort (GdkDragContext *context,
|
|
guint32 time)
|
|
{
|
|
g_return_if_fail (context != NULL);
|
|
|
|
gdk_drag_do_leave (context, time);
|
|
}
|
|
|
|
/* Destination side */
|
|
|
|
void
|
|
gdk_drag_status (GdkDragContext *context,
|
|
GdkDragAction action,
|
|
guint32 time)
|
|
{
|
|
GdkDragContextPrivate *private;
|
|
XEvent xev;
|
|
|
|
g_return_if_fail (context != NULL);
|
|
|
|
private = (GdkDragContextPrivate *)context;
|
|
|
|
context->action = action;
|
|
|
|
if (context->protocol == GDK_DRAG_PROTO_MOTIF)
|
|
{
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->source_window);
|
|
|
|
if (private->drag_status == GDK_DRAG_STATUS_ACTION_WAIT)
|
|
{
|
|
xev.xclient.data.b[0] = XmOPERATION_CHANGED | 0x80;
|
|
}
|
|
else
|
|
{
|
|
if ((action != 0) != (private->old_action != 0))
|
|
{
|
|
if (action != 0)
|
|
xev.xclient.data.b[0] = XmDROP_SITE_ENTER | 0x80;
|
|
else
|
|
xev.xclient.data.b[0] = XmDROP_SITE_LEAVE | 0x80;
|
|
}
|
|
else
|
|
xev.xclient.data.b[0] = XmDRAG_MOTION | 0x80;
|
|
}
|
|
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
|
|
switch (action)
|
|
{
|
|
case GDK_ACTION_MOVE:
|
|
xev.xclient.data.s[1] = XmDROP_MOVE;
|
|
break;
|
|
case GDK_ACTION_COPY:
|
|
xev.xclient.data.s[1] = XmDROP_COPY;
|
|
break;
|
|
case GDK_ACTION_LINK:
|
|
xev.xclient.data.s[1] = XmDROP_LINK;
|
|
break;
|
|
default:
|
|
xev.xclient.data.s[1] = XmDROP_NOOP;
|
|
break;
|
|
}
|
|
|
|
if (action)
|
|
xev.xclient.data.s[1] |= (XmDROP_SITE_VALID << 4);
|
|
else
|
|
xev.xclient.data.s[1] |= (XmNO_DROP_SITE << 4);
|
|
|
|
xev.xclient.data.l[1] = time;
|
|
xev.xclient.data.s[4] = private->last_x;
|
|
xev.xclient.data.s[5] = private->last_y;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->source_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->source_window)));
|
|
}
|
|
else if (context->protocol == GDK_DRAG_PROTO_XDND)
|
|
{
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndStatus", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->source_window);
|
|
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[1] = (action != 0) ? (2 | 1) : 0;
|
|
xev.xclient.data.l[2] = 0;
|
|
xev.xclient.data.l[3] = 0;
|
|
xev.xclient.data.l[4] = xdnd_action_to_atom (action);
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->source_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->source_window)));
|
|
}
|
|
|
|
private->old_action = action;
|
|
}
|
|
|
|
void
|
|
gdk_drop_reply (GdkDragContext *context,
|
|
gboolean ok,
|
|
guint32 time)
|
|
{
|
|
GdkDragContextPrivate *private;
|
|
|
|
g_return_if_fail (context != NULL);
|
|
|
|
private = (GdkDragContextPrivate *)context;
|
|
|
|
if (context->protocol == GDK_DRAG_PROTO_MOTIF)
|
|
{
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("_MOTIF_DRAG_AND_DROP_MESSAGE", FALSE);
|
|
xev.xclient.format = 8;
|
|
|
|
xev.xclient.data.b[0] = XmDROP_START | 0x80;
|
|
xev.xclient.data.b[1] = local_byte_order;
|
|
if (ok)
|
|
xev.xclient.data.s[1] = XmDROP_COPY |
|
|
(XmDROP_SITE_VALID << 4) |
|
|
(XmDROP_NOOP << 8) |
|
|
(XmDROP << 12);
|
|
else
|
|
xev.xclient.data.s[1] = XmDROP_NOOP |
|
|
(XmNO_DROP_SITE << 4) |
|
|
(XmDROP_NOOP << 8) |
|
|
(XmDROP_CANCEL << 12);
|
|
xev.xclient.data.s[2] = private->last_x;
|
|
xev.xclient.data.s[3] = private->last_y;
|
|
|
|
gdk_send_xevent (GDK_WINDOW_XWINDOW (context->source_window),
|
|
FALSE, 0, &xev);
|
|
}
|
|
}
|
|
|
|
void
|
|
gdk_drop_finish (GdkDragContext *context,
|
|
gboolean success,
|
|
guint32 time)
|
|
{
|
|
g_return_if_fail (context != NULL);
|
|
|
|
if (context->protocol == GDK_DRAG_PROTO_XDND)
|
|
{
|
|
XEvent xev;
|
|
|
|
xev.xclient.type = ClientMessage;
|
|
xev.xclient.message_type = gdk_atom_intern ("XdndFinished", FALSE);
|
|
xev.xclient.format = 32;
|
|
xev.xclient.window = GDK_WINDOW_XWINDOW (context->source_window);
|
|
|
|
xev.xclient.data.l[0] = GDK_WINDOW_XWINDOW (context->dest_window);
|
|
xev.xclient.data.l[1] = 0;
|
|
xev.xclient.data.l[2] = 0;
|
|
xev.xclient.data.l[3] = 0;
|
|
xev.xclient.data.l[4] = 0;
|
|
|
|
if (!gdk_send_xevent (GDK_WINDOW_XWINDOW (context->source_window),
|
|
FALSE, 0, &xev))
|
|
GDK_NOTE (DND,
|
|
g_message ("Send event to %lx failed",
|
|
GDK_WINDOW_XWINDOW (context->source_window)));
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
gdk_window_register_dnd (GdkWindow *window)
|
|
{
|
|
static guint32 xdnd_version = 3;
|
|
MotifDragReceiverInfo info;
|
|
|
|
g_return_if_fail (window != NULL);
|
|
|
|
/* Set Motif drag receiver information property */
|
|
|
|
if (!motif_drag_receiver_info_atom)
|
|
motif_drag_receiver_info_atom = gdk_atom_intern ("_MOTIF_DRAG_RECEIVER_INFO", FALSE);
|
|
|
|
info.byte_order = local_byte_order;
|
|
info.protocol_version = 0;
|
|
info.protocol_style = XmDRAG_DYNAMIC;
|
|
info.proxy_window = GDK_NONE;
|
|
info.num_drop_sites = 0;
|
|
info.total_size = sizeof(info);
|
|
|
|
XChangeProperty (gdk_display, GDK_WINDOW_XWINDOW (window),
|
|
motif_drag_receiver_info_atom,
|
|
motif_drag_receiver_info_atom,
|
|
8, PropModeReplace,
|
|
(guchar *)&info,
|
|
sizeof (info));
|
|
|
|
/* Set XdndAware */
|
|
|
|
if (!xdnd_aware_atom)
|
|
xdnd_aware_atom = gdk_atom_intern ("XdndAware", FALSE);
|
|
|
|
/* The property needs to be of type XA_ATOM, not XA_INTEGER. Blech */
|
|
XChangeProperty (GDK_WINDOW_XDISPLAY (window),
|
|
GDK_WINDOW_XWINDOW (window),
|
|
xdnd_aware_atom, XA_ATOM,
|
|
32, PropModeReplace,
|
|
(guchar *)&xdnd_version, 1);
|
|
}
|
|
|
|
/*************************************************************
|
|
* gdk_drag_get_selection:
|
|
* Returns the selection atom for the current source window
|
|
* arguments:
|
|
*
|
|
* results:
|
|
*************************************************************/
|
|
|
|
GdkAtom
|
|
gdk_drag_get_selection (GdkDragContext *context)
|
|
{
|
|
g_return_val_if_fail (context != NULL, GDK_NONE);
|
|
|
|
if (context->protocol == GDK_DRAG_PROTO_MOTIF)
|
|
return ((GdkDragContextPrivate *)context)->motif_selection;
|
|
else if (context->protocol == GDK_DRAG_PROTO_XDND)
|
|
return ((GdkDragContextPrivate *)context)->xdnd_selection;
|
|
else
|
|
return GDK_NONE;
|
|
}
|
|
|