/* $Id: tasks.c,v 1.29 2010/01/07 03:27:56 khorben Exp $ */
/* Copyright (c) 2010 Pierre Pronchery <khorben@defora.org> */
/* This file is part of DeforaOS Desktop Panel */
/* This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, version 3 of the License.
 *
 * This program 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>. */



#include <sys/time.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <gdk/gdkx.h>
#include <X11/Xatom.h>
#include "Panel.h"


/* Tasks */
/* private */
/* types */
typedef enum _TasksAtom
{
	TASKS_ATOM_NET_ACTIVE_WINDOW = 0,
	TASKS_ATOM_NET_CLIENT_LIST,
	TASKS_ATOM_NET_CLOSE_WINDOW,
	TASKS_ATOM_NET_CURRENT_DESKTOP,
	TASKS_ATOM_NET_WM_ACTION_CHANGE_DESKTOP,
	TASKS_ATOM_NET_WM_ACTION_CLOSE,
	TASKS_ATOM_NET_WM_ACTION_MOVE,
	TASKS_ATOM_NET_WM_ACTION_RESIZE,
	TASKS_ATOM_NET_WM_ACTION_MINIMIZE,
	TASKS_ATOM_NET_WM_ACTION_SHADE,
	TASKS_ATOM_NET_WM_ACTION_STICK,
	TASKS_ATOM_NET_WM_ACTION_MAXIMIZE_HORZ,
	TASKS_ATOM_NET_WM_ACTION_MAXIMIZE_VERT,
	TASKS_ATOM_NET_WM_ACTION_FULLSCREEN,
	TASKS_ATOM_NET_WM_ALLOWED_ACTIONS,
	TASKS_ATOM_NET_WM_DESKTOP,
	TASKS_ATOM_NET_WM_ICON,
	TASKS_ATOM_NET_WM_NAME,
	TASKS_ATOM_NET_WM_STATE,
	TASKS_ATOM_NET_WM_STATE_FULLSCREEN,
	TASKS_ATOM_NET_WM_STATE_MAXIMIZED_HORZ,
	TASKS_ATOM_NET_WM_STATE_MAXIMIZED_VERT,
	TASKS_ATOM_NET_WM_STATE_SHADED,
	TASKS_ATOM_NET_WM_STATE_STICKY,
	TASKS_ATOM_NET_WM_STATE_TOGGLE,
	TASKS_ATOM_NET_WM_VISIBLE_NAME,
	TASKS_ATOM_NET_WM_WINDOW_TYPE,
	TASKS_ATOM_NET_WM_WINDOW_TYPE_NORMAL,
	TASKS_ATOM_UTF8_STRING
} TasksAtom;
#define TASKS_ATOM_LAST TASKS_ATOM_UTF8_STRING
#define TASKS_ATOM_COUNT (TASKS_ATOM_LAST + 1)

typedef struct _Tasks Tasks;

typedef struct _Task
{
	Tasks * tasks;
	Window window;
	GtkWidget * widget;
	GtkWidget * image;
#ifndef EMBEDDED
	GtkWidget * label;
#endif
	gboolean delete;
} Task;

struct _Tasks
{
	PanelAppletHelper * helper;
	Task ** tasks;
	size_t tasks_cnt;

	GtkWidget * hbox;
	GtkIconSize icon_size;
	int icon_width;
	int icon_height;

	Atom atom[TASKS_ATOM_COUNT];
	GdkDisplay * display;
	GdkScreen * screen;
	GdkWindow * root;
};


