/**************************************************************************
*
* 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 <sys/types.h>
#include <unistd.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);

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;
gboolean panel_pivot_struts;
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 startup_notifications;
gboolean debug_thumbnails;
gboolean debug_blink;
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;

double ui_scale_dpi_ref;
double ui_scale_monitor_size_ref;

Imlib_Image default_icon;
char *default_font = NULL;

void default_panel()
{
    ui_scale_dpi_ref = 0;
    ui_scale_monitor_size_ref = 0;
    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_pivot_struts = FALSE;
    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;

    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;
        destroy_timer(&p->autohide_timer);
        cleanup_freespace(p);
    }

    free_icon_themes();

    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, "tint2: warning : monitor not found. tint2 default to all monitors.\n");
        panel_config.monitor = 0;
    }

    fprintf(stderr, "tint2: 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));
        INIT_TIMER(panels[i].autohide_timer);
    }

    fprintf(stderr,
            "tint2: nb monitors %d, nb monitors used %d, nb desktops %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 (ui_scale_dpi_ref > 0 && server.monitors[p->monitor].dpi > 0)
            p->scale = server.monitors[p->monitor].dpi / ui_scale_dpi_ref;
        else
            p->scale = 1;
        if (ui_scale_monitor_size_ref > 0)
            p->scale *= server.monitors[p->monitor].height / ui_scale_monitor_size_ref;
        if (p->scale > 8 || p->scale < 1./8) {
            fprintf(stderr, RED "tint2: panel %d having scale %g outside bounds, resetting to 1.0" RESET "\n", i + 1, p->scale);
            p->scale = 1;
        }
        fprintf(stderr, BLUE "tint2: panel %d uses scale %g " RESET "\n", i + 1, p->scale);
        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);
        }
        // fprintf(stderr, "tint2: 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) {
            fprintf(stderr, "tint2: 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) {
            fprintf(stderr, "tint2: 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->fractional_width) {
        if (panel_horizontal)
            panel->area.width *= panel->scale;
        else
            panel->area.height *= panel->scale;
    }
    if (!panel->fractional_height) {
        if (panel_horizontal)
            panel->area.height *= panel->scale;
        else
            panel->area.width *= panel->scale;
    }

    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;
    }
    // fprintf(stderr, "tint2: 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);

    // fprintf(stderr, "tint2: 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 * panel->scale;
            else
                taskbar->area.height = 2 * taskbar->area.paddingxlr * panel->scale;
            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 * panel->scale;
                    else
                        taskbar->area.height += taskbar->area.paddingy * panel->scale;
                }
                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 taskbars
        if (num_tasks > 0) {
            int task_size = total_size / num_tasks;
            if (taskbar_alignment != ALIGN_LEFT)
                task_size = MIN(task_size, panel_horizontal ? panel_config.g_task.maximum_width : panel_config.g_task.maximum_height);
            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;
                }
            }
            int slack = total_size - task_size * num_tasks;
            if (taskbar_alignment == ALIGN_RIGHT) {
                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 += slack;
                    else
                        taskbar->area.height += slack;
                    break;
                }
            } else if (taskbar_alignment == ALIGN_CENTER) {
                slack /= 2;
                Taskbar *left_taskbar = NULL;
                Taskbar *right_taskbar = NULL;
                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 += slack;
                    else
                        taskbar->area.height += slack;
                    taskbar->area.alignment = ALIGN_RIGHT;
                    left_taskbar = taskbar;
                    break;
                }
                for (int i = panel->num_desktops - 1; i >= 0; i--) {
                    Taskbar *taskbar = &panel->taskbar[i];
                    if (!taskbar->area.on_screen)
                        continue;
                    if (panel_horizontal)
                        taskbar->area.width += slack;
                    else
                        taskbar->area.height += slack;
                    taskbar->area.alignment = ALIGN_LEFT;
                    right_taskbar = taskbar;
                    break;
                }
                if (left_taskbar == right_taskbar)
                    left_taskbar->area.alignment = ALIGN_CENTER;
            }
        } 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;
}

#define STRUT_LEFT      0
#define STRUT_RIGHT     1
#define STRUT_TOP       2
#define STRUT_BOTTOM    3
#define STRUT_LEFT_Y1   4
#define STRUT_LEFT_Y2   5
#define STRUT_RIGHT_Y1  6
#define STRUT_RIGHT_Y2  7
#define STRUT_TOP_X1    8
#define STRUT_TOP_X2    9
#define STRUT_BOTTOM_X1 10
#define STRUT_BOTTOM_X2 11
#define STRUT_COUNT     12
#define STRUT_COUNT_OLD 4

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[STRUT_COUNT] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
    if (panel_horizontal ^ panel_pivot_struts) {
        int height = p->area.height + p->marginy;
        if (panel_strut_policy == STRUT_MINIMUM || (panel_strut_policy == STRUT_FOLLOW_SIZE && panel_autohide && p->is_hidden))
            height = p->hidden_height;
        if (panel_position & TOP) {
            struts[STRUT_TOP] = height + monitor.y;
            struts[STRUT_TOP_X1] = p->posx;
            // p->area.width - 1 allowed full screen on monitor 2
            struts[STRUT_TOP_X2] = p->posx + p->area.width - 1;
        } else {
            struts[STRUT_BOTTOM] = height + screen_height - monitor.y - monitor.height;
            struts[STRUT_BOTTOM_X1] = p->posx;
            // p->area.width - 1 allowed full screen on monitor 2
            struts[STRUT_BOTTOM_X2] = 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 && p->is_hidden))
            width = p->hidden_width;
        if (panel_position & LEFT) {
            struts[STRUT_LEFT] = width + monitor.x;
            struts[STRUT_LEFT_Y1] = p->posy;
            // p->area.width - 1 allowed full screen on monitor 2
            struts[STRUT_LEFT_Y2] = p->posy + p->area.height - 1;
        } else {
            struts[STRUT_RIGHT] = width + screen_width - monitor.x - monitor.width;
            struts[STRUT_RIGHT_Y1] = p->posy;
            // p->area.width - 1 allowed full screen on monitor 2
            struts[STRUT_RIGHT_Y2] = 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,
                    STRUT_COUNT_OLD);
    XChangeProperty(server.display,
                    p->main_win,
                    server.atom._NET_WM_STRUT_PARTIAL,
                    XA_CARDINAL,
                    32,
                    PropModeReplace,
                    (unsigned char *)&struts,
                    STRUT_COUNT);
}

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);
    }

    long pid = getpid();
    XChangeProperty(server.display,
                    p->main_win,
                    server.atom._NET_WM_PID,
                    XA_CARDINAL,
                    32,
                    PropModeReplace,
                    (unsigned char *)&pid,
                    1);

    // Dock
    XChangeProperty(server.display,
                    p->main_win,
                    server.atom._NET_WM_WINDOW_TYPE,
                    XA_ATOM,
                    32,
                    PropModeReplace,
                    (unsigned char *)&server.atom._NET_WM_WINDOW_TYPE_DOCK,
                    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_timer(Panel *p)
{
    stop_timer(&p->autohide_timer);
}

void autohide_show(void *p)
{
    Panel *panel = (Panel *)p;
    stop_autohide_timer(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_timer(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_timer(&p->autohide_timer, true, 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_timer(&p->autohide_timer, true, 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;
        update_minimized_icon_positions(panel);
    }
}

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 "tint2: %s %s %d: triggering panel redraw" RESET "\n", file, function, line);
    }
}

void save_panel_screenshot(const Panel *panel, const char *path)
{
    imlib_context_set_drawable(panel->temp_pmap);
    Imlib_Image img = imlib_create_image_from_drawable(0, 0, 0, panel->area.width, panel->area.height, 1);

    if (!img) {
        XImage *ximg =
            XGetImage(server.display, panel->temp_pmap, 0, 0, panel->area.width, panel->area.height, AllPlanes, ZPixmap);

        if (ximg) {
            DATA32 *pixels = (DATA32 *)calloc(panel->area.width * panel->area.height, sizeof(DATA32));
            for (int x = 0; x < panel->area.width; x++) {
                for (int y = 0; y < panel->area.height; y++) {
                    DATA32 xpixel = XGetPixel(ximg, x, y);

                    DATA32 r = (xpixel >> 16) & 0xff;
                    DATA32 g = (xpixel >> 8) & 0xff;
                    DATA32 b = (xpixel >> 0) & 0xff;
                    DATA32 a = 0x0;

                    DATA32 argb = (a << 24) | (r << 16) | (g << 8) | b;
                    pixels[y * panel->area.width + x] = argb;
                }
            }
            XDestroyImage(ximg);
            img = imlib_create_image_using_data(panel->area.width, panel->area.height, pixels);
        }
    }

    if (img) {
        imlib_context_set_image(img);
        if (!panel_horizontal) {
            // rotate 90° vertical panel
            imlib_image_flip_horizontal();
            imlib_image_flip_diagonal();
        }
        imlib_save_image(path);
        imlib_free_image();
    }
}

void save_screenshot(const char *path)
{
    Panel *panel = &panels[0];

    if (panel->area.width > server.monitors[0].width)
        panel->area.width = server.monitors[0].width;

    panel->temp_pmap =
        XCreatePixmap(server.display, server.root_win, panel->area.width, panel->area.height, server.depth);
    render_panel(panel);

    XSync(server.display, False);

    save_panel_screenshot(panel, path);
}
