- tmp_list = tmp_list->next;
- }
-
- gdk_x11_display_error_trap_pop_ignored (display);
-
- if (retval)
- return retval;
- else
- return GDK_WINDOW_XID (gdk_screen_get_root_window (cache->screen));
-}
-
-/*************************************************************
- ***************************** 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
-};
-
-/* 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 (GDK_POINTER_TO_ATOM (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);
-}
-
-/* Motif packs together fields of varying length into the
- * client message. We can't rely on accessing these
- * through data.s[], data.l[], etc, because on some architectures
- * (i.e., Alpha) these won't be valid for format == 8.
- */
-
-#define MOTIF_XCLIENT_BYTE(xevent,i) \
- (xevent)->xclient.data.b[i]
-#define MOTIF_XCLIENT_SHORT(xevent,i) \
- ((gint16 *)&((xevent)->xclient.data.b[0]))[i]
-#define MOTIF_XCLIENT_LONG(xevent,i) \
- ((gint32 *)&((xevent)->xclient.data.b[0]))[i]
-
-#define MOTIF_UNPACK_BYTE(xevent,i) MOTIF_XCLIENT_BYTE(xevent,i)
-#define MOTIF_UNPACK_SHORT(xevent,i) \
- card16_to_host (MOTIF_XCLIENT_SHORT(xevent,i), MOTIF_XCLIENT_BYTE(xevent, 1))
-#define MOTIF_UNPACK_LONG(xevent,i) \
- card32_to_host (MOTIF_XCLIENT_LONG(xevent,i), MOTIF_XCLIENT_BYTE(xevent, 1))
-
-/***** 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;
-
-/* Target table handling */
-
-static GdkFilterReturn
-motif_drag_window_filter (GdkXEvent *xevent,
- GdkEvent *event,
- gpointer data)
-{
- XEvent *xev = (XEvent *)xevent;
- GdkDisplay *display = GDK_WINDOW_DISPLAY (event->any.window);
- GdkDisplayX11 *display_x11 = GDK_DISPLAY_X11 (display);
-
- switch (xev->xany.type)
- {
- case DestroyNotify:
- display_x11->motif_drag_window = None;
- display_x11->motif_drag_gdk_window = NULL;
- break;
- case PropertyNotify:
- if (display_x11->motif_target_lists &&
- (xev->xproperty.atom == gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_TARGETS")))
- motif_read_target_table (display);
- break;
- }
- return GDK_FILTER_REMOVE;
-}
-
-static Window
-motif_lookup_drag_window (GdkDisplay *display,
- Display *lookup_xdisplay)
-{
- Window retval = None;
- gulong bytes_after, nitems;
- Atom type;
- gint format;
- guchar *data;
-
- XGetWindowProperty (lookup_xdisplay, RootWindow (lookup_xdisplay, 0),
- gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_WINDOW"),
- 0, 1, FALSE,
- XA_WINDOW, &type, &format, &nitems, &bytes_after,
- &data);
-
- if ((format == 32) && (nitems == 1) && (bytes_after == 0))
- {
- retval = *(Window *)data;
- GDK_NOTE (DND,
- g_message ("Found drag window %#lx\n", GDK_DISPLAY_X11 (display)->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.
- */
-static Window
-motif_find_drag_window (GdkDisplay *display,
- gboolean create)
-{
- GdkDisplayX11 *display_x11 = GDK_DISPLAY_X11 (display);
-
- if (!display_x11->motif_drag_window)
- {
- Atom motif_drag_window_atom = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_WINDOW");
- display_x11->motif_drag_window = motif_lookup_drag_window (display, display_x11->xdisplay);
-
- if (!display_x11->motif_drag_window && create)
- {
- /* Create a persistant window. (Copied from LessTif) */
-
- Display *persistant_xdisplay;
- XSetWindowAttributes attr;
- persistant_xdisplay = XOpenDisplay (gdk_display_get_name (display));
- XSetCloseDownMode (persistant_xdisplay, RetainPermanent);
-
- XGrabServer (persistant_xdisplay);
-
- display_x11->motif_drag_window = motif_lookup_drag_window (display, persistant_xdisplay);
-
- if (!display_x11->motif_drag_window)
- {
- attr.override_redirect = True;
- attr.event_mask = PropertyChangeMask;
-
- display_x11->motif_drag_window =
- XCreateWindow (persistant_xdisplay,
- RootWindow (persistant_xdisplay, 0),
- -100, -100, 10, 10, 0, 0,
- InputOnly, (Visual *)CopyFromParent,
- (CWOverrideRedirect | CWEventMask), &attr);
-
- GDK_NOTE (DND,
- g_message ("Created drag window %#lx\n", display_x11->motif_drag_window));
-
- XChangeProperty (persistant_xdisplay,
- RootWindow (persistant_xdisplay, 0),
- motif_drag_window_atom, XA_WINDOW,
- 32, PropModeReplace,
- (guchar *)&motif_drag_window_atom, 1);
-
- }
- XUngrabServer (persistant_xdisplay);
- XCloseDisplay (persistant_xdisplay);
- }
-
- /* There is a miniscule race condition here if the drag window
- * gets destroyed exactly now.
- */
- if (display_x11->motif_drag_window)
- {
- display_x11->motif_drag_gdk_window =
- gdk_x11_window_foreign_new_for_display (display, display_x11->motif_drag_window);
- gdk_window_add_filter (display_x11->motif_drag_gdk_window,
- motif_drag_window_filter,
- NULL);
- }
- }
-
- return display_x11->motif_drag_window;
-}
-
-static void
-motif_read_target_table (GdkDisplay *display)
-{
- GdkDisplayX11 *display_x11 = GDK_DISPLAY_X11 (display);
- gulong bytes_after, nitems;
- Atom type;
- gint format;
- gint i, j;
-
- Atom motif_drag_targets_atom = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_TARGETS");
-
- if (display_x11->motif_target_lists)
- {
- for (i=0; i<display_x11->motif_n_target_lists; i++)
- g_list_free (display_x11->motif_target_lists[i]);
-
- g_free (display_x11->motif_target_lists);
- display_x11->motif_target_lists = NULL;
- display_x11->motif_n_target_lists = 0;
- }
-
- if (motif_find_drag_window (display, FALSE))
- {
- guchar *data;
- MotifTargetTableHeader *header = NULL;
- guchar *target_bytes = NULL;
- guchar *p;
- gboolean success = FALSE;
-
- gdk_x11_display_error_trap_push (display);
- XGetWindowProperty (display_x11->xdisplay,
- display_x11->motif_drag_window,
- motif_drag_targets_atom,
- 0, (sizeof(MotifTargetTableHeader)+3)/4, FALSE,
- motif_drag_targets_atom,
- &type, &format, &nitems, &bytes_after,
- &data);
-
- if (gdk_x11_display_error_trap_pop (display) ||
- (format != 8) || (nitems < sizeof (MotifTargetTableHeader)))
- goto error;
-
- header = (MotifTargetTableHeader *)data;
-
- header->n_lists = card16_to_host (header->n_lists, header->byte_order);
- header->total_size = card32_to_host (header->total_size, header->byte_order);
-
- gdk_x11_display_error_trap_push (display);
- XGetWindowProperty (display_x11->xdisplay,
- display_x11->motif_drag_window,
- motif_drag_targets_atom,
- (sizeof(MotifTargetTableHeader)+3)/4,
- (header->total_size + 3)/4 - (sizeof(MotifTargetTableHeader) + 3)/4,
- FALSE,
- motif_drag_targets_atom, &type, &format, &nitems,
- &bytes_after, &target_bytes);
-
- if (gdk_x11_display_error_trap_pop (display) ||
- (format != 8) || (bytes_after != 0) ||
- (nitems != header->total_size - sizeof(MotifTargetTableHeader)))
- goto error;
-
- display_x11->motif_n_target_lists = header->n_lists;
- display_x11->motif_target_lists = g_new0 (GList *, display_x11->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++)
- display_x11->motif_target_lists[i] =
- g_list_prepend (display_x11->motif_target_lists[i],
- GUINT_TO_POINTER (card32_to_host (targets[j],
- header->byte_order)));
- g_free (targets);
- display_x11->motif_target_lists[i] = g_list_reverse (display_x11->motif_target_lists[i]);
- }
-
- success = TRUE;
-
- error:
- if (header)
- XFree (header);
-
- if (target_bytes)
- XFree (target_bytes);
-
- if (!success)
- {
- if (display_x11->motif_target_lists)
- {
- g_free (display_x11->motif_target_lists);
- display_x11->motif_target_lists = NULL;
- display_x11->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 gint
-motif_target_table_check (GdkDisplay *display,
- GList *sorted)
-{
- GdkDisplayX11 *display_x11 = GDK_DISPLAY_X11 (display);
- GList *tmp_list1, *tmp_list2;
- gint i;
-
- for (i=0; i<display_x11->motif_n_target_lists; i++)
- {
- tmp_list1 = display_x11->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 (GdkDisplay *display,
- GList *targets) /* targets is list of GdkAtom */
-{
- GdkDisplayX11 *display_x11 = GDK_DISPLAY_X11 (display);
- GList *sorted = NULL;
- gint index = -1;
- gint i;
- GList *tmp_list;
-
- /* make a sorted copy of the list */
-
- while (targets)
- {
- Atom xatom = gdk_x11_atom_to_xatom_for_display (display, GDK_POINTER_TO_ATOM (targets->data));
- sorted = g_list_insert_sorted (sorted, GUINT_TO_POINTER (xatom), targets_sort_func);
- targets = targets->next;
- }
-
- /* First check if it is there already */
-
- if (display_x11->motif_target_lists)
- index = motif_target_table_check (display, 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 (display, TRUE);
-
- gdk_x11_display_grab (display);
- motif_read_target_table (display);
-
- /* Check again, in case it was added in the meantime */
-
- if (display_x11->motif_target_lists)
- index = motif_target_table_check (display, sorted);
-
- if (index < 0)
- {
- guint32 total_size = 0;
- guchar *data;
- guchar *p;
- guint16 *p16;
- MotifTargetTableHeader *header;
-
- if (!display_x11->motif_target_lists)
- {
- display_x11->motif_target_lists = g_new (GList *, 1);
- display_x11->motif_n_target_lists = 1;
- }
- else
- {
- display_x11->motif_n_target_lists++;
- display_x11->motif_target_lists = g_realloc (display_x11->motif_target_lists,
- sizeof(GList *) * display_x11->motif_n_target_lists);
- }
- display_x11->motif_target_lists[display_x11->motif_n_target_lists - 1] = sorted;
- sorted = NULL;
- index = display_x11->motif_n_target_lists - 1;
-
- total_size = sizeof (MotifTargetTableHeader);
- for (i = 0; i < display_x11->motif_n_target_lists ; i++)
- total_size += sizeof(guint16) + sizeof(guint32) * g_list_length (display_x11->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 = display_x11->motif_n_target_lists;
- header->total_size = total_size;
-
- for (i = 0; i < display_x11->motif_n_target_lists ; i++)
- {
- guint16 n_targets = g_list_length (display_x11->motif_target_lists[i]);
- guint32 *targets = g_new (guint32, n_targets);
- guint32 *p32 = targets;
-
- tmp_list = display_x11->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 (display_x11->xdisplay,
- display_x11->motif_drag_window,
- gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_TARGETS"),
- gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_TARGETS"),
- 8, PropModeReplace,
- data, total_size);
- }
- gdk_x11_display_ungrab (display);
- }
-
- g_list_free (sorted);
- return index;
-}
-
-/* Translate flags */
-
-static void
-motif_dnd_translate_flags (GdkDragContextX11 *context_x11,
- guint16 flags)
-{
- GdkDragContext *context = GDK_DRAG_CONTEXT (context_x11);
- 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 (GdkDragContextX11 *context_x11)
-{
- GdkDragContext *context = GDK_DRAG_CONTEXT (context_x11);
- MotifDragInitiatorInfo info;
- gint i;
- GdkDisplay *display = GDK_WINDOW_DISPLAY (context->source_window);
-
- info.byte_order = local_byte_order;
- info.protocol_version = 0;
- info.targets_index = motif_add_to_target_table (display, context->targets);
-
- for (i = 0; ; i++)
- {
- gchar buf[20];
- g_snprintf (buf, 20, "_GDK_SELECTION_%d", i);
-
- context_x11->motif_selection = gdk_x11_get_xatom_by_name_for_display (display, buf);
- if (!XGetSelectionOwner (GDK_DISPLAY_XDISPLAY (display), context_x11->motif_selection))
- break;
- }
-
- info.selection_atom = context_x11->motif_selection;
-
- XChangeProperty (GDK_WINDOW_XDISPLAY (context->source_window),
- GDK_WINDOW_XID (context->source_window),
- context_x11->motif_selection,
- gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_INITIATOR_INFO"),
- 8, PropModeReplace,
- (guchar *)&info, sizeof (info));
-
- context_x11->motif_targets_set = 1;
-}
-
-static guint32
-motif_check_dest (GdkDisplay *display,
- Window win)
-{
- gboolean retval = FALSE;
- guchar *data;
- MotifDragReceiverInfo *info;
- Atom type = None;
- int format;
- unsigned long nitems, after;
- Atom motif_drag_receiver_info_atom = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_RECEIVER_INFO");
-
- gdk_x11_display_error_trap_push (display);
- XGetWindowProperty (GDK_DISPLAY_XDISPLAY (display), win,
- motif_drag_receiver_info_atom,
- 0, (sizeof(*info)+3)/4, False, AnyPropertyType,
- &type, &format, &nitems, &after,
- &data);
-
- if (gdk_x11_display_error_trap_pop (display) == 0)
- {
- if (type != None)
- {
- info = (MotifDragReceiverInfo *)data;
-
- 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 : None;
-}
-
-static void
-motif_send_enter (GdkDragContextX11 *context_x11,
- guint32 time)
-{
- GdkDragContext *context = GDK_DRAG_CONTEXT (context_x11);
- GdkDisplay *display = GDK_WINDOW_DISPLAY (context->source_window);
- XEvent xev;
-
- if (!G_LIKELY (GDK_DISPLAY_X11 (display)->trusted_client))
- return; /* Motif Dnd requires getting properties on the root window */
-
- xev.xclient.type = ClientMessage;
- xev.xclient.message_type = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_AND_DROP_MESSAGE");
- xev.xclient.format = 8;
- xev.xclient.window = GDK_WINDOW_XID (context->dest_window);
-
- MOTIF_XCLIENT_BYTE (&xev, 0) = XmTOP_LEVEL_ENTER;
- MOTIF_XCLIENT_BYTE (&xev, 1) = local_byte_order;
- MOTIF_XCLIENT_SHORT (&xev, 1) = 0;
- MOTIF_XCLIENT_LONG (&xev, 1) = time;
- MOTIF_XCLIENT_LONG (&xev, 2) = GDK_WINDOW_XID (context->source_window);
-
- if (!context_x11->motif_targets_set)
- motif_set_targets (context_x11);
-
- MOTIF_XCLIENT_LONG (&xev, 3) = context_x11->motif_selection;
- MOTIF_XCLIENT_LONG (&xev, 4) = 0;
-
- if (!_gdk_send_xevent (display,
- GDK_WINDOW_XID (context->dest_window),
- FALSE, 0, &xev))
- GDK_NOTE (DND,
- g_message ("Send event to %lx failed",
- GDK_WINDOW_XID (context->dest_window)));
-}
-
-static void
-motif_send_leave (GdkDragContextX11 *context_x11,
- guint32 time)
-{
- GdkDragContext *context = GDK_DRAG_CONTEXT (context_x11);
- GdkDisplay *display = GDK_WINDOW_DISPLAY (context->source_window);
- XEvent xev;
-
- xev.xclient.type = ClientMessage;
- xev.xclient.message_type = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_AND_DROP_MESSAGE");
- xev.xclient.format = 8;
- xev.xclient.window = GDK_WINDOW_XID (context->dest_window);
-
- MOTIF_XCLIENT_BYTE (&xev, 0) = XmTOP_LEVEL_LEAVE;
- MOTIF_XCLIENT_BYTE (&xev, 1) = local_byte_order;
- MOTIF_XCLIENT_SHORT (&xev, 1) = 0;
- MOTIF_XCLIENT_LONG (&xev, 1) = time;
- MOTIF_XCLIENT_LONG (&xev, 2) = 0;
- MOTIF_XCLIENT_LONG (&xev, 3) = 0;
- MOTIF_XCLIENT_LONG (&xev, 4) = 0;
-
- if (!_gdk_send_xevent (display,
- GDK_WINDOW_XID (context->dest_window),
- FALSE, 0, &xev))
- GDK_NOTE (DND,
- g_message ("Send event to %lx failed",
- GDK_WINDOW_XID (context->dest_window)));
-}
-
-static gboolean
-motif_send_motion (GdkDragContextX11 *context_x11,
- gint x_root,
- gint y_root,
- GdkDragAction action,
- guint32 time)
-{
- GdkDragContext *context = GDK_DRAG_CONTEXT (context_x11);
- GdkDisplay *display = GDK_WINDOW_DISPLAY (context->source_window);
- gboolean retval;
- XEvent xev;
-
- xev.xclient.type = ClientMessage;
- xev.xclient.message_type = gdk_x11_get_xatom_by_name_for_display (display, "_MOTIF_DRAG_AND_DROP_MESSAGE");
- xev.xclient.format = 8;
- xev.xclient.window = GDK_WINDOW_XID (context->dest_window);
-
- MOTIF_XCLIENT_BYTE (&xev, 1) = local_byte_order;
- MOTIF_XCLIENT_SHORT (&xev, 1) = motif_dnd_get_flags (context);
- MOTIF_XCLIENT_LONG (&xev, 1) = time;
- MOTIF_XCLIENT_LONG (&xev, 3) = 0;
- MOTIF_XCLIENT_LONG (&xev, 4) = 0;
-
- if ((context->suggested_action != context_x11->old_action) ||
- (context->actions != context_x11->old_actions))
- {
- MOTIF_XCLIENT_BYTE (&xev, 0) = XmOPERATION_CHANGED;
-
- /* context_x11->drag_status = GDK_DRAG_STATUS_ACTION_WAIT; */
- retval = TRUE;
- }
- else
- {
- MOTIF_XCLIENT_BYTE (&xev, 0) = XmDRAG_MOTION;
-
- MOTIF_XCLIENT_SHORT (&xev, 4) = x_root;
- MOTIF_XCLIENT_SHORT (&xev, 5) = y_root;
-
- context_x11->drag_status = GDK_DRAG_STATUS_MOTION_WAIT;
- retval = FALSE;