/* constants */
static const char * _tasks_atom[TASKS_ATOM_COUNT] =
{
	"_NET_ACTIVE_WINDOW",
	"_NET_CLIENT_LIST",
	"_NET_CLOSE_WINDOW",
	"_NET_CURRENT_DESKTOP",
	"_NET_WM_ACTION_CHANGE_DESKTOP",
	"_NET_WM_ACTION_CLOSE",
	"_NET_WM_ACTION_MOVE",
	"_NET_WM_ACTION_RESIZE",
	"_NET_WM_ACTION_MINIMIZE",
	"_NET_WM_ACTION_SHADE",
	"_NET_WM_ACTION_STICK",
	"_NET_WM_ACTION_MAXIMIZE_HORZ",
	"_NET_WM_ACTION_MAXIMIZE_VERT",
	"_NET_WM_ACTION_FULLSCREEN",
	"_NET_WM_ALLOWED_ACTIONS",
	"_NET_WM_DESKTOP",
	"_NET_WM_ICON",
	"_NET_WM_NAME",
	"_NET_WM_STATE",
	"_NET_WM_STATE_FULLSCREEN",
	"_NET_WM_STATE_MAXIMIZED_HORZ",
	"_NET_WM_STATE_MAXIMIZED_VERT",
	"_NET_WM_STATE_SHADED",
	"_NET_WM_STATE_STICKY",
	"_NET_WM_STATE_TOGGLE",
	"_NET_WM_VISIBLE_NAME",
	"_NET_WM_WINDOW_TYPE",
	"_NET_WM_WINDOW_TYPE_NORMAL",
	"UTF8_STRING"
};


/* prototypes */
/* task */
static Task * _task_new(Tasks * tasks, Window window, char const * name,
		GdkPixbuf * pixbuf);
static void _task_delete(Task * Task);
static void _task_set(Task * task, char const * name, GdkPixbuf * pixbuf);
static void _task_toggle_state(Task * task, TasksAtom state);

/* tasks */
static GtkWidget * _tasks_init(PanelApplet * applet);
static void _tasks_destroy(PanelApplet * applet);

/* accessors */
static int _tasks_get_current_desktop(Tasks * tasks);
static int _tasks_get_text_property(Tasks * tasks, Window window, Atom property,
		char ** ret);
static int _tasks_get_window_property(Tasks * tasks, Window window,
		TasksAtom property, Atom atom, unsigned long * cnt,
		unsigned char ** ret);

/* useful */
static void _tasks_do(Tasks * tasks);

/* callbacks */
static gboolean _on_button_press(GtkWidget * widget, GdkEventButton * event,
		gpointer data);
static void _on_clicked(GtkWidget * widget, gpointer data);
static GdkFilterReturn _on_filter(GdkXEvent * xevent, GdkEvent * event,
		gpointer data);
static gboolean _on_popup(gpointer data);
static void _on_popup_change_desktop(gpointer data);
static void _on_popup_close(gpointer data);
static void _on_popup_fullscreen(gpointer data);
static void _on_popup_maximize_horz(gpointer data);
static void _on_popup_maximize_vert(gpointer data);
static void _on_popup_minimize(gpointer data);
static void _on_popup_move(gpointer data);
static void _on_popup_resize(gpointer data);
static void _on_popup_shade(gpointer data);
static void _on_popup_stick(gpointer data);
static void _on_screen_changed(GtkWidget * widget, GdkScreen * previous,
		gpointer data);


/* public */
/* variables */
PanelApplet applet =
{
	NULL,
	_tasks_init,
	_tasks_destroy,
	PANEL_APPLET_POSITION_START,
#ifndef EMBEDDED
	TRUE,
#else
	FALSE,
#endif
	TRUE,
	NULL
};


/* private */
/* functions */
/* Task */
/* task_new */
static Task * _task_new(Tasks * tasks, Window window, char const * name,
		GdkPixbuf * pixbuf)
{
	Task * task;
	GtkWidget * hbox;

	if((task = malloc(sizeof(*task))) == NULL)
	{
		tasks->helper->error(tasks->helper->priv, "malloc", 0);
		return NULL;
	}
	task->tasks = tasks;
	task->window = window;
	task->widget = gtk_button_new();
	g_signal_connect(G_OBJECT(task->widget), "button-press-event",
			G_CALLBACK(_on_button_press), task);
	g_signal_connect_swapped(G_OBJECT(task->widget), "popup-menu",
			G_CALLBACK(_on_popup), task);
	g_signal_connect(task->widget, "clicked", G_CALLBACK(_on_clicked),
			task);
	task->image = gtk_image_new();
	task->delete = FALSE;
	hbox = gtk_hbox_new(FALSE, 0);
	gtk_box_pack_start(GTK_BOX(hbox), task->image, FALSE, TRUE, 0);
#ifndef EMBEDDED
	task->label = gtk_label_new(name);
#if 0 /* FIXME doesn't seem to work properly */
	gtk_label_set_ellipsize(GTK_LABEL(task->label), PANGO_ELLIPSIZE_END);
#endif
	gtk_label_set_line_wrap(GTK_LABEL(task->label), TRUE);
#if GTK_CHECK_VERSION(2, 10, 0)
	gtk_label_set_line_wrap_mode(GTK_LABEL(task->label),
			PANGO_WRAP_WORD_CHAR);
#endif
	gtk_box_pack_start(GTK_BOX(hbox), task->label, FALSE, TRUE, 4);
	gtk_widget_set_size_request(task->widget, tasks->icon_width, -1);
#endif
	gtk_container_add(GTK_CONTAINER(task->widget), hbox);
	_task_set(task, name, pixbuf);
	return task;
}


/* task_delete */
static void _task_delete(Task * task)
{
	gtk_container_remove(GTK_CONTAINER(task->tasks->hbox), task->widget);
	free(task);
}


/* task_set */
static void _task_set(Task * task, char const * name, GdkPixbuf * pixbuf)
{
#ifndef EMBEDDED
	gtk_label_set_text(GTK_LABEL(task->label), name);
#endif
#if GTK_CHECK_VERSION(2, 12, 0)
	gtk_widget_set_tooltip_text(task->widget, name);
#endif
	if(pixbuf != NULL)
		gtk_image_set_from_pixbuf(GTK_IMAGE(task->image), pixbuf);
	else
		gtk_image_set_from_stock(GTK_IMAGE(task->image),
				GTK_STOCK_MISSING_IMAGE,
				task->tasks->icon_size);
}


/* task_toggle_state */
static void _task_toggle_state(Task * task, TasksAtom state)
{
	Tasks * tasks = task->tasks;
	GdkDisplay * display;
	XEvent xev;

	display = tasks->display;
	memset(&xev, 0, sizeof(xev));
	xev.xclient.type = ClientMessage;
	xev.xclient.window = task->window;
	xev.xclient.message_type = tasks->atom[TASKS_ATOM_NET_WM_STATE];
	xev.xclient.format = 32;
	xev.xclient.data.l[0] = tasks->atom[TASKS_ATOM_NET_WM_STATE_TOGGLE];
	xev.xclient.data.l[1] = tasks->atom[state];
	xev.xclient.data.l[2] = 0;
	xev.xclient.data.l[3] = 2;
	gdk_error_trap_push();
	XSendEvent(GDK_DISPLAY_XDISPLAY(display),
			GDK_WINDOW_XWINDOW(tasks->root), False,
			SubstructureNotifyMask | SubstructureRedirectMask,
			&xev);
	gdk_error_trap_pop();
}


/* Tasks */
/* tasks_init */
static GtkWidget * _tasks_init(PanelApplet * applet)
{
	GtkWidget * ret;
	Tasks * tasks;

	if((tasks = malloc(sizeof(*tasks))) == NULL)
		return NULL;
	applet->priv = tasks;
	tasks->helper = applet->helper;
	tasks->tasks = NULL;
	tasks->tasks_cnt = 0;
	tasks->hbox = gtk_hbox_new(TRUE, 0);
	g_signal_connect(G_OBJECT(tasks->hbox), "screen-changed", G_CALLBACK(
				_on_screen_changed), tasks);
	tasks->icon_size = applet->helper->icon_size;
	tasks->icon_width = 48;
	tasks->icon_height = 48;
	gtk_icon_size_lookup(tasks->icon_size, &tasks->icon_width,
			&tasks->icon_height);
	tasks->display = NULL;
	tasks->screen = NULL;
	tasks->root = NULL;
#ifndef EMBEDDED
	ret = gtk_scrolled_window_new(NULL, NULL);
	gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(ret),
			GTK_POLICY_NEVER, GTK_POLICY_NEVER);
	gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(ret),
			tasks->hbox);
