1 files changed, 274 insertions, 0 deletions

diff --git a/src/xwayland/dnd.c b/src/xwayland/dnd.c
new file mode 100644
index 00000000..b146e123
--- /dev/null
+++ b/src/xwayland/dnd.c
@@ -0,0 +1,274 @@
+/*
+ * Copyright © 2013 Intel Corporation
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and
+ * its documentation for any purpose is hereby granted without fee, provided
+ * that the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the copyright holders not be used in
+ * advertising or publicity pertaining to distribution of the software
+ * without specific, written prior permission.  The copyright holders make
+ * no representations about the suitability of this software for any
+ * purpose.  It is provided "as is" without express or implied warranty.
+ *
+ * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
+ * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
+ * FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
+ * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
+ * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
+ * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
+ * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include "config.h"
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/socket.h>
+#include <sys/un.h>
+#include <fcntl.h>
+#include <errno.h>
+#include <unistd.h>
+#include <signal.h>
+#include <X11/Xcursor/Xcursor.h>
+
+#include "xwayland.h"
+
+#include "../../shared/cairo-util.h"
+#include "../compositor.h"
+#include "xserver-server-protocol.h"
+#include "hash.h"
+
+static void
+weston_dnd_start(struct weston_wm *wm, xcb_window_t owner)
+{
+	uint32_t values[1], version = 4;
+
+	wm->dnd_window = xcb_generate_id(wm->conn);
+	values[0] =
+		XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY |
+		XCB_EVENT_MASK_PROPERTY_CHANGE;
+
+	xcb_create_window(wm->conn,
+			  XCB_COPY_FROM_PARENT,
+			  wm->dnd_window,
+			  wm->screen->root,
+			  0, 0,
+			  8192, 8192,
+			  0,
+			  XCB_WINDOW_CLASS_INPUT_ONLY,
+			  wm->screen->root_visual,
+			  XCB_CW_EVENT_MASK, values);
+	xcb_change_property(wm->conn,
+			    XCB_PROP_MODE_REPLACE,
+			    wm->dnd_window,
+			    wm->atom.xdnd_aware,
+			    XCB_ATOM_ATOM,
+			    32, /* format */
+			    1, &version);
+
+	xcb_map_window(wm->conn, wm->dnd_window);
+	wm->dnd_owner = owner;
+}
+
+static void
+weston_dnd_stop(struct weston_wm *wm)
+{
+	xcb_destroy_window(wm->conn, wm->dnd_window);
+	wm->dnd_window = XCB_WINDOW_NONE;
+}
+
+struct dnd_data_source {
+	struct weston_data_source base;
+	struct weston_wm *wm;
+	int version;
+	uint32_t window;
+};
+
+static void
+data_source_accept(struct weston_data_source *base,
+		   uint32_t time, const char *mime_type)
+{
+	struct dnd_data_source *source = (struct dnd_data_source *) base;
+	xcb_client_message_event_t client_message;
+	struct weston_wm *wm = source->wm;
+
+	weston_log("got accept, mime-type %s\n", mime_type);
+
+	/* FIXME: If we rewrote UTF8_STRING to
+	 * text/plain;charset=utf-8 and the source doesn't support the
+	 * mime-type, we'll have to rewrite the mime-type back to
+	 * UTF8_STRING here. */
+
+	client_message.response_type = XCB_CLIENT_MESSAGE;
+	client_message.format = 32;
+	client_message.window = wm->dnd_window;
+	client_message.type = wm->atom.xdnd_status;
+	client_message.data.data32[0] = wm->dnd_window;
+	client_message.data.data32[1] = 2;
+	if (mime_type)
+		client_message.data.data32[1] |= 1;
+	client_message.data.data32[2] = 0;
+	client_message.data.data32[3] = 0;
+	client_message.data.data32[4] = wm->atom.xdnd_action_copy;
+
+	xcb_send_event(wm->conn, 0, wm->dnd_owner,
+			       XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT,
+			       (char *) &client_message);
+}
+
+static void
+data_source_send(struct weston_data_source *base,
+		 const char *mime_type, int32_t fd)
+{
+	struct dnd_data_source *source = (struct dnd_data_source *) base;
+	struct weston_wm *wm = source->wm;
+
+	weston_log("got send, %s\n", mime_type);
+
+	/* Get data for the utf8_string target */
+	xcb_convert_selection(wm->conn,
+			      wm->selection_window,
+			      wm->atom.xdnd_selection,
+			      wm->atom.utf8_string,
+			      wm->atom.wl_selection,
+			      XCB_TIME_CURRENT_TIME);
+
+	xcb_flush(wm->conn);
+
+	fcntl(fd, F_SETFL, O_WRONLY | O_NONBLOCK);
+	wm->data_source_fd = fd;
+}
+
+static void
+data_source_cancel(struct weston_data_source *source)
+{
+	weston_log("got cancel\n");
+}
+
+static void
+handle_enter(struct weston_wm *wm, xcb_client_message_event_t *client_message)
+{
+	struct dnd_data_source *source;
+	struct weston_seat *seat = weston_wm_pick_seat(wm);
+	char **p;
+	const char *name;
+	uint32_t *types;
+	int i, length, has_text;
+	xcb_get_property_cookie_t cookie;
+	xcb_get_property_reply_t *reply;
+
+	source = malloc(sizeof *source);
+	if (source == NULL)
+		return;
+
+	wl_signal_init(&source->base.destroy_signal);
+	source->base.accept = data_source_accept;
+	source->base.send = data_source_send;
+	source->base.cancel = data_source_cancel;
+	source->wm = wm;
+	source->window = client_message->data.data32[0];
+	source->version = client_message->data.data32[1] >> 24;
+
+	if (client_message->data.data32[1] & 1) {
+		cookie = xcb_get_property(wm->conn,
+					  0, /* delete */
+					  source->window,
+					  wm->atom.xdnd_type_list,
+					  XCB_ATOM_ANY, 0, 2048);
+		reply = xcb_get_property_reply(wm->conn, cookie, NULL);
+		types = xcb_get_property_value(reply);
+		length = reply->value_len;
+	} else {
+		reply = NULL;
+		types = &client_message->data.data32[2];
+		length = 3;
+	}
+
+	wl_array_init(&source->base.mime_types);
+	has_text = 0;
+	for (i = 0; i < length; i++) {
+		if (types[i] == XCB_ATOM_NONE)
+			continue;
+
+		name = get_atom_name(wm->conn, types[i]);
+		if (types[i] == wm->atom.utf8_string ||
+		    types[i] == wm->atom.text_plain_utf8 ||
+		    types[i] == wm->atom.text_plain) {
+			if (has_text)
+				continue;
+
+			has_text = 1;
+			p = wl_array_add(&source->base.mime_types, sizeof *p);
+			if (p)
+				*p = strdup("text/plain;charset=utf-8");
+		} else if (strchr(name, '/')) {
+			p = wl_array_add(&source->base.mime_types, sizeof *p);
+			if (p)
+				*p = strdup(name);
+		}
+	}
+
+	free(reply);
+	weston_seat_start_drag(seat, &source->base, NULL, NULL);
+}
+
+int
+weston_wm_handle_dnd_event(struct weston_wm *wm,
+			   xcb_generic_event_t *event)
+{
+	xcb_xfixes_selection_notify_event_t *xfixes_selection_notify =
+		(xcb_xfixes_selection_notify_event_t *) event;
+	xcb_client_message_event_t *client_message =
+		(xcb_client_message_event_t *) event;
+
+	switch (event->response_type - wm->xfixes->first_event) {
+	case XCB_XFIXES_SELECTION_NOTIFY:
+		if (xfixes_selection_notify->selection != wm->atom.xdnd_selection)
+			return 0;
+
+		weston_log("XdndSelection owner: %d!\n",
+			   xfixes_selection_notify->owner);
+
+		if (xfixes_selection_notify->owner != XCB_WINDOW_NONE)
+			weston_dnd_start(wm, xfixes_selection_notify->owner);
+		else
+			weston_dnd_stop(wm);
+
+		return 1;
+	}
+
+	switch (EVENT_TYPE(event)) {
+	case XCB_CLIENT_MESSAGE:
+		if (client_message->type == wm->atom.xdnd_enter) {
+			handle_enter(wm, client_message);
+			return 1;
+		} else if (client_message->type == wm->atom.xdnd_leave) {
+			weston_log("got leave!\n");
+			return 1;
+		} else if (client_message->type == wm->atom.xdnd_drop) {
+			weston_log("got drop!\n");
+			return 1;
+		} else if (client_message->type == wm->atom.xdnd_drop) {
+			weston_log("got enter!\n");
+			return 1;
+		}
+		return 0;
+	}
+
+	return 0;
+}
+
+void
+weston_wm_dnd_init(struct weston_wm *wm)
+{
+	uint32_t mask;
+
+	mask =
+		XCB_XFIXES_SELECTION_EVENT_MASK_SET_SELECTION_OWNER |
+		XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_WINDOW_DESTROY |
+		XCB_XFIXES_SELECTION_EVENT_MASK_SELECTION_CLIENT_CLOSE;
+	xcb_xfixes_select_selection_input(wm->conn, wm->selection_window,
+					  wm->atom.xdnd_selection, mask);
+}