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>
40 #include "shl_array.h"
41 #include "shl_dlist.h"
47 #include "wlt_toolkit.h"
49 #define LOG_SUBSYSTEM "wlt_toolkit"
52 struct wl_shm_pool *w_pool;
65 struct wl_data_offer *w_offer;
66 struct wlt_display *disp;
67 struct shl_array *types;
72 struct ev_eloop *eloop;
73 struct wl_display *dp;
75 struct wl_global_listener *dp_listener;
76 struct shl_hook *listeners;
78 struct wl_registry *w_registry;
80 struct shl_dlist window_list;
82 struct wl_compositor *w_comp;
83 struct wl_seat *w_seat;
84 struct wl_shell *w_shell;
88 uint32_t pointer_enter_serial;
89 struct wl_pointer *w_pointer;
90 struct wlt_window *pointer_focus;
92 uint32_t cursor_serial;
93 unsigned int current_cursor;
94 struct wl_surface *w_cursor_surface;
95 struct wl_cursor_theme *cursor_theme;
96 struct wl_cursor *cursors[WLT_CURSOR_NUM];
98 struct wl_keyboard *w_keyboard;
99 struct xkb_context *xkb_ctx;
100 struct xkb_keymap *xkb_keymap;
101 struct xkb_state *xkb_state;
102 struct wlt_window *keyboard_focus;
103 struct ev_timer *repeat_timer;
105 uint32_t repeat_ascii;
107 struct wl_data_device_manager *w_manager;
108 struct wl_data_device *w_data_dev;
109 struct data_offer *drag_offer;
110 struct data_offer *selection_offer;
115 struct shl_dlist list;
117 wlt_window_close_cb close_cb;
119 struct wlt_display *disp;
120 struct wlt_pool *pool;
122 struct wl_surface *w_surface;
123 struct wl_shell_surface *w_shell_surface;
124 struct wl_buffer *w_buffer;
126 bool buffer_attached;
131 unsigned int new_width;
132 unsigned int new_height;
133 unsigned int saved_width;
134 unsigned int saved_height;
135 unsigned int resize_edges;
138 struct wlt_shm_buffer buffer;
139 struct wl_callback *w_frame;
141 struct shl_dlist widget_list;
145 struct shl_dlist list;
146 struct wlt_window *wnd;
148 wlt_widget_redraw_cb redraw_cb;
149 wlt_widget_destroy_cb destroy_cb;
150 wlt_widget_prepare_resize_cb prepare_resize_cb;
151 wlt_widget_resize_cb resize_cb;
152 wlt_widget_pointer_enter_cb pointer_enter_cb;
153 wlt_widget_pointer_leave_cb pointer_leave_cb;
154 wlt_widget_pointer_motion_cb pointer_motion_cb;
155 wlt_widget_pointer_button_cb pointer_button_cb;
156 wlt_widget_keyboard_cb keyboard_cb;
159 static int wlt_pool_new(struct wlt_pool **out, struct wlt_display *disp,
162 static const char template[] = "/wlterm-shared-XXXXXX";
163 struct wlt_pool *pool;
168 path = getenv("XDG_RUNTIME_DIR");
170 log_error("XDG_RUNTIME_DIR not set");
174 pool = malloc(sizeof(*pool));
177 memset(pool, 0, sizeof(*pool));
180 name = malloc(strlen(path) + sizeof(template));
186 strcat(name, template);
188 fd = mkostemp(name, O_CLOEXEC);
190 log_error("cannot create temporary file %s via mkostemp() (%d): %m",
199 log_warning("cannot unlink temporary file %s (%d): %m",
203 ret = ftruncate(fd, size);
205 log_error("cannot truncate temporary file to length %lu (%d): %m",
211 pool->data = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED,
213 if (pool->data == MAP_FAILED) {
214 log_error("cannot mmap temporary file (%d): %m", errno);
219 pool->w_pool = wl_shm_create_pool(disp->w_shm, fd, size);
221 log_error("cannot create wayland shm pool object");
231 munmap(pool->data, size);
239 static void wlt_pool_free(struct wlt_pool *pool)
241 munmap(pool->data, pool->size);
242 wl_shm_pool_destroy(pool->w_pool);
247 * These cursor-names are based on:
248 * https://bugs.kde.org/attachment.cgi?id=67313
251 static char *(*cursors[])[] = {
252 [WLT_CURSOR_NONE] = &(char*[]) {
255 [WLT_CURSOR_TOP] = &(char*[]) {
260 [WLT_CURSOR_BOTTOM] = &(char*[]) {
265 [WLT_CURSOR_LEFT] = &(char*[]) {
270 [WLT_CURSOR_RIGHT] = &(char*[]) {
275 [WLT_CURSOR_TOP_LEFT] = &(char*[]) {
280 [WLT_CURSOR_TOP_RIGHT] = &(char*[]) {
285 [WLT_CURSOR_BOTTOM_LEFT] = &(char*[]) {
286 "bottom_left_corner",
290 [WLT_CURSOR_BOTTOM_RIGHT] = &(char*[]) {
291 "bottom_right_corner",
295 [WLT_CURSOR_DRAGGING] = &(char*[]) {
298 "208530c400c041818281048008011002",
301 [WLT_CURSOR_LEFT_PTR] = &(char*[]) {
308 [WLT_CURSOR_IBEAM] = &(char*[]) {
316 static int load_cursors(struct wlt_display *disp)
319 size_t size = sizeof(cursors) / sizeof(*cursors);
320 struct wl_cursor *cursor;
322 disp->w_cursor_surface = wl_compositor_create_surface(disp->w_comp);
324 disp->cursor_theme = wl_cursor_theme_load(NULL, 32, disp->w_shm);
325 if (!disp->cursor_theme) {
326 log_warning("cannot load curdor theme");
330 for (i = 0; i < WLT_CURSOR_NUM; ++i) {
332 if (i < size && cursors[i]) {
333 for (j = 0; (*cursors[i])[j]; ++j) {
334 cursor = wl_cursor_theme_get_cursor(
342 if (!cursor && i != WLT_CURSOR_NONE)
343 log_warning("cannot load cursor for ID %d", i);
345 disp->cursors[i] = cursor;
351 static void unload_cursors(struct wlt_display *disp)
353 if (disp->cursor_theme)
354 wl_cursor_theme_destroy(disp->cursor_theme);
355 if (disp->w_cursor_surface)
356 wl_surface_destroy(disp->w_cursor_surface);
359 static void set_cursor(struct wlt_display *disp, unsigned int cursor)
362 struct wl_cursor *cur;
363 struct wl_cursor_image *image;
364 struct wl_buffer *buffer;
366 if (cursor >= WLT_CURSOR_NUM)
367 cursor = WLT_CURSOR_LEFT_PTR;
369 if (disp->pointer_enter_serial > disp->cursor_serial)
372 if (!force && cursor == disp->current_cursor)
375 disp->current_cursor = cursor;
376 disp->cursor_serial = disp->pointer_enter_serial;
378 cur = disp->cursors[cursor];
380 wl_pointer_set_cursor(disp->w_pointer,
381 disp->pointer_enter_serial,
386 image = cur->images[0];
387 buffer = wl_cursor_image_get_buffer(image);
389 log_error("cannot load buffer for cursor image");
393 wl_pointer_set_cursor(disp->w_pointer,
394 disp->pointer_enter_serial,
395 disp->w_cursor_surface,
396 image->hotspot_x, image->hotspot_y);
397 wl_surface_attach(disp->w_cursor_surface, buffer, 0, 0);
398 wl_surface_damage(disp->w_cursor_surface, 0, 0,
399 image->width, image->height);
400 wl_surface_commit(disp->w_cursor_surface);
403 static void dp_dispatch(struct wlt_display *disp, bool nonblock)
409 ret = wl_display_dispatch_pending(disp->dp);
411 ret = wl_display_dispatch(disp->dp);
414 log_error("error during wayland dispatch (%d): %m", errno);
416 } else if (errno == EAGAIN) {
417 ret = ev_fd_update(disp->dp_fd, EV_READABLE | EV_WRITEABLE);
419 log_warning("cannot update wayland-fd event-polling modes (%d)",
422 ret = ev_fd_update(disp->dp_fd, EV_READABLE);
424 log_warning("cannot update wayland-fd event-polling modes (%d)",
429 static void dp_pre_event(struct ev_eloop *eloop, void *unused, void *data)
431 struct wlt_display *disp = data;
433 dp_dispatch(disp, true);
436 static void dp_event(struct ev_fd *fd, int mask, void *data)
438 struct wlt_display *disp = data;
440 if (mask & (EV_HUP | EV_ERR)) {
441 log_warning("HUP/ERR on wayland socket");
442 disp->state = STATE_HUP;
443 shl_hook_call(disp->listeners, disp, (void*)WLT_DISPLAY_HUP);
444 ev_eloop_rm_fd(disp->dp_fd);
449 if (mask & EV_READABLE)
450 dp_dispatch(disp, false);
452 dp_dispatch(disp, true);
455 static void pointer_enter(void *data, struct wl_pointer *w_pointer,
456 uint32_t serial, struct wl_surface *w_surface,
457 wl_fixed_t x, wl_fixed_t y)
459 struct wlt_display *disp = data;
460 struct shl_dlist *iter;
461 struct wlt_window *wnd;
462 struct wlt_widget *widget;
467 shl_dlist_for_each(iter, &disp->window_list) {
468 wnd = shl_dlist_entry(iter, struct wlt_window, list);
469 if (wnd->w_surface == w_surface)
473 if (iter == &disp->window_list) {
474 log_debug("unknown surface");
478 disp->pointer_enter_serial = serial;
479 disp->last_serial = serial;
480 disp->pointer_focus = wnd;
481 shl_dlist_for_each(iter, &wnd->widget_list) {
482 widget = shl_dlist_entry(iter, struct wlt_widget, list);
483 if (widget->pointer_enter_cb)
484 widget->pointer_enter_cb(widget, x >> 8, y >> 8,
489 static void pointer_leave(void *data, struct wl_pointer *w_pointer,
490 uint32_t serial, struct wl_surface *w_surface)
492 struct wlt_display *disp = data;
493 struct shl_dlist *iter;
494 struct wlt_window *wnd;
495 struct wlt_widget *widget;
497 wnd = disp->pointer_focus;
498 disp->pointer_focus = NULL;
499 disp->last_serial = serial;
504 shl_dlist_for_each(iter, &wnd->widget_list) {
505 widget = shl_dlist_entry(iter, struct wlt_widget, list);
506 if (widget->pointer_leave_cb)
507 widget->pointer_leave_cb(widget, widget->data);
511 static void pointer_motion(void *data, struct wl_pointer *w_pointer,
512 uint32_t time, wl_fixed_t x, wl_fixed_t y)
514 struct wlt_display *disp = data;
515 struct shl_dlist *iter;
516 struct wlt_window *wnd;
517 struct wlt_widget *widget;
519 wnd = disp->pointer_focus;
523 shl_dlist_for_each(iter, &wnd->widget_list) {
524 widget = shl_dlist_entry(iter, struct wlt_widget, list);
525 if (widget->pointer_motion_cb)
526 widget->pointer_motion_cb(widget, x >> 8, y >> 8,
531 static void pointer_button(void *data, struct wl_pointer *w_pointer,
532 uint32_t serial, uint32_t time, uint32_t button,
535 struct wlt_display *disp = data;
536 struct shl_dlist *iter;
537 struct wlt_window *wnd;
538 struct wlt_widget *widget;
540 wnd = disp->pointer_focus;
541 disp->last_serial = serial;
546 shl_dlist_for_each(iter, &wnd->widget_list) {
547 widget = shl_dlist_entry(iter, struct wlt_widget, list);
548 if (widget->pointer_button_cb)
549 widget->pointer_button_cb(widget, button, state,
554 static void pointer_axis(void *data, struct wl_pointer *w_pointer,
555 uint32_t time, uint32_t axis, wl_fixed_t value)
559 static const struct wl_pointer_listener pointer_listener = {
560 .enter = pointer_enter,
561 .leave = pointer_leave,
562 .motion = pointer_motion,
563 .button = pointer_button,
564 .axis = pointer_axis,
567 static void keyboard_keymap(void *data, struct wl_keyboard *keyboard,
568 uint32_t format, int fd, uint32_t size)
570 struct wlt_display *disp = data;
573 if (format != WL_KEYBOARD_KEYMAP_FORMAT_XKB_V1) {
574 log_error("invalid keyboard format");
579 map = mmap(NULL, size, PROT_READ, MAP_SHARED, fd, 0);
580 if (map == MAP_FAILED) {
581 log_error("cannot mmap keyboard keymap");
586 disp->xkb_keymap = xkb_keymap_new_from_string(disp->xkb_ctx, map,
587 XKB_KEYMAP_FORMAT_TEXT_V1,
592 if (!disp->xkb_keymap) {
593 log_error("cannot create xkb keymap");
597 disp->xkb_state = xkb_state_new(disp->xkb_keymap);
598 if (!disp->xkb_state) {
599 log_error("cannot create XKB state object");
600 xkb_keymap_unref(disp->xkb_keymap);
601 disp->xkb_keymap = NULL;
606 static void keyboard_enter(void *data, struct wl_keyboard *keyboard,
607 uint32_t serial, struct wl_surface *w_surface,
608 struct wl_array *keys)
610 struct wlt_display *disp = data;
611 struct shl_dlist *iter;
612 struct wlt_window *wnd;
614 disp->last_serial = serial;
615 if (!disp->xkb_state)
621 shl_dlist_for_each(iter, &disp->window_list) {
622 wnd = shl_dlist_entry(iter, struct wlt_window, list);
623 if (wnd->w_surface == w_surface)
627 if (iter == &disp->window_list)
630 disp->keyboard_focus = wnd;
633 static void keyboard_leave(void *data, struct wl_keyboard *keyboard,
634 uint32_t serial, struct wl_surface *surface)
636 struct wlt_display *disp = data;
638 disp->last_serial = serial;
639 disp->keyboard_focus = NULL;
640 ev_timer_update(disp->repeat_timer, NULL);
643 static void keyboard_key(void *data, struct wl_keyboard *keyboard,
644 uint32_t serial, uint32_t time, uint32_t key,
647 struct wlt_display *disp = data;
648 struct wlt_window *wnd = disp->keyboard_focus;
649 uint32_t code, num_syms, ascii;
651 enum wl_keyboard_key_state state = state_w;
652 const xkb_keysym_t *syms;
654 struct shl_dlist *iter;
655 struct wlt_widget *widget;
656 struct itimerspec spec;
659 disp->last_serial = serial;
660 if (!disp->xkb_state)
667 mask = shl_get_xkb_mods(disp->xkb_state);
668 num_syms = xkb_state_key_get_syms(disp->xkb_state, code, &syms);
669 ascii = shl_get_ascii(disp->xkb_state, code, syms, num_syms);
670 sym = XKB_KEY_NoSymbol;
675 shl_dlist_for_each(iter, &wnd->widget_list) {
676 widget = shl_dlist_entry(iter, struct wlt_widget, list);
677 if (widget->keyboard_cb) {
678 if (widget->keyboard_cb(widget, mask, sym, ascii, state,
679 handled, widget->data))
684 if (state == WL_KEYBOARD_KEY_STATE_RELEASED) {
685 ev_timer_update(disp->repeat_timer, NULL);
686 } else if (state == WL_KEYBOARD_KEY_STATE_PRESSED) {
687 disp->repeat_sym = sym;
688 disp->repeat_ascii = ascii;
689 spec.it_interval.tv_sec = 0;
690 spec.it_interval.tv_nsec = wlt_conf.xkb_repeat_rate * 1000000;
691 spec.it_value.tv_sec = 0;
692 spec.it_value.tv_nsec = wlt_conf.xkb_repeat_delay * 1000000;
693 ev_timer_update(disp->repeat_timer, &spec);
697 static void repeat_event(struct ev_timer *timer, uint64_t num, void *data)
699 struct wlt_display *disp = data;
700 struct wlt_window *wnd = disp->keyboard_focus;
701 struct wlt_widget *widget;
702 struct shl_dlist *iter;
709 mask = shl_get_xkb_mods(disp->xkb_state);
711 shl_dlist_for_each(iter, &wnd->widget_list) {
712 widget = shl_dlist_entry(iter, struct wlt_widget, list);
713 if (widget->keyboard_cb) {
714 if (widget->keyboard_cb(widget, mask, disp->repeat_sym,
716 WL_KEYBOARD_KEY_STATE_PRESSED,
717 handled, widget->data))
723 static void keyboard_modifiers(void *data, struct wl_keyboard *keyboard,
724 uint32_t serial, uint32_t mods_depressed,
725 uint32_t mods_latched, uint32_t mods_locked,
728 struct wlt_display *disp = data;
730 disp->last_serial = serial;
731 if (!disp->xkb_state)
734 xkb_state_update_mask(disp->xkb_state, mods_depressed, mods_latched,
735 mods_locked, 0, 0, group);
738 static const struct wl_keyboard_listener keyboard_listener = {
739 .keymap = keyboard_keymap,
740 .enter = keyboard_enter,
741 .leave = keyboard_leave,
743 .modifiers = keyboard_modifiers,
746 static void data_offer_unref(struct data_offer *offer)
750 if (!offer || !offer->ref || --offer->ref)
753 len = shl_array_get_length(offer->types);
754 for (i = 0; i < len; ++i)
755 free(*SHL_ARRAY_AT(offer->types, char*, i));
756 shl_array_free(offer->types);
757 wl_data_offer_destroy(offer->w_offer);
761 static void data_offer_offer(void *data, struct wl_data_offer *w_offer,
766 struct data_offer *offer = wl_data_offer_get_user_data(w_offer);
772 ret = shl_array_push(offer->types, &tmp);
779 static const struct wl_data_offer_listener data_offer_listener = {
780 .offer = data_offer_offer,
783 static void data_dev_data_offer(void *data, struct wl_data_device *w_dev,
784 struct wl_data_offer *w_offer)
786 struct data_offer *offer;
787 struct wlt_display *disp = data;
790 offer = malloc(sizeof(*offer));
792 wl_data_offer_destroy(w_offer);
795 memset(offer, 0, sizeof(*offer));
797 offer->w_offer = w_offer;
800 ret = shl_array_new(&offer->types, sizeof(char*), 4);
802 wl_data_offer_destroy(w_offer);
807 wl_data_offer_add_listener(w_offer, &data_offer_listener, offer);
808 wl_data_offer_set_user_data(w_offer, offer);
811 static void data_dev_enter(void *data, struct wl_data_device *w_dev,
812 uint32_t serial, struct wl_surface *w_surface,
813 wl_fixed_t x, wl_fixed_t y,
814 struct wl_data_offer *w_offer)
816 struct wlt_display *disp = data;
818 if (disp->drag_offer) {
819 data_offer_unref(disp->drag_offer);
820 disp->drag_offer = NULL;
826 disp->drag_offer = wl_data_offer_get_user_data(w_offer);
829 static void data_dev_leave(void *data, struct wl_data_device *w_dev)
831 struct wlt_display *disp = data;
833 if (disp->drag_offer) {
834 data_offer_unref(disp->drag_offer);
835 disp->drag_offer = NULL;
839 static void data_dev_motion(void *data, struct wl_data_device *w_dev,
840 uint32_t time, wl_fixed_t x, wl_fixed_t y)
844 static void data_dev_drop(void *data, struct wl_data_device *w_dev)
848 static void data_dev_selection(void *data, struct wl_data_device *w_dev,
849 struct wl_data_offer *w_offer)
851 struct wlt_display *disp = data;
853 if (disp->selection_offer) {
854 data_offer_unref(disp->selection_offer);
855 disp->selection_offer = NULL;
861 disp->selection_offer = wl_data_offer_get_user_data(w_offer);
864 int wlt_display_get_selection_to_fd(struct wlt_display *disp, const char *mime,
868 struct data_offer *offer;
872 if (!disp->selection_offer)
875 offer = disp->selection_offer;
876 num = shl_array_get_length(offer->types);
877 for (i = 0; i < num; ++i) {
878 if (!strcmp(mime, *SHL_ARRAY_AT(offer->types, char*, i)))
885 wl_data_offer_receive(offer->w_offer, mime, output_fd);
889 int wlt_display_get_selection_fd(struct wlt_display *disp, const char *mime)
893 if (pipe2(p, O_CLOEXEC | O_NONBLOCK))
896 ret = wlt_display_get_selection_to_fd(disp, mime, p[1]);
907 int wlt_display_new_data_source(struct wlt_display *disp,
908 struct wl_data_source **out)
910 struct wl_data_source *src;
915 src = wl_data_device_manager_create_data_source(disp->w_manager);
923 void wlt_display_set_selection(struct wlt_display *disp,
924 struct wl_data_source *selection)
929 wl_data_device_set_selection(disp->w_data_dev, selection,
933 static const struct wl_data_device_listener data_dev_listener = {
934 .data_offer = data_dev_data_offer,
935 .enter = data_dev_enter,
936 .leave = data_dev_leave,
937 .motion = data_dev_motion,
938 .drop = data_dev_drop,
939 .selection = data_dev_selection,
942 static void check_ready(struct wlt_display *disp)
944 if (disp->state > STATE_INIT)
954 log_debug("wayland display initialized");
957 disp->w_data_dev = wl_data_device_manager_get_data_device(
958 disp->w_manager, disp->w_seat);
959 wl_data_device_add_listener(disp->w_data_dev,
963 disp->state = STATE_RUNNING;
964 shl_hook_call(disp->listeners, disp, (void*)WLT_DISPLAY_READY);
968 static void seat_capabilities(void *data, struct wl_seat *seat,
969 enum wl_seat_capability caps)
971 struct wlt_display *disp = data;
973 if (caps & WL_SEAT_CAPABILITY_POINTER && !disp->w_pointer) {
974 disp->w_pointer = wl_seat_get_pointer(seat);
975 wl_pointer_add_listener(disp->w_pointer, &pointer_listener,
979 if (caps & WL_SEAT_CAPABILITY_KEYBOARD && !disp->w_keyboard) {
980 disp->w_keyboard = wl_seat_get_keyboard(seat);
981 wl_keyboard_add_listener(disp->w_keyboard, &keyboard_listener,
988 static const struct wl_seat_listener seat_listener = {
989 .capabilities = seat_capabilities,
992 static void dp_global(void *data, struct wl_registry *registry, uint32_t id,
993 const char *iface, uint32_t version)
995 struct wlt_display *disp = data;
997 if (!strcmp(iface, "wl_display")) {
998 log_debug("new wl_display global");
1000 } else if (!strcmp(iface, "wl_compositor")) {
1002 log_error("global wl_compositor advertised twice");
1005 disp->w_comp = wl_registry_bind(disp->w_registry,
1007 &wl_compositor_interface,
1009 if (!disp->w_comp) {
1010 log_error("cannot bind wl_compositor object");
1013 } else if (!strcmp(iface, "wl_seat")) {
1015 log_error("global wl_seat advertised twice");
1018 disp->w_seat = wl_registry_bind(disp->w_registry,
1022 if (!disp->w_seat) {
1023 log_error("cannot bind wl_seat object");
1027 wl_seat_add_listener(disp->w_seat, &seat_listener, disp);
1028 } else if (!strcmp(iface, "wl_shell")) {
1029 if (disp->w_shell) {
1030 log_error("global wl_shell advertised twice");
1033 disp->w_shell = wl_registry_bind(disp->w_registry,
1035 &wl_shell_interface,
1037 if (!disp->w_shell) {
1038 log_error("cannot bind wl_shell object");
1041 } else if (!strcmp(iface, "wl_shm")) {
1043 log_error("global wl_shm advertised twice");
1046 disp->w_shm = wl_registry_bind(disp->w_registry,
1051 log_error("cannot bind wl_shm object");
1054 } else if (!strcmp(iface, "wl_data_device_manager")) {
1055 if (disp->w_manager) {
1056 log_error("global wl_data_device_manager advertised twice");
1059 disp->w_manager = wl_registry_bind(disp->w_registry,
1061 &wl_data_device_manager_interface,
1063 if (!disp->w_manager) {
1064 log_error("cannot bind wl_data_device_manager_object");
1068 log_debug("ignoring new unknown global %s", iface);
1072 log_debug("new global %s", iface);
1077 static const struct wl_registry_listener registry_listener = {
1078 .global = dp_global,
1079 /* TODO: handle .global_remove */
1082 int wlt_display_new(struct wlt_display **out,
1083 struct ev_eloop *eloop)
1085 struct wlt_display *disp;
1091 log_debug("creating new wlt-display");
1093 disp = malloc(sizeof(*disp));
1096 memset(disp, 0, sizeof(*disp));
1098 disp->eloop = eloop;
1099 shl_dlist_init(&disp->window_list);
1101 ret = shl_hook_new(&disp->listeners);
1103 log_error("cannot create listeners hook");
1107 disp->dp = wl_display_connect(NULL);
1109 log_error("cannot connect to wayland socket (%d): %m", errno);
1114 fd = wl_display_get_fd(disp->dp);
1116 log_error("cannot retrieve wayland FD");
1121 /* TODO: nonblocking wl_display doesn't work, yet. fix that upstream */
1124 set = fcntl(fd, F_GETFL);
1126 log_error("cannot retrieve file flags for wayland FD (%d): %m",
1133 ret = fcntl(fd, F_SETFL, set);
1135 log_error("cannot set file flags for wayland FD (%d): %m",
1141 ret = ev_eloop_new_fd(eloop,
1148 log_error("cannot create event-fd for wayland display (%d)",
1153 ret = ev_eloop_register_pre_cb(eloop, dp_pre_event, disp);
1155 log_error("cannot register pre-cb (%d)", ret);
1159 ret = ev_eloop_new_timer(eloop, &disp->repeat_timer, NULL,
1160 repeat_event, disp);
1162 log_error("cannot create repeat-timer");
1166 disp->w_registry = wl_display_get_registry(disp->dp);
1167 if (!disp->w_registry) {
1168 log_error("cannot get wayland registry object");
1172 wl_registry_add_listener(disp->w_registry, ®istry_listener, disp);
1174 disp->xkb_ctx = xkb_context_new(0);
1175 if (!disp->xkb_ctx) {
1176 log_error("cannot create XKB context");
1180 log_debug("wlt-display waiting for globals...");
1182 ev_eloop_ref(disp->eloop);
1187 ev_eloop_rm_timer(disp->repeat_timer);
1189 ev_eloop_unregister_pre_cb(disp->eloop, dp_pre_event, disp);
1191 ev_eloop_rm_fd(disp->dp_fd);
1193 wl_display_disconnect(disp->dp);
1195 shl_hook_free(disp->listeners);
1201 void wlt_display_ref(struct wlt_display *disp)
1203 if (!disp || !disp->ref)
1209 void wlt_display_unref(struct wlt_display *disp)
1211 if (!disp || !disp->ref || --disp->ref)
1214 unload_cursors(disp);
1215 wl_display_flush(disp->dp);
1216 wl_display_disconnect(disp->dp);
1217 ev_eloop_rm_timer(disp->repeat_timer);
1218 ev_eloop_unregister_pre_cb(disp->eloop, dp_pre_event, disp);
1219 ev_eloop_rm_fd(disp->dp_fd);
1220 xkb_context_unref(disp->xkb_ctx);
1221 shl_hook_free(disp->listeners);
1222 ev_eloop_unref(disp->eloop);
1226 int wlt_display_register_cb(struct wlt_display *disp,
1227 wlt_display_cb cb, void *data)
1232 return shl_hook_add_cast(disp->listeners, cb, data, false);
1235 void wlt_display_unregister_cb(struct wlt_display *disp,
1236 wlt_display_cb cb, void *data)
1241 shl_hook_rm_cast(disp->listeners, cb, data);
1244 static void shell_surface_ping(void *data, struct wl_shell_surface *s,
1247 wl_shell_surface_pong(s, serial);
1250 static void wlt_window_do_redraw(struct wlt_window *wnd,
1254 struct shl_dlist *iter;
1255 struct wlt_widget *widget;
1256 unsigned int x, y, flags;
1257 struct wlt_rect alloc;
1261 flags |= WLT_WINDOW_MAXIMIZED;
1262 if (wnd->fullscreen)
1263 flags |= WLT_WINDOW_FULLSCREEN;
1267 alloc.width = wnd->buffer.width;
1268 alloc.height = wnd->buffer.height;
1269 shl_dlist_for_each(iter, &wnd->widget_list) {
1270 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1271 if (widget->resize_cb)
1272 widget->resize_cb(widget, flags, &alloc, widget->data);
1275 memset(wnd->buffer.data, 0,
1276 wnd->buffer.stride * wnd->buffer.height);
1278 wnd->skip_damage = true;
1279 shl_dlist_for_each(iter, &wnd->widget_list) {
1280 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1281 if (widget->redraw_cb)
1282 widget->redraw_cb(widget, flags, widget->data);
1284 wnd->skip_damage = false;
1286 if (!wnd->buffer_attached) {
1287 wnd->buffer_attached = true;
1288 if (wnd->resize_edges & WL_SHELL_SURFACE_RESIZE_LEFT)
1289 x = (int)oldw - wnd->buffer.width;
1292 if (wnd->resize_edges & WL_SHELL_SURFACE_RESIZE_TOP)
1293 y = (int)oldh - wnd->buffer.height;
1296 wl_surface_attach(wnd->w_surface, wnd->w_buffer, x, y);
1297 wnd->resize_edges = 0;
1300 wl_surface_damage(wnd->w_surface, 0, 0, wnd->buffer.width,
1301 wnd->buffer.height);
1302 wl_surface_commit(wnd->w_surface);
1305 static int resize_window(struct wlt_window *wnd, unsigned int width,
1306 unsigned int height)
1308 struct shl_dlist *iter;
1309 struct wlt_widget *widget;
1310 struct wl_buffer *old_buffer = NULL;
1311 struct wlt_pool *old_pool = NULL;
1314 unsigned int oldw, oldh, neww, newh, minw, minh, flags;
1317 width = wnd->buffer.width;
1319 height = wnd->buffer.height;
1321 if (!width || !height)
1326 flags |= WLT_WINDOW_MAXIMIZED;
1327 if (wnd->fullscreen)
1328 flags |= WLT_WINDOW_FULLSCREEN;
1334 shl_dlist_for_each(iter, &wnd->widget_list) {
1335 widget = shl_dlist_entry(iter, struct wlt_widget, list);
1336 if (widget->prepare_resize_cb)
1337 widget->prepare_resize_cb(widget,
1350 if (width == wnd->buffer.width &&
1351 height == wnd->buffer.height) {
1352 wlt_window_do_redraw(wnd, width, height);
1356 oldw = wnd->buffer.width;
1357 oldh = wnd->buffer.height;
1359 nsize = width * height * 4;
1360 if (wnd->pool && wnd->pool->size >= nsize) {
1361 old_buffer = wnd->w_buffer;
1362 wnd->w_buffer = wl_shm_pool_create_buffer(wnd->pool->w_pool,
1365 WL_SHM_FORMAT_ARGB8888);
1366 if (!wnd->w_buffer) {
1367 log_error("cannot create wayland shm buffer");
1368 wnd->w_buffer = old_buffer;
1372 old_pool = wnd->pool;
1373 ret = wlt_pool_new(&wnd->pool, wnd->disp, nsize);
1375 log_error("cannot create memory pool");
1376 wnd->pool = old_pool;
1380 old_buffer = wnd->w_buffer;
1381 wnd->w_buffer = wl_shm_pool_create_buffer(wnd->pool->w_pool,
1384 WL_SHM_FORMAT_ARGB8888);
1385 if (!wnd->w_buffer) {
1386 log_error("cannot create wayland shm buffer");
1387 wnd->w_buffer = old_buffer;
1388 wlt_pool_free(wnd->pool);
1389 wnd->pool = old_pool;
1394 wnd->buffer.data = wnd->pool->data;
1395 wnd->buffer.width = width;
1396 wnd->buffer.height = height;
1397 wnd->buffer.stride = width * 4;
1398 wnd->buffer_attached = false;
1400 wlt_window_do_redraw(wnd, oldw, oldh);
1403 wl_buffer_destroy(old_buffer);
1405 wlt_pool_free(old_pool);
1410 static void frame_callback(void *data, struct wl_callback *w_callback,
1412 static void idle_frame(struct ev_eloop *eloop, void *unused, void *data);
1414 static const struct wl_callback_listener frame_callback_listener = {
1415 .done = frame_callback,
1418 static void do_frame(struct wlt_window *wnd)
1420 ev_eloop_unregister_idle_cb(wnd->disp->eloop, idle_frame, wnd,
1423 if (wnd->need_resize) {
1424 wnd->need_frame = true;
1425 wnd->need_resize = false;
1426 wnd->w_frame = wl_surface_frame(wnd->w_surface);
1427 wl_callback_add_listener(wnd->w_frame,
1428 &frame_callback_listener, wnd);
1429 resize_window(wnd, wnd->new_width, wnd->new_height);
1431 wnd->need_frame = true;
1432 wnd->w_frame = wl_surface_frame(wnd->w_surface);
1433 wl_callback_add_listener(wnd->w_frame,
1434 &frame_callback_listener, wnd);
1435 wlt_window_do_redraw(wnd, wnd->buffer.width,
1436 wnd->buffer.height);
1440 static void schedule_frame(struct wlt_window *wnd);
1442 static void frame_callback(void *data, struct wl_callback *w_callback,
1445 struct wlt_window *wnd = data;
1447 wl_callback_destroy(w_callback);
1448 wnd->w_frame = NULL;
1450 wnd->idle_pending = false;
1451 if (wnd->need_frame)
1452 schedule_frame(wnd);
1455 static void idle_frame(struct ev_eloop *eloop, void *unused, void *data)
1457 struct wlt_window *wnd = data;
1463 * Buffer Handling and Frame Scheduling
1464 * We use wl_shm for buffer allocation. This means, we have a single buffer
1465 * client side and the server loads it into its backbuffer for rendering. If the
1466 * server does not do this, we are screwed anyway, but that's on behalf of the
1467 * server, so we don't care.
1469 * However, this means, when we create a buffer, we need to notify the
1470 * compositor and then wait until the compositor has created its back-buffer,
1471 * before we continue using this buffer. We can use the "frame" callback to get
1472 * notified about this.
1474 * The logic we have is:
1475 * You set the boolean flags what action is needed in wlt_window and then call
1476 * "schedule_frame()". If we didn't already do any buffer operations in this
1477 * frame, then this function schedules an idle-callback which then performs
1478 * the requested functions (flags in wlt_window). Afterwards, it sets a marker
1479 * that this frame was already used and schedules a frame-callback.
1480 * If during this time another call to schedule_frame() is made, we do nothing
1481 * but wait for the frame-callback. It will then directly perform all the
1482 * requested functions and reschedule a frame-callback.
1483 * If nothing was schedule for one frame, we have no more interest in
1484 * frame-callbacks and thus we set "need_frame" to false again and don't
1485 * schedule any more frame-callbacks.
1487 static void schedule_frame(struct wlt_window *wnd)
1494 wnd->need_frame = true;
1496 if (wnd->idle_pending)
1499 ret = ev_eloop_register_idle_cb(wnd->disp->eloop, idle_frame, wnd,
1502 log_error("cannot schedule idle callback: %d", ret);
1504 wnd->idle_pending = true;
1507 static void shell_surface_configure(void *data, struct wl_shell_surface *s,
1508 uint32_t edges, int32_t width,
1511 struct wlt_window *wnd = data;
1518 wnd->resize_edges = edges;
1519 wlt_window_set_size(wnd, width, height);
1522 static void shell_surface_popup_done(void *data, struct wl_shell_surface *s)
1526 static const struct wl_shell_surface_listener shell_surface_listener = {
1527 .ping = shell_surface_ping,
1528 .configure = shell_surface_configure,
1529 .popup_done = shell_surface_popup_done,
1532 static void close_window(struct ev_eloop *eloop, void *unused, void *data)
1534 struct wlt_window *wnd = data;
1536 ev_eloop_unregister_idle_cb(eloop, close_window, wnd, EV_NORMAL);
1537 wnd->close_pending = false;
1540 wnd->close_cb(wnd, wnd->data);
1543 int wlt_display_create_window(struct wlt_display *disp,
1544 struct wlt_window **out,
1546 unsigned int height,
1549 struct wlt_window *wnd;
1552 if (!disp || !out || !width || !height)
1555 if (disp->state != STATE_RUNNING) {
1556 log_error("cannot create window, display is not running but in state %u",
1561 wnd = malloc(sizeof(*wnd));
1564 memset(wnd, 0, sizeof(*wnd));
1568 shl_dlist_init(&wnd->widget_list);
1570 wnd->w_surface = wl_compositor_create_surface(disp->w_comp);
1571 if (!wnd->w_surface) {
1572 log_error("cannot create wayland surface");
1577 wnd->w_shell_surface = wl_shell_get_shell_surface(disp->w_shell,
1579 if (!wnd->w_shell_surface) {
1580 log_error("cannot retrieve shell-surface for wayland surface");
1585 wl_shell_surface_add_listener(wnd->w_shell_surface,
1586 &shell_surface_listener, wnd);
1587 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1589 ret = resize_window(wnd, width, height);
1591 goto err_shell_surface;
1593 wlt_display_ref(disp);
1594 shl_dlist_link(&disp->window_list, &wnd->list);
1599 wl_shell_surface_destroy(wnd->w_shell_surface);
1601 wl_surface_destroy(wnd->w_surface);
1607 void wlt_window_ref(struct wlt_window *wnd)
1609 if (!wnd || !wnd->ref)
1615 void wlt_window_unref(struct wlt_window *wnd)
1617 struct wlt_widget *widget;
1619 if (!wnd || !wnd->ref || --wnd->ref)
1622 while (!shl_dlist_empty(&wnd->widget_list)) {
1623 widget = shl_dlist_entry(wnd->widget_list.next,
1624 struct wlt_widget, list);
1625 wlt_widget_destroy(widget);
1628 if (wnd->close_pending)
1629 ev_eloop_unregister_idle_cb(wnd->disp->eloop, close_window,
1631 if (wnd->idle_pending)
1632 ev_eloop_unregister_idle_cb(wnd->disp->eloop, idle_frame, wnd,
1634 shl_dlist_unlink(&wnd->list);
1636 wl_callback_destroy(wnd->w_frame);
1638 wl_buffer_destroy(wnd->w_buffer);
1640 wlt_pool_free(wnd->pool);
1641 wl_shell_surface_destroy(wnd->w_shell_surface);
1642 wl_surface_destroy(wnd->w_surface);
1643 wlt_display_unref(wnd->disp);
1647 int wlt_window_create_widget(struct wlt_window *wnd,
1648 struct wlt_widget **out,
1651 struct wlt_widget *widget;
1656 widget = malloc(sizeof(*widget));
1659 memset(widget, 0, sizeof(*widget));
1661 widget->data = data;
1663 wlt_window_set_size(wnd, wnd->buffer.width, wnd->buffer.height);
1664 shl_dlist_link_tail(&wnd->widget_list, &widget->list);
1669 void wlt_window_schedule_redraw(struct wlt_window *wnd)
1674 schedule_frame(wnd);
1677 void wlt_window_damage(struct wlt_window *wnd,
1678 struct wlt_rect *damage)
1680 if (!wnd || !damage || wnd->skip_damage)
1683 wl_surface_damage(wnd->w_surface, damage->x, damage->y,
1684 damage->width, damage->height);
1685 wl_surface_commit(wnd->w_surface);
1688 void wlt_window_get_buffer(struct wlt_window *wnd,
1689 const struct wlt_rect *alloc,
1690 struct wlt_shm_buffer *buf)
1692 struct wlt_shm_buffer *rbuf;
1697 rbuf = &wnd->buffer;
1700 memcpy(buf, rbuf, sizeof(*buf));
1704 if (alloc->x >= rbuf->width ||
1705 alloc->y >= rbuf->height) {
1706 memset(buf, 0, sizeof(*buf));
1711 if (alloc->x + alloc->width > rbuf->width)
1712 buf->width = rbuf->width - alloc->x;
1714 buf->width = alloc->width;
1717 if (alloc->y + alloc->height > rbuf->height)
1718 buf->height = rbuf->height - alloc->y;
1720 buf->height = alloc->height;
1723 buf->stride = rbuf->stride;
1726 buf->data = rbuf->data;
1727 buf->data += alloc->y * rbuf->stride;
1728 buf->data += alloc->x * 4;
1731 void wlt_window_move(struct wlt_window *wnd)
1736 wl_shell_surface_move(wnd->w_shell_surface,
1738 wnd->disp->last_serial);
1741 void wlt_window_resize(struct wlt_window *wnd, uint32_t edges)
1746 wl_shell_surface_resize(wnd->w_shell_surface,
1748 wnd->disp->last_serial,
1752 int wlt_window_set_size(struct wlt_window *wnd,
1753 unsigned int width, unsigned int height)
1758 wnd->new_width = width;
1759 wnd->new_height = height;
1760 wnd->need_resize = true;
1761 schedule_frame(wnd);
1766 void wlt_window_set_cursor(struct wlt_window *wnd, unsigned int cursor)
1771 set_cursor(wnd->disp, cursor);
1774 void wlt_window_set_close_cb(struct wlt_window *wnd,
1775 wlt_window_close_cb cb)
1783 void wlt_window_close(struct wlt_window *wnd)
1788 wnd->close_pending = true;
1789 ev_eloop_register_idle_cb(wnd->disp->eloop, close_window, wnd,
1793 void wlt_window_toggle_maximize(struct wlt_window *wnd)
1798 if (wnd->maximized) {
1799 if (!wnd->fullscreen) {
1800 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1801 wlt_window_set_size(wnd, wnd->saved_width,
1805 if (!wnd->fullscreen) {
1806 wnd->saved_width = wnd->buffer.width;
1807 wnd->saved_height = wnd->buffer.height;
1808 wl_shell_surface_set_maximized(wnd->w_shell_surface,
1813 wnd->maximized = !wnd->maximized;
1816 bool wlt_window_is_maximized(struct wlt_window *wnd)
1818 return wnd && wnd->maximized;
1821 void wlt_window_toggle_fullscreen(struct wlt_window *wnd)
1826 if (wnd->fullscreen) {
1827 if (wnd->maximized) {
1828 wl_shell_surface_set_maximized(wnd->w_shell_surface,
1831 wl_shell_surface_set_toplevel(wnd->w_shell_surface);
1832 wlt_window_set_size(wnd, wnd->saved_width,
1836 if (!wnd->maximized) {
1837 wnd->saved_width = wnd->buffer.width;
1838 wnd->saved_height = wnd->buffer.height;
1840 wl_shell_surface_set_fullscreen(wnd->w_shell_surface,
1841 WL_SHELL_SURFACE_FULLSCREEN_METHOD_DEFAULT,
1845 wnd->fullscreen = !wnd->fullscreen;
1848 bool wlt_window_is_fullscreen(struct wlt_window *wnd)
1850 return wnd && wnd->fullscreen;
1853 struct ev_eloop *wlt_window_get_eloop(struct wlt_window *wnd)
1858 return wnd->disp->eloop;
1861 struct wlt_display *wlt_window_get_display(struct wlt_window *wnd)
1869 void wlt_widget_destroy(struct wlt_widget *widget)
1874 if (widget->destroy_cb)
1875 widget->destroy_cb(widget, widget->data);
1876 shl_dlist_unlink(&widget->list);
1880 struct wlt_window *wlt_widget_get_window(struct wlt_widget *widget)
1888 void wlt_widget_set_redraw_cb(struct wlt_widget *widget,
1889 wlt_widget_redraw_cb cb)
1894 widget->redraw_cb = cb;
1897 void wlt_widget_set_destroy_cb(struct wlt_widget *widget,
1898 wlt_widget_destroy_cb cb)
1903 widget->destroy_cb = cb;
1906 void wlt_widget_set_resize_cb(struct wlt_widget *widget,
1907 wlt_widget_prepare_resize_cb prepare_cb,
1908 wlt_widget_resize_cb cb)
1913 widget->prepare_resize_cb = prepare_cb;
1914 widget->resize_cb = cb;
1917 void wlt_widget_set_pointer_cb(struct wlt_widget *widget,
1918 wlt_widget_pointer_enter_cb enter_cb,
1919 wlt_widget_pointer_leave_cb leave_cb,
1920 wlt_widget_pointer_motion_cb motion_cb,
1921 wlt_widget_pointer_button_cb button_cb)
1926 widget->pointer_enter_cb = enter_cb;
1927 widget->pointer_leave_cb = leave_cb;
1928 widget->pointer_motion_cb = motion_cb;
1929 widget->pointer_button_cb = button_cb;
1932 void wlt_widget_set_keyboard_cb(struct wlt_widget *widget,
1933 wlt_widget_keyboard_cb cb)
1938 widget->keyboard_cb = cb;