#else
	ret = tasks->hbox;
#endif
	return ret;
}


/* tasks_destroy */
static void _tasks_destroy(PanelApplet * applet)
{
	Tasks * tasks = applet->priv;
	size_t i;

	for(i = 0; i < tasks->tasks_cnt; i++)
		free(tasks->tasks[i]);
	free(tasks->tasks);
	free(tasks);
}


/* accessors */
/* tasks_get_current_desktop */
static int _tasks_get_current_desktop(Tasks * tasks)
{
#ifndef EMBEDDED
	unsigned long cnt;
	unsigned long *p;

	if(_tasks_get_window_property(tasks, GDK_WINDOW_XWINDOW(tasks->root),
				TASKS_ATOM_NET_CURRENT_DESKTOP, XA_CARDINAL,
				&cnt, (void*)&p) != 0)
		return -1;
	cnt = *p;
	XFree(p);
	return cnt;
#else
	return -1;
#endif
}


/* tasks_get_text_property */
static int _tasks_get_text_property(Tasks * tasks, Window window,
		Atom property, char ** ret)
{
	int res;
	XTextProperty text;
	int cnt;
	char ** list;
	int i;

#ifdef DEBUG
	fprintf(stderr, "DEBUG: %s(tasks, window, %lu)\n", __func__, property);
#endif
	gdk_error_trap_push();
	res = XGetTextProperty(GDK_DISPLAY_XDISPLAY(tasks->display), window,
			&text, property);
	if(gdk_error_trap_pop() != 0 || res == 0)
		return 1;
	cnt = gdk_text_property_to_utf8_list(gdk_x11_xatom_to_atom(
				text.encoding), text.format, text.value,
			text.nitems, &list);
	if(cnt > 0)
	{
		*ret = list[0];
		for(i = 1; i < cnt; i++)
			g_free(list[i]);
		g_free(list);
	}
	else
		*ret = NULL;
	if(text.value != NULL)
		XFree(text.value);
	return 0;
}


/* tasks_get_window_property */
static int _tasks_get_window_property(Tasks * tasks, Window window,
		TasksAtom property, Atom atom, unsigned long * cnt,
		unsigned char ** ret)
{
	int res;
	Atom type;
	int format;
	unsigned long bytes;

#ifdef DEBUG
	fprintf(stderr, "DEBUG: %s(tasks, window, %s, %lu)\n", __func__,
			_tasks_atom[property], atom);
#endif
	gdk_error_trap_push();
	res = XGetWindowProperty(GDK_DISPLAY_XDISPLAY(tasks->display), window,
			tasks->atom[property], 0, G_MAXLONG, False, atom,
			&type, &format, cnt, &bytes, ret);
	if(gdk_error_trap_pop() != 0 || res != Success)
		return 1;
	if(type != atom)
	{
		if(*ret != NULL)
			XFree(*ret);
		*ret = NULL;
		return 1;
	}
	return 0;
}


/* tasks_do */
static char * _do_name(Tasks * tasks, Window window);
static char * _do_name_text(Tasks * tasks, Window window, Atom property);
static char * _do_name_utf8(Tasks * tasks, Window window, Atom property);
static GdkPixbuf * _do_pixbuf(Tasks * tasks, Window window);
static int _do_tasks_add(Tasks * tasks, int desktop, Window window,
		char const * name, GdkPixbuf * pixbuf);
static void _do_tasks_clean(Tasks * tasks);
static int _do_typehint_normal(Tasks * tasks, Window window);

