/**************************************************************************
*
* Copyright (C) 2008 Pål Staurland (staura@gmail.com)
* Modified (C) 2008 thierry lorthiois (lorthiois@bbsoft.fr) from Omega distribution
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License version 2
* as published by the Free Software Foundation.
*
* 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, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
**************************************************************************/

#include <glib.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Xatom.h>
#include <cairo.h>
#include <cairo-xlib.h>
#include <pango/pangocairo.h>

#include "server.h"
#include "config.h"
#include "window.h"
#include "task.h"
#include "panel.h"
#include "tooltip.h"

void panel_clear_background(void *obj);

int signal_pending;

MouseAction mouse_left;
MouseAction mouse_middle;
MouseAction mouse_right;
MouseAction mouse_scroll_up;
MouseAction mouse_scroll_down;
MouseAction mouse_tilt_left;
MouseAction mouse_tilt_right;

TaskbarMode taskbar_mode;
gboolean wm_menu;
gboolean panel_dock;
Layer panel_layer;
PanelPosition panel_position;
gboolean panel_horizontal;
gboolean panel_refresh;
gboolean task_dragged;
char *panel_window_name = NULL;
gboolean debug_geometry;
gboolean debug_gradients;

gboolean panel_autohide;
int panel_autohide_show_timeout;
int panel_autohide_hide_timeout;
int panel_autohide_height;
gboolean panel_shrink;
Strut panel_strut_policy;
char *panel_items_order;

int max_tick_urgent;

// panel's initial config
Panel panel_config;
// panels (one panel per monitor)
Panel *panels;
int num_panels;

GArray *backgrounds;
GArray *gradients;

Imlib_Image default_icon;
char *default_font = NULL;

void default_panel()
{
	panels = NULL;
	num_panels = 0;
	default_icon = NULL;
	task_dragged = FALSE;
	panel_horizontal = TRUE;
	panel_position = CENTER;
	panel_items_order = NULL;
	panel_autohide = FALSE;
	panel_autohide_show_timeout = 0;
	panel_autohide_hide_timeout = 0;
	panel_autohide_height = 5; // for vertical panels this is of course the width
	panel_shrink = FALSE;
	panel_strut_policy = STRUT_FOLLOW_SIZE;
	panel_dock = FALSE;         // default not in the dock
	panel_layer = BOTTOM_LAYER; // default is bottom layer
	panel_window_name = strdup("tint2");
	wm_menu = FALSE;
	max_tick_urgent = 14;
	mouse_left = TOGGLE_ICONIFY;
	backgrounds = g_array_new(0, 0, sizeof(Background));
	gradients = g_array_new(0, 0, sizeof(GradientClass));

	memset(&panel_config, 0, sizeof(Panel));
	snprintf(panel_config.area.name, sizeof(panel_config.area.name), "Panel");
	panel_config.mouse_over_alpha = 100;
	panel_config.mouse_over_saturation = 0;
	panel_config.mouse_over_brightness = 10;
	panel_config.mouse_pressed_alpha = 100;
	panel_config.mouse_pressed_saturation = 0;
	panel_config.mouse_pressed_brightness = 0;
	panel_config.mouse_effects = 1;

	// First background is always fully transparent
	Background transparent_bg;
	init_background(&transparent_bg);
	g_array_append_val(backgrounds, transparent_bg);
	GradientClass transparent_gradient;
	init_gradient(&transparent_gradient, GRADIENT_VERTICAL);
	g_array_append_val(gradients, transparent_gradient);
}

void cleanup_panel()
{
	if (!panels)
		return;

	cleanup_taskbar();

	for (int i = 0; i < num_panels; i++) {
		Panel *p = &panels[i];

		free_area(&p->area);
		if (p->temp_pmap)
			XFreePixmap(server.display, p->temp_pmap);
		p->temp_pmap = 0;
		if (p->hidden_pixmap)
			XFreePixmap(server.display, p->hidden_pixmap);
		p->hidden_pixmap = 0;
		if (p->main_win)
			XDestroyWindow(server.display, p->main_win);
		p->main_win = 0;
		stop_timeout(p->autohide_timeout);
		cleanup_freespace(p);
	}

	free(panel_items_order);
	panel_items_order = NULL;
	free(panel_window_name);
	panel_window_name = NULL;
	free(panels);
	panels = NULL;

	free_area(&panel_config.area);

	g_array_free(backgrounds, TRUE);
	backgrounds = NULL;
	if (gradients) {
		for (guint i = 0; i < gradients->len; i++)
			cleanup_gradient(&g_array_index(gradients, GradientClass, i));
		g_array_free(gradients, TRUE);
	}
	gradients = NULL;
	pango_font_description_free(panel_config.g_task.font_desc);
	panel_config.g_task.font_desc = NULL;
	pango_font_description_free(panel_config.taskbarname_font_desc);
	panel_config.taskbarname_font_desc = NULL;
}

void init_panel()
{
	if (panel_config.monitor > (server.num_monitors - 1)) {
		// server.num_monitors minimum value is 1 (see get_monitors())
		fprintf(stderr, "warning : monitor not found. tint2 default to all monitors.\n");
		panel_config.monitor = 0;
	}

	fprintf(stderr, "panel items: %s\n", panel_items_order);

	icon_theme_wrapper = NULL;

	init_tooltip();
	init_systray();
	init_launcher();
	init_clock();
	init_graphs();
#ifdef ENABLE_BATTERY
	init_battery();
#endif
	init_taskbar();
	init_separator();
	init_execp();
	init_button();

	// number of panels (one monitor or 'all' monitors)
	if (panel_config.monitor >= 0)
		num_panels = 1;
	else
		num_panels = server.num_monitors;

	panels = calloc(num_panels, sizeof(Panel));
	for (int i = 0; i < num_panels; i++) {
		memcpy(&panels[i], &panel_config, sizeof(Panel));
	}

	fprintf(stderr,
	        "tint2 : nb monitor %d, nb monitor used %d, nb desktop %d\n",
	        server.num_monitors,
	        num_panels,
	        server.num_desktops);
	for (int i = 0; i < num_panels; i++) {
		Panel *p = &panels[i];

		if (panel_config.monitor < 0)
			p->monitor = i;
		if (!p->area.bg)
			p->area.bg = &g_array_index(backgrounds, Background, 0);
		p->area.parent = p;
		p->area.panel = p;
		snprintf(p->area.name, sizeof(p->area.name), "Panel %d", i);
		p->area.on_screen = TRUE;
		p->area.resize_needed = 1;
		p->area.size_mode = LAYOUT_DYNAMIC;
		p->area._resize = resize_panel;
		p->area._clear = panel_clear_background;
		p->separator_list = NULL;
		init_panel_size_and_position(p);
		instantiate_area_gradients(&p->area);
		// add children according to panel_items
		for (int k = 0; k < strlen(panel_items_order); k++) {
			if (panel_items_order[k] == 'L')
				init_launcher_panel(p);
			if (panel_items_order[k] == 'T')
				init_taskbar_panel(p);
			if (panel_items_order[k] == 'G')
				init_graphs_panel(p);
#ifdef ENABLE_BATTERY
			if (panel_items_order[k] == 'B')
				init_battery_panel(p);
#endif
			if (panel_items_order[k] == 'S' && systray_on_monitor(i, num_panels)) {
				init_systray_panel(p);
				refresh_systray = 1;
			}
			if (panel_items_order[k] == 'C')
				init_clock_panel(p);
			if (panel_items_order[k] == 'F' && !strstr(panel_items_order, "T"))
				init_freespace_panel(p);
			if (panel_items_order[k] == ':')
				init_separator_panel(p);
			if (panel_items_order[k] == 'E')
				init_execp_panel(p);
			if (panel_items_order[k] == 'P')
				init_button_panel(p);
		}
		set_panel_items_order(p);

		// catch some events
		XSetWindowAttributes att = {.colormap = server.colormap, .background_pixel = 0, .border_pixel = 0};
		unsigned long mask = CWEventMask | CWColormap | CWBackPixel | CWBorderPixel;
		p->main_win = XCreateWindow(server.display,
		                            server.root_win,
		                            p->posx,
		                            p->posy,
		                            p->area.width,
		                            p->area.height,
		                            0,
		                            server.depth,
		                            InputOutput,
		                            server.visual,
		                            mask,
		                            &att);

		long event_mask = ExposureMask | ButtonPressMask | ButtonReleaseMask | ButtonMotionMask | PropertyChangeMask;
		if (p->mouse_effects || p->g_task.tooltip_enabled || p->clock.area._get_tooltip_text ||
		    (launcher_enabled && launcher_tooltip_enabled))
			event_mask |= PointerMotionMask | LeaveWindowMask;
		if (panel_autohide)
			event_mask |= LeaveWindowMask | EnterWindowMask;
		XChangeWindowAttributes(server.display,
		                        p->main_win,
		                        CWEventMask,
		                        &(XSetWindowAttributes){.event_mask = event_mask});

		if (!server.gc) {
			XGCValues gcv;
			server.gc = XCreateGC(server.display, p->main_win, 0, &gcv);
		}
		// printf("panel %d : %d, %d, %d, %d\n", i, p->posx, p->posy, p->area.width, p->area.height);
		set_panel_properties(p);
		set_panel_background(p);
		if (!snapshot_path) {
			// if we are not in 'snapshot' mode then map new panel
			XMapWindow(server.display, p->main_win);
		}

		if (panel_autohide)
			autohide_trigger_hide(p);
	}

	taskbar_refresh_tasklist();
	reset_active_task();
	update_all_taskbars_visibility();
}

