diff options
Diffstat (limited to 'libdecor/src/plugins/cairo')
| -rw-r--r-- | libdecor/src/plugins/cairo/libdecor-cairo-blur.c | 255 | ||||
| -rw-r--r-- | libdecor/src/plugins/cairo/libdecor-cairo-blur.h | 10 | ||||
| -rw-r--r-- | libdecor/src/plugins/cairo/libdecor-cairo.c | 2824 |
3 files changed, 3089 insertions, 0 deletions
diff --git a/libdecor/src/plugins/cairo/libdecor-cairo-blur.c b/libdecor/src/plugins/cairo/libdecor-cairo-blur.c new file mode 100644 index 000000000..2cddc7a23 --- /dev/null +++ b/libdecor/src/plugins/cairo/libdecor-cairo-blur.c @@ -0,0 +1,255 @@ +/* + * Copyright © 2008 Kristian Høgsberg + * Copyright © 2012 Intel Corporation + * + * Permission is hereby granted, free of charge, to any person obtaining + * a copy of this software and associated documentation files (the + * "Software"), to deal in the Software without restriction, including + * without limitation the rights to use, copy, modify, merge, publish, + * distribute, sublicense, and/or sell copies of the Software, and to + * permit persons to whom the Software is furnished to do so, subject to + * the following conditions: + * + * The above copyright notice and this permission notice (including the + * next paragraph) shall be included in all copies or substantial + * portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS + * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN + * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN + * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + */ + +/* + * functions 'blur_surface' and 'render_shadow' from weston project: + * https://gitlab.freedesktop.org/wayland/weston/raw/master/shared/cairo-util.c + */ + +#include "libdecor-cairo-blur.h" +#include <stdint.h> +#include <stdlib.h> +#include <math.h> + +/** + * Compile-time computation of number of items in a hardcoded array. + * + * @param a the array being measured. + * @return the number of items hardcoded into the array. + */ +#ifndef ARRAY_LENGTH +#define ARRAY_LENGTH(a) (sizeof (a) / sizeof (a)[0]) +#endif + +int +blur_surface(cairo_surface_t *surface, int margin) +{ + int32_t width, height, stride, x, y, z, w; + uint8_t *src, *dst; + uint32_t *s, *d, a, p; + int i, j, k, size, half; + uint32_t kernel[71]; + double f; + + size = ARRAY_LENGTH(kernel); + width = cairo_image_surface_get_width(surface); + height = cairo_image_surface_get_height(surface); + stride = cairo_image_surface_get_stride(surface); + src = cairo_image_surface_get_data(surface); + + dst = malloc(height * stride); + if (dst == NULL) + return -1; + + half = size / 2; + a = 0; + for (i = 0; i < size; i++) { + f = (i - half); + kernel[i] = exp(- f * f / ARRAY_LENGTH(kernel)) * 10000; + a += kernel[i]; + } + + for (i = 0; i < height; i++) { + s = (uint32_t *) (src + i * stride); + d = (uint32_t *) (dst + i * stride); + for (j = 0; j < width; j++) { + if (margin < j && j < width - margin) { + d[j] = s[j]; + continue; + } + + x = 0; + y = 0; + z = 0; + w = 0; + for (k = 0; k < size; k++) { + if (j - half + k < 0 || j - half + k >= width) + continue; + p = s[j - half + k]; + + x += (p >> 24) * kernel[k]; + y += ((p >> 16) & 0xff) * kernel[k]; + z += ((p >> 8) & 0xff) * kernel[k]; + w += (p & 0xff) * kernel[k]; + } + d[j] = (x / a << 24) | (y / a << 16) | (z / a << 8) | w / a; + } + } + + for (i = 0; i < height; i++) { + s = (uint32_t *) (dst + i * stride); + d = (uint32_t *) (src + i * stride); + for (j = 0; j < width; j++) { + if (margin <= i && i < height - margin) { + d[j] = s[j]; + continue; + } + + x = 0; + y = 0; + z = 0; + w = 0; + for (k = 0; k < size; k++) { + if (i - half + k < 0 || i - half + k >= height) + continue; + s = (uint32_t *) (dst + (i - half + k) * stride); + p = s[j]; + + x += (p >> 24) * kernel[k]; + y += ((p >> 16) & 0xff) * kernel[k]; + z += ((p >> 8) & 0xff) * kernel[k]; + w += (p & 0xff) * kernel[k]; + } + d[j] = (x / a << 24) | (y / a << 16) | (z / a << 8) | w / a; + } + } + + free(dst); + cairo_surface_mark_dirty(surface); + + return 0; +} + +void +render_shadow(cairo_t *cr, cairo_surface_t *surface, + int x, int y, int width, int height, int margin, int top_margin) +{ + cairo_pattern_t *pattern; + cairo_matrix_t matrix; + int i, fx, fy, shadow_height, shadow_width; + + cairo_set_source_rgba(cr, 0, 0, 0, 0.45); + cairo_set_operator(cr, CAIRO_OPERATOR_OVER); + pattern = cairo_pattern_create_for_surface (surface); + cairo_pattern_set_filter(pattern, CAIRO_FILTER_NEAREST); + + for (i = 0; i < 4; i++) { + /* when fy is set, then we are working with lower corners, + * when fx is set, then we are working with right corners + * + * 00 ------- 01 + * | | + * | | + * 10 ------- 11 + */ + fx = i & 1; + fy = i >> 1; + + cairo_matrix_init_translate(&matrix, + -x + fx * (128 - width), + -y + fy * (128 - height)); + cairo_pattern_set_matrix(pattern, &matrix); + + shadow_width = margin; + shadow_height = fy ? margin : top_margin; + + /* if the shadows together are greater than the surface, we need + * to fix it - set the shadow size to the half of + * the size of surface. Also handle the case when the size is + * not divisible by 2. In that case we need one part of the + * shadow to be one pixel greater. !fy or !fx, respectively, + * will do the work. + */ + if (height < 2 * shadow_height) + shadow_height = (height + !fy) / 2; + + if (width < 2 * shadow_width) + shadow_width = (width + !fx) / 2; + + cairo_reset_clip(cr); + cairo_rectangle(cr, + x + fx * (width - shadow_width), + y + fy * (height - shadow_height), + shadow_width, shadow_height); + cairo_clip (cr); + cairo_mask(cr, pattern); + } + + + shadow_width = width - 2 * margin; + shadow_height = top_margin; + if (height < 2 * shadow_height) + shadow_height = height / 2; + + if (shadow_width > 0 && shadow_height) { + /* Top stretch */ + cairo_matrix_init_translate(&matrix, 60, 0); + cairo_matrix_scale(&matrix, 8.0 / width, 1); + cairo_matrix_translate(&matrix, -x - width / 2, -y); + cairo_pattern_set_matrix(pattern, &matrix); + cairo_rectangle(cr, x + margin, y, shadow_width, shadow_height); + + cairo_reset_clip(cr); + cairo_rectangle(cr, + x + margin, y, + shadow_width, shadow_height); + cairo_clip (cr); + cairo_mask(cr, pattern); + + /* Bottom stretch */ + cairo_matrix_translate(&matrix, 0, -height + 128); + cairo_pattern_set_matrix(pattern, &matrix); + + cairo_reset_clip(cr); + cairo_rectangle(cr, x + margin, y + height - margin, + shadow_width, margin); + cairo_clip (cr); + cairo_mask(cr, pattern); + } + + shadow_width = margin; + if (width < 2 * shadow_width) + shadow_width = width / 2; + + shadow_height = height - margin - top_margin; + + /* if height is smaller than sum of margins, + * then the shadow is already done by the corners */ + if (shadow_height > 0 && shadow_width) { + /* Left stretch */ + cairo_matrix_init_translate(&matrix, 0, 60); + cairo_matrix_scale(&matrix, 1, 8.0 / height); + cairo_matrix_translate(&matrix, -x, -y - height / 2); + cairo_pattern_set_matrix(pattern, &matrix); + cairo_reset_clip(cr); + cairo_rectangle(cr, x, y + top_margin, + shadow_width, shadow_height); + cairo_clip (cr); + cairo_mask(cr, pattern); + + /* Right stretch */ + cairo_matrix_translate(&matrix, -width + 128, 0); + cairo_pattern_set_matrix(pattern, &matrix); + cairo_rectangle(cr, x + width - shadow_width, y + top_margin, + shadow_width, shadow_height); + cairo_reset_clip(cr); + cairo_clip (cr); + cairo_mask(cr, pattern); + } + + cairo_pattern_destroy(pattern); + cairo_reset_clip(cr); +} diff --git a/libdecor/src/plugins/cairo/libdecor-cairo-blur.h b/libdecor/src/plugins/cairo/libdecor-cairo-blur.h new file mode 100644 index 000000000..d48e9dd3d --- /dev/null +++ b/libdecor/src/plugins/cairo/libdecor-cairo-blur.h @@ -0,0 +1,10 @@ +#pragma once + +#include <cairo/cairo.h> + +int +blur_surface(cairo_surface_t *surface, int margin); + +void +render_shadow(cairo_t *cr, cairo_surface_t *surface, + int x, int y, int width, int height, int margin, int top_margin); diff --git a/libdecor/src/plugins/cairo/libdecor-cairo.c b/libdecor/src/plugins/cairo/libdecor-cairo.c new file mode 100644 index 000000000..6e4222863 --- /dev/null +++ b/libdecor/src/plugins/cairo/libdecor-cairo.c @@ -0,0 +1,2824 @@ +/* + * Copyright © 2018 Jonas Ådahl + * + * Permission is hereby granted, free of charge, to any person obtaining + * a copy of this software and associated documentation files (the + * "Software"), to deal in the Software without restriction, including + * without limitation the rights to use, copy, modify, merge, publish, + * distribute, sublicense, and/or sell copies of the Software, and to + * permit persons to whom the Software is furnished to do so, subject to + * the following conditions: + * + * The above copyright notice and this permission notice (including the + * next paragraph) shall be included in all copies or substantial + * portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS + * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN + * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN + * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + * SOFTWARE. + */ + +#include "config.h" + +#include <linux/input.h> +#include <fcntl.h> +#include <poll.h> +#include <string.h> +#include <sys/mman.h> +#include <unistd.h> +#include <stdio.h> +#include <errno.h> +#include <limits.h> +#include <wayland-cursor.h> + +#include "libdecor-plugin.h" +#include "utils.h" +#include "cursor-settings.h" +#include "os-compatibility.h" + +#include <cairo/cairo.h> +#include <pango/pangocairo.h> + +#ifndef APPLY_FLTK_CHANGES +#define APPLY_FLTK_CHANGES 1 +#endif + +/* Note for FLTK: This header file changes location, while its content stays unchanged, + between the master and gtk_cairo_single branches */ +#include "libdecor-cairo-blur.h" + +static const size_t SHADOW_MARGIN = 24; /* graspable part of the border */ +static const size_t TITLE_HEIGHT = 24; +static const size_t BUTTON_WIDTH = 32; +static const size_t SYM_DIM = 14; + +static const uint32_t COL_TITLE = 0xFF080706; +static const uint32_t COL_TITLE_INACT = 0xFF303030; +static const uint32_t COL_BUTTON_MIN = 0xFFFFBB00; +static const uint32_t COL_BUTTON_MAX = 0xFF238823; +static const uint32_t COL_BUTTON_CLOSE = 0xFFFB6542; +static const uint32_t COL_BUTTON_INACT = 0xFF404040; +static const uint32_t COL_SYM = 0xFFF4F4EF; +static const uint32_t COL_SYM_ACT = 0xFF20322A; +static const uint32_t COL_SYM_INACT = 0xFF909090; + +static const uint32_t DOUBLE_CLICK_TIME_MS = 400; + +static const char *cursor_names[] = { + "top_side", + "bottom_side", + "left_side", + "top_left_corner", + "bottom_left_corner", + "right_side", + "top_right_corner", + "bottom_right_corner" +}; + + +/* color conversion function from 32bit integer to double components */ + +double +red(const uint32_t *const col) { + return ((const uint8_t*)(col))[2] / (double)(255); +} + +double +green(const uint32_t *const col) { + return ((const uint8_t*)(col))[1] / (double)(255); +} + +double +blue(const uint32_t *const col) { + return ((const uint8_t*)(col))[0] / (double)(255); +} + +double +alpha(const uint32_t *const col) { + return ((const uint8_t*)(col))[3] / (double)(255); +} + +void +cairo_set_rgba32(cairo_t *cr, const uint32_t *const c) { + cairo_set_source_rgba(cr, red(c), green(c), blue(c), alpha(c)); +} + +static bool +streql(const char *str1, const char *str2) +{ + return (str1 && str2) && (strcmp(str1, str2) == 0); +} + +enum decoration_type { + DECORATION_TYPE_NONE, + DECORATION_TYPE_ALL, + DECORATION_TYPE_MAXIMIZED, + DECORATION_TYPE_TILED +}; + +enum component { + NONE = 0, + SHADOW, + TITLE, + BUTTON_MIN, + BUTTON_MAX, + BUTTON_CLOSE, +}; + +enum composite_mode { + COMPOSITE_SERVER, + COMPOSITE_CLIENT, +}; + +struct seat { + struct libdecor_plugin_cairo *plugin_cairo; + + char *name; + + struct wl_seat *wl_seat; + struct wl_pointer *wl_pointer; + + struct wl_surface *cursor_surface; + struct wl_cursor *current_cursor; + int cursor_scale; + struct wl_list cursor_outputs; + + struct wl_cursor_theme *cursor_theme; + /* cursors for resize edges and corners */ + struct wl_cursor *cursors[ARRAY_LENGTH(cursor_names)]; + struct wl_cursor *cursor_left_ptr; + + struct wl_surface *pointer_focus; + + int pointer_x, pointer_y; + + uint32_t pointer_button_time_stamp; + + uint32_t serial; + + bool grabbed; + + struct wl_list link; +}; + +struct output { + struct libdecor_plugin_cairo *plugin_cairo; + + struct wl_output *wl_output; + uint32_t id; + int scale; + + struct wl_list link; +}; + +struct buffer { + struct wl_buffer *wl_buffer; + bool in_use; + bool is_detached; + + void *data; + size_t data_size; + int width; + int height; + int scale; + int buffer_width; + int buffer_height; +}; + +struct border_component { + enum component type; + + bool is_hidden; + bool opaque; + + enum composite_mode composite_mode; + struct { + struct wl_surface *wl_surface; + struct wl_subsurface *wl_subsurface; + struct buffer *buffer; + struct wl_list output_list; + int scale; + } server; + struct { + cairo_surface_t *image; + struct border_component *parent_component; + } client; + + struct wl_list child_components; /* border_component::link */ + struct wl_list link; /* border_component::child_components */ +}; + +struct surface_output { + struct output *output; + struct wl_list link; +}; + +struct cursor_output { + struct output *output; + struct wl_list link; +}; + +struct libdecor_frame_cairo { + struct libdecor_frame frame; + + struct libdecor_plugin_cairo *plugin_cairo; + + int content_width; + int content_height; + + enum decoration_type decoration_type; + + enum libdecor_window_state window_state; + + char *title; + + enum libdecor_capabilities capabilities; + + struct border_component *focus; + struct border_component *active; + struct border_component *grab; + + bool shadow_showing; + struct border_component shadow; + + struct { + bool is_showing; + struct border_component title; + struct border_component min; + struct border_component max; + struct border_component close; + } title_bar; + + /* store pre-processed shadow tile */ + cairo_surface_t *shadow_blur; + + struct wl_list link; +}; + +struct libdecor_plugin_cairo { + struct libdecor_plugin plugin; + + struct wl_callback *globals_callback; + struct wl_callback *globals_callback_shm; + + struct libdecor *context; + + struct wl_registry *wl_registry; + struct wl_subcompositor *wl_subcompositor; + struct wl_compositor *wl_compositor; + + struct wl_shm *wl_shm; + struct wl_callback *shm_callback; + bool has_argb; + + struct wl_list visible_frame_list; + struct wl_list seat_list; + struct wl_list output_list; + + char *cursor_theme_name; + int cursor_size; + + PangoFontDescription *font; +}; + +static const char *libdecor_cairo_proxy_tag = "libdecor-cairo"; + +static void +sync_active_component(struct libdecor_frame_cairo *frame_cairo, + struct seat *seat); + +static void +synthesize_pointer_enter(struct seat *seat); + +static void +synthesize_pointer_leave(struct seat *seat); + +static bool +own_proxy(struct wl_proxy *proxy) +{ + return (wl_proxy_get_tag(proxy) == &libdecor_cairo_proxy_tag); +} + +static bool +own_surface(struct wl_surface *surface) +{ + return own_proxy((struct wl_proxy *) surface); +} + +static bool +own_output(struct wl_output *output) +{ + return own_proxy((struct wl_proxy *) output); +} + +static bool +moveable(struct libdecor_frame_cairo *frame_cairo) { + return libdecor_frame_has_capability(&frame_cairo->frame, + LIBDECOR_ACTION_MOVE); +} + +static bool +resizable(struct libdecor_frame_cairo *frame_cairo) { + return libdecor_frame_has_capability(&frame_cairo->frame, + LIBDECOR_ACTION_RESIZE); +} + +static bool +minimizable(struct libdecor_frame_cairo *frame_cairo) { + return libdecor_frame_has_capability(&frame_cairo->frame, + LIBDECOR_ACTION_MINIMIZE); +} + +static bool +closeable(struct libdecor_frame_cairo *frame_cairo) { + return libdecor_frame_has_capability(&frame_cairo->frame, + LIBDECOR_ACTION_CLOSE); +} + +static void +buffer_free(struct buffer *buffer); + +static void +draw_border_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component); + +static void +send_cursor(struct seat *seat); + +static bool +update_local_cursor(struct seat *seat); + +static void +libdecor_plugin_cairo_destroy(struct libdecor_plugin *plugin) +{ + struct libdecor_plugin_cairo *plugin_cairo = + (struct libdecor_plugin_cairo *) plugin; + struct seat *seat, *seat_tmp; + struct output *output, *output_tmp; + struct libdecor_frame_cairo *frame, *frame_tmp; + + if (plugin_cairo->globals_callback) + wl_callback_destroy(plugin_cairo->globals_callback); + if (plugin_cairo->globals_callback_shm) + wl_callback_destroy(plugin_cairo->globals_callback_shm); + if (plugin_cairo->shm_callback) + wl_callback_destroy(plugin_cairo->shm_callback); + wl_registry_destroy(plugin_cairo->wl_registry); + + wl_list_for_each_safe(seat, seat_tmp, &plugin_cairo->seat_list, link) { + struct cursor_output *cursor_output, *tmp; + + if (seat->wl_pointer) + wl_pointer_destroy(seat->wl_pointer); + if (seat->cursor_surface) + wl_surface_destroy(seat->cursor_surface); + wl_seat_destroy(seat->wl_seat); + if (seat->cursor_theme) + wl_cursor_theme_destroy(seat->cursor_theme); + + wl_list_for_each_safe(cursor_output, tmp, &seat->cursor_outputs, link) { + wl_list_remove(&cursor_output->link); + free(cursor_output); + } + free(seat->name); + + free(seat); + } + + wl_list_for_each_safe(output, output_tmp, + &plugin_cairo->output_list, link) { + wl_output_destroy(output->wl_output); + free(output); + } + + wl_list_for_each_safe(frame, frame_tmp, + &plugin_cairo->visible_frame_list, link) { + wl_list_remove(&frame->link); + } + + free(plugin_cairo->cursor_theme_name); + + wl_shm_destroy(plugin_cairo->wl_shm); + + pango_font_description_free(plugin_cairo->font); + + wl_compositor_destroy(plugin_cairo->wl_compositor); + wl_subcompositor_destroy(plugin_cairo->wl_subcompositor); + + libdecor_plugin_release(&plugin_cairo->plugin); + free(plugin_cairo); +} + +static void +init_server_component(struct border_component *border_component, + enum component type) +{ + border_component->composite_mode = COMPOSITE_SERVER; + wl_list_init(&border_component->child_components); + border_component->type = type; +} + +static void +init_client_component(struct border_component *border_component, + struct border_component *parent, + enum component type) +{ + border_component->composite_mode = COMPOSITE_CLIENT; + wl_list_init(&border_component->child_components); + wl_list_insert(parent->child_components.prev, &border_component->link); + border_component->client.parent_component = parent; + border_component->type = type; +} + +static void +init_components(struct libdecor_frame_cairo *frame_cairo) +{ + init_server_component(&frame_cairo->title_bar.title, + TITLE); + init_client_component(&frame_cairo->title_bar.min, + &frame_cairo->title_bar.title, + BUTTON_MIN); + init_client_component(&frame_cairo->title_bar.max, + &frame_cairo->title_bar.title, + BUTTON_MAX); + init_client_component(&frame_cairo->title_bar.close, + &frame_cairo->title_bar.title, + BUTTON_CLOSE); + init_server_component(&frame_cairo->shadow, + SHADOW); +} + +static struct libdecor_frame_cairo * +libdecor_frame_cairo_new(struct libdecor_plugin_cairo *plugin_cairo) +{ + struct libdecor_frame_cairo *frame_cairo = zalloc(sizeof *frame_cairo); + cairo_t *cr; + + static const int size = 128; + static const int boundary = 32; + + frame_cairo->plugin_cairo = plugin_cairo; + frame_cairo->shadow_blur = cairo_image_surface_create( + CAIRO_FORMAT_ARGB32, size, size); + wl_list_insert(&plugin_cairo->visible_frame_list, &frame_cairo->link); + + init_components(frame_cairo); + + cr = cairo_create(frame_cairo->shadow_blur); + cairo_set_operator(cr, CAIRO_OPERATOR_OVER); + cairo_set_source_rgba(cr, 0, 0, 0, 1); + cairo_rectangle(cr, boundary, boundary, size-2*boundary, size-2*boundary); + cairo_fill(cr); + cairo_destroy(cr); + blur_surface(frame_cairo->shadow_blur, 64); + + return frame_cairo; +} + +static int +libdecor_plugin_cairo_get_fd(struct libdecor_plugin *plugin) +{ + struct libdecor_plugin_cairo *plugin_cairo = + (struct libdecor_plugin_cairo *) plugin; + struct wl_display *wl_display = + libdecor_get_wl_display(plugin_cairo->context); + + return wl_display_get_fd(wl_display); +} + +static int +libdecor_plugin_cairo_dispatch(struct libdecor_plugin *plugin, + int timeout) +{ + struct libdecor_plugin_cairo *plugin_cairo = + (struct libdecor_plugin_cairo *) plugin; + struct wl_display *wl_display = + libdecor_get_wl_display(plugin_cairo->context); + struct pollfd fds[1]; + int ret; + int dispatch_count = 0; + + while (wl_display_prepare_read(wl_display) != 0) + dispatch_count += wl_display_dispatch_pending(wl_display); + + if (wl_display_flush(wl_display) < 0 && + errno != EAGAIN) { + wl_display_cancel_read(wl_display); + return -errno; + } + + fds[0] = (struct pollfd) { wl_display_get_fd(wl_display), POLLIN }; + + ret = poll(fds, ARRAY_SIZE (fds), timeout); + if (ret > 0) { + if (fds[0].revents & POLLIN) { + wl_display_read_events(wl_display); + dispatch_count += wl_display_dispatch_pending(wl_display); + return dispatch_count; + } else { + wl_display_cancel_read(wl_display); + return dispatch_count; + } + } else if (ret == 0) { + wl_display_cancel_read(wl_display); + return dispatch_count; + } else { + wl_display_cancel_read(wl_display); + return -errno; + } +} + +static struct libdecor_frame * +libdecor_plugin_cairo_frame_new(struct libdecor_plugin *plugin) +{ + struct libdecor_plugin_cairo *plugin_cairo = + (struct libdecor_plugin_cairo *) plugin; + struct libdecor_frame_cairo *frame_cairo; + + frame_cairo = libdecor_frame_cairo_new(plugin_cairo); + + return &frame_cairo->frame; +} + +static void +toggle_maximized(struct libdecor_frame *const frame) +{ + if (!resizable((struct libdecor_frame_cairo *)frame)) + return; + + if (!(libdecor_frame_get_window_state(frame) & + LIBDECOR_WINDOW_STATE_MAXIMIZED)) + libdecor_frame_set_maximized(frame); + else + libdecor_frame_unset_maximized(frame); +} + +static void +buffer_release(void *user_data, + struct wl_buffer *wl_buffer) +{ + struct buffer *buffer = user_data; + + if (buffer->is_detached) + buffer_free(buffer); + else + buffer->in_use = false; +} + +static const struct wl_buffer_listener buffer_listener = { + buffer_release +}; + +static struct buffer * +create_shm_buffer(struct libdecor_plugin_cairo *plugin_cairo, + int width, + int height, + bool opaque, + int scale) +{ + struct wl_shm_pool *pool; + int fd, size, buffer_width, buffer_height, stride; + void *data; + struct buffer *buffer; + enum wl_shm_format buf_fmt; + + buffer_width = width * scale; + buffer_height = height * scale; + stride = buffer_width * 4; + size = stride * buffer_height; + + fd = os_create_anonymous_file(size); + if (fd < 0) { + fprintf(stderr, "creating a buffer file for %d B failed: %s\n", + size, strerror(errno)); + return NULL; + } + + data = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0); + if (data == MAP_FAILED) { + fprintf(stderr, "mmap failed: %s\n", strerror(errno)); + close(fd); + return NULL; + } + + buf_fmt = opaque ? WL_SHM_FORMAT_XRGB8888 : WL_SHM_FORMAT_ARGB8888; + + pool = wl_shm_create_pool(plugin_cairo->wl_shm, fd, size); + buffer = zalloc(sizeof *buffer); + buffer->wl_buffer = wl_shm_pool_create_buffer(pool, 0, + buffer_width, buffer_height, + stride, + buf_fmt); + wl_buffer_add_listener(buffer->wl_buffer, &buffer_listener, buffer); + wl_shm_pool_destroy(pool); + close(fd); + + buffer->data = data; + buffer->data_size = size; + buffer->width = width; + buffer->height = height; + buffer->scale = scale; + buffer->buffer_width = buffer_width; + buffer->buffer_height = buffer_height; + + return buffer; +} + +static void +buffer_free(struct buffer *buffer) +{ + if (buffer->wl_buffer) { + wl_buffer_destroy(buffer->wl_buffer); + munmap(buffer->data, buffer->data_size); + buffer->wl_buffer = NULL; + buffer->in_use = false; + } + free(buffer); +} + +static void +free_border_component(struct border_component *border_component) +{ + struct surface_output *surface_output, *surface_output_tmp; + + if (border_component->server.wl_surface) { + wl_subsurface_destroy(border_component->server.wl_subsurface); + border_component->server.wl_subsurface = NULL; + wl_surface_destroy(border_component->server.wl_surface); + border_component->server.wl_surface = NULL; + } + if (border_component->server.buffer) { + buffer_free(border_component->server.buffer); + border_component->server.buffer = NULL; + } + if (border_component->client.image) { + cairo_surface_destroy(border_component->client.image); + border_component->client.image = NULL; + } + if (border_component->server.output_list.next != NULL) { + wl_list_for_each_safe(surface_output, surface_output_tmp, + &border_component->server.output_list, link) { + wl_list_remove(&surface_output->link); + free(surface_output); + } + } +} + +static void +libdecor_plugin_cairo_frame_free(struct libdecor_plugin *plugin, + struct libdecor_frame *frame) +{ + struct libdecor_plugin_cairo *plugin_cairo = + (struct libdecor_plugin_cairo *) plugin; + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + struct seat *seat; + + wl_list_for_each(seat, &plugin_cairo->seat_list, link) { + if (seat->pointer_focus != NULL && + wl_surface_get_user_data(seat->pointer_focus) == frame_cairo) + seat->pointer_focus = NULL; + } + + free_border_component(&frame_cairo->title_bar.title); + free_border_component(&frame_cairo->title_bar.min); + free_border_component(&frame_cairo->title_bar.max); + free_border_component(&frame_cairo->title_bar.close); + frame_cairo->title_bar.is_showing = false; + free_border_component(&frame_cairo->shadow); + frame_cairo->shadow_showing = false; + if (frame_cairo->shadow_blur != NULL) { + cairo_surface_destroy(frame_cairo->shadow_blur); + frame_cairo->shadow_blur = NULL; + } + + free(frame_cairo->title); + frame_cairo->title = NULL; + + frame_cairo->decoration_type = DECORATION_TYPE_NONE; + + if (frame_cairo->link.next != NULL) + wl_list_remove(&frame_cairo->link); +} + +static bool +is_border_surfaces_showing(struct libdecor_frame_cairo *frame_cairo) +{ + return frame_cairo->shadow_showing; +} + +static bool +is_title_bar_surfaces_showing(struct libdecor_frame_cairo *frame_cairo) +{ + return frame_cairo->title_bar.is_showing; +} + +static struct border_component * +get_server_component(struct border_component *border_component) +{ + switch (border_component->composite_mode) { + case COMPOSITE_SERVER: + return border_component; + case COMPOSITE_CLIENT: + return get_server_component(border_component->client.parent_component); + } + return NULL; +} + +static void +redraw_border_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component) +{ + struct border_component *server_component; + + server_component = get_server_component(border_component); + draw_border_component(frame_cairo, server_component); +} + +static void +hide_border_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component) +{ + border_component->is_hidden = true; + + switch (border_component->composite_mode) { + case COMPOSITE_SERVER: + if (!border_component->server.wl_surface) + return; + + wl_surface_attach(border_component->server.wl_surface, + NULL, 0, 0); + wl_surface_commit(border_component->server.wl_surface); + break; + case COMPOSITE_CLIENT: + redraw_border_component(frame_cairo, border_component); + break; + } +} + +static void +hide_border_surfaces(struct libdecor_frame_cairo *frame_cairo) +{ + hide_border_component(frame_cairo, &frame_cairo->shadow); + frame_cairo->shadow_showing = false; +} + +static void +hide_title_bar_surfaces(struct libdecor_frame_cairo *frame_cairo) +{ + hide_border_component(frame_cairo, &frame_cairo->title_bar.title); + hide_border_component(frame_cairo, &frame_cairo->title_bar.min); + hide_border_component(frame_cairo, &frame_cairo->title_bar.max); + hide_border_component(frame_cairo, &frame_cairo->title_bar.close); + frame_cairo->title_bar.is_showing = false; +} + +static struct border_component * +get_component_for_surface(struct libdecor_frame_cairo *frame_cairo, + struct wl_surface *surface) +{ + if (frame_cairo->shadow.server.wl_surface == surface) + return &frame_cairo->shadow; + if (frame_cairo->title_bar.title.server.wl_surface == surface) + return &frame_cairo->title_bar.title; + return NULL; +} + +static void +calculate_component_size(struct libdecor_frame_cairo *frame_cairo, + enum component component, + int *component_x, + int *component_y, + int *component_width, + int *component_height); + +static void +update_component_focus(struct libdecor_frame_cairo *frame_cairo, + struct wl_surface *surface, + struct seat *seat) +{ + static struct border_component *border_component; + static struct border_component *child_component; + static struct border_component *focus_component; + + border_component = get_component_for_surface(frame_cairo, surface); + + focus_component = border_component; + wl_list_for_each(child_component, &border_component->child_components, link) { + int component_x = 0, component_y = 0; + int component_width = 0, component_height = 0; + + calculate_component_size(frame_cairo, child_component->type, + &component_x, &component_y, + &component_width, &component_height); + if (seat->pointer_x >= component_x && + seat->pointer_x < component_x + component_width && + seat->pointer_y >= component_y && + seat->pointer_y < component_y + component_height) { + focus_component = child_component; + break; + } + } + + if (frame_cairo->grab) + frame_cairo->active = frame_cairo->grab; + else + frame_cairo->active = focus_component; + frame_cairo->focus = focus_component; + +} + +static void +ensure_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *cmpnt); + +static bool +redraw_scale(struct libdecor_frame_cairo *frame_cairo, + struct border_component *cmpnt) +{ + struct surface_output *surface_output; + int scale = 1; + + if (cmpnt->is_hidden) + return false; + + ensure_component(frame_cairo, cmpnt); + + wl_list_for_each(surface_output, &cmpnt->server.output_list, link) { + scale = MAX(scale, surface_output->output->scale); + } + if (scale != cmpnt->server.scale) { + cmpnt->server.scale = scale; + if ((cmpnt->type != SHADOW) || is_border_surfaces_showing(frame_cairo)) { + draw_border_component(frame_cairo, cmpnt); + return true; + } + } + return false; +} + +static bool +add_surface_output(struct libdecor_plugin_cairo *plugin_cairo, + struct wl_output *wl_output, + struct wl_list *list) +{ + struct output *output; + struct surface_output *surface_output; + + if (!own_output(wl_output)) + return false; + + output = wl_output_get_user_data(wl_output); + + if (output == NULL) + return false; + + surface_output = zalloc(sizeof *surface_output); + surface_output->output = output; + wl_list_insert(list, &surface_output->link); + return true; +} + +static void +surface_enter(void *data, + struct wl_surface *wl_surface, + struct wl_output *wl_output) +{ + struct libdecor_frame_cairo *frame_cairo = data; + struct border_component *cmpnt; + + if (!(own_surface(wl_surface) && own_output(wl_output))) + return; + + cmpnt = get_component_for_surface(frame_cairo, wl_surface); + if (cmpnt == NULL) + return; + + if (!add_surface_output(frame_cairo->plugin_cairo, wl_output, + &cmpnt->server.output_list)) + return; + + if (redraw_scale(frame_cairo, cmpnt)) + libdecor_frame_toplevel_commit(&frame_cairo->frame); +} + +static bool +remove_surface_output(struct wl_list *list, struct wl_output *wl_output) +{ + struct surface_output *surface_output; + wl_list_for_each(surface_output, list, link) { + if (surface_output->output->wl_output == wl_output) { + wl_list_remove(&surface_output->link); + free(surface_output); + return true; + } + } + return false; +} + +static void +surface_leave(void *data, + struct wl_surface *wl_surface, + struct wl_output *wl_output) +{ + struct libdecor_frame_cairo *frame_cairo = data; + struct border_component *cmpnt; + + if (!(own_surface(wl_surface) && own_output(wl_output))) + return; + + cmpnt = get_component_for_surface(frame_cairo, wl_surface); + if (cmpnt == NULL) + return; + + if (!remove_surface_output(&cmpnt->server.output_list, wl_output)) + return; + + if (redraw_scale(frame_cairo, cmpnt)) + libdecor_frame_toplevel_commit(&frame_cairo->frame); +} + +static struct wl_surface_listener surface_listener = { + surface_enter, + surface_leave, +}; + +static void +create_surface_subsurface_pair(struct libdecor_frame_cairo *frame_cairo, + struct wl_surface **out_wl_surface, + struct wl_subsurface **out_wl_subsurface) +{ + struct libdecor_plugin_cairo *plugin_cairo = frame_cairo->plugin_cairo; + struct libdecor_frame *frame = &frame_cairo->frame; + struct wl_compositor *wl_compositor = plugin_cairo->wl_compositor; + struct wl_subcompositor *wl_subcompositor = plugin_cairo->wl_subcompositor; + struct wl_surface *wl_surface; + struct wl_surface *parent; + struct wl_subsurface *wl_subsurface; + + wl_surface = wl_compositor_create_surface(wl_compositor); + wl_proxy_set_tag((struct wl_proxy *) wl_surface, + &libdecor_cairo_proxy_tag); + + parent = libdecor_frame_get_wl_surface(frame); + wl_subsurface = wl_subcompositor_get_subsurface(wl_subcompositor, + wl_surface, + parent); + + *out_wl_surface = wl_surface; + *out_wl_subsurface = wl_subsurface; +} + +static void +ensure_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *cmpnt) +{ + switch (cmpnt->composite_mode) { + case COMPOSITE_SERVER: + if (!cmpnt->server.wl_surface) { + wl_list_init(&cmpnt->server.output_list); + cmpnt->server.scale = 1; + create_surface_subsurface_pair(frame_cairo, + &cmpnt->server.wl_surface, + &cmpnt->server.wl_subsurface); + wl_surface_add_listener(cmpnt->server.wl_surface, + &surface_listener, + frame_cairo); + } + break; + case COMPOSITE_CLIENT: + wl_list_init(&cmpnt->server.output_list); + break; + } + + cmpnt->is_hidden = false; +} + +static void +ensure_border_surfaces(struct libdecor_frame_cairo *frame_cairo) +{ + int min_width, min_height; + + frame_cairo->shadow.opaque = false; + ensure_component(frame_cairo, &frame_cairo->shadow); + +#if ! APPLY_FLTK_CHANGES + libdecor_frame_get_min_content_size(&frame_cairo->frame, + &min_width, &min_height); + libdecor_frame_set_min_content_size(&frame_cairo->frame, + MAX(min_width, (int)MAX(56, 4 * BUTTON_WIDTH)), + MAX(min_height, (int)MAX(56, TITLE_HEIGHT + 1))); +#endif +} + +static void +ensure_title_bar_surfaces(struct libdecor_frame_cairo *frame_cairo) +{ + frame_cairo->title_bar.title.opaque = true; + ensure_component(frame_cairo, &frame_cairo->title_bar.title); + + frame_cairo->title_bar.min.opaque = true; + ensure_component(frame_cairo, &frame_cairo->title_bar.min); + + frame_cairo->title_bar.max.opaque = true; + ensure_component(frame_cairo, &frame_cairo->title_bar.max); + + frame_cairo->title_bar.close.opaque = true; + ensure_component(frame_cairo, &frame_cairo->title_bar.close); +} + +static void +calculate_component_size(struct libdecor_frame_cairo *frame_cairo, + enum component component, + int *component_x, + int *component_y, + int *component_width, + int *component_height) +{ + struct libdecor_frame *frame = &frame_cairo->frame; + int content_width, content_height; + + content_width = libdecor_frame_get_content_width(frame); + content_height = libdecor_frame_get_content_height(frame); + + switch (component) { + case NONE: + *component_width = 0; + *component_height = 0; + return; + case SHADOW: + *component_x = -(int)SHADOW_MARGIN; + *component_y = -(int)(SHADOW_MARGIN+TITLE_HEIGHT); + *component_width = content_width + 2 * SHADOW_MARGIN; + *component_height = content_height + + 2 * SHADOW_MARGIN + + TITLE_HEIGHT; + return; + case TITLE: + *component_x = 0; + *component_y = -(int)TITLE_HEIGHT; + *component_width = content_width; + *component_height = TITLE_HEIGHT; + return; + case BUTTON_MIN: + *component_x = content_width - 3 * BUTTON_WIDTH; + *component_y = 0; + *component_width = BUTTON_WIDTH; + *component_height = TITLE_HEIGHT; + return; + case BUTTON_MAX: + *component_x = content_width - 2 * BUTTON_WIDTH; + *component_y = 0; + *component_width = BUTTON_WIDTH; + *component_height = TITLE_HEIGHT; + return; + case BUTTON_CLOSE: + *component_x = content_width - BUTTON_WIDTH; + *component_y = 0; + *component_width = BUTTON_WIDTH; + *component_height = TITLE_HEIGHT; + return; + } + + abort(); +} + +static int +border_component_get_scale(struct border_component *border_component) +{ + switch (border_component->composite_mode) { + case COMPOSITE_SERVER: + return border_component->server.scale; + case COMPOSITE_CLIENT: + return border_component_get_scale( + border_component->client.parent_component); + } + return 0; +} + +static void +draw_title_text(struct libdecor_frame_cairo *frame_cairo, + cairo_t *cr, + const int *title_width, + bool active) +{ + const uint32_t col_title = active ? COL_TITLE : COL_TITLE_INACT; + const uint32_t col_title_text = active ? COL_SYM : COL_SYM_INACT; + + PangoLayout *layout; + + /* title fade out at buttons */ + const int fade_width = 5 * BUTTON_WIDTH; + int fade_start; + cairo_pattern_t *fade; + + /* text position and dimensions */ + int text_extents_width, text_extents_height; + double text_x, text_y; + double text_width, text_height; + + const char *title; + + title = libdecor_frame_get_title((struct libdecor_frame*) frame_cairo); + if (!title) + return; + + layout = pango_cairo_create_layout(cr); + + pango_layout_set_text(layout, + title, + -1); + pango_layout_set_font_description(layout, frame_cairo->plugin_cairo->font); + pango_layout_get_size(layout, &text_extents_width, &text_extents_height); + + /* set text position and dimensions */ + text_width = text_extents_width / PANGO_SCALE; + text_height = text_extents_height / PANGO_SCALE; + text_x = *title_width / 2.0 - text_width / 2.0; + text_x += MIN(0.0, ((*title_width - fade_width) - (text_x + text_width))); + text_x = MAX(text_x, BUTTON_WIDTH); + text_y = TITLE_HEIGHT / 2.0 - text_height / 2.0; + + /* draw title text */ + cairo_move_to(cr, text_x, text_y); + cairo_set_rgba32(cr, &col_title_text); + pango_cairo_show_layout(cr, layout); + + /* draw fade-out from title text to buttons */ + fade_start = *title_width - fade_width; + fade = cairo_pattern_create_linear(fade_start, 0, + fade_start + 2 * BUTTON_WIDTH, 0); + cairo_pattern_add_color_stop_rgba(fade, 0, + red(&col_title), + green(&col_title), + blue(&col_title), + 0); + cairo_pattern_add_color_stop_rgb(fade, 1, + red(&col_title), + green(&col_title), + blue(&col_title)); + cairo_rectangle(cr, fade_start, 0, fade_width, TITLE_HEIGHT); + cairo_set_source(cr, fade); + cairo_fill(cr); + + cairo_pattern_destroy(fade); + g_object_unref(layout); +} + +static void +draw_component_content(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component, + int component_width, + int component_height, + enum component component) +{ + struct buffer *buffer; + cairo_surface_t *surface = NULL; + int width = 0, height = 0; + int scale; + cairo_t *cr; + + /* button symbol origin */ + const double x = BUTTON_WIDTH / 2 - SYM_DIM / 2 + 0.5; + const double y = TITLE_HEIGHT / 2 - SYM_DIM / 2 + 0.5; + + enum libdecor_window_state state; + + bool active; + + uint32_t col_title; + + bool cap_min, cap_max, cap_close; + + /* capabilities of decorations */ + cap_min = minimizable(frame_cairo); + cap_max = resizable(frame_cairo); + cap_close = closeable(frame_cairo); + + scale = border_component_get_scale(border_component); + + state = libdecor_frame_get_window_state((struct libdecor_frame *) frame_cairo); + + active = state & LIBDECOR_WINDOW_STATE_ACTIVE; + + col_title = active ? COL_TITLE : COL_TITLE_INACT; + + /* clear buffer */ + switch (border_component->composite_mode) { + case COMPOSITE_SERVER: + buffer = border_component->server.buffer; + + surface = cairo_image_surface_create_for_data( + buffer->data, CAIRO_FORMAT_ARGB32, + buffer->buffer_width, buffer->buffer_height, + cairo_format_stride_for_width( + CAIRO_FORMAT_ARGB32, + buffer->buffer_width) + ); + cairo_surface_set_device_scale(surface, scale, scale); + width = buffer->width; + height = buffer->height; + break; + case COMPOSITE_CLIENT: + surface = cairo_surface_reference(border_component->client.image); + width = cairo_image_surface_get_width(surface); + height = cairo_image_surface_get_height(surface); + break; + } + + cr = cairo_create(surface); + cairo_save(cr); + cairo_set_source_rgba(cr, 0.0, 0.0, 0.0, 0.0); + cairo_set_operator (cr, CAIRO_OPERATOR_SOURCE); + cairo_paint(cr); + cairo_restore(cr); + + /* background */ + switch (component) { + case NONE: + break; + case SHADOW: + if (frame_cairo->decoration_type != DECORATION_TYPE_TILED) + render_shadow(cr, + frame_cairo->shadow_blur, + -(int)SHADOW_MARGIN/2, + -(int)SHADOW_MARGIN/2, + width + SHADOW_MARGIN, + height + SHADOW_MARGIN, + 64, + 64); + break; + case TITLE: + cairo_set_rgba32(cr, &col_title); + cairo_paint(cr); + break; + case BUTTON_MIN: + if (cap_min && frame_cairo->active == &frame_cairo->title_bar.min) + cairo_set_rgba32(cr, active ? &COL_BUTTON_MIN : &COL_BUTTON_INACT); + else + cairo_set_rgba32(cr, &col_title); + cairo_paint(cr); + break; + case BUTTON_MAX: + if (cap_max && frame_cairo->active == &frame_cairo->title_bar.max) + cairo_set_rgba32(cr, active ? &COL_BUTTON_MAX : &COL_BUTTON_INACT); + else + cairo_set_rgba32(cr, &col_title); + cairo_paint(cr); + break; + case BUTTON_CLOSE: + if (cap_close && frame_cairo->active == &frame_cairo->title_bar.close) + cairo_set_rgba32(cr, active ? &COL_BUTTON_CLOSE : &COL_BUTTON_INACT); + else + cairo_set_rgba32(cr, &col_title); + cairo_paint(cr); + break; + } + + /* button symbols */ + /* https://www.cairographics.org/FAQ/#sharp_lines */ + cairo_set_line_width(cr, 1); + + switch (component) { + case TITLE: + draw_title_text(frame_cairo,cr, &component_width, active); + break; + case BUTTON_MIN: + if (!active) { + /* inactive: use single desaturated color */ + cairo_set_rgba32(cr, &COL_SYM_INACT); + } else { + if (!cap_min || + frame_cairo->active == &frame_cairo->title_bar.min) { + /* active (a.k.a. prelight) */ + cairo_set_rgba32(cr, &COL_SYM_ACT); + } else { + /* normal */ + cairo_set_rgba32(cr, &COL_SYM); + } + } + cairo_move_to(cr, x, y + SYM_DIM - 1); + cairo_rel_line_to(cr, SYM_DIM - 1, 0); + cairo_stroke(cr); + break; + case BUTTON_MAX: + if (!active) { + /* inactive: use single desaturated color */ + cairo_set_rgba32(cr, &COL_SYM_INACT); + } else { + if (!cap_max || + frame_cairo->active == &frame_cairo->title_bar.max) { + /* active (a.k.a. prelight) */ + cairo_set_rgba32(cr, &COL_SYM_ACT); + } else { + /* normal */ + cairo_set_rgba32(cr, &COL_SYM); + } + } + + if (state & LIBDECOR_WINDOW_STATE_MAXIMIZED) { + const size_t small = 12; + cairo_rectangle(cr, + x, + y + SYM_DIM - small, + small - 1, + small - 1); + cairo_move_to(cr, + x + SYM_DIM - small, + y + SYM_DIM - small); + cairo_line_to(cr, x + SYM_DIM - small, y); + cairo_rel_line_to(cr, small - 1, 0); + cairo_rel_line_to(cr, 0, small - 1); + cairo_line_to(cr, x + small - 1, y + small - 1); + } + else { + cairo_rectangle(cr, x, y, SYM_DIM - 1, SYM_DIM - 1); + } + cairo_stroke(cr); + break; + case BUTTON_CLOSE: + if (!active) { + /* inactive: use single desaturated color */ + cairo_set_rgba32(cr, &COL_SYM_INACT); + } else { + if (!cap_close || + frame_cairo->active == &frame_cairo->title_bar.close) { + /* active (a.k.a. prelight) */ + cairo_set_rgba32(cr, &COL_SYM_ACT); + } else { + /* normal */ + cairo_set_rgba32(cr, &COL_SYM); + } + } + cairo_move_to(cr, x, y); + cairo_rel_line_to(cr, SYM_DIM - 1, SYM_DIM - 1); + cairo_move_to(cr, x + SYM_DIM - 1, y); + cairo_line_to(cr, x, y + SYM_DIM - 1); + cairo_stroke(cr); + break; + default: + break; + } + + /* mask the toplevel surface */ + if (component == SHADOW) { + int component_x, component_y, component_width, component_height; + calculate_component_size(frame_cairo, component, + &component_x, &component_y, + &component_width, &component_height); + cairo_set_operator(cr, CAIRO_OPERATOR_CLEAR); + cairo_rectangle(cr, -component_x, -component_y, + libdecor_frame_get_content_width( + &frame_cairo->frame), + libdecor_frame_get_content_height( + &frame_cairo->frame)); + cairo_fill(cr); + } + + cairo_destroy(cr); + cairo_surface_destroy(surface); +} + +static void +set_component_input_region(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component) +{ + if (border_component->type == SHADOW && frame_cairo->shadow_showing) { + struct wl_region *input_region; + int component_x; + int component_y; + int component_width; + int component_height; + + calculate_component_size(frame_cairo, border_component->type, + &component_x, &component_y, + &component_width, &component_height); + + /* + * the input region is the outer surface size minus the inner + * content size + */ + input_region = wl_compositor_create_region( + frame_cairo->plugin_cairo->wl_compositor); + wl_region_add(input_region, 0, 0, + component_width, component_height); + wl_region_subtract(input_region, -component_x, -component_y, + libdecor_frame_get_content_width(&frame_cairo->frame), + libdecor_frame_get_content_height(&frame_cairo->frame)); + wl_surface_set_input_region(border_component->server.wl_surface, + input_region); + wl_region_destroy(input_region); + } +} + +static void +ensure_component_realized_server(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component, + int component_width, + int component_height, + int scale) +{ + struct buffer *old_buffer; + struct buffer *buffer = NULL; + + old_buffer = border_component->server.buffer; + if (old_buffer) { + if (!old_buffer->in_use && + old_buffer->buffer_width == component_width * scale && + old_buffer->buffer_height == component_height * scale) { + buffer = old_buffer; + } else { + buffer_free(old_buffer); + border_component->server.buffer = NULL; + } + } + + if (!buffer) + buffer = create_shm_buffer(frame_cairo->plugin_cairo, + component_width, + component_height, + border_component->opaque, + border_component->server.scale); + + border_component->server.buffer = buffer; +} + +static void +ensure_component_realized_client(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component, + int component_width, + int component_height, + int scale) +{ + cairo_surface_t *old_image; + + old_image = border_component->client.image; + if (old_image) { + int cairo_buffer_width; + int cairo_buffer_height; + double x_scale; + double y_scale; + + cairo_surface_get_device_scale(old_image, &x_scale, &y_scale); + cairo_buffer_width = + (int) round(cairo_image_surface_get_width(old_image) * + x_scale); + cairo_buffer_height = + (int) round(cairo_image_surface_get_height(old_image) * + y_scale); + + if (cairo_buffer_width != component_width * scale || + cairo_buffer_height != component_height * scale) { + cairo_surface_destroy(old_image); + border_component->client.image = NULL; + } + } + + if (!border_component->client.image) { + cairo_surface_t *new_image; + + new_image = + cairo_image_surface_create(CAIRO_FORMAT_ARGB32, + component_width * scale, + component_height * scale); + cairo_surface_set_device_scale(new_image, scale, scale); + border_component->client.image = new_image; + } + +} + +static void +ensure_component_realized(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component, + int component_width, + int component_height, + int scale) +{ + switch (border_component->composite_mode) { + case COMPOSITE_SERVER: + ensure_component_realized_server(frame_cairo, border_component, + component_width, + component_height, + scale); + break; + case COMPOSITE_CLIENT: + ensure_component_realized_client(frame_cairo, border_component, + component_width, + component_height, + scale); + break; + } +} + +static cairo_t * +create_cairo_for_parent(struct border_component *border_component) +{ + struct border_component *parent = + border_component->client.parent_component; + struct buffer *buffer; + struct border_component *server_component; + cairo_surface_t *parent_surface; + cairo_t *cr; + + switch (parent->composite_mode) { + case COMPOSITE_SERVER: + buffer = parent->server.buffer; + parent_surface = cairo_image_surface_create_for_data( + buffer->data, CAIRO_FORMAT_ARGB32, + buffer->buffer_width, buffer->buffer_height, + cairo_format_stride_for_width( + CAIRO_FORMAT_ARGB32, + buffer->buffer_width) + ); + cr = cairo_create(parent_surface); + cairo_surface_destroy(parent_surface); + cairo_scale(cr, buffer->scale, buffer->scale); + return cr; + case COMPOSITE_CLIENT: + cr = cairo_create(parent->client.image); + server_component = get_server_component(border_component); + cairo_scale(cr, + server_component->server.scale, + server_component->server.scale); + return cr; + } + return NULL; +} + +static void +draw_border_component(struct libdecor_frame_cairo *frame_cairo, + struct border_component *border_component) +{ + enum component component = border_component->type; + struct buffer *buffer; + cairo_t *cr; + int component_x; + int component_y; + int component_width; + int component_height; + int scale; + struct border_component *child_component; + + if (border_component->is_hidden) + return; + + calculate_component_size(frame_cairo, component, + &component_x, &component_y, + &component_width, &component_height); + + set_component_input_region(frame_cairo, border_component); + + scale = border_component_get_scale(border_component); + ensure_component_realized(frame_cairo, border_component, + component_width, + component_height, + scale); + + draw_component_content(frame_cairo, + border_component, + component_width, component_height, + component); + + switch(border_component->composite_mode) { + case COMPOSITE_SERVER: + buffer = border_component->server.buffer; + wl_surface_attach(border_component->server.wl_surface, + buffer->wl_buffer, + 0, 0); + wl_surface_set_buffer_scale(border_component->server.wl_surface, + buffer->scale); + buffer->in_use = true; + wl_surface_commit(border_component->server.wl_surface); + wl_surface_damage_buffer(border_component->server.wl_surface, 0, 0, + component_width * scale, + component_height * scale); + wl_subsurface_set_position(border_component->server.wl_subsurface, + component_x, component_y); + break; + case COMPOSITE_CLIENT: + cr = create_cairo_for_parent(border_component); + cairo_set_source_surface(cr, + border_component->client.image, + component_x, component_y); + cairo_paint(cr); + cairo_destroy(cr); + break; + } + + wl_list_for_each(child_component, &border_component->child_components, link) + draw_border_component(frame_cairo, child_component); +} + +static void +draw_border(struct libdecor_frame_cairo *frame_cairo) +{ + draw_border_component(frame_cairo, &frame_cairo->shadow); + frame_cairo->shadow_showing = true; +} + +static void +draw_title_bar(struct libdecor_frame_cairo *frame_cairo) +{ + draw_border_component(frame_cairo, &frame_cairo->title_bar.title); + frame_cairo->title_bar.is_showing = true; +} + +static void +draw_decoration(struct libdecor_frame_cairo *frame_cairo) +{ + switch (frame_cairo->decoration_type) { + case DECORATION_TYPE_NONE: + if (frame_cairo->link.next != NULL) + wl_list_remove(&frame_cairo->link); + if (is_border_surfaces_showing(frame_cairo)) + hide_border_surfaces(frame_cairo); + if (is_title_bar_surfaces_showing(frame_cairo)) + hide_title_bar_surfaces(frame_cairo); + break; + case DECORATION_TYPE_TILED: + case DECORATION_TYPE_ALL: + /* show borders */ + ensure_border_surfaces(frame_cairo); + draw_border(frame_cairo); + /* show title bar */ + ensure_title_bar_surfaces(frame_cairo); + draw_title_bar(frame_cairo); + /* link frame */ + if (frame_cairo->link.next == NULL) + wl_list_insert( + &frame_cairo->plugin_cairo->visible_frame_list, + &frame_cairo->link); + break; + case DECORATION_TYPE_MAXIMIZED: + /* hide borders */ + if (is_border_surfaces_showing(frame_cairo)) + hide_border_surfaces(frame_cairo); + /* show title bar */ + ensure_title_bar_surfaces(frame_cairo); + draw_title_bar(frame_cairo); + /* link frame */ + if (frame_cairo->link.next == NULL) + wl_list_insert( + &frame_cairo->plugin_cairo->visible_frame_list, + &frame_cairo->link); + break; + } +} + +static void +set_window_geometry(struct libdecor_frame_cairo *frame_cairo) +{ + struct libdecor_frame *frame = &frame_cairo->frame; + int x = 0, y = 0, width = 0, height = 0; + + switch (frame_cairo->decoration_type) { + case DECORATION_TYPE_NONE: + x = 0; + y = 0; + width = libdecor_frame_get_content_width(frame); + height = libdecor_frame_get_content_height(frame); + break; + case DECORATION_TYPE_ALL: + case DECORATION_TYPE_TILED: + case DECORATION_TYPE_MAXIMIZED: + x = 0; + y = -(int)TITLE_HEIGHT; + width = libdecor_frame_get_content_width(frame); + height = libdecor_frame_get_content_height(frame) + TITLE_HEIGHT; + break; + } + + libdecor_frame_set_window_geometry(frame, x, y, width, height); +} + +static enum decoration_type +window_state_to_decoration_type(enum libdecor_window_state window_state) +{ + if (window_state & LIBDECOR_WINDOW_STATE_FULLSCREEN) + return DECORATION_TYPE_NONE; + else if (window_state & LIBDECOR_WINDOW_STATE_MAXIMIZED) + /* title bar, no shadows */ + return DECORATION_TYPE_MAXIMIZED; + else if (window_state & LIBDECOR_WINDOW_STATE_TILED_LEFT || + window_state & LIBDECOR_WINDOW_STATE_TILED_RIGHT || + window_state & LIBDECOR_WINDOW_STATE_TILED_TOP || + window_state & LIBDECOR_WINDOW_STATE_TILED_BOTTOM) + /* title bar, invisible shadows */ + return DECORATION_TYPE_TILED; + else + /* title bar, shadows */ + return DECORATION_TYPE_ALL; +} + +static void +libdecor_plugin_cairo_frame_commit(struct libdecor_plugin *plugin, + struct libdecor_frame *frame, + struct libdecor_state *state, + struct libdecor_configuration *configuration) +{ + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + enum libdecor_window_state old_window_state; + enum libdecor_window_state new_window_state; + int old_content_width, old_content_height; + int new_content_width, new_content_height; + enum decoration_type old_decoration_type; + enum decoration_type new_decoration_type; + + old_window_state = frame_cairo->window_state; + new_window_state = libdecor_frame_get_window_state(frame); + + old_content_width = frame_cairo->content_width; + old_content_height = frame_cairo->content_height; + new_content_width = libdecor_frame_get_content_width(frame); + new_content_height = libdecor_frame_get_content_height(frame); + + old_decoration_type = frame_cairo->decoration_type; + new_decoration_type = window_state_to_decoration_type(new_window_state); + + if (old_decoration_type == new_decoration_type && + old_content_width == new_content_width && + old_content_height == new_content_height && + old_window_state == new_window_state) + return; + + frame_cairo->content_width = new_content_width; + frame_cairo->content_height = new_content_height; + frame_cairo->decoration_type = new_decoration_type; + frame_cairo->window_state = new_window_state; + + draw_decoration(frame_cairo); + set_window_geometry(frame_cairo); +} + +static void +libdecor_plugin_cairo_frame_property_changed(struct libdecor_plugin *plugin, + struct libdecor_frame *frame) +{ + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + bool redraw_needed = false; + const char *new_title; + + new_title = libdecor_frame_get_title(frame); + if (frame_cairo->title_bar.is_showing) { + if (!streql(frame_cairo->title, new_title)) + redraw_needed = true; + } + + if (frame_cairo->title) { + free(frame_cairo->title); + frame_cairo->title = NULL; + } + + if (new_title) { + frame_cairo->title = strdup(new_title); + } + + if (frame_cairo->capabilities != libdecor_frame_get_capabilities(frame)) { + frame_cairo->capabilities = libdecor_frame_get_capabilities(frame); + redraw_needed = true; + } + + if (redraw_needed) { + draw_decoration(frame_cairo); + libdecor_frame_toplevel_commit(frame); + } +} + +static void +libdecor_plugin_cairo_frame_translate_coordinate(struct libdecor_plugin *plugin, + struct libdecor_frame *frame, + int content_x, + int content_y, + int *frame_x, + int *frame_y) +{ + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + + *frame_x = content_x; + *frame_y = content_y; + + if (frame_cairo->title_bar.is_showing) + *frame_y += TITLE_HEIGHT; +} + +static bool +streq(const char *str1, + const char *str2) +{ + if (!str1 && !str2) + return true; + + if (str1 && str2) + return strcmp(str1, str2) == 0; + + return false; +} + +static void +libdecor_plugin_cairo_frame_popup_grab(struct libdecor_plugin *plugin, + struct libdecor_frame *frame, + const char *seat_name) +{ + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + struct libdecor_plugin_cairo *plugin_cairo = frame_cairo->plugin_cairo; + struct seat *seat; + + wl_list_for_each(seat, &plugin_cairo->seat_list, link) { + if (streq(seat->name, seat_name)) { + if (seat->grabbed) { + fprintf(stderr, "libdecor-WARNING: Application " + "tried to grab seat twice\n"); + } + synthesize_pointer_leave(seat); + seat->grabbed = true; + return; + } + } + + fprintf(stderr, + "libdecor-WARNING: Application tried to grab unknown seat\n"); +} + +static void +libdecor_plugin_cairo_frame_popup_ungrab(struct libdecor_plugin *plugin, + struct libdecor_frame *frame, + const char *seat_name) +{ + struct libdecor_frame_cairo *frame_cairo = + (struct libdecor_frame_cairo *) frame; + struct libdecor_plugin_cairo *plugin_cairo = frame_cairo->plugin_cairo; + struct seat *seat; + + wl_list_for_each(seat, &plugin_cairo->seat_list, link) { + if (streq(seat->name, seat_name)) { + if (!seat->grabbed) { + fprintf(stderr, "libdecor-WARNING: Application " + "tried to ungrab seat twice\n"); + } + seat->grabbed = false; + synthesize_pointer_enter(seat); + sync_active_component(frame_cairo, seat); + return; + } + } + + fprintf(stderr, + "libdecor-WARNING: Application tried to ungrab unknown seat\n"); +} + +static bool +libdecor_plugin_cairo_configuration_get_content_size( + struct libdecor_plugin *plugin, + struct libdecor_configuration *configuration, + struct libdecor_frame *frame, + int *content_width, + int *content_height) +{ + int win_width, win_height; + if (!libdecor_configuration_get_window_size(configuration, + &win_width, + &win_height)) + return false; + + enum libdecor_window_state state; + if (!libdecor_configuration_get_window_state(configuration, &state)) { + return false; + } + + switch (window_state_to_decoration_type(state)) { + case DECORATION_TYPE_NONE: + *content_width = win_width; + *content_height = win_height; + break; + case DECORATION_TYPE_ALL: + case DECORATION_TYPE_TILED: + case DECORATION_TYPE_MAXIMIZED: + *content_width = win_width; + *content_height = win_height - TITLE_HEIGHT; + break; + } + + return true; +} + +static bool +libdecor_plugin_cairo_frame_get_window_size_for( + struct libdecor_plugin *plugin, + struct libdecor_frame *frame, + struct libdecor_state *state, + int *window_width, + int *window_height) +{ + enum libdecor_window_state window_state = + libdecor_state_get_window_state(state); + + switch (window_state_to_decoration_type(window_state)) { + case DECORATION_TYPE_NONE: + *window_width = libdecor_state_get_content_width(state); + *window_height = libdecor_state_get_content_height(state); + break; + case DECORATION_TYPE_ALL: + case DECORATION_TYPE_TILED: + case DECORATION_TYPE_MAXIMIZED: + *window_width = libdecor_state_get_content_width(state); + *window_height = + libdecor_state_get_content_height(state) + TITLE_HEIGHT; + break; + } + + return true; +} + +static struct libdecor_plugin_interface cairo_plugin_iface = { + .destroy = libdecor_plugin_cairo_destroy, + .get_fd = libdecor_plugin_cairo_get_fd, + .dispatch = libdecor_plugin_cairo_dispatch, + + .frame_new = libdecor_plugin_cairo_frame_new, + .frame_free = libdecor_plugin_cairo_frame_free, + .frame_commit = libdecor_plugin_cairo_frame_commit, + .frame_property_changed = libdecor_plugin_cairo_frame_property_changed, + .frame_translate_coordinate = + libdecor_plugin_cairo_frame_translate_coordinate, + .frame_popup_grab = libdecor_plugin_cairo_frame_popup_grab, + .frame_popup_ungrab = libdecor_plugin_cairo_frame_popup_ungrab, + + .configuration_get_content_size = + libdecor_plugin_cairo_configuration_get_content_size, + .frame_get_window_size_for = + libdecor_plugin_cairo_frame_get_window_size_for, +}; + +static void +init_wl_compositor(struct libdecor_plugin_cairo *plugin_cairo, + uint32_t id, + uint32_t version) +{ + plugin_cairo->wl_compositor = + wl_registry_bind(plugin_cairo->wl_registry, + id, &wl_compositor_interface, + MIN(version, 4)); +} + +static void +init_wl_subcompositor(struct libdecor_plugin_cairo *plugin_cairo, + uint32_t id, + uint32_t version) +{ + plugin_cairo->wl_subcompositor = + wl_registry_bind(plugin_cairo->wl_registry, + id, &wl_subcompositor_interface, 1); +} + +static void +shm_format(void *user_data, + struct wl_shm *wl_shm, + uint32_t format) +{ + struct libdecor_plugin_cairo *plugin_cairo = user_data; + + if (format == WL_SHM_FORMAT_ARGB8888) + plugin_cairo->has_argb = true; +} + +struct wl_shm_listener shm_listener = { + shm_format +}; + +static void +shm_callback(void *user_data, + struct wl_callback *callback, + uint32_t time) +{ + struct libdecor_plugin_cairo *plugin_cairo = user_data; + struct libdecor *context = plugin_cairo->context; + + wl_callback_destroy(callback); + plugin_cairo->globals_callback_shm = NULL; + + if (!plugin_cairo->has_argb) { + libdecor_notify_plugin_error( + context, + LIBDECOR_ERROR_COMPOSITOR_INCOMPATIBLE, + "Compositor is missing required shm format"); + return; + } + + libdecor_notify_plugin_ready(context); +} + +static const struct wl_callback_listener shm_callback_listener = { + shm_callback +}; + +static void +init_wl_shm(struct libdecor_plugin_cairo *plugin_cairo, + uint32_t id, + uint32_t version) +{ + struct libdecor *context = plugin_cairo->context; + struct wl_display *wl_display = libdecor_get_wl_display(context); + + plugin_cairo->wl_shm = + wl_registry_bind(plugin_cairo->wl_registry, + id, &wl_shm_interface, 1); + wl_shm_add_listener(plugin_cairo->wl_shm, &shm_listener, plugin_cairo); + + plugin_cairo->globals_callback_shm = wl_display_sync(wl_display); + wl_callback_add_listener(plugin_cairo->globals_callback_shm, + &shm_callback_listener, + plugin_cairo); +} + +static void +cursor_surface_enter(void *data, + struct wl_surface *wl_surface, + struct wl_output *wl_output) +{ + struct seat *seat = data; + + if(own_output(wl_output)) { + struct cursor_output *cursor_output; + cursor_output = zalloc(sizeof *cursor_output); + cursor_output->output = wl_output_get_user_data(wl_output); + wl_list_insert(&seat->cursor_outputs, &cursor_output->link); + if (update_local_cursor(seat)) + send_cursor(seat); + } +} + +static void +cursor_surface_leave(void *data, + struct wl_surface *wl_surface, + struct wl_output *wl_output) +{ + struct seat *seat = data; + + if(own_output(wl_output)) { + struct cursor_output *cursor_output, *tmp; + wl_list_for_each_safe(cursor_output, tmp, &seat->cursor_outputs, link) { + if (cursor_output->output->wl_output == wl_output) { + wl_list_remove(&cursor_output->link); + free(cursor_output); + } + } + + if (update_local_cursor(seat)) + send_cursor(seat); + } +} + +static struct wl_surface_listener cursor_surface_listener = { + cursor_surface_enter, + cursor_surface_leave, +}; + +static void +ensure_cursor_surface(struct seat *seat) +{ + struct wl_compositor *wl_compositor = seat->plugin_cairo->wl_compositor; + + if (seat->cursor_surface) + return; + + seat->cursor_surface = wl_compositor_create_surface(wl_compositor); + wl_surface_add_listener(seat->cursor_surface, + &cursor_surface_listener, seat); +} + +static bool +ensure_cursor_theme(struct seat *seat) +{ + struct libdecor_plugin_cairo *plugin_cairo = seat->plugin_cairo; + int scale = 1; + struct wl_cursor_theme *theme; + struct cursor_output *cursor_output; + + wl_list_for_each(cursor_output, &seat->cursor_outputs, link) { + scale = MAX(scale, cursor_output->output->scale); + } + + if (seat->cursor_theme && seat->cursor_scale == scale) + return false; + + seat->cursor_scale = scale; + theme = wl_cursor_theme_load(plugin_cairo->cursor_theme_name, + plugin_cairo->cursor_size * scale, + plugin_cairo->wl_shm); + if (theme == NULL) + return false; + + if (seat->cursor_theme) + wl_cursor_theme_destroy(seat->cursor_theme); + + seat->cursor_theme = theme; + + for (unsigned int i = 0; i < ARRAY_LENGTH(cursor_names); i++) { + seat->cursors[i] = wl_cursor_theme_get_cursor( + seat->cursor_theme, + cursor_names[i]); + } + + seat->cursor_left_ptr = wl_cursor_theme_get_cursor(seat->cursor_theme, + "left_ptr"); + seat->current_cursor = seat->cursor_left_ptr; + + return true; +} + +enum libdecor_resize_edge +component_edge(const struct border_component *cmpnt, + const int pointer_x, + const int pointer_y, + const int margin) +{ + const bool top = pointer_y < margin; + const bool bottom = pointer_y > (cmpnt->server.buffer->height - margin); + const bool left = pointer_x < margin; + const bool right = pointer_x > (cmpnt->server.buffer->width - margin); + + if (top) + if (left) + return LIBDECOR_RESIZE_EDGE_TOP_LEFT; + else if (right) + return LIBDECOR_RESIZE_EDGE_TOP_RIGHT; + else + return LIBDECOR_RESIZE_EDGE_TOP; + else if (bottom) + if (left) + return LIBDECOR_RESIZE_EDGE_BOTTOM_LEFT; + else if (right) + return LIBDECOR_RESIZE_EDGE_BOTTOM_RIGHT; + else + return LIBDECOR_RESIZE_EDGE_BOTTOM; + else if (left) + return LIBDECOR_RESIZE_EDGE_LEFT; + else if (right) + return LIBDECOR_RESIZE_EDGE_RIGHT; + else + return LIBDECOR_RESIZE_EDGE_NONE; +} + +static bool +update_local_cursor(struct seat *seat) +{ + if (!seat->pointer_focus) { + seat->current_cursor = seat->cursor_left_ptr; + return false; + } + + if (!own_surface(seat->pointer_focus)) + return false; + + struct libdecor_frame_cairo *frame_cairo = + wl_surface_get_user_data(seat->pointer_focus); + struct wl_cursor *wl_cursor = NULL; + + if (!frame_cairo || !frame_cairo->active) { + seat->current_cursor = seat->cursor_left_ptr; + return false; + } + + bool theme_updated = ensure_cursor_theme(seat); + + if (frame_cairo->active->type == SHADOW && + is_border_surfaces_showing(frame_cairo) && + resizable(frame_cairo)) { + enum libdecor_resize_edge edge; + edge = component_edge(frame_cairo->active, + seat->pointer_x, + seat->pointer_y, SHADOW_MARGIN); + + if (edge != LIBDECOR_RESIZE_EDGE_NONE) + wl_cursor = seat->cursors[edge - 1]; + } else { + wl_cursor = seat->cursor_left_ptr; + } + + if (seat->current_cursor != wl_cursor) { + seat->current_cursor = wl_cursor; + return true; + } + + return theme_updated; +} + +static void +send_cursor(struct seat *seat) +{ + struct wl_cursor_image *image; + struct wl_buffer *buffer; + + if (seat->pointer_focus == NULL || seat->current_cursor == NULL) + return; + + image = seat->current_cursor->images[0]; + buffer = wl_cursor_image_get_buffer(image); + wl_surface_attach(seat->cursor_surface, buffer, 0, 0); + wl_surface_set_buffer_scale(seat->cursor_surface, seat->cursor_scale); + wl_surface_damage_buffer(seat->cursor_surface, 0, 0, + image->width * seat->cursor_scale, + image->height * seat->cursor_scale); + wl_surface_commit(seat->cursor_surface); + wl_pointer_set_cursor(seat->wl_pointer, seat->serial, + seat->cursor_surface, + image->hotspot_x / seat->cursor_scale, + image->hotspot_y / seat->cursor_scale); +} + +static void +sync_active_component(struct libdecor_frame_cairo *frame_cairo, + struct seat *seat) +{ + struct border_component *old_active; + + if (!seat->pointer_focus) + return; + + old_active = frame_cairo->active; + update_component_focus(frame_cairo, seat->pointer_focus, seat); + if (old_active != frame_cairo->active) { + draw_decoration(frame_cairo); + libdecor_frame_toplevel_commit(&frame_cairo->frame); + } + + if (update_local_cursor(seat)) + send_cursor(seat); +} + +static void +synthesize_pointer_enter(struct seat *seat) +{ + struct wl_surface *surface; + struct libdecor_frame_cairo *frame_cairo; + + surface = seat->pointer_focus; + if (!surface) + return; + + frame_cairo = wl_surface_get_user_data(surface); + if (!frame_cairo) + return; + + update_component_focus(frame_cairo, seat->pointer_focus, seat); + frame_cairo->grab = NULL; + + /* update decorations */ + if (frame_cairo->active) { + draw_decoration(frame_cairo); + libdecor_frame_toplevel_commit(&frame_cairo->frame); + } + + update_local_cursor(seat); + send_cursor(seat); +} + +static void +synthesize_pointer_leave(struct seat *seat) +{ + struct wl_surface *surface; + struct libdecor_frame_cairo *frame_cairo; + + surface = seat->pointer_focus; + if (!surface) + return; + + frame_cairo = wl_surface_get_user_data(surface); + if (!frame_cairo) + return; + + if (!frame_cairo->active) + return; + + frame_cairo->active = NULL; + draw_decoration(frame_cairo); + libdecor_frame_toplevel_commit(&frame_cairo->frame); + update_local_cursor(seat); +} + +static void +pointer_enter(void *data, + struct wl_pointer *wl_pointer, + uint32_t serial, + struct wl_surface *surface, + wl_fixed_t surface_x, + wl_fixed_t surface_y) +{ + struct seat *seat = data; + + if (!surface) + return; + + if (!own_surface(surface)) + return; + + ensure_cursor_surface(seat); + + seat->pointer_x = wl_fixed_to_int(surface_x); + seat->pointer_y = wl_fixed_to_int(surface_y); + seat->serial = serial; + seat->pointer_focus = surface; + + if (seat->grabbed) + return; + + synthesize_pointer_enter(seat); +} + +static void +pointer_leave(void *data, + struct wl_pointer *wl_pointer, + uint32_t serial, + struct wl_surface *surface) +{ + struct seat *seat = data; + + if (!surface) + return; + + if (!own_surface(surface)) + return; + + synthesize_pointer_leave(seat); + seat->pointer_focus = NULL; +} + +static void +pointer_motion(void *data, + struct wl_pointer *wl_pointer, + uint32_t time, + wl_fixed_t surface_x, + wl_fixed_t surface_y) +{ + struct seat *seat = data; + struct libdecor_frame_cairo *frame_cairo; + + seat->pointer_x = wl_fixed_to_int(surface_x); + seat->pointer_y = wl_fixed_to_int(surface_y); + + if (seat->grabbed) + return; + + if (!seat->pointer_focus) + return; + + frame_cairo = wl_surface_get_user_data(seat->pointer_focus); + + sync_active_component(frame_cairo, seat); +} + +static void +pointer_button(void *data, + struct wl_pointer *wl_pointer, + uint32_t serial, + uint32_t time, + uint32_t button, + uint32_t state) +{ + struct seat *seat = data; + struct libdecor_frame_cairo *frame_cairo; + + if (!seat->pointer_focus || !own_surface(seat->pointer_focus)) + return; + + frame_cairo = wl_surface_get_user_data(seat->pointer_focus); + if (!frame_cairo) + return; + + if (seat->grabbed) { + libdecor_frame_dismiss_popup(&frame_cairo->frame, seat->name); + return; + } + + if (!frame_cairo->active) + return; + + if (button == BTN_LEFT) { + if (state == WL_POINTER_BUTTON_STATE_PRESSED) { + enum libdecor_resize_edge edge = + LIBDECOR_RESIZE_EDGE_NONE; + + frame_cairo->grab = NULL; + + switch (frame_cairo->active->type) { + case SHADOW: + edge = component_edge(frame_cairo->active, + seat->pointer_x, + seat->pointer_y, + SHADOW_MARGIN); + break; + case TITLE: + if (time-seat->pointer_button_time_stamp < + DOUBLE_CLICK_TIME_MS) { + toggle_maximized(&frame_cairo->frame); + } + else if (moveable(frame_cairo)) { + seat->pointer_button_time_stamp = time; + libdecor_frame_move(&frame_cairo->frame, + seat->wl_seat, + serial); + } + break; + case BUTTON_MIN: + case BUTTON_MAX: + case BUTTON_CLOSE: + frame_cairo->grab = frame_cairo->active; + break; + default: + break; + } + + if (edge != LIBDECOR_RESIZE_EDGE_NONE && + resizable(frame_cairo)) { + libdecor_frame_resize( + &frame_cairo->frame, + seat->wl_seat, + serial, + edge); + } + } + else if (state == WL_POINTER_BUTTON_STATE_RELEASED && + frame_cairo->grab) { + if (frame_cairo->grab == frame_cairo->focus) { + switch (frame_cairo->active->type) { + case BUTTON_MIN: + if (minimizable(frame_cairo)) + libdecor_frame_set_minimized( + &frame_cairo->frame); + break; + case BUTTON_MAX: + toggle_maximized(&frame_cairo->frame); + break; + case BUTTON_CLOSE: + if (closeable(frame_cairo)) + libdecor_frame_close(&frame_cairo->frame); + break; + default: + break; + } + } + frame_cairo->grab = NULL; + sync_active_component(frame_cairo, seat); + } + } + else if (button == BTN_RIGHT && + state == WL_POINTER_BUTTON_STATE_PRESSED && + seat->pointer_focus == frame_cairo->title_bar.title.server.wl_surface) { + libdecor_frame_show_window_menu(&frame_cairo->frame, + seat->wl_seat, + serial, + seat->pointer_x, + seat->pointer_y - TITLE_HEIGHT); + } +} + +static void +pointer_axis(void *data, + struct wl_pointer *wl_pointer, + uint32_t time, + uint32_t axis, + wl_fixed_t value) +{ +} + +static struct wl_pointer_listener pointer_listener = { + pointer_enter, + pointer_leave, + pointer_motion, + pointer_button, + pointer_axis +}; + +static void +seat_capabilities(void *data, + struct wl_seat *wl_seat, + uint32_t capabilities) +{ + struct seat *seat = data; + + if ((capabilities & WL_SEAT_CAPABILITY_POINTER) && + !seat->wl_pointer) { + seat->wl_pointer = wl_seat_get_pointer(wl_seat); + wl_pointer_add_listener(seat->wl_pointer, + &pointer_listener, seat); + } else if (!(capabilities & WL_SEAT_CAPABILITY_POINTER) && + seat->wl_pointer) { + wl_pointer_release(seat->wl_pointer); + seat->wl_pointer = NULL; + } +} + +static void +seat_name(void *data, + struct wl_seat *wl_seat, + const char *name) +{ + struct seat *seat = data; + + seat->name = strdup(name); +} + +static struct wl_seat_listener seat_listener = { + seat_capabilities, + seat_name +}; + +static void +init_wl_seat(struct libdecor_plugin_cairo *plugin_cairo, + uint32_t id, + uint32_t version) +{ + struct seat *seat; + + if (version < 3) { + libdecor_notify_plugin_error( + plugin_cairo->context, + LIBDECOR_ERROR_COMPOSITOR_INCOMPATIBLE, + "%s version 3 required but only version %i is available\n", + wl_seat_interface.name, version); + } + + seat = zalloc(sizeof *seat); + seat->cursor_scale = 1; + seat->plugin_cairo = plugin_cairo; + wl_list_init(&seat->cursor_outputs); + wl_list_insert(&plugin_cairo->seat_list, &seat->link); + seat->wl_seat = + wl_registry_bind(plugin_cairo->wl_registry, + id, &wl_seat_interface, 3); + wl_seat_add_listener(seat->wl_seat, &seat_listener, seat); +} + +static void +output_geometry(void *data, + struct wl_output *wl_output, + int32_t x, + int32_t y, + int32_t physical_width, + int32_t physical_height, + int32_t subpixel, + const char *make, + const char *model, + int32_t transform) +{ +} + +static void +output_mode(void *data, + struct wl_output *wl_output, + uint32_t flags, + int32_t width, + int32_t height, + int32_t refresh) +{ +} + +static void +output_done(void *data, + struct wl_output *wl_output) +{ + struct output *output = data; + struct libdecor_frame_cairo *frame_cairo; + struct seat *seat; + + wl_list_for_each(frame_cairo, + &output->plugin_cairo->visible_frame_list, link) { + bool updated = false; + updated |= redraw_scale(frame_cairo, &frame_cairo->shadow); + updated |= redraw_scale(frame_cairo, &frame_cairo->title_bar.title); + if (updated) + libdecor_frame_toplevel_commit(&frame_cairo->frame); + } + wl_list_for_each(seat, &output->plugin_cairo->seat_list, link) { + if (update_local_cursor(seat)) + send_cursor(seat); + } +} + +static void +output_scale(void *data, + struct wl_output *wl_output, + int32_t factor) +{ + struct output *output = data; + + output->scale = factor; +} + +static struct wl_output_listener output_listener = { + output_geometry, + output_mode, + output_done, + output_scale +}; + +static void +init_wl_output(struct libdecor_plugin_cairo *plugin_cairo, + uint32_t id, + uint32_t version) +{ + struct output *output; + + if (version < 2) { + libdecor_notify_plugin_error( + plugin_cairo->context, + LIBDECOR_ERROR_COMPOSITOR_INCOMPATIBLE, + "%s version 2 required but only version %i is available\n", + wl_output_interface.name, version); + } + + output = zalloc(sizeof *output); + output->plugin_cairo = plugin_cairo; + wl_list_insert(&plugin_cairo->output_list, &output->link); + output->id = id; + output->wl_output = + wl_registry_bind(plugin_cairo->wl_registry, + id, &wl_output_interface, 2); + wl_proxy_set_tag((struct wl_proxy *) output->wl_output, + &libdecor_cairo_proxy_tag); + wl_output_add_listener(output->wl_output, &output_listener, output); +} + +static void +registry_handle_global(void *user_data, + struct wl_registry *wl_registry, + uint32_t id, + const char *interface, + uint32_t version) +{ + struct libdecor_plugin_cairo *plugin_cairo = user_data; + + if (strcmp(interface, "wl_compositor") == 0) + init_wl_compositor(plugin_cairo, id, version); + else if (strcmp(interface, "wl_subcompositor") == 0) + init_wl_subcompositor(plugin_cairo, id, version); + else if (strcmp(interface, "wl_shm") == 0) + init_wl_shm(plugin_cairo, id, version); + else if (strcmp(interface, "wl_seat") == 0) + init_wl_seat(plugin_cairo, id, version); + else if (strcmp(interface, "wl_output") == 0) + init_wl_output(plugin_cairo, id, version); +} + +static void +remove_surface_outputs(struct border_component *cmpnt, struct output *output) +{ + struct surface_output *surface_output; + wl_list_for_each(surface_output, &cmpnt->server.output_list, link) { + if (surface_output->output == output) { + wl_list_remove(&surface_output->link); + free(surface_output); + break; + } + } +} + +static void +output_removed(struct libdecor_plugin_cairo *plugin_cairo, + struct output *output) +{ + struct libdecor_frame_cairo *frame_cairo; + struct seat *seat; + + wl_list_for_each(frame_cairo, &plugin_cairo->visible_frame_list, link) { + remove_surface_outputs(&frame_cairo->shadow, output); + remove_surface_outputs(&frame_cairo->title_bar.title, output); + remove_surface_outputs(&frame_cairo->title_bar.min, output); + remove_surface_outputs(&frame_cairo->title_bar.max, output); + remove_surface_outputs(&frame_cairo->title_bar.close, output); + } + wl_list_for_each(seat, &plugin_cairo->seat_list, link) { + struct cursor_output *cursor_output, *tmp; + wl_list_for_each_safe(cursor_output, tmp, &seat->cursor_outputs, link) { + if (cursor_output->output == output) { + wl_list_remove(&cursor_output->link); + free(cursor_output); + } + } + } + + wl_list_remove(&output->link); + wl_output_destroy(output->wl_output); + free(output); +} + +static void +registry_handle_global_remove(void *user_data, + struct wl_registry *wl_registry, + uint32_t name) +{ + struct libdecor_plugin_cairo *plugin_cairo = user_data; + struct output *output; + + wl_list_for_each(output, &plugin_cairo->output_list, link) { + if (output->id == name) { + output_removed(plugin_cairo, output); + break; + } + } +} + +static const struct wl_registry_listener registry_listener = { + registry_handle_global, + registry_handle_global_remove +}; + +static bool +has_required_globals(struct libdecor_plugin_cairo *plugin_cairo) +{ + if (!plugin_cairo->wl_compositor) + return false; + if (!plugin_cairo->wl_subcompositor) + return false; + if (!plugin_cairo->wl_shm) + return false; + + return true; +} + +static void +globals_callback(void *user_data, + struct wl_callback *callback, + uint32_t time) +{ + struct libdecor_plugin_cairo *plugin_cairo = user_data; + + wl_callback_destroy(callback); + plugin_cairo->globals_callback = NULL; + + if (!has_required_globals(plugin_cairo)) { + libdecor_notify_plugin_error( + plugin_cairo->context, + LIBDECOR_ERROR_COMPOSITOR_INCOMPATIBLE, + "Compositor is missing required globals"); + } +} + +static const struct wl_callback_listener globals_callback_listener = { + globals_callback +}; + +static struct libdecor_plugin * +libdecor_plugin_new(struct libdecor *context) +{ + struct libdecor_plugin_cairo *plugin_cairo; + struct wl_display *wl_display; + + plugin_cairo = zalloc(sizeof *plugin_cairo); + libdecor_plugin_init(&plugin_cairo->plugin, + context, + &cairo_plugin_iface); + plugin_cairo->context = context; + + wl_list_init(&plugin_cairo->visible_frame_list); + wl_list_init(&plugin_cairo->seat_list); + wl_list_init(&plugin_cairo->output_list); + + /* fetch cursor theme and size*/ + if (!libdecor_get_cursor_settings(&plugin_cairo->cursor_theme_name, + &plugin_cairo->cursor_size)) { + plugin_cairo->cursor_theme_name = NULL; + plugin_cairo->cursor_size = 24; + } + + /* define a sens-serif bold font at symbol size */ + plugin_cairo->font = pango_font_description_new(); + pango_font_description_set_family(plugin_cairo->font, "sans"); + pango_font_description_set_weight(plugin_cairo->font, PANGO_WEIGHT_BOLD); + pango_font_description_set_size(plugin_cairo->font, SYM_DIM * PANGO_SCALE); + + wl_display = libdecor_get_wl_display(context); + plugin_cairo->wl_registry = wl_display_get_registry(wl_display); + wl_registry_add_listener(plugin_cairo->wl_registry, + ®istry_listener, + plugin_cairo); + + plugin_cairo->globals_callback = wl_display_sync(wl_display); + wl_callback_add_listener(plugin_cairo->globals_callback, + &globals_callback_listener, + plugin_cairo); + + return &plugin_cairo->plugin; +} + +static struct libdecor_plugin_priority priorities[] = { + { NULL, LIBDECOR_PLUGIN_PRIORITY_MEDIUM } +}; + +LIBDECOR_EXPORT const struct libdecor_plugin_description +libdecor_plugin_description = { + .api_version = LIBDECOR_PLUGIN_API_VERSION, + .capabilities = LIBDECOR_PLUGIN_CAPABILITY_BASE, + .description = "libdecor plugin using Cairo", + .priorities = priorities, + .constructor = libdecor_plugin_new, +}; |