static void _tasks_do(Tasks * tasks)
{
	unsigned long cnt = 0;
	Window * windows = NULL;
	int desktop;
	unsigned long i;
	char * name;

#ifdef DEBUG
	fprintf(stderr, "DEBUG: %s()\n", __func__);
#endif
	if(_tasks_get_window_property(tasks, GDK_WINDOW_XWINDOW(tasks->root),
				TASKS_ATOM_NET_CLIENT_LIST,
				XA_WINDOW, &cnt, (void*)&windows) != 0)
		return;
	desktop = _tasks_get_current_desktop(tasks);
	for(i = 0; i < tasks->tasks_cnt; i++)
		tasks->tasks[i]->delete = TRUE;
	for(i = 0; i < cnt; i++)
	{
		if(_do_typehint_normal(tasks, windows[i]) != 0)
			continue;
		if((name = _do_name(tasks, windows[i])) == NULL)
			continue;
		_do_tasks_add(tasks, desktop, windows[i], name, _do_pixbuf(
					tasks, windows[i]));
		g_free(name);
	}
	_do_tasks_clean(tasks);
	XFree(windows);
}

static char * _do_name(Tasks * tasks, Window window)
{
	char * ret;

	if((ret = _do_name_utf8(tasks, window, TASKS_ATOM_NET_WM_VISIBLE_NAME))
			!= NULL)
		return ret;
	if((ret = _do_name_utf8(tasks, window, TASKS_ATOM_NET_WM_NAME)) != NULL)
		return ret;
	if((ret = _do_name_text(tasks, window, XA_WM_NAME)) != NULL)
		return ret;
	return g_strdup("(Untitled)");
}

static char * _do_name_text(Tasks * tasks, Window window, Atom property)
{
	char * ret = NULL;

	if(_tasks_get_text_property(tasks, window, property, (void*)&ret) != 0)
		return NULL;
	return ret;
}

static char * _do_name_utf8(Tasks * tasks, Window window, Atom property)
{
	char * ret = NULL;
	char * str = NULL;
	unsigned long cnt = 0;

	if(_tasks_get_window_property(tasks, window, property,
				tasks->atom[TASKS_ATOM_UTF8_STRING], &cnt,
				(void*)&str) != 0)
		return NULL;
	if(g_utf8_validate(str, cnt, NULL))
		ret = g_strndup(str, cnt);
	XFree(str);
	return ret;
}

static GdkPixbuf * _do_pixbuf(Tasks * tasks, Window window)
{
	GdkPixbuf * ret;
	unsigned long cnt = 0;
	unsigned long * buf = NULL;
	unsigned long i;
	unsigned long width;
	unsigned long height;
	unsigned long size;
	unsigned char * pixbuf;
	unsigned long j;
	GdkPixbuf * p;

	if(_tasks_get_window_property(tasks, window, TASKS_ATOM_NET_WM_ICON,
				XA_CARDINAL, &cnt, (void*)&buf) != 0)
		return NULL;
	for(i = 0; i < cnt - 3; i++)
	{
		width = buf[i];
		height = buf[i + 1];
		if(i + 2 + (width * height) > cnt)
			break;
		if(width == 0 || height == 0 || width != height)
			continue;
		size = width * height * 4;
		if((pixbuf = malloc(size)) == NULL)
			return NULL;
		for(i+=2, j = 0; j < size; i++)
		{
			pixbuf[j++] = (buf[i] >> 16) & 0xff; /* red */
			pixbuf[j++] = (buf[i] >> 8) & 0xff; /* green */
			pixbuf[j++] = buf[i] & 0xff; /* blue */
			pixbuf[j++] = buf[i] >> 24; /* alpha */
		}
		p = gdk_pixbuf_new_from_data(pixbuf, GDK_COLORSPACE_RGB,
				TRUE, 8, width, height, width * 4,
				(GdkPixbufDestroyNotify)free, NULL);
		XFree(buf);
		if(width == tasks->icon_width)
			return p;
		ret = gdk_pixbuf_scale_simple(p, tasks->icon_width,
				tasks->icon_height,
				GDK_INTERP_BILINEAR);
		g_object_unref(p);
		return ret;
	}
	return NULL;
}