void panel_compute_size(Panel *panel)
{
	if (panel_horizontal) {
		if (panel->area.width == 0) {
			panel->fractional_width = TRUE;
			panel->area.width = 100;
		}
		if (panel->area.height == 0) {
			panel->fractional_height = FALSE;
			panel->area.height = 32;
		}
		if (panel->fractional_width)
			panel->area.width = (server.monitors[panel->monitor].width - panel->marginx) * panel->area.width / 100;
		if (panel->fractional_height)
			panel->area.height = (server.monitors[panel->monitor].height - panel->marginy) * panel->area.height / 100;
		if (panel->area.bg->border.radius > panel->area.height / 2) {
			printf("panel_background_id rounded is too big... please fix your tint2rc\n");
			g_array_append_val(backgrounds, *panel->area.bg);
			panel->area.bg = &g_array_index(backgrounds, Background, backgrounds->len - 1);
			panel->area.bg->border.radius = panel->area.height / 2;
		}
	} else {
		if (panel->area.height == 0) {
			panel->fractional_height = TRUE;
			panel->area.height = 100;
		}
		if (panel->area.width == 0) {
			panel->fractional_width = FALSE;
			panel->area.width = 140;
		}
		int old_panel_height = panel->area.height;
		if (panel->fractional_width)
			panel->area.height = (server.monitors[panel->monitor].height - panel->marginy) * panel->area.width / 100;
		else
			panel->area.height = panel->area.width;

		if (panel->fractional_height)
			panel->area.width = (server.monitors[panel->monitor].width - panel->marginx) * old_panel_height / 100;
		else
			panel->area.width = old_panel_height;

		if (panel->area.bg->border.radius > panel->area.width / 2) {
			printf("panel_background_id rounded is too big... please fix your tint2rc\n");
			g_array_append_val(backgrounds, *panel->area.bg);
			panel->area.bg = &g_array_index(backgrounds, Background, backgrounds->len - 1);
			panel->area.bg->border.radius = panel->area.width / 2;
		}
	}

	if (panel->area.width + panel->marginx > server.monitors[panel->monitor].width)
		panel->area.width = server.monitors[panel->monitor].width - panel->marginx;
	if (panel->area.height + panel->marginy > server.monitors[panel->monitor].height)
		panel->area.height = server.monitors[panel->monitor].height - panel->marginy;

	panel->max_size = panel_horizontal ? panel->area.width : panel->area.height;
}

void panel_compute_position(Panel *panel)
{
	// panel position determined here
	if (panel_position & LEFT) {
		panel->posx = server.monitors[panel->monitor].x + panel->marginx;
	} else {
		if (panel_position & RIGHT) {
			panel->posx = server.monitors[panel->monitor].x + server.monitors[panel->monitor].width -
			              panel->area.width - panel->marginx;
		} else {
			if (panel_horizontal)
				panel->posx = server.monitors[panel->monitor].x +
				              ((server.monitors[panel->monitor].width - panel->area.width) / 2);
			else
				panel->posx = server.monitors[panel->monitor].x + panel->marginx;
		}
	}
	if (panel_position & TOP) {
		panel->posy = server.monitors[panel->monitor].y + panel->marginy;
	} else {
		if (panel_position & BOTTOM) {
			panel->posy = server.monitors[panel->monitor].y + server.monitors[panel->monitor].height -
			              panel->area.height - panel->marginy;
		} else {
			panel->posy =
			    server.monitors[panel->monitor].y + ((server.monitors[panel->monitor].height - panel->area.height) / 2);
		}
	}

	// autohide or strut_policy=minimum
	int diff = (panel_horizontal ? panel->area.height : panel->area.width) - panel_autohide_height;
	if (panel_horizontal) {
		panel->hidden_width = panel->area.width;
		panel->hidden_height = panel->area.height - diff;
	} else {
		panel->hidden_width = panel->area.width - diff;
		panel->hidden_height = panel->area.height;
	}
	// printf("panel : posx %d, posy %d, width %d, height %d\n", panel->posx, panel->posy, panel->area.width,
	// panel->area.height);
}

void init_panel_size_and_position(Panel *panel)
{
	panel_compute_size(panel);
	panel_compute_position(panel);
}

