4 * Copyright (c) 2012 David Herrmann <dh.herrmann@googlemail.com>
6 * Permission is hereby granted, free of charge, to any person obtaining
7 * a copy of this software and associated documentation files
8 * (the "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sublicense, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
19 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
20 * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
21 * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
22 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
23 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 * Wayland Terminal toolkit helpers
36 #include <wayland-client.h>
37 #include <wayland-cursor.h>
38 #include <xkbcommon/xkbcommon.h>
41 #include "shl_array.h"
42 #include "shl_dlist.h"
46 #include "wlt_toolkit.h"
48 #define LOG_SUBSYSTEM "wlt_toolkit"
51 struct wl_shm_pool *w_pool;
64 struct wl_data_offer *w_offer;
65 struct wlt_display *disp;
66 struct shl_array *types;
71 struct ev_eloop *eloop;
72 struct wl_display *dp;
74 struct wl_global_listener *dp_listener;
75 struct shl_hook *listeners;
78 struct shl_dlist window_list;
80 struct wl_compositor *w_comp;
81 struct wl_seat *w_seat;
82 struct wl_shell *w_shell;
86 uint32_t pointer_enter_serial;
87 struct wl_pointer *w_pointer;
88 struct wlt_window *pointer_focus;
90 uint32_t cursor_serial;
91 unsigned int current_cursor;
92 struct wl_surface *w_cursor_surface;
93 struct wl_cursor_theme *cursor_theme;
94 struct wl_cursor *cursors[WLT_CURSOR_NUM];
96 struct wl_keyboard *w_keyboard;
97 struct xkb_context *xkb_ctx;
98 struct xkb_keymap *xkb_keymap;
99 struct xkb_state *xkb_state;
100 struct wlt_window *keyboard_focus;
101 struct ev_timer *repeat_timer;
104 struct wl_data_device_manager *w_manager;
105 struct wl_data_device *w_data_dev;
106 struct data_offer *drag_offer;
107 struct data_offer *selection_offer;
112 struct shl_dlist list;
114 wlt_window_close_cb close_cb;
116 struct wlt_display *disp;
117 struct wlt_pool *pool;
119 struct wl_surface *w_surface;
120 struct wl_shell_surface *w_shell_surface;
121 struct wl_buffer *w_buffer;
123 bool buffer_attached;
129 unsigned int new_width;
130 unsigned int new_height;
131 unsigned int saved_width;
132 unsigned int saved_height;
133 unsigned int resize_edges;
136 struct wlt_shm_buffer buffer;
137 struct wl_callback *w_frame;
139 struct shl_dlist widget_list;
143 struct shl_dlist list;
144 struct wlt_window *wnd;
146 wlt_widget_redraw_cb redraw_cb;
147 wlt_widget_destroy_cb destroy_cb;
148 wlt_widget_prepare_resize_cb prepare_resize_cb;
149 wlt_widget_resize_cb resize_cb;
150 wlt_widget_pointer_enter_cb pointer_enter_cb;
151 wlt_widget_pointer_leave_cb pointer_leave_cb;
152 wlt_widget_pointer_motion_cb pointer_motion_cb;
153 wlt_widget_pointer_button_cb pointer_button_cb;
154 wlt_widget_keyboard_cb keyboard_cb;
157 static int wlt_pool_new(struct wlt_pool **out, struct wlt_display *disp,
160 static const char template[] = "/wlterm-shared-XXXXXX";
161 struct wlt_pool *pool;
166 path = getenv("XDG_RUNTIME_DIR");
168 log_error("XDG_RUNTIME_DIR not set");
172 pool = malloc(sizeof(*pool));
175 memset(pool, 0, sizeof(*pool));
178 name = malloc(strlen(path) + sizeof(template));
184 strcat(name, template);
186 fd = mkostemp(name, O_CLOEXEC);
188 log_error("cannot create temporary file %s via mkostemp() (%d): %m",
197 log_warning("cannot unlink temporary file %s (%d): %m",
201 ret = ftruncate(fd, size);
203 log_error("cannot truncate temporary file to length %lu (%d): %m",
209 pool->data = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED,
211 if (pool->data == MAP_FAILED) {
212 log_error("cannot mmap temporary file (%d): %m", errno);
217 pool->w_pool = wl_shm_create_pool(disp->w_shm, fd, size);
219 log_error("cannot create wayland shm pool object");
229 munmap(pool->data, size);
237 static void wlt_pool_free(struct wlt_pool *pool)
239 munmap(pool->data, pool->size);
240 wl_shm_pool_destroy(pool->w_pool);
245 * These cursor-names are based on:
246 * https://bugs.kde.org/attachment.cgi?id=67313
249 static char *(*cursors[])[] = {
250 [WLT_CURSOR_NONE] = &(char*[]) {
253 [WLT_CURSOR_TOP] = &(char*[]) {
258 [WLT_CURSOR_BOTTOM] = &(char*[]) {
263 [WLT_CURSOR_LEFT] = &(char*[]) {
268 [WLT_CURSOR_RIGHT] = &(char*[]) {
273 [WLT_CURSOR_TOP_LEFT] = &(char*[]) {
278 [WLT_CURSOR_TOP_RIGHT] = &(char*[]) {
283 [WLT_CURSOR_BOTTOM_LEFT] = &(char*[]) {
284 "bottom_left_corner",
288 [WLT_CURSOR_BOTTOM_RIGHT] = &(char*[]) {
289 "bottom_right_corner",
293 [WLT_CURSOR_DRAGGING] = &(char*[]) {
296 "208530c400c041818281048008011002",
299 [WLT_CURSOR_LEFT_PTR] = &(char*[]) {
306 [WLT_CURSOR_IBEAM] = &(char*[]) {
314 static int load_cursors(struct wlt_display *disp)
317 size_t size = sizeof(cursors) / sizeof(*cursors);
318 struct wl_cursor *cursor;
320 disp->w_cursor_surface = wl_compositor_create_surface(disp->w_comp);
322 disp->cursor_theme = wl_cursor_theme_load(NULL, 32, disp->w_shm);
323 if (!disp->cursor_theme) {
324 log_warning("cannot load curdor theme");
328 for (i = 0; i < WLT_CURSOR_NUM; ++i) {
330 if (i < size && cursors[i]) {
331 for (j = 0; (*cursors[i])[j]; ++j) {
332 cursor = wl_cursor_theme_get_cursor(
340 if (!cursor && i != WLT_CURSOR_NONE)
341 log_warning("cannot load cursor for ID %d", i);
343 disp->cursors[i] = cursor;
349 static void unload_cursors(struct wlt_display *disp)
351 if (disp->cursor_theme)
352 wl_cursor_theme_destroy(disp->cursor_theme);
353 if (disp->w_cursor_surface)
354 wl_surface_destroy(disp->w_cursor_surface);
357 static void set_cursor(struct wlt_display *disp, unsigned int cursor)
360 struct wl_cursor *cur;
361 struct wl_cursor_image *image;
362 struct wl_buffer *buffer;
364 if (cursor >= WLT_CURSOR_NUM)
365 cursor = WLT_CURSOR_LEFT_PTR;
367 if (disp->pointer_enter_serial > disp->cursor_serial)
370 if (!force && cursor == disp->current_cursor)
373 disp->current_cursor = cursor;
374 disp->cursor_serial = disp->pointer_enter_serial;
376 cur = disp->cursors[cursor];
378 wl_pointer_set_cursor(disp->w_pointer,
379 disp->pointer_enter_serial,
384 image = cur->images[0];
385 buffer = wl_cursor_image_get_buffer(image);
387 log_error("cannot load buffer for cursor image");
391 wl_pointer_set_cursor(disp->w_pointer,
392 disp->pointer_enter_serial,
393 disp->w_cursor_surface,
394 image->hotspot_x, image->hotspot_y);
395 wl_surface_attach(disp->w_cursor_surface, buffer, 0, 0);
396 wl_surface_damage(disp->w_cursor_surface, 0, 0,
397 image->width, image->height);
400 static int dp_mask_update(uint32_t mask, void *data)
402 struct wlt_display *disp = data;
410 if (mask & WL_DISPLAY_READABLE)
412 if (mask & WL_DISPLAY_WRITABLE)
413 mode |= EV_WRITEABLE;
415 ret = ev_fd_update(disp->dp_fd, mode);
417 log_warning("cannot update wayland-fd event-polling modes (%d)",
423 static void dp_event(struct ev_fd *fd, int mask, void *data)
425 struct wlt_display *disp = data;
428 if (mask & (EV_HUP | EV_ERR)) {
429 log_warning("HUP/ERR on wayland socket");
430 disp->state = STATE_HUP;
431 shl_hook_call(disp->listeners, disp, (void*)WLT_DISPLAY_HUP);
432 ev_eloop_rm_fd(disp->dp_fd);
438 if (mask & EV_READABLE)
439 mode |= WL_DISPLAY_READABLE;
440 if (mask & EV_WRITEABLE)
441 mode |= WL_DISPLAY_WRITABLE;
444 wl_display_iterate(disp->dp, mode);
447 static void pointer_enter(void *data, struct wl_pointer *w_pointer,
448 uint32_t serial, struct wl_surface *w_surface,
449 wl_fixed_t x, wl_fixed_t y)
451 struct wlt_display *disp = data;
452 struct shl_dlist *iter;
453 struct wlt_window *wnd;
454 struct wlt_widget *widget;
459 shl_dlist_for_each(iter, &disp->window_list) {
460 wnd = shl_dlist_entry(iter, struct wlt_window, list);
461 if (wnd->w_surface == w_surface)
465 if (iter == &disp->window_list) {
466 log_debug("unknown surface");
470 disp->pointer_enter_serial = serial;
471 disp->last_serial = serial;
472 disp->pointer_focus = wnd;
473 shl_dlist_for_each(iter, &wnd->widget_list) {
474 widget = shl_dlist_entry(iter, struct wlt_widget, list);
475 if (widget->pointer_enter_cb)
476 widget->pointer_enter_cb(widget, x >> 8, y >> 8,
481 static void pointer_leave(void *data, struct wl_pointer *w_pointer,
482 uint32_t serial, struct wl_surface *w_surface)
484 struct wlt_display *disp = data;
485 struct shl_dlist *iter;
486 struct wlt_window *wnd;
487 struct wlt_widget *widget;
489 wnd = disp->pointer_focus;
490 disp->pointer_focus = NULL;
491 disp->last_serial = serial;
496 shl_dlist_for_each(iter, &wnd->widget_list) {
497 widget = shl_dlist_entry(iter, struct wlt_widget, list);
498 if (widget->pointer_leave_cb)
499 widget->pointer_leave_cb(widget, widget->data);
503 static void pointer_motion(void *data, struct wl_pointer *w_pointer,
504 uint32_t time, wl_fixed_t x, wl_fixed_t y)
506 struct wlt_display *disp = data;
507 struct shl_dlist *iter;
508 struct wlt_window *wnd;
509 struct wlt_widget *widget;
511 wnd = disp->pointer_focus;
515 shl_dlist_for_each(iter, &wnd->widget_list) {
516 widget = shl_dlist_entry(iter, struct wlt_widget, list);
517 if (widget->pointer_motion_cb)
518 widget->pointer_motion_cb(widget, x >> 8, y >> 8,
523 static void pointer_button(void *data, struct wl_pointer *w_pointer,
524 uint32_t serial, uint32_t time, uint32_t button,
527 struct wlt_display *disp = data;
528 struct shl_dlist *iter;
529 struct wlt_window *wnd;
530 struct wlt_widget *widget;
532 wnd = disp->pointer_focus;
533 disp->last_serial = serial;
538 shl_dlist_for_each(iter, &wnd->widget_list) {
539 widget = shl_dlist_entry(iter, struct wlt_widget, list);
540 if (widget->pointer_button_cb)
541 widget->pointer_button_cb(widget, button, state,
546 static void pointer_axis(void *data, struct wl_pointer *w_pointer,
547 uint32_t time, uint32_t axis, wl_fixed_t value)
551 static const struct wl_pointer_listener pointer_listener = {
552 .enter = pointer_enter,
553 .leave = pointer_leave,
554 .motion = pointer_motion,
555 .button = pointer_button,
556 .axis = pointer_axis,
559 static void keyboard_keymap(void *data, struct wl_keyboard *keyboard,
560 uint32_t format, int fd, uint32_t size)
562 struct wlt_display *disp = data;
565 if (format != WL_KEYBOARD_KEYMAP_FORMAT_XKB_V1) {
566 log_error("invalid keyboard format");
571 map = mmap(NULL, size, PROT_READ, MAP_SHARED, fd, 0);
572 if (map == MAP_FAILED) {
573 log_error("cannot mmap keyboard keymap");
578 disp->xkb_keymap = xkb_map_new_from_string(disp->xkb_ctx, map,
579 XKB_KEYMAP_FORMAT_TEXT_V1,
584 if (!disp->xkb_keymap) {
585 log_error("cannot create xkb keymap");
589 disp->xkb_state = xkb_state_new(disp->xkb_keymap);
590 if (!disp->xkb_state) {
591 log_error("cannot create XKB state object");
592 xkb_map_unref(disp->xkb_keymap);
593 disp->xkb_keymap = NULL;
598 static void keyboard_enter(void *data, struct wl_keyboard *keyboard,
599 uint32_t serial, struct wl_surface *w_surface,
600 struct wl_array *keys)
602 struct wlt_display *disp = data;
603 struct shl_dlist *iter;
604 struct wlt_window *wnd;
606 disp->last_serial = serial;
607 if (!disp->xkb_state)
613 shl_dlist_for_each(iter, &disp->window_list) {
614 wnd = shl_dlist_entry(iter, struct wlt_window, list);
615 if (wnd->w_surface == w_surface)
619 if (iter == &disp->window_list)
622 disp->keyboard_focus = wnd;
625 static void keyboard_leave(void *data, struct wl_keyboard *keyboard,
626 uint32_t serial, struct wl_surface *surface)
628 struct wlt_display *disp = data;
630 disp->last_serial = serial;
631 disp->keyboard_focus = NULL;
632 ev_timer_update(disp->repeat_timer, NULL);
635 static void keyboard_key(void *data, struct wl_keyboard *keyboard,
636 uint32_t serial, uint32_t time, uint32_t key,
639 struct wlt_display *disp = data;
640 struct wlt_window *wnd = disp->keyboard_focus;
641 uint32_t code, num_syms;
643 enum wl_keyboard_key_state state = state_w;
644 const xkb_keysym_t *syms;
646 struct shl_dlist *iter;
647 struct wlt_widget *widget;
648 struct itimerspec spec;
651 disp->last_serial = serial;
652 if (!disp->xkb_state)
659 mask = shl_get_xkb_mods(disp->xkb_state);
660 num_syms = xkb_key_get_syms(disp->xkb_state, code, &syms);
661 sym = XKB_KEY_NoSymbol;
666 shl_dlist_for_each(iter, &wnd->widget_list) {
667 widget = shl_dlist_entry(iter, struct wlt_widget, list);
668 if (widget->keyboard_cb) {
669 if (widget->keyboard_cb(widget, mask, sym, state,
670 handled, widget->data))
675 if (state == WL_KEYBOARD_KEY_STATE_RELEASED &&
676 sym == disp->repeat_sym) {
677 ev_timer_update(disp->repeat_timer, NULL);
678 } else if (state == WL_KEYBOARD_KEY_STATE_PRESSED) {
679 disp->repeat_sym = sym;
680 spec.it_interval.tv_sec = 0;
681 spec.it_interval.tv_nsec = 25 * 1000000;
682 spec.it_value.tv_sec = 0;
683 spec.it_value.tv_nsec = 250 * 1000000;
684 ev_timer_update(disp->repeat_timer, &spec);
688 static void repeat_event(struct ev_timer *timer, uint64_t num, void *data)
690 struct wlt_display *disp = data;
691 struct wlt_window *wnd = disp->keyboard_focus;
692 struct wlt_widget *widget;
693 struct shl_dlist *iter;
700 mask = shl_get_xkb_mods(disp->xkb_state);
702 shl_dlist_for_each(iter, &wnd->widget_list) {
703 widget = shl_dlist_entry(iter, struct wlt_widget, list);
704 if (widget->keyboard_cb) {
705 if (widget->keyboard_cb(widget, mask, disp->repeat_sym,
706 WL_KEYBOARD_KEY_STATE_PRESSED,
707 handled, widget->data))
713 static void keyboard_modifiers(void *data, struct wl_keyboard *keyboard,
714 uint32_t serial, uint32_t mods_depressed,
715 uint32_t mods_latched, uint32_t mods_locked,
718 struct wlt_display *disp = data;
720 disp->last_serial = serial;
721 if (!disp->xkb_state)
724 xkb_state_update_mask(disp->xkb_state, mods_depressed, mods_latched,
725 mods_locked, 0, 0, group);
728 static const struct wl_keyboard_listener keyboard_listener = {
729 .keymap = keyboard_keymap,
730 .enter = keyboard_enter,
731 .leave = keyboard_leave,
733 .modifiers = keyboard_modifiers,
736 static void data_offer_unref(struct data_offer *offer)
740 if (!offer || !offer->ref || --offer->ref)
743 len = shl_array_get_length(offer->types);
744 for (i = 0; i < len; ++i)
745 free(*SHL_ARRAY_AT(offer->types, char*, i));
746 shl_array_free(offer->types);
747 wl_data_offer_destroy(offer->w_offer);
751 static void data_offer_offer(void *data, struct wl_data_offer *w_offer,
756 struct data_offer *offer = wl_data_offer_get_user_data(w_offer);
762 ret = shl_array_push(offer->types, &tmp);
769 static const struct wl_data_offer_listener data_offer_listener = {
770 .offer = data_offer_offer,
773 static void data_dev_data_offer(void *data, struct wl_data_device *w_dev,
774 struct wl_data_offer *w_offer)
776 struct data_offer *offer;
777 struct wlt_display *disp = data;
780 offer = malloc(sizeof(*offer));
782 wl_data_offer_destroy(w_offer);
785 memset(offer, 0, sizeof(*offer));
787 offer->w_offer = w_offer;
790 ret = shl_array_new(&offer->types, sizeof(char*), 4);
792 wl_data_offer_destroy(w_offer);
797 wl_data_offer_add_listener(w_offer, &data_offer_listener, offer);
798 wl_data_offer_set_user_data(w_offer, offer);
801 static void data_dev_enter(void *data, struct wl_data_device *w_dev,
802 uint32_t serial, struct wl_surface *w_surface,
803 wl_fixed_t x, wl_fixed_t y,
804 struct wl_data_offer *w_offer)
806 struct wlt_display *disp = data;
808 if (disp->drag_offer) {
809 data_offer_unref(disp->drag_offer);
810 disp->drag_offer = NULL;
816 disp->drag_offer = wl_data_offer_get_user_data(w_offer);
819 static void data_dev_leave(void *data, struct wl_data_device *w_dev)
821 struct wlt_display *disp = data;
823 if (disp->drag_offer) {
824 data_offer_unref(disp->drag_offer);
825 disp->drag_offer = NULL;
829 static void data_dev_motion(void *data, struct wl_data_device *w_dev,
830 uint32_t time, wl_fixed_t x, wl_fixed_t y)
834 static void data_dev_drop(void *data, struct wl_data_device *w_dev)
838 static void data_dev_selection(void *data, struct wl_data_device *w_dev,
839 struct wl_data_offer *w_offer)
841 struct wlt_display *disp = data;
843 if (disp->selection_offer) {
844 data_offer_unref(disp->selection_offer);
845 disp->selection_offer = NULL;
851 disp->selection_offer = wl_data_offer_get_user_data(w_offer);
854 int wlt_display_get_selection_to_fd(struct wlt_display *disp, const char *mime,
858 struct data_offer *offer;
862 if (!disp->selection_offer)
865 offer = disp->selection_offer;
866 num = shl_array_get_length(offer->types);
867 for (i = 0; i < num; ++i) {
868 if (!strcmp(mime, *SHL_ARRAY_AT(offer->types, char*, i)))
875 wl_data_offer_receive(offer->w_offer, mime, output_fd);
879 int wlt_display_get_selection_fd(struct wlt_display *disp, const char *mime)
883 if (pipe2(p, O_CLOEXEC | O_NONBLOCK))
886 ret = wlt_display_get_selection_to_fd(disp, mime, p[1]);
897 static const struct wl_data_device_listener data_dev_listener = {
898 .data_offer = data_dev_data_offer,
899 .enter = data_dev_enter,
900 .leave = data_dev_leave,
901 .motion = data_dev_motion,
902 .drop = data_dev_drop,
903 .selection = data_dev_selection,
906 static void check_ready(struct wlt_display *disp)
908 if (disp->state > STATE_INIT)
918 log_debug("wayland display initialized");
921 disp->w_data_dev = wl_data_device_manager_get_data_device(
922 disp->w_manager, disp->w_seat);
923 wl_data_device_add_listener(disp->w_data_dev,
927 disp->state = STATE_RUNNING;
928 shl_hook_call(disp->listeners, disp, (void*)WLT_DISPLAY_READY);
932 static void seat_capabilities(void *data, struct wl_seat *seat,
933 enum wl_seat_capability caps)
935 struct wlt_display *disp = data;
937 if (caps & WL_SEAT_CAPABILITY_POINTER && !disp->w_pointer) {
938 disp->w_pointer = wl_seat_get_pointer(seat);
939 wl_pointer_add_listener(disp->w_pointer, &pointer_listener,
943 if (caps & WL_SEAT_CAPABILITY_KEYBOARD && !disp->w_keyboard) {
944 disp->w_keyboard = wl_seat_get_keyboard(seat);
945 wl_keyboard_add_listener(disp->w_keyboard, &keyboard_listener,
952 static const struct wl_seat_listener seat_listener = {
953 .capabilities = seat_capabilities,
956 static void dp_global(struct wl_display *dp, uint32_t id, const char *iface,
957 uint32_t version, void *data)
959 struct wlt_display *disp = data;
961 if (!strcmp(iface, "wl_display")) {
962 log_debug("new wl_display global");
964 } else if (!strcmp(iface, "wl_compositor")) {
966 log_error("global wl_compositor advertised twice");
969 disp->w_comp = wl_display_bind(disp->dp,
971 &wl_compositor_interface);
973 log_error("cannot bind wl_compositor object");
976 } else if (!strcmp(iface, "wl_seat")) {
978 log_error("global wl_seat advertised twice");
981 disp->w_seat = wl_display_bind(disp->dp,
985 log_error("cannot bind wl_seat object");
989 wl_seat_add_listener(disp->w_seat, &seat_listener, disp);
990 } else if (!strcmp(iface, "wl_shell")) {
992 log_error("global wl_shell advertised twice");
995 disp->w_shell = wl_display_bind(disp->dp,
997 &wl_shell_interface);
998 if (!disp->w_shell) {
999 log_error("cannot bind wl_shell object");
1002 } else if (!strcmp(iface, "wl_shm")) {
1004 log_error("global wl_shm advertised twice");
1007 disp->w_shm = wl_display_bind(disp->dp,
1011 log_error("cannot bind wl_shm object");
1014 } else if (!strcmp(iface, "wl_data_device_manager")) {
1015 if (disp->w_manager) {
1016 log_error("global wl_data_device_manager advertised twice");
1019 disp->w_manager = wl_display_bind(disp->dp, id,
1020 &wl_data_device_manager_interface);
1021 if (!disp->w_manager) {
1022 log_error("cannot bind wl_data_device_manager_object");
1026 log_debug("ignoring new unknown global %s", iface);
1030 log_debug("new global %s", iface);
1035 int wlt_display_new(struct wlt_display **out,
1036 struct ev_eloop *eloop)
1038 struct wlt_display *disp;
1044 log_debug("creating new wlt-display");
1046 disp = malloc(sizeof(*disp));
1049 memset(disp, 0, sizeof(*disp));
1051 disp->eloop = eloop;
1052 shl_dlist_init(&disp->window_list);
1054 ret = shl_hook_new(&disp->listeners);
1056 log_error("cannot create listeners hook");
1060 disp->dp = wl_display_connect(NULL);
1062 log_error("cannot connect to wayland socket (%d): %m", errno);
1067 ret = ev_eloop_new_fd(eloop,
1069 wl_display_get_fd(disp->dp,
1076 log_error("cannot create event-fd for wayland display (%d)",
1081 ret = ev_eloop_new_timer(eloop, &disp->repeat_timer, NULL,
1082 repeat_event, disp);
1084 log_error("cannot create repeat-timer");
1088 disp->dp_listener = wl_display_add_global_listener(disp->dp,
1091 if (!disp->dp_listener) {
1092 log_error("cannot add wayland global listener (%d)", errno);
1096 disp->xkb_ctx = xkb_context_new(0);
1097 if (!disp->xkb_ctx) {
1098 log_error("cannot create XKB context");
1102 log_debug("wlt-display waiting for globals...");
1104 ev_eloop_ref(disp->eloop);
1109 ev_eloop_rm_timer(disp->repeat_timer);
1111 ev_eloop_rm_fd(disp->dp_fd);
1113 wl_display_disconnect(disp->dp);
1115 shl_hook_free(disp->listeners);
1121 void wlt_display_ref(struct wlt_display *disp)
1123 if (!disp || !disp->ref)
1129 void wlt_display_unref(struct wlt_display *disp)
1131 if (!disp || !disp->ref || --disp->ref)
1134 unload_cursors(disp);
1135 wl_display_remove_global_listener(disp->dp, disp->dp_listener);
1136 wl_display_flush(disp->dp);
1137 wl_display_disconnect(disp->dp);
1138 ev_eloop_rm_timer(disp->repeat_timer);
1139 ev_eloop_rm_fd(disp->dp_fd);
1140 xkb_context_unref(disp->xkb_ctx);
1141 shl_hook_free(disp->listeners);
1142 ev_eloop_unref(disp->eloop);
1146 int wlt_display_register_cb(struct wlt_display *disp,
1147 wlt_display_cb cb, void *data)
1152 return shl_hook_add_cast(disp->listeners, cb, data);
1155 void wlt_display_unregister_cb(struct wlt_display *disp,
1156 wlt_display_cb cb, void *data)
1161 shl_hook_rm_cast(disp->listeners, cb, data);
1164 static void shell_surface_ping(void *data, struct wl_shell_surface *s,
1167 wl_shell_surface_pong(s, serial);
1170 static void wlt_window_do_redraw(struct wlt_window *wnd,
1174 struct shl_dlist *iter;
1175 struct wlt_widget *widget;
1176 unsigned int x, y, flags;
1177 struct wlt_rect alloc;
1181 flags |= WLT_WINDOW_MAXIMIZED;
1182 if (wnd->fullscreen)
1183 flags |= WLT_WINDOW_FULLSCREEN;
1187 alloc.width = wnd->buffer.width;
1188 alloc.height = wnd->buffer.height;
1189 shl_dlist_for_each(iter, &wnd->widget_list) {
1190 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1191 if (widget->resize_cb)
1192 widget->resize_cb(widget, flags, &alloc, widget->data);
1195 memset(wnd->buffer.data, 0,
1196 wnd->buffer.stride * wnd->buffer.height);
1198 wnd->skip_damage = true;
1199 shl_dlist_for_each(iter, &wnd->widget_list) {
1200 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1201 if (widget->redraw_cb)
1202 widget->redraw_cb(widget, flags, widget->data);
1204 wnd->skip_damage = false;
1206 if (!wnd->buffer_attached) {
1207 wnd->buffer_attached = true;
1208 if (wnd->resize_edges & WL_SHELL_SURFACE_RESIZE_LEFT)
1209 x = (int)oldw - wnd->buffer.width;
1212 if (wnd->resize_edges & WL_SHELL_SURFACE_RESIZE_TOP)
1213 y = (int)oldh - wnd->buffer.height;
1216 wl_surface_attach(wnd->w_surface, wnd->w_buffer, x, y);
1217 wnd->resize_edges = 0;
1220 wl_surface_damage(wnd->w_surface, 0, 0, wnd->buffer.width,
1221 wnd->buffer.height);
1224 static int resize_window(struct wlt_window *wnd, unsigned int width,
1225 unsigned int height, bool force_redraw)
1227 struct shl_dlist *iter;
1228 struct wlt_widget *widget;
1229 struct wl_buffer *old_buffer = NULL;
1230 struct wlt_pool *old_pool = NULL;
1233 unsigned int oldw, oldh, neww, newh, minw, minh, flags;
1236 width = wnd->buffer.width;
1238 height = wnd->buffer.height;
1240 if (!width || !height)
1245 flags |= WLT_WINDOW_MAXIMIZED;
1246 if (wnd->fullscreen)
1247 flags |= WLT_WINDOW_FULLSCREEN;
1253 shl_dlist_for_each(iter, &wnd->widget_list) {
1254 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1255 if (widget->prepare_resize_cb)
1256 widget->prepare_resize_cb(widget,
1269 if (width == wnd->buffer.width &&
1270 height == wnd->buffer.height) {
1272 wlt_window_do_redraw(wnd, width, height);
1276 oldw = wnd->buffer.width;
1277 oldh = wnd->buffer.height;
1279 nsize = width * height * 4;
1280 if (wnd->pool && wnd->pool->size >= nsize) {
1281 old_buffer = wnd->w_buffer;
1282 wnd->w_buffer = wl_shm_pool_create_buffer(wnd->pool->w_pool,
1285 WL_SHM_FORMAT_ARGB8888);
1286 if (!wnd->w_buffer) {
1287 log_error("cannot create wayland shm buffer");
1288 wnd->w_buffer = old_buffer;
1292 old_pool = wnd->pool;
1293 ret = wlt_pool_new(&wnd->pool, wnd->disp, nsize);
1295 log_error("cannot create memory pool");
1296 wnd->pool = old_pool;
1300 old_buffer = wnd->w_buffer;
1301 wnd->w_buffer = wl_shm_pool_create_buffer(wnd->pool->w_pool,
1304 WL_SHM_FORMAT_ARGB8888);
1305 if (!wnd->w_buffer) {
1306 log_error("cannot create wayland shm buffer");
1307 wnd->w_buffer = old_buffer;
1308 wlt_pool_free(wnd->pool);
1309 wnd->pool = old_pool;
1314 wnd->buffer.data = wnd->pool->data;
1315 wnd->buffer.width = width;
1316 wnd->buffer.height = height;
1317 wnd->buffer.stride = width * 4;
1318 wnd->buffer_attached = false;
1320 wlt_window_do_redraw(wnd, oldw, oldh);
1323 wl_buffer_destroy(old_buffer);
1325 wlt_pool_free(old_pool);
1330 static void frame_callback(void *data, struct wl_callback *w_callback,
1332 static void idle_frame(struct ev_eloop *eloop, void *unused, void *data);
1334 static const struct wl_callback_listener frame_callback_listener = {
1335 .done = frame_callback,
1338 static void do_frame(struct wlt_window *wnd)
1342 wnd->idle_pending = false;
1343 ev_eloop_unregister_idle_cb(wnd->disp->eloop, idle_frame, wnd);
1345 if (wnd->need_resize) {
1346 force = wnd->need_redraw;
1347 wnd->need_frame = true;
1348 wnd->need_resize = false;
1349 wnd->need_redraw = false;
1350 resize_window(wnd, wnd->new_width, wnd->new_height, force);
1353 if (wnd->need_redraw) {
1354 wnd->need_frame = true;
1355 wnd->need_redraw = false;
1356 wlt_window_do_redraw(wnd, wnd->buffer.width,
1357 wnd->buffer.height);
1360 if (wnd->need_frame) {
1361 wnd->w_frame = wl_surface_frame(wnd->w_surface);
1362 wl_callback_add_listener(wnd->w_frame,
1363 &frame_callback_listener, wnd);
1367 static void frame_callback(void *data, struct wl_callback *w_callback,
1370 struct wlt_window *wnd = data;
1372 wl_callback_destroy(w_callback);
1373 wnd->w_frame = NULL;
1374 wnd->need_frame = false;
1379 static void idle_frame(struct ev_eloop *eloop, void *unused, void *data)
1381 struct wlt_window *wnd = data;
1387 * Buffer Handling and Frame Scheduling
1388 * We use wl_shm for buffer allocation. This means, we have a single buffer
1389 * client side and the server loads it into its backbuffer for rendering. If the
1390 * server does not do this, we are screwed anyway, but that's on behalf of the
1391 * server, so we don't care.
1393 * However, this means, when we create a buffer, we need to notify the
1394 * compositor and then wait until the compositor has created its back-buffer,
1395 * before we continue using this buffer. We can use the "frame" callback to get
1396 * notified about this.
1398 * The logic we have is:
1399 * You set the boolean flags what action is needed in wlt_window and then call
1400 * "schedule_frame()". If we didn't already do any buffer operations in this
1401 * frame, then this function schedules an idle-callback which then performs
1402 * the requested functions (flags in wlt_window). Afterwards, it sets a marker
1403 * that this frame was already used and schedules a frame-callback.
1404 * If during this time another call to schedule_frame() is made, we do nothing
1405 * but wait for the frame-callback. It will then directly perform all the
1406 * requested functions and reschedule a frame-callback.
1407 * If nothing was schedule for one frame, we have no more interest in
1408 * frame-callbacks and thus we set "need_frame" to false again and don't
1409 * schedule any more frame-callbacks.
1411 static void schedule_frame(struct wlt_window *wnd)
1415 if (!wnd || wnd->w_frame)
1418 if (wnd->need_frame || wnd->idle_pending)
1421 ret = ev_eloop_register_idle_cb(wnd->disp->eloop, idle_frame, wnd);
1423 log_error("cannot schedule idle callback: %d", ret);
1425 wnd->idle_pending = true;
1428 static void shell_surface_configure(void *data, struct wl_shell_surface *s,
1429 uint32_t edges, int32_t width,
1432 struct wlt_window *wnd = data;
1439 wnd->resize_edges = edges;
1440 wlt_window_set_size(wnd, width, height);
1443 static void shell_surface_popup_done(void *data, struct wl_shell_surface *s)
1447 static const struct wl_shell_surface_listener shell_surface_listener = {
1448 .ping = shell_surface_ping,
1449 .configure = shell_surface_configure,
1450 .popup_done = shell_surface_popup_done,
1453 static void close_window(struct ev_eloop *eloop, void *unused, void *data)
1455 struct wlt_window *wnd = data;
1457 ev_eloop_unregister_idle_cb(eloop, close_window, wnd);
1458 wnd->close_pending = false;
1461 wnd->close_cb(wnd, wnd->data);
1464 int wlt_display_create_window(struct wlt_display *disp,
1465 struct wlt_window **out,
1467 unsigned int height,
1470 struct wlt_window *wnd;
1473 if (!disp || !out || !width || !height)
1476 if (disp->state != STATE_RUNNING) {
1477 log_error("cannot create window, display is not running but in state %u",
1482 wnd = malloc(sizeof(*wnd));
1485 memset(wnd, 0, sizeof(*wnd));
1489 shl_dlist_init(&wnd->widget_list);
1491 wnd->w_surface = wl_compositor_create_surface(disp->w_comp);
1492 if (!wnd->w_surface) {
1493 log_error("cannot create wayland surface");
1498 wnd->w_shell_surface = wl_shell_get_shell_surface(disp->w_shell,
1500 if (!wnd->w_shell_surface) {
1501 log_error("cannot retrieve shell-surface for wayland surface");
1506 wl_shell_surface_add_listener(wnd->w_shell_surface,
1507 &shell_surface_listener, wnd);
1508 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1510 ret = resize_window(wnd, width, height, true);
1512 goto err_shell_surface;
1514 wlt_display_ref(disp);
1515 shl_dlist_link(&disp->window_list, &wnd->list);
1520 wl_shell_surface_destroy(wnd->w_shell_surface);
1522 wl_surface_destroy(wnd->w_surface);
1528 void wlt_window_ref(struct wlt_window *wnd)
1530 if (!wnd || !wnd->ref)
1536 void wlt_window_unref(struct wlt_window *wnd)
1538 struct wlt_widget *widget;
1540 if (!wnd || !wnd->ref || --wnd->ref)
1543 while (!shl_dlist_empty(&wnd->widget_list)) {
1544 widget = shl_dlist_entry(wnd->widget_list.next,
1545 struct wlt_widget, list);
1546 wlt_widget_destroy(widget);
1549 if (wnd->close_pending)
1550 ev_eloop_unregister_idle_cb(wnd->disp->eloop, close_window,
1552 if (wnd->idle_pending)
1553 ev_eloop_unregister_idle_cb(wnd->disp->eloop, idle_frame, wnd);
1554 shl_dlist_unlink(&wnd->list);
1556 wl_callback_destroy(wnd->w_frame);
1558 wl_buffer_destroy(wnd->w_buffer);
1560 wlt_pool_free(wnd->pool);
1561 wl_shell_surface_destroy(wnd->w_shell_surface);
1562 wl_surface_destroy(wnd->w_surface);
1563 wlt_display_unref(wnd->disp);
1567 int wlt_window_create_widget(struct wlt_window *wnd,
1568 struct wlt_widget **out,
1571 struct wlt_widget *widget;
1576 widget = malloc(sizeof(*widget));
1579 memset(widget, 0, sizeof(*widget));
1581 widget->data = data;
1583 wlt_window_set_size(wnd, wnd->buffer.width, wnd->buffer.height);
1584 shl_dlist_link_tail(&wnd->widget_list, &widget->list);
1589 void wlt_window_schedule_redraw(struct wlt_window *wnd)
1594 wnd->need_redraw = true;
1595 schedule_frame(wnd);
1598 void wlt_window_damage(struct wlt_window *wnd,
1599 struct wlt_rect *damage)
1601 if (!wnd || !damage || wnd->skip_damage)
1604 wl_surface_damage(wnd->w_surface, damage->x, damage->y,
1605 damage->width, damage->height);
1608 void wlt_window_get_buffer(struct wlt_window *wnd,
1609 const struct wlt_rect *alloc,
1610 struct wlt_shm_buffer *buf)
1612 struct wlt_shm_buffer *rbuf;
1617 rbuf = &wnd->buffer;
1620 memcpy(buf, rbuf, sizeof(*buf));
1624 if (alloc->x >= rbuf->width ||
1625 alloc->y >= rbuf->height) {
1626 memset(buf, 0, sizeof(*buf));
1631 if (alloc->x + alloc->width > rbuf->width)
1632 buf->width = rbuf->width - alloc->x;
1634 buf->width = alloc->width;
1637 if (alloc->y + alloc->height > rbuf->height)
1638 buf->height = rbuf->height - alloc->y;
1640 buf->height = alloc->height;
1643 buf->stride = rbuf->stride;
1646 buf->data = rbuf->data;
1647 buf->data += alloc->y * rbuf->stride;
1648 buf->data += alloc->x * 4;
1651 void wlt_window_move(struct wlt_window *wnd)
1656 wl_shell_surface_move(wnd->w_shell_surface,
1658 wnd->disp->last_serial);
1661 void wlt_window_resize(struct wlt_window *wnd, uint32_t edges)
1666 wl_shell_surface_resize(wnd->w_shell_surface,
1668 wnd->disp->last_serial,
1672 int wlt_window_set_size(struct wlt_window *wnd,
1673 unsigned int width, unsigned int height)
1678 wnd->new_width = width;
1679 wnd->new_height = height;
1680 wnd->need_resize = true;
1681 schedule_frame(wnd);
1686 void wlt_window_set_cursor(struct wlt_window *wnd, unsigned int cursor)
1691 set_cursor(wnd->disp, cursor);
1694 void wlt_window_set_close_cb(struct wlt_window *wnd,
1695 wlt_window_close_cb cb)
1703 void wlt_window_close(struct wlt_window *wnd)
1708 wnd->close_pending = true;
1709 ev_eloop_register_idle_cb(wnd->disp->eloop, close_window, wnd);
1712 void wlt_window_toggle_maximize(struct wlt_window *wnd)
1717 if (wnd->maximized) {
1718 if (!wnd->fullscreen) {
1719 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1720 wlt_window_set_size(wnd, wnd->saved_width,
1724 if (!wnd->fullscreen) {
1725 wnd->saved_width = wnd->buffer.width;
1726 wnd->saved_height = wnd->buffer.height;
1727 wl_shell_surface_set_maximized(wnd->w_shell_surface,
1732 wnd->maximized = !wnd->maximized;
1735 void wlt_window_toggle_fullscreen(struct wlt_window *wnd)
1740 if (wnd->fullscreen) {
1741 if (wnd->maximized) {
1742 wl_shell_surface_set_maximized(wnd->w_shell_surface,
1745 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1746 wlt_window_set_size(wnd, wnd->saved_width,
1750 if (!wnd->maximized) {
1751 wnd->saved_width = wnd->buffer.width;
1752 wnd->saved_height = wnd->buffer.height;
1754 wl_shell_surface_set_fullscreen(wnd->w_shell_surface,
1755 WL_SHELL_SURFACE_FULLSCREEN_METHOD_DEFAULT,
1759 wnd->fullscreen = !wnd->fullscreen;
1762 struct ev_eloop *wlt_window_get_eloop(struct wlt_window *wnd)
1767 return wnd->disp->eloop;
1770 struct wlt_display *wlt_window_get_display(struct wlt_window *wnd)
1778 void wlt_widget_destroy(struct wlt_widget *widget)
1783 if (widget->destroy_cb)
1784 widget->destroy_cb(widget, widget->data);
1785 shl_dlist_unlink(&widget->list);
1789 struct wlt_window *wlt_widget_get_window(struct wlt_widget *widget)
1797 void wlt_widget_set_redraw_cb(struct wlt_widget *widget,
1798 wlt_widget_redraw_cb cb)
1803 widget->redraw_cb = cb;
1806 void wlt_widget_set_destroy_cb(struct wlt_widget *widget,
1807 wlt_widget_destroy_cb cb)
1812 widget->destroy_cb = cb;
1815 void wlt_widget_set_resize_cb(struct wlt_widget *widget,
1816 wlt_widget_prepare_resize_cb prepare_cb,
1817 wlt_widget_resize_cb cb)
1822 widget->prepare_resize_cb = prepare_cb;
1823 widget->resize_cb = cb;
1826 void wlt_widget_set_pointer_cb(struct wlt_widget *widget,
1827 wlt_widget_pointer_enter_cb enter_cb,
1828 wlt_widget_pointer_leave_cb leave_cb,
1829 wlt_widget_pointer_motion_cb motion_cb,
1830 wlt_widget_pointer_button_cb button_cb)
1835 widget->pointer_enter_cb = enter_cb;
1836 widget->pointer_leave_cb = leave_cb;
1837 widget->pointer_motion_cb = motion_cb;
1838 widget->pointer_button_cb = button_cb;
1841 void wlt_widget_set_keyboard_cb(struct wlt_widget *widget,
1842 wlt_widget_keyboard_cb cb)
1847 widget->keyboard_cb = cb;