static int _do_tasks_add(Tasks * tasks, int desktop, Window window,
		char const * name, GdkPixbuf * pixbuf)
{
	size_t i;
	Task * p = NULL;
#ifndef EMBEDDED
	unsigned long * l;
	unsigned long cnt;
	int cur = -1;
#endif
	Task ** q;

#ifndef EMBEDDED
	if(_tasks_get_window_property(tasks, window, TASKS_ATOM_NET_WM_DESKTOP,
			XA_CARDINAL, &cnt, (void*)&l) == 0)
	{
		if(cnt == 1)
			cur = *l;
		XFree(l);
	}
	if(cur >= 0 && cur != desktop)
		return 0;
#endif
	for(i = 0; i < tasks->tasks_cnt; i++)
		if(tasks->tasks[i]->window == window)
			break;
	if(i < tasks->tasks_cnt) /* found the task */
	{
		p = tasks->tasks[i];
		_task_set(p, name, pixbuf);
		p->delete = FALSE;
		return 0;
	}
	if((q = realloc(tasks->tasks, (tasks->tasks_cnt + 1) * sizeof(*q)))
			== NULL)
		return 1;
	tasks->tasks = q;
	if((p = _task_new(tasks, window, name, pixbuf)) == NULL)
		return 1;
	tasks->tasks[tasks->tasks_cnt++] = p;
	gtk_widget_show_all(p->widget);
	gtk_box_pack_start(GTK_BOX(tasks->hbox), p->widget, FALSE, TRUE, 0);
#ifdef EMBEDDED
	gtk_box_reorder_child(GTK_BOX(tasks->hbox), p->widget, 0);
#endif
	return 0;
}

static void _do_tasks_clean(Tasks * tasks)
{
	size_t i;
	size_t cnt;
	size_t j;
	Task ** q;

	for(i = 0, cnt = tasks->tasks_cnt; i < cnt;)
	{
		if(tasks->tasks[i]->delete == FALSE)
		{
			i++;
			continue;
		}
		_task_delete(tasks->tasks[i]);
		cnt--;
		for(j = i; j < cnt; j++)
			tasks->tasks[j] = tasks->tasks[j + 1];
		if((q = realloc(tasks->tasks, cnt * sizeof(*q))) != NULL
				|| cnt == 0)
			tasks->tasks = q;
	}
	tasks->tasks_cnt = cnt;
}

static int _do_typehint_normal(Tasks * tasks, Window window)
{
	Atom typehint;
	Atom * p;
	unsigned long cnt = 0;

	if(_tasks_get_window_property(tasks, window,
				TASKS_ATOM_NET_WM_WINDOW_TYPE, XA_ATOM, &cnt,
				(void*)&p) == 0)
	{
		typehint = *p;
		XFree(p);
		return typehint == tasks->atom[
			TASKS_ATOM_NET_WM_WINDOW_TYPE_NORMAL] ? 0 : 1;
	}
	/* FIXME return 1 if WM_TRANSIENT_FOR is set */
	return 0;
}


/* callbacks */
/* on_button_press */
static gboolean _on_button_press(GtkWidget * widget, GdkEventButton * event,
		gpointer data)
{
	if(event->button != 3 || event->type != GDK_BUTTON_PRESS)
		return FALSE;
	_on_popup(data);
	return TRUE;
}


/* on_clicked */
static void _clicked_activate(Task * task);

static void _on_clicked(GtkWidget * widget, gpointer data)
{
	Task * task = data;

	_clicked_activate(task);
#ifdef EMBEDDED
	gtk_box_reorder_child(GTK_BOX(task->tasks->hbox), widget, 0);
#endif
}