gboolean resize_panel(void *obj)
{
	Panel *panel = (Panel *)obj;
	relayout_with_constraint(&panel->area, 0);

	// printf("resize_panel\n");
	if (taskbar_mode != MULTI_DESKTOP && taskbar_enabled) {
		// propagate width/height on hidden taskbar
		int width = panel->taskbar[server.desktop].area.width;
		int height = panel->taskbar[server.desktop].area.height;
		for (int i = 0; i < panel->num_desktops; i++) {
			panel->taskbar[i].area.resize_needed =
			    panel->taskbar[i].area.width != width || panel->taskbar[i].area.height != height;
			panel->taskbar[i].area.width = width;
			panel->taskbar[i].area.height = height;
		}
	} else if (taskbar_mode == MULTI_DESKTOP && taskbar_enabled && taskbar_distribute_size) {
		for (int i = 0; i < panel->num_desktops; i++) {
			Taskbar *taskbar = &panel->taskbar[i];
			taskbar->area.old_width = taskbar->area.width;
			taskbar->area.old_height = taskbar->area.height;
		}

		// The total available size
		int total_size = 0;
		for (int i = 0; i < panel->num_desktops; i++) {
			Taskbar *taskbar = &panel->taskbar[i];
			if (!taskbar->area.on_screen)
				continue;
			total_size += panel_horizontal ? taskbar->area.width : taskbar->area.height;
		}

		// Reserve size for padding, taskbarname and spacings
		for (int i = 0; i < panel->num_desktops; i++) {
			Taskbar *taskbar = &panel->taskbar[i];
			if (!taskbar->area.on_screen)
				continue;
			if (panel_horizontal)
				taskbar->area.width = 2 * taskbar->area.paddingxlr;
			else
				taskbar->area.height = 2 * taskbar->area.paddingxlr;
			if (taskbarname_enabled && taskbar->area.children) {
				Area *name = (Area *)taskbar->area.children->data;
				if (name->on_screen) {
					if (panel_horizontal)
						taskbar->area.width += name->width;
					else
						taskbar->area.height += name->height;
				}
			}
			gboolean first_child = TRUE;
			for (GList *l = taskbar->area.children; l; l = l->next) {
				Area *child = (Area *)l->data;
				if (!child->on_screen)
					continue;
				if (!first_child) {
					if (panel_horizontal)
						taskbar->area.width += taskbar->area.paddingx;
					else
						taskbar->area.height += taskbar->area.paddingy;
				}
				first_child = FALSE;
			}
			total_size -= panel_horizontal ? taskbar->area.width : taskbar->area.height;
		}

		// Compute the total number of tasks
		int num_tasks = 0;
		for (int i = 0; i < panel->num_desktops; i++) {
			Taskbar *taskbar = &panel->taskbar[i];
			if (!taskbar->area.on_screen)
				continue;
			for (GList *l = taskbar->area.children; l; l = l->next) {
				Area *child = (Area *)l->data;
				if (!child->on_screen)
					continue;
				if (taskbarname_enabled && l == taskbar->area.children)
					continue;
				num_tasks++;
			}
		}

		// Distribute the remaining size between tasks
		if (num_tasks > 0) {
			int task_size = total_size / num_tasks;
			for (int i = 0; i < panel->num_desktops; i++) {
				Taskbar *taskbar = &panel->taskbar[i];
				if (!taskbar->area.on_screen)
					continue;
				for (GList *l = taskbar->area.children; l; l = l->next) {
					Area *child = (Area *)l->data;
					if (!child->on_screen)
						continue;
					if (taskbarname_enabled && l == taskbar->area.children)
						continue;
					if (panel_horizontal)
						taskbar->area.width += task_size;
					else
						taskbar->area.height += task_size;
				}
			}
		} else {
			// No tasks => expand the first visible taskbar
			for (int i = 0; i < panel->num_desktops; i++) {
				Taskbar *taskbar = &panel->taskbar[i];
				if (!taskbar->area.on_screen)
					continue;
				if (panel_horizontal)
					taskbar->area.width += total_size;
				else
					taskbar->area.height += total_size;
				break;
			}
		}
		for (int i = 0; i < panel->num_desktops; i++) {
			Taskbar *taskbar = &panel->taskbar[i];
			taskbar->area.resize_needed =
			    taskbar->area.old_width != taskbar->area.width || taskbar->area.old_height != taskbar->area.height;
		}
	}
	for (GList *l = panel->freespace_list; l; l = g_list_next(l))
		resize_freespace(l->data);
	return FALSE;
}