static void _clicked_activate(Task * task)
{
	GdkDisplay * display;
	XEvent xev;
	int res;

	display = task->tasks->display;
	memset(&xev, 0, sizeof(xev));
	xev.xclient.type = ClientMessage;
	xev.xclient.window = task->window;
	xev.xclient.message_type = task->tasks->atom[
		TASKS_ATOM_NET_ACTIVE_WINDOW];
	xev.xclient.format = 32;
	xev.xclient.data.l[0] = 2;
	xev.xclient.data.l[1] = gdk_x11_display_get_user_time(display);
	xev.xclient.data.l[2] = 0;
	gdk_error_trap_push();
	res = XSendEvent(GDK_DISPLAY_XDISPLAY(display),
			GDK_WINDOW_XWINDOW(task->tasks->root), False,
			SubstructureNotifyMask | SubstructureRedirectMask,
			&xev);
#ifdef DEBUG
	if(gdk_error_trap_pop() != 0 || res != Success)
		fprintf(stderr, "DEBUG: %s() error\n", __func__);
#else
	gdk_error_trap_pop();
#endif
}


/* on_filter */
static GdkFilterReturn _on_filter(GdkXEvent * xevent, GdkEvent * event,
		gpointer data)
{
	Tasks * tasks = data;
	XEvent * xev = xevent;

	if(xev->type != PropertyNotify)
		return GDK_FILTER_CONTINUE;
	if(xev->xproperty.atom != tasks->atom[TASKS_ATOM_NET_CLIENT_LIST]
#ifndef EMBEDDED
			&& xev->xproperty.atom
			!= tasks->atom[TASKS_ATOM_NET_CURRENT_DESKTOP]
#endif
			)
		return GDK_FILTER_CONTINUE;
	_tasks_do(tasks);
	return GDK_FILTER_CONTINUE;
}


/* on_popup */
static gboolean _on_popup(gpointer data)
{
	Task * task = data;
	unsigned long cnt = 0;
	unsigned long * buf = NULL;
	unsigned long i;
	const struct {
		TasksAtom atom;
		void (*callback)(gpointer data);
		char const * stock;
	} items[] = {
		{ TASKS_ATOM_NET_WM_ACTION_MOVE, _on_popup_move, "Move" },
		{ TASKS_ATOM_NET_WM_ACTION_RESIZE, _on_popup_resize, "Resize" },
		{ TASKS_ATOM_NET_WM_ACTION_MINIMIZE, _on_popup_minimize,
			"Minimize" },
		{ TASKS_ATOM_NET_WM_ACTION_SHADE, _on_popup_shade, "Shade" },
		{ TASKS_ATOM_NET_WM_ACTION_STICK, _on_popup_stick, "Stick" },
		{ TASKS_ATOM_NET_WM_ACTION_MAXIMIZE_HORZ,
			_on_popup_maximize_horz, "Maximize horizontally" },
		{ TASKS_ATOM_NET_WM_ACTION_MAXIMIZE_VERT,
			_on_popup_maximize_vert, "Maximize vertically" },
		{ TASKS_ATOM_NET_WM_ACTION_FULLSCREEN, _on_popup_fullscreen,
			GTK_STOCK_FULLSCREEN},
		{ TASKS_ATOM_NET_WM_ACTION_CHANGE_DESKTOP,
			_on_popup_change_desktop, "Change desktop" },
		{ TASKS_ATOM_NET_WM_ACTION_CLOSE, _on_popup_close,
			GTK_STOCK_CLOSE }
	};
	size_t j;
	GtkWidget * menu = NULL;
	GtkWidget * menuitem;

	if(_tasks_get_window_property(task->tasks, task->window,
				TASKS_ATOM_NET_WM_ALLOWED_ACTIONS, XA_ATOM,
				&cnt, (void*)&buf) != 0)
		return FALSE;
	for(i = 0; i < cnt; i++)
	{
		for(j = 0; j < sizeof(items) / sizeof(*items); j++)
			if(buf[i] == task->tasks->atom[items[j].atom])
				break;
		if(j >= sizeof(items) / sizeof(*items))
			continue;
		if(items[j].atom == TASKS_ATOM_NET_WM_ACTION_CHANGE_DESKTOP)
			continue; /* FIXME implement as a special case */
		if(menu == NULL)
			menu = gtk_menu_new();
		menuitem = gtk_image_menu_item_new_from_stock(items[j].stock,
				NULL); /* XXX they're not always stock */
		g_signal_connect_swapped(G_OBJECT(menuitem), "activate",
				G_CALLBACK(items[j].callback), task);
		gtk_menu_shell_append(GTK_MENU_SHELL(menu), menuitem);
	}
	XFree(buf);
	if(menu == NULL)
		return FALSE;
	gtk_widget_show_all(menu);
	gtk_menu_popup(GTK_MENU(menu), NULL, NULL, NULL, task, 2,
			gtk_get_current_event_time());
	return TRUE;
}


/* on_popup_change_desktop */
static void _on_popup_change_desktop(gpointer data)
{
	/* FIXME implement */
}


/* on_popup_close */
static void _on_popup_close(gpointer data)
{
	Task * task = data;
	GdkDisplay * display;
	XEvent xev;

	display = task->tasks->display;
	memset(&xev, 0, sizeof(xev));
	xev.xclient.type = ClientMessage;
	xev.xclient.window = task->window;
	xev.xclient.message_type = task->tasks->atom[
		TASKS_ATOM_NET_CLOSE_WINDOW];
	xev.xclient.format = 32;
	xev.xclient.data.l[0] = gdk_x11_display_get_user_time(display);
	xev.xclient.data.l[1] = 2;
	gdk_error_trap_push();
	XSendEvent(GDK_DISPLAY_XDISPLAY(display),
			GDK_WINDOW_XWINDOW(task->tasks->root), False,
			SubstructureNotifyMask | SubstructureRedirectMask,
			&xev);
	gdk_error_trap_pop();
}


/* on_popup_fullscreen */
static void _on_popup_fullscreen(gpointer data)
{
	Task * task = data;

	_task_toggle_state(task, TASKS_ATOM_NET_WM_STATE_FULLSCREEN);
}


/* on_popup_maximize_hort */
static void _on_popup_maximize_horz(gpointer data)
{
	Task * task = data;

	_task_toggle_state(task, TASKS_ATOM_NET_WM_STATE_MAXIMIZED_HORZ);
}


/* on_popup_maximize_vert */
static void _on_popup_maximize_vert(gpointer data)
{
	Task * task = data;

	_task_toggle_state(task, TASKS_ATOM_NET_WM_STATE_MAXIMIZED_VERT);
}


/* on_popup_minimize */
static void _on_popup_minimize(gpointer data)
{
	/* FIXME implement */
}


/* on_popup_move */
static void _on_popup_move(gpointer data)
{
	/* FIXME implement */
}


/* on_popup_resize */
static void _on_popup_resize(gpointer data)
{
	/* FIXME implement */
}


/* on_popup_shade */
static void _on_popup_shade(gpointer data)
{
	Task * task = data;

	_task_toggle_state(task, TASKS_ATOM_NET_WM_STATE_SHADED);
}


/* on_popup_stick */
static void _on_popup_stick(gpointer data)
{
	Task * task = data;

	_task_toggle_state(task, TASKS_ATOM_NET_WM_STATE_STICKY);
}


/* on_screen_changed */
static void _on_screen_changed(GtkWidget * widget, GdkScreen * previous,
		gpointer data)
{
	Tasks * tasks = data;
	GdkEventMask events;
	size_t i;

#ifdef DEBUG
	fprintf(stderr, "DEBUG: %s()\n", __func__);
#endif
	tasks->screen = gtk_widget_get_screen(widget);
	tasks->display = gdk_screen_get_display(tasks->screen);
	tasks->root = gdk_screen_get_root_window(tasks->screen);
	events = gdk_window_get_events(tasks->root);
	gdk_window_set_events(tasks->root, events
			| GDK_PROPERTY_CHANGE_MASK);
	gdk_window_add_filter(tasks->root, _on_filter, tasks);
	/* atoms */
	for(i = 0; i < TASKS_ATOM_COUNT; i++)
		tasks->atom[i] = gdk_x11_get_xatom_by_name_for_display(
				tasks->display, _tasks_atom[i]);
	_tasks_do(tasks);
}