void update_strut(Panel *p)
{
	if (panel_strut_policy == STRUT_NONE) {
		XDeleteProperty(server.display, p->main_win, server.atom._NET_WM_STRUT);
		XDeleteProperty(server.display, p->main_win, server.atom._NET_WM_STRUT_PARTIAL);
		return;
	}

	// Reserved space
	unsigned int d1, screen_width, screen_height;
	Window d2;
	int d3;
	XGetGeometry(server.display, server.root_win, &d2, &d3, &d3, &screen_width, &screen_height, &d1, &d1);
	Monitor monitor = server.monitors[p->monitor];
	long struts[12] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
	if (panel_horizontal) {
		int height = p->area.height + p->marginy;
		if (panel_strut_policy == STRUT_MINIMUM || (panel_strut_policy == STRUT_FOLLOW_SIZE && panel_autohide))
			height = p->hidden_height;
		if (panel_position & TOP) {
			struts[2] = height + monitor.y;
			struts[8] = p->posx;
			// p->area.width - 1 allowed full screen on monitor 2
			struts[9] = p->posx + p->area.width - 1;
		} else {
			struts[3] = height + screen_height - monitor.y - monitor.height;
			struts[10] = p->posx;
			// p->area.width - 1 allowed full screen on monitor 2
			struts[11] = p->posx + p->area.width - 1;
		}
	} else {
		int width = p->area.width + p->marginx;
		if (panel_strut_policy == STRUT_MINIMUM || (panel_strut_policy == STRUT_FOLLOW_SIZE && panel_autohide))
			width = p->hidden_width;
		if (panel_position & LEFT) {
			struts[0] = width + monitor.x;
			struts[4] = p->posy;
			// p->area.width - 1 allowed full screen on monitor 2
			struts[5] = p->posy + p->area.height - 1;
		} else {
			struts[1] = width + screen_width - monitor.x - monitor.width;
			struts[6] = p->posy;
			// p->area.width - 1 allowed full screen on monitor 2
			struts[7] = p->posy + p->area.height - 1;
		}
	}
	// Old specification : fluxbox need _NET_WM_STRUT.
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._NET_WM_STRUT,
	                XA_CARDINAL,
	                32,
	                PropModeReplace,
	                (unsigned char *)&struts,
	                4);
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._NET_WM_STRUT_PARTIAL,
	                XA_CARDINAL,
	                32,
	                PropModeReplace,
	                (unsigned char *)&struts,
	                12);
}

void set_panel_items_order(Panel *p)
{
	if (p->area.children) {
		g_list_free(p->area.children);
		p->area.children = 0;
	}

	int i_execp = 0;
	int i_separator = 0;
	int i_freespace = 0;
	int i_button = 0;
	for (int k = 0; k < strlen(panel_items_order); k++) {
		if (panel_items_order[k] == 'L') {
			p->area.children = g_list_append(p->area.children, &p->launcher);
			p->launcher.area.resize_needed = 1;
		}
		if (panel_items_order[k] == 'T') {
			for (int j = 0; j < p->num_desktops; j++)
				p->area.children = g_list_append(p->area.children, &p->taskbar[j]);
		}
		if (panel_items_order[k] == 'G')
			p->area.children = g_list_append(p->area.children, &p->graphs);
#ifdef ENABLE_BATTERY
		if (panel_items_order[k] == 'B')
			p->area.children = g_list_append(p->area.children, &p->battery);
#endif
		int i = p - panels;
		if (panel_items_order[k] == 'S' && systray_on_monitor(i, num_panels)) {
			p->area.children = g_list_append(p->area.children, &systray);
		}
		if (panel_items_order[k] == 'C')
			p->area.children = g_list_append(p->area.children, &p->clock);
		if (panel_items_order[k] == 'F') {
			GList *item = g_list_nth(p->freespace_list, i_freespace);
			i_freespace++;
			if (item)
				p->area.children = g_list_append(p->area.children, (Area *)item->data);
		}
		if (panel_items_order[k] == ':') {
			GList *item = g_list_nth(p->separator_list, i_separator);
			i_separator++;
			if (item)
				p->area.children = g_list_append(p->area.children, (Area *)item->data);
		}
		if (panel_items_order[k] == 'E') {
			GList *item = g_list_nth(p->execp_list, i_execp);
			i_execp++;
			if (item)
				p->area.children = g_list_append(p->area.children, (Area *)item->data);
		}
		if (panel_items_order[k] == 'P') {
			GList *item = g_list_nth(p->button_list, i_button);
			i_button++;
			if (item)
				p->area.children = g_list_append(p->area.children, (Area *)item->data);
		}
	}
	initialize_positions(&p->area, 0);
}

void place_panel_all_desktops(Panel *p)
{
	long val = ALL_DESKTOPS;
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._NET_WM_DESKTOP,
	                XA_CARDINAL,
	                32,
	                PropModeReplace,
	                (unsigned char *)&val,
	                1);
}

void set_panel_layer(Panel *p, Layer layer)
{
	Atom state[4];
	state[0] = server.atom._NET_WM_STATE_SKIP_PAGER;
	state[1] = server.atom._NET_WM_STATE_SKIP_TASKBAR;
	state[2] = server.atom._NET_WM_STATE_STICKY;
	state[3] = layer == BOTTOM_LAYER ? server.atom._NET_WM_STATE_BELOW : server.atom._NET_WM_STATE_ABOVE;
	int num_atoms = layer == NORMAL_LAYER ? 3 : 4;
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._NET_WM_STATE,
	                XA_ATOM,
	                32,
	                PropModeReplace,
	                (unsigned char *)state,
	                num_atoms);
}

void replace_panel_all_desktops(Panel *p)
{
	XClientMessageEvent m;
	memset(&m, 0, sizeof(m));
	m.type = ClientMessage;
	m.send_event = True;
	m.display = server.display;
	m.window = p->main_win;
	m.message_type = server.atom._NET_WM_DESKTOP;
	m.format = 32;
	m.data.l[0] = ALL_DESKTOPS;
	XSendEvent(server.display, server.root_win, False, SubstructureRedirectMask | SubstructureNotifyMask, (XEvent *)&m);
	XSync(server.display, False);
}

void set_panel_window_geometry(Panel *panel)
{
	update_strut(panel);

	// Fixed position and non-resizable window
	// Allow panel move and resize when tint2 reload config file
	int minwidth = panel_autohide ? panel->hidden_width : panel->area.width;
	int minheight = panel_autohide ? panel->hidden_height : panel->area.height;
	XSizeHints size_hints;
	size_hints.flags = PPosition | PMinSize | PMaxSize;
	size_hints.min_width = minwidth;
	size_hints.max_width = panel->area.width;
	size_hints.min_height = minheight;
	size_hints.max_height = panel->area.height;
	XSetWMNormalHints(server.display, panel->main_win, &size_hints);

	if (!panel->is_hidden) {
		if (panel_horizontal) {
			if (panel_position & TOP)
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx,
				                  panel->posy,
				                  panel->area.width,
				                  panel->area.height);
			else
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx,
				                  panel->posy,
				                  panel->area.width,
				                  panel->area.height);
		} else {
			if (panel_position & LEFT)
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx,
				                  panel->posy,
				                  panel->area.width,
				                  panel->area.height);
			else
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx,
				                  panel->posy,
				                  panel->area.width,
				                  panel->area.height);
		}
	} else {
		int diff = (panel_horizontal ? panel->area.height : panel->area.width) - panel_autohide_height;
		if (panel_horizontal) {
			if (panel_position & TOP)
				XMoveResizeWindow(server.display,
								  panel->main_win,
				                  panel->posx,
				                  panel->posy,
				                  panel->hidden_width,
				                  panel->hidden_height);
			else
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx,
				                  panel->posy + diff,
				                  panel->hidden_width,
				                  panel->hidden_height);
		} else {
			if (panel_position & LEFT)
				XMoveResizeWindow(server.display,
				                  panel->main_win,
								  panel->posx,
								  panel->posy,
				                  panel->hidden_width,
				                  panel->hidden_height);
			else
				XMoveResizeWindow(server.display,
				                  panel->main_win,
				                  panel->posx + diff,
				                  panel->posy,
				                  panel->hidden_width,
				                  panel->hidden_height);
		}
	}
}

void set_panel_properties(Panel *p)
{
	XStoreName(server.display, p->main_win, panel_window_name);
	XSetIconName(server.display, p->main_win, panel_window_name);

	gsize len;
	gchar *name = g_locale_to_utf8(panel_window_name, -1, NULL, &len, NULL);
	if (name != NULL) {
		XChangeProperty(server.display,
		                p->main_win,
		                server.atom._NET_WM_NAME,
		                server.atom.UTF8_STRING,
		                8,
		                PropModeReplace,
		                (unsigned char *)name,
		                (int)len);
		XChangeProperty(server.display,
		                p->main_win,
		                server.atom._NET_WM_ICON_NAME,
		                server.atom.UTF8_STRING,
		                8,
		                PropModeReplace,
		                (unsigned char *)name,
		                (int)len);
		g_free(name);
	}

	// Dock
	long val = server.atom._NET_WM_WINDOW_TYPE_DOCK;
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._NET_WM_WINDOW_TYPE,
	                XA_ATOM,
	                32,
	                PropModeReplace,
	                (unsigned char *)&val,
	                1);

	place_panel_all_desktops(p);
	set_panel_layer(p, panel_layer);

	XWMHints wmhints;
	memset(&wmhints, 0, sizeof(wmhints));
	if (panel_dock) {
		// Necessary for placing the panel into the dock on Openbox and Fluxbox.
		// See https://gitlab.com/o9000/tint2/issues/465
		wmhints.flags = IconWindowHint | WindowGroupHint | StateHint;
		wmhints.icon_window = wmhints.window_group = p->main_win;
		wmhints.initial_state = WithdrawnState;
	}
	// We do not need keyboard input focus.
	wmhints.flags |= InputHint;
	wmhints.input = False;
	XSetWMHints(server.display, p->main_win, &wmhints);

	// Undecorated
	long prop[5] = {2, 0, 0, 0, 0};
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom._MOTIF_WM_HINTS,
	                server.atom._MOTIF_WM_HINTS,
	                32,
	                PropModeReplace,
	                (unsigned char *)prop,
	                5);

	// XdndAware - Register for Xdnd events
	Atom version = 4;
	XChangeProperty(server.display,
	                p->main_win,
	                server.atom.XdndAware,
	                XA_ATOM,
	                32,
	                PropModeReplace,
	                (unsigned char *)&version,
	                1);

	// Set WM_CLASS
	XClassHint *classhint = XAllocClassHint();
	classhint->res_name = (char *)"tint2";
	classhint->res_class = (char *)"Tint2";
	XSetClassHint(server.display, p->main_win, classhint);
	XFree(classhint);

	set_panel_window_geometry(p);
}

void panel_clear_background(void *obj)
{
	Panel *p = obj;
	clear_pixmap(p->area.pix, 0, 0, p->area.width, p->area.height);
	if (!server.real_transparency) {
		get_root_pixmap();
		// copy background (server.root_pmap) in panel.area.pix
		Window dummy;
		int x, y;
		XTranslateCoordinates(server.display, p->main_win, server.root_win, 0, 0, &x, &y, &dummy);

		if (panel_autohide && p->is_hidden) {
			int xoff = 0, yoff = 0;
			if (panel_horizontal && panel_position & BOTTOM)
				yoff = p->area.height - p->hidden_height;
			else if (!panel_horizontal && panel_position & RIGHT)
				xoff = p->area.width - p->hidden_width;
			x -= xoff;
			y -= yoff;
		}

		XSetTSOrigin(server.display, server.gc, -x, -y);
		XFillRectangle(server.display, p->area.pix, server.gc, 0, 0, p->area.width, p->area.height);
	}
}

void set_panel_background(Panel *p)
{
	panel_clear_background(p);
	schedule_redraw(&p->area);

	if (p->hidden_pixmap) {
		XFreePixmap(server.display, p->hidden_pixmap);
		p->hidden_pixmap = 0;
	}
}

Panel *get_panel(Window win)
{
	for (int i = 0; i < num_panels; i++) {
		if (panels[i].main_win == win) {
			return &panels[i];
		}
	}
	return 0;
}

Taskbar *click_taskbar(Panel *panel, int x, int y)
{
	for (int i = 0; i < panel->num_desktops; i++) {
		Taskbar *taskbar = &panel->taskbar[i];
		if (area_is_under_mouse(taskbar, x, y))
			return taskbar;
	}
	return NULL;
}

Task *click_task(Panel *panel, int x, int y)
{
	Taskbar *taskbar = click_taskbar(panel, x, y);
	if (taskbar) {
		GList *l = taskbar->area.children;
		if (taskbarname_enabled)
			l = l->next;
		for (; l; l = l->next) {
			Task *task = (Task *)l->data;
			if (area_is_under_mouse(task, x, y)) {
				return task;
			}
		}
	}
	return NULL;
}

Launcher *click_launcher(Panel *panel, int x, int y)
{
	Launcher *launcher = &panel->launcher;

	if (area_is_under_mouse(launcher, x, y))
		return launcher;

	return NULL;
}

LauncherIcon *click_launcher_icon(Panel *panel, int x, int y)
{
	Launcher *launcher = click_launcher(panel, x, y);
	if (launcher) {
		for (GSList *l = launcher->list_icons; l; l = l->next) {
			LauncherIcon *icon = (LauncherIcon *)l->data;
			if (area_is_under_mouse(icon, x, y))
				return icon;
		}
	}
	return NULL;
}

Graphs *click_graphs(Panel *panel, int x, int y)
{
	Graphs *gr = &panel->graphs;
	if (area_is_under_mouse(gr, x, y))
		return gr;
	return NULL;
}

Clock *click_clock(Panel *panel, int x, int y)
{
	Clock *clock = &panel->clock;
	if (area_is_under_mouse(clock, x, y))
		return clock;
	return NULL;
}

#ifdef ENABLE_BATTERY
Battery *click_battery(Panel *panel, int x, int y)
{
	Battery *bat = &panel->battery;
	if (area_is_under_mouse(bat, x, y))
		return bat;
	return NULL;
}
#endif

Execp *click_execp(Panel *panel, int x, int y)
{
	for (GList *l = panel->execp_list; l; l = l->next) {
		Execp *execp = (Execp *)l->data;
		if (area_is_under_mouse(execp, x, y))
			return execp;
	}
	return NULL;
}

Button *click_button(Panel *panel, int x, int y)
{
	for (GList *l = panel->button_list; l; l = l->next) {
		Button *button = (Button *)l->data;
		if (area_is_under_mouse(button, x, y))
			return button;
	}
	return NULL;
}

void stop_autohide_timeout(Panel *p)
{
	stop_timeout(p->autohide_timeout);
}

void autohide_show(void *p)
{
	Panel *panel = (Panel *)p;
	stop_autohide_timeout(panel);
	panel->is_hidden = 0;
	XMapSubwindows(server.display, panel->main_win); // systray windows
	set_panel_window_geometry(panel);
	set_panel_layer(panel, TOP_LAYER);
	refresh_systray = TRUE; // ugly hack, because we actually only need to call XSetBackgroundPixmap
	schedule_panel_redraw();
}

void autohide_hide(void *p)
{
	Panel *panel = (Panel *)p;
	stop_autohide_timeout(panel);
	set_panel_layer(panel, panel_layer);
	panel->is_hidden = TRUE;
	XUnmapSubwindows(server.display, panel->main_win); // systray windows
	set_panel_window_geometry(panel);
	schedule_panel_redraw();
}

void autohide_trigger_show(Panel *p)
{
	if (!p)
		return;
	change_timeout(&p->autohide_timeout, panel_autohide_show_timeout, 0, autohide_show, p);
}

void autohide_trigger_hide(Panel *p)
{
	if (!p)
		return;

	Window root, child;
	int xr, yr, xw, yw;
	unsigned int mask;
	if (XQueryPointer(server.display, p->main_win, &root, &child, &xr, &yr, &xw, &yw, &mask))
		if (child)
			return; // mouse over one of the system tray icons

	change_timeout(&p->autohide_timeout, panel_autohide_hide_timeout, 0, autohide_hide, p);
}

void shrink_panel(Panel *panel)
{
	if (!panel_shrink)
		return;
	int size = MIN(compute_desired_size(&panel->area), panel->max_size);
	gboolean update = FALSE;
	if (panel_horizontal) {
		if (panel->area.width != size) {
			panel->area.width = size;
			update = TRUE;
		}
	} else {
		if (panel->area.height != size) {
			panel->area.height = size;
			update = TRUE;
		}
	}
	if (update) {
		panel_compute_position(panel);
		set_panel_window_geometry(panel);
		set_panel_background(panel);
		panel->area.resize_needed = TRUE;
		systray.area.resize_needed = TRUE;
		schedule_redraw(&systray.area);
		refresh_systray = TRUE;
	}
}

void render_panel(Panel *panel)
{
	relayout(&panel->area);
	if (debug_geometry)
		area_dump_geometry(&panel->area, 0);
	update_dependent_gradients(&panel->area);
	draw_tree(&panel->area);
}

const char *get_default_font()
{
	if (default_font)
		return default_font;
	return DEFAULT_FONT;
}

void default_icon_theme_changed()
{
	if (!launcher_enabled && !panel_config.button_list)
		return;
	if (launcher_icon_theme_override && icon_theme_name_config)
		return;

	free_icon_themes();
	load_icon_themes();

	launcher_default_icon_theme_changed();
	button_default_icon_theme_changed();
}

void default_font_changed()
{
#ifdef ENABLE_BATTERY
	battery_default_font_changed();
#endif
	clock_default_font_changed();
	execp_default_font_changed();
	button_default_font_changed();
	taskbar_default_font_changed();
	taskbarname_default_font_changed();
	tooltip_default_font_changed();
}

void _schedule_panel_redraw(const char *file, const char *function, const int line)
{
	panel_refresh = TRUE;
	if (debug_fps) {
		fprintf(stderr, YELLOW "%s %s %d: triggering panel redraw" RESET "\n", file, function, line);
	}
}
