/* -*- mode:ObjC -*- WaylandServer - Wayland Server Class Copyright (C) 2020 Free Software Foundation, Inc. Author: Sergio L. Pascual Date: February 2016 This file is part of the GNU Objective C Backend Library. This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; see the file COPYING.LIB. If not, see or write to the Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ #include "config.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "wayland/WaylandServer.h" static void handle_geometry(void *data, struct wl_output *wl_output, int x, int y, int physical_width, int physical_height, int subpixel, const char *make, const char *model, int transform) { NSDebugLog(@"handle_geometry"); struct output *output = data; output->alloc_x = x; output->alloc_y = y; output->transform = transform; if (output->make) free(output->make); output->make = strdup(make); if (output->model) free(output->model); output->model = strdup(model); } static void handle_done(void *data, struct wl_output *wl_output) { NSDebugLog(@"handle_done"); } static void handle_scale(void *data, struct wl_output *wl_output, int32_t scale) { NSDebugLog(@"handle_scale"); struct output *output = data; output->scale = scale; } static void handle_mode(void *data, struct wl_output *wl_output, uint32_t flags, int width, int height, int refresh) { NSDebugLog(@"handle_mode"); struct output *output = data; if (flags & WL_OUTPUT_MODE_CURRENT) { output->width = width; output->height = height /*- 30*/; NSDebugLog(@"handle_mode output=%dx%d", width, height); /* XXX - Should we implement this? if (display->output_configure_handler) (*display->output_configure_handler) (output, display->user_data); */ } } static const struct wl_output_listener output_listener = { handle_geometry, handle_mode, handle_done, handle_scale }; /* static void destroy_output(WaylandConfig *wlconfig, uint32_t id) { struct output *output; wl_list_for_each(output, &wlconfig->output_list, link) { if (output->server_output_id == id) { wl_output_destroy(output->output); wl_list_remove(&output->link); free(output); wlconfig->output_count--; break; } } } */ static void pointer_handle_enter(void *data, struct wl_pointer *pointer, uint32_t serial, struct wl_surface *surface, wl_fixed_t sx_w, wl_fixed_t sy_w) { NSDebugLog(@"pointer_handle_enter"); if (!surface) { NSDebugLog(@"no surface"); return; } WaylandConfig *wlconfig = data; struct window *window = wl_surface_get_user_data(surface); float sx = wl_fixed_to_double(sx_w); float sy = wl_fixed_to_double(sy_w); [GSCurrentServer() initializeMouseIfRequired]; wlconfig->pointer.x = sx; wlconfig->pointer.y = sy; wlconfig->pointer.focus = window; // FIXME: Send NSMouseEntered event. } static void pointer_handle_leave(void *data, struct wl_pointer *pointer, uint32_t serial, struct wl_surface *surface) { NSDebugLog(@"pointer_handle_leave"); if (!surface) { NSDebugLog(@"no surface"); return; } WaylandConfig *wlconfig = data; struct window *window = wl_surface_get_user_data(surface); [GSCurrentServer() initializeMouseIfRequired]; if (wlconfig->pointer.focus->window_id == window->window_id) { wlconfig->pointer.focus = NULL; wlconfig->pointer.serial = 0; } // FIXME: Send NSMouseExited event. } static void pointer_handle_motion(void *data, struct wl_pointer *pointer, uint32_t time, wl_fixed_t sx_w, wl_fixed_t sy_w) { WaylandConfig *wlconfig = data; struct window *window; float sx = wl_fixed_to_double(sx_w); float sy = wl_fixed_to_double(sy_w); NSDebugLog(@"pointer_handle_motion: %fx%f", sx, sy); [GSCurrentServer() initializeMouseIfRequired]; if (wlconfig->pointer.focus && wlconfig->pointer.serial) { window = wlconfig->pointer.focus; NSEvent *event; NSEventType eventType; NSPoint eventLocation; NSGraphicsContext *gcontext; unsigned int eventFlags; float deltaX = sx - window->wlconfig->pointer.x; float deltaY = sy - window->wlconfig->pointer.y; NSDebugLog(@"obtaining locations: wayland=%fx%f pointer=%fx%f", sx, sy, window->wlconfig->pointer.x, window->wlconfig->pointer.y); gcontext = GSCurrentContext(); eventLocation = NSMakePoint(sx, window->height - sy); eventFlags = 0; eventType = NSLeftMouseDragged; NSDebugLog(@"sending pointer delta: %fx%f, window=%d", deltaX, deltaY, window->window_id); event = [NSEvent mouseEventWithType: eventType location: eventLocation modifierFlags: eventFlags timestamp: (NSTimeInterval) time / 1000.0 windowNumber: (int)window->window_id context: gcontext eventNumber: time clickCount: 1 pressure: 1.0 buttonNumber: 0 /* FIXME */ deltaX: deltaX deltaY: deltaY deltaZ: 0.]; [GSCurrentServer() postEvent: event atStart: NO]; } wlconfig->pointer.x = sx; wlconfig->pointer.y = sy; } static void pointer_handle_button(void *data, struct wl_pointer *pointer, uint32_t serial, uint32_t time, uint32_t button, uint32_t state_w) { NSDebugLog(@"pointer_handle_button: button=%d", button); WaylandConfig *wlconfig = data; NSEvent *event; NSEventType eventType; NSPoint eventLocation; NSGraphicsContext *gcontext; unsigned int eventFlags; float deltaX = 0.0; float deltaY = 0.0; int clickCount = 1; int tick; int buttonNumber; enum wl_pointer_button_state state = state_w; struct window *window = wlconfig->pointer.focus; [GSCurrentServer() initializeMouseIfRequired]; gcontext = GSCurrentContext(); eventLocation = NSMakePoint(wlconfig->pointer.x, window->height - wlconfig->pointer.y); eventFlags = 0; if (state == WL_POINTER_BUTTON_STATE_PRESSED) { if (button == wlconfig->pointer.last_click_button && time - wlconfig->pointer.last_click_time < 300 && abs(wlconfig->pointer.x - wlconfig->pointer.last_click_x) < 3 && abs(wlconfig->pointer.y - wlconfig->pointer.last_click_y) < 3) { NSDebugLog(@"handle_button HIT: b=%d t=%d x=%f y=%f", button, time, wlconfig->pointer.x, wlconfig->pointer.y); wlconfig->pointer.last_click_time = 0; clickCount++; } else { NSDebugLog(@"handle_button MISS: b=%d t=%d x=%f y=%f", button, time, wlconfig->pointer.x, wlconfig->pointer.y); wlconfig->pointer.last_click_button = button; wlconfig->pointer.last_click_time = time; wlconfig->pointer.last_click_x = wlconfig->pointer.x; wlconfig->pointer.last_click_y = wlconfig->pointer.y; } switch (button) { case BTN_LEFT: eventType = NSLeftMouseDown; break; case BTN_RIGHT: eventType = NSRightMouseDown; break; case BTN_MIDDLE: eventType = NSOtherMouseDown; break; // TODO: handle BTN_SIDE, BTN_EXTRA, BTN_FORWARD, BTN_BACK and other // constants in libinput. // We may just want to send NSOtherMouseDown and populate buttonNumber // with the libinput constant? } wlconfig->pointer.serial = serial; } else if (state == WL_POINTER_BUTTON_STATE_RELEASED) { switch (button) { case BTN_LEFT: eventType = NSLeftMouseUp; break; case BTN_RIGHT: eventType = NSRightMouseUp; break; case BTN_MIDDLE: eventType = NSOtherMouseUp; break; } wlconfig->pointer.serial = 0; } else { NSDebugLog(@"unhandled wayland pointer state 0x%02x", state); return; } /* FIXME: unlike in _motion and _axis handlers, the argument used in _button is the "serial" of the event, not passed and unavailable in _motion and _axis handlers. Is it allowed to pass "serial" as the eventNumber: in _button handler, but "time" as the eventNumber: in the _motion and _axis handlers? */ tick = serial; NSDebugLog(@"sending pointer event at: %fx%f, window=%d", wlconfig->pointer.x, wlconfig->pointer.y, window->window_id); /* FIXME: X11 backend uses the XGetPointerMapping()-returned values from its map_return argument as constants for buttonNumber. As the variant with buttonNumber: seems to be a GNUstep extension, and the value internal, it might be ok to just provide libinput constant as we're doing here. If this is truly correct, please update this comment to document the correctness of doing so. */ buttonNumber = button; event = [NSEvent mouseEventWithType: eventType location: eventLocation modifierFlags: eventFlags timestamp: (NSTimeInterval) time / 1000.0 windowNumber: (int)window->window_id context: gcontext eventNumber: tick clickCount: clickCount pressure: 1.0 buttonNumber: buttonNumber deltaX: deltaX /* FIXME unused */ deltaY: deltaY /* FIXME unused */ deltaZ: 0.]; [GSCurrentServer() postEvent: event atStart: NO]; } static void pointer_handle_axis(void *data, struct wl_pointer *pointer, uint32_t time, uint32_t axis, wl_fixed_t value) { NSDebugLog(@"pointer_handle_axis: axis=%d value=%g", axis, wl_fixed_to_double(value)); WaylandConfig *wlconfig = data; NSEvent *event; NSEventType eventType; NSPoint eventLocation; NSGraphicsContext *gcontext; unsigned int eventFlags; float deltaX = 0.0; float deltaY = 0.0; int clickCount = 1; int buttonNumber; struct window *window = wlconfig->pointer.focus; [GSCurrentServer() initializeMouseIfRequired]; gcontext = GSCurrentContext(); eventLocation = NSMakePoint(wlconfig->pointer.x, window->height - wlconfig->pointer.y); eventFlags = 0; float mouse_scroll_multiplier = wlconfig->mouse_scroll_multiplier; /* For smooth-scroll events, we're not doing any cross-event or delta calculations, as is done in button event handling. */ switch(axis) { case WL_POINTER_AXIS_VERTICAL_SCROLL: eventType = NSScrollWheel; deltaY = wl_fixed_to_double(value) * wlconfig->mouse_scroll_multiplier; case WL_POINTER_AXIS_HORIZONTAL_SCROLL: eventType = NSScrollWheel; deltaX = wl_fixed_to_double(value) * wlconfig->mouse_scroll_multiplier; } NSDebugLog(@"sending pointer scroll at: %fx%f, value %fx%f, window=%d", wlconfig->pointer.x, wlconfig->pointer.y, deltaX, deltaY, window->window_id); /* FIXME: X11 backend uses the XGetPointerMapping()-returned values from its map_return argument as constants for buttonNumber. As the variant with buttonNumber: seems to be a GNUstep extension, and the value internal, it might be ok to just not provide any value here. If this is truly correct, please update this comment to document the correctness of doing so. */ buttonNumber = 0; event = [NSEvent mouseEventWithType: eventType location: eventLocation modifierFlags: eventFlags timestamp: (NSTimeInterval) time / 1000.0 windowNumber: (int)window->window_id context: gcontext eventNumber: time clickCount: clickCount pressure: 1.0 buttonNumber: buttonNumber deltaX: deltaX deltaY: deltaY deltaZ: 0.]; [GSCurrentServer() postEvent: event atStart: NO]; } static const struct wl_pointer_listener pointer_listener = { pointer_handle_enter, pointer_handle_leave, pointer_handle_motion, pointer_handle_button, pointer_handle_axis, }; static void keyboard_handle_keymap(void *data, struct wl_keyboard *keyboard, uint32_t format, int fd, uint32_t size) { NSDebugLog(@"keyboard_handle_keymap"); WaylandConfig *wlconfig = data; struct xkb_keymap *keymap; struct xkb_state *state; char *map_str; if (!data) { close(fd); return; } if (format != WL_KEYBOARD_KEYMAP_FORMAT_XKB_V1) { close(fd); return; } map_str = mmap(NULL, size, PROT_READ, MAP_SHARED, fd, 0); if (map_str == MAP_FAILED) { close(fd); return; } wlconfig->xkb_context = xkb_context_new(0); if (wlconfig->xkb_context == NULL) { fprintf(stderr, "Failed to create XKB context\n"); return; } keymap = xkb_keymap_new_from_string(wlconfig->xkb_context, map_str, XKB_KEYMAP_FORMAT_TEXT_V1, 0); munmap(map_str, size); close(fd); if (!keymap) { fprintf(stderr, "failed to compile keymap\n"); return; } state = xkb_state_new(keymap); if (!state) { fprintf(stderr, "failed to create XKB state\n"); xkb_keymap_unref(keymap); return; } xkb_keymap_unref(wlconfig->xkb.keymap); xkb_state_unref(wlconfig->xkb.state); wlconfig->xkb.keymap = keymap; wlconfig->xkb.state = state; wlconfig->xkb.control_mask = 1 << xkb_keymap_mod_get_index(wlconfig->xkb.keymap, "Control"); wlconfig->xkb.alt_mask = 1 << xkb_keymap_mod_get_index(wlconfig->xkb.keymap, "Mod1"); wlconfig->xkb.shift_mask = 1 << xkb_keymap_mod_get_index(wlconfig->xkb.keymap, "Shift"); } static void keyboard_handle_enter(void *data, struct wl_keyboard *keyboard, uint32_t serial, struct wl_surface *surface, struct wl_array *keys) { NSDebugLog(@"keyboard_handle_enter"); } static void keyboard_handle_leave(void *data, struct wl_keyboard *keyboard, uint32_t serial, struct wl_surface *surface) { NSDebugLog(@"keyboard_handle_leave"); } static void keyboard_handle_modifiers(void *data, struct wl_keyboard *keyboard, uint32_t serial, uint32_t mods_depressed, uint32_t mods_latched, uint32_t mods_locked, uint32_t group) { NSDebugLog(@"keyboard_handle_modifiers"); WaylandConfig *wlconfig = data; xkb_mod_mask_t mask; /* If we're not using a keymap, then we don't handle PC-style modifiers */ if (!wlconfig->xkb.keymap) return; xkb_state_update_mask(wlconfig->xkb.state, mods_depressed, mods_latched, mods_locked, 0, 0, group); mask = xkb_state_serialize_mods(wlconfig->xkb.state, XKB_STATE_MODS_DEPRESSED | XKB_STATE_MODS_LATCHED); wlconfig->modifiers = 0; if (mask & wlconfig->xkb.control_mask) wlconfig->modifiers |= NSCommandKeyMask; if (mask & wlconfig->xkb.alt_mask) wlconfig->modifiers |= NSAlternateKeyMask; if (mask & wlconfig->xkb.shift_mask) wlconfig->modifiers |= NSShiftKeyMask; } static void keyboard_handle_key(void *data, struct wl_keyboard *keyboard, uint32_t serial, uint32_t time, uint32_t key, uint32_t state_w) { NSDebugLog(@"keyboard_handle_key: %d", key); WaylandConfig *wlconfig = data; uint32_t code, num_syms; enum wl_keyboard_key_state state = state_w; const xkb_keysym_t *syms; xkb_keysym_t sym; struct window *window = wlconfig->pointer.focus; if (!window) return; code = 0; if (key == 28) { sym = NSCarriageReturnCharacter; } else if (key == 14) { sym = NSDeleteCharacter; } else { code = key + 8; num_syms = xkb_state_key_get_syms(wlconfig->xkb.state, code, &syms); sym = XKB_KEY_NoSymbol; if (num_syms == 1) sym = syms[0]; } NSString *s = [NSString stringWithUTF8String: &sym]; NSEventType eventType; if (state == WL_KEYBOARD_KEY_STATE_PRESSED) { eventType = NSKeyDown; } else { eventType = NSKeyUp; } NSEvent *ev = [NSEvent keyEventWithType: eventType location: NSZeroPoint modifierFlags: wlconfig->modifiers timestamp: time / 1000.0 windowNumber: window->window_id context: GSCurrentContext() characters: s charactersIgnoringModifiers: s isARepeat: NO keyCode: code]; [GSCurrentServer() postEvent: ev atStart: NO]; NSDebugLog(@"keyboard_handle_key: %@", s); } static void keyboard_handle_repeat_info(void *data, struct wl_keyboard *keyboard, int32_t rate, int32_t delay) { NSDebugLog(@"keyboard_handle_repeat_info"); } static const struct wl_keyboard_listener keyboard_listener = { keyboard_handle_keymap, keyboard_handle_enter, keyboard_handle_leave, keyboard_handle_key, keyboard_handle_modifiers, keyboard_handle_repeat_info }; static void seat_handle_capabilities(void *data, struct wl_seat *seat, enum wl_seat_capability caps) { WaylandConfig *wlconfig = data; if ((caps & WL_SEAT_CAPABILITY_POINTER) && !wlconfig->pointer.wlpointer) { wlconfig->pointer.wlpointer = wl_seat_get_pointer(seat); wl_pointer_set_user_data(wlconfig->pointer.wlpointer, wlconfig); wl_pointer_add_listener(wlconfig->pointer.wlpointer, &pointer_listener, wlconfig); } else if (!(caps & WL_SEAT_CAPABILITY_POINTER) && wlconfig->pointer.wlpointer) { if (wlconfig->seat_version >= WL_POINTER_RELEASE_SINCE_VERSION) wl_pointer_release(wlconfig->pointer.wlpointer); else wl_pointer_destroy(wlconfig->pointer.wlpointer); wlconfig->pointer.wlpointer = NULL; } wl_display_dispatch_pending(wlconfig->display); wl_display_flush(wlconfig->display); if ((caps & WL_SEAT_CAPABILITY_KEYBOARD) && !wlconfig->keyboard) { wlconfig->keyboard = wl_seat_get_keyboard(seat); wl_keyboard_set_user_data(wlconfig->keyboard, wlconfig); wl_keyboard_add_listener(wlconfig->keyboard, &keyboard_listener, wlconfig); } else if (!(caps & WL_SEAT_CAPABILITY_KEYBOARD) && wlconfig->keyboard) { if (wlconfig->seat_version >= WL_KEYBOARD_RELEASE_SINCE_VERSION) wl_keyboard_release(wlconfig->keyboard); else wl_keyboard_destroy(wlconfig->keyboard); wlconfig->keyboard = NULL; } #if 0 if ((caps & WL_SEAT_CAPABILITY_TOUCH) && !input->touch) { input->touch = wl_seat_get_touch(seat); wl_touch_set_user_data(input->touch, input); wl_touch_add_listener(input->touch, &touch_listener, input); } else if (!(caps & WL_SEAT_CAPABILITY_TOUCH) && input->touch) { if (input->seat_version >= WL_TOUCH_RELEASE_SINCE_VERSION) wl_touch_release(input->touch); else wl_touch_destroy(input->touch); input->touch = NULL; } #endif } static const struct wl_seat_listener seat_listener = { seat_handle_capabilities, }; static void shm_format(void *data, struct wl_shm *wl_shm, uint32_t format) { } struct wl_shm_listener shm_listener = { shm_format }; #define XDG_SHELL #ifdef XDG_SHELL static void xdg_surface_on_configure(void *data, struct xdg_surface *xdg_surface, uint32_t serial) { struct window *window = data; WaylandConfig *wlconfig = window->wlconfig; NSDebugLog(@"xdg_surface_on_configure: win=%d", window->window_id); NSEvent *ev = nil; NSWindow *nswindow = GSWindowWithNumber(window->window_id); NSDebugLog(@"Acknowledging surface configure %p %d (window_id=%d)", xdg_surface, serial, window->window_id); xdg_surface_ack_configure(xdg_surface, serial); window->configured = YES; // TODO: do we need to check that the surface has been painted to? if (window->surface) { // TODO: is this ever going to be null when we get here? wl_surface_commit(window->surface); wl_display_dispatch_pending(window->wlconfig->display); wl_display_flush(window->wlconfig->display); } if (wlconfig->pointer.focus && wlconfig->pointer.focus->window_id == window->window_id) { ev = [NSEvent otherEventWithType: NSAppKitDefined location: NSZeroPoint modifierFlags: 0 timestamp: 0 windowNumber: (int)window->window_id context: GSCurrentContext() subtype: GSAppKitWindowFocusIn data1: 0 data2: 0]; [nswindow sendEvent: ev]; } #if 0 struct window *window = data; int moved = 0; NSDebugLog(@"configure window=%d pos=%dx%d size=%dx%d", window->window_id, x, y, width, height); NSDebugLog(@"current values pos=%dx%d size=%dx%d", window->pos_x, window->pos_y, window->width, window->height); if (!window->is_out && (window->pos_x != x || window->pos_y != y)) { window->pos_x = x; window->pos_y = y; moved = 1; } xdg_surface_ack_configure(window->xdg_surface, serial); NSRect rect = NSMakeRect(0, 0, window->width, window->height); [window->instance flushwindowrect:rect :window->window_id]; wl_display_dispatch_pending(window->wlconfig->display); wl_display_flush(window->wlconfig->display); if (moved) { NSDebugLog(@"window moved, notifying AppKit"); NSEvent *ev = nil; NSWindow *nswindow = GSWindowWithNumber(window->window_id); ev = [NSEvent otherEventWithType: NSAppKitDefined location: NSZeroPoint modifierFlags: 0 timestamp: 0 windowNumber: (int)window->window_id context: GSCurrentContext() subtype: GSAppKitWindowMoved data1: window->pos_x data2: WaylandToNS(window, window->pos_y)]; [nswindow sendEvent: ev]; } #endif } static const struct xdg_surface_listener xdg_surface_listener = { xdg_surface_on_configure, }; #else static void wl_shell_surface_on_ping(void *data, struct wl_shell_surface *shell_surface, uint32_t serial) { wl_shell_surface_pong(shell_surface, serial); } static void wl_shell_surface_on_configure(void *data, struct wl_shell_surface *shell_surface, uint32_t edges, int32_t width, int32_t height) { } static void wl_shell_surface_on_popup_done(void *data, struct wl_shell_surface *shell_surface) { } static const struct wl_shell_surface_listener shell_surface_listener = { wl_shell_surface_on_ping, wl_shell_surface_on_configure, wl_shell_surface_on_popup_done, }; #endif static void handle_global(void *data, struct wl_registry *registry, uint32_t name, const char *interface, uint32_t version) { WaylandConfig *wlconfig = data; NSDebugLog(@"wayland: registering interface '%s'", interface); if (strcmp(interface, xdg_wm_base_interface.name) == 0) { wlconfig->wm_base = wl_registry_bind(registry, name, &xdg_wm_base_interface, 1); NSDebugLog(@"wayland: found wm_base interface"); } else if (strcmp(interface, wl_shell_interface.name) == 0) { wlconfig->shell = wl_registry_bind(registry, name, &wl_shell_interface, 1); NSDebugLog(@"wayland: found shell interface"); } else if (strcmp(interface, wl_compositor_interface.name) == 0) { wlconfig->compositor = wl_registry_bind(registry, name, &wl_compositor_interface, 1); NSDebugLog(@"wayland: found compositor interface"); } else if (strcmp(interface, wl_shm_interface.name) == 0) { wlconfig->shm = wl_registry_bind(registry, name, &wl_shm_interface, 1); NSDebugLog(@"wayland: found shm interface"); wl_shm_add_listener(wlconfig->shm, &shm_listener, wlconfig); } else if (strcmp(interface, wl_output_interface.name) == 0) { struct output *output = (struct output *)malloc(sizeof(struct output)); memset(output, 0, sizeof(struct output)); output->wlconfig = wlconfig; output->scale = 1; output->output = wl_registry_bind(registry, name, &wl_output_interface, 2); output->server_output_id = name; NSDebugLog(@"wayland: found output interface"); wl_list_insert(wlconfig->output_list.prev, &output->link); wlconfig->output_count++; wl_output_add_listener(output->output, &output_listener, output); } else if (strcmp(interface, wl_seat_interface.name) == 0) { wlconfig->pointer.wlpointer = NULL; wlconfig->seat_version = version; wlconfig->seat = wl_registry_bind(wlconfig->registry, name, &wl_seat_interface, 1); NSDebugLog(@"wayland: found seat interface"); wl_seat_add_listener(wlconfig->seat, &seat_listener, wlconfig); } } static void handle_global_remove(void *data, struct wl_registry *registry, uint32_t name) { } static const struct wl_registry_listener registry_listener = { handle_global, handle_global_remove }; struct window * get_window_with_id(WaylandConfig *wlconfig, int winid) { struct window *window; wl_list_for_each(window, &wlconfig->window_list, link) { if (window->window_id == winid) { return window; } } return NULL; } float WaylandToNS(struct window *window, float wl_y) { return (window->output->height - wl_y - window->height); } int NSToWayland(struct window *window, int ns_y) { return (window->output->height - ns_y - window->height); } @implementation WaylandServer /* Initialize AppKit backend */ + (void) initializeBackend { NSDebugLog(@"Initializing GNUstep Wayland backend"); [GSDisplayServer setDefaultServerClass: [WaylandServer class]]; } - (id) _initWaylandContext { wlconfig = (WaylandConfig *) malloc(sizeof(WaylandConfig)); memset(wlconfig, 0, sizeof(WaylandConfig)); wlconfig->last_window_id = 1; wlconfig->mouse_scroll_multiplier = 1.0f; wl_list_init(&wlconfig->output_list); wl_list_init(&wlconfig->window_list); wlconfig->display = wl_display_connect(NULL); if (!wlconfig->display) { [NSException raise: NSWindowServerCommunicationException format: @"Unable to connect Wayland Server"]; } wlconfig->registry = wl_display_get_registry(wlconfig->display); if (!wlconfig->registry) { [NSException raise: NSWindowServerCommunicationException format: @"Unable to get global registry"]; } wl_registry_add_listener(wlconfig->registry, ®istry_listener, wlconfig); wl_display_dispatch(wlconfig->display); wl_display_roundtrip(wlconfig->display); if (!wlconfig->compositor) { [NSException raise: NSWindowServerCommunicationException format: @"Unable to get compositor"]; } if (!wlconfig->wm_base) { /* Note: this was merged into Weston only as of Feb 2019, and is probably in Weston only as of 6.0 release, therefore not in Weston 5.x present in Debian buster (current stable). See Weston merge request !103. */ [NSException raise: NSWindowServerCommunicationException format: @"Unable to get xdg-shell / xdg_wm_base - your Wayland compositor must support the stable XDG Shell protocol"]; } return self; } - (void) receivedEvent: (void*)data type: (RunLoopEventType)type extra: (void*)extra forMode: (NSString*)mode { if (type == ET_RDESC){ NSDebugLog(@"receivedEvent ET_RDESC"); if (wl_display_dispatch(wlconfig->display) == -1) { [NSException raise: NSWindowServerCommunicationException format: @"Connection to Wayland Server lost"]; } } } - (void) setupRunLoopInputSourcesForMode: (NSString*)mode { NSRunLoop *currentRunLoop = [NSRunLoop currentRunLoop]; long fdWaylandHandle = wl_display_get_fd(wlconfig->display); [currentRunLoop addEvent: (void*)fdWaylandHandle type: ET_RDESC watcher: (id)self forMode: mode]; } - (id) initWithAttributes: (NSDictionary *)info { NSDebugLog(@"WaylandServer initWithAttributes"); [super initWithAttributes: info]; [self _initWaylandContext]; [self setupRunLoopInputSourcesForMode: NSDefaultRunLoopMode]; [self setupRunLoopInputSourcesForMode: NSConnectionReplyMode]; [self setupRunLoopInputSourcesForMode: NSModalPanelRunLoopMode]; [self setupRunLoopInputSourcesForMode: NSEventTrackingRunLoopMode]; return self; } - (void) dealloc { NSDebugLog(@"Destroying Wayland Server"); [super dealloc]; } - (BOOL) handlesWindowDecorations { return NO; } - (void) restrictWindow: (int)win toImage: (NSImage*)image { NSDebugLog(@"restrictWindow"); } - (NSRect) boundsForScreen: (int)screen { NSDebugLog(@"boundsForScreen: %d", screen); struct output *output; wl_list_for_each(output, &wlconfig->output_list, link) { NSDebugLog(@"screen found: %dx%d", output->width, output->height); return NSMakeRect(0, 0, output->width, output->height); } NSDebugLog(@"can't find screen"); return NSZeroRect; } - (NSWindowDepth) windowDepthForScreen: (int)screen { NSDebugLog(@"windowDepthForScreen: %d", screen); return (_GSRGBBitValue | 8); } - (const NSWindowDepth *) availableDepthsForScreen: (int)screen { NSDebugLog(@"availableDepthsForScreen"); return NULL; } - (NSArray *) screenList { NSDebugLog(@"screenList"); NSMutableArray *screens = [NSMutableArray arrayWithCapacity: wlconfig->output_count]; struct output *output; wl_list_for_each(output, &wlconfig->output_list, link) { [screens addObject: [NSNumber numberWithInt: output->server_output_id]]; NSDebugLog(@"adding screen with output_id=%d", output->server_output_id); NSDebugLog(@"output dimensions: %dx%d %dx%d", output->alloc_x, output->alloc_y, output->width, output->height); } return screens; } - (void *) serverDevice { NSDebugLog(@"serverDevice"); return NULL; } - (void *) windowDevice: (int)win { NSDebugLog(@"windowDevice"); return NULL; } - (void) beep { NSDebugLog(@"beep"); } @end @implementation WaylandServer (WindowOps) - (int) window: (NSRect)frame : (NSBackingStoreType)type : (unsigned int)style : (int)screen { NSDebugLog(@"window: screen=%d frame=%@", screen, NSStringFromRect(frame)); struct window *window; struct output *output; int width; int height; int altered = 0; /* We're not allowed to create a zero rect window */ if (NSWidth(frame) <= 0 || NSHeight(frame) <= 0) { NSDebugLog(@"trying to create a zero rect window"); frame.size.width = 2; frame.size.height = 2; } window = malloc(sizeof(struct window)); memset(window, 0, sizeof(struct window)); wl_list_for_each(output, &wlconfig->output_list, link) { if (output->server_output_id == screen) { window->output = output; break; } } if (!window->output) { NSDebugLog(@"can't find screen %d", screen); free(window); return 0; } window->wlconfig = wlconfig; window->instance = self; window->is_out = 0; window->width = width = NSWidth(frame); window->height = height = NSHeight(frame); window->pos_x = frame.origin.x; window->pos_y = NSToWayland(window, frame.origin.y); window->window_id = wlconfig->last_window_id; window->surface = wl_compositor_create_surface(wlconfig->compositor); if (!window->surface) { NSDebugLog(@"can't create wayland surface"); free(window); return 0; } wl_surface_set_user_data(window->surface, window); window->xdg_surface = xdg_wm_base_get_xdg_surface(wlconfig->wm_base, window->surface); #if 0 // TODO: xdg_shell_get_xdg_surface_special() no longer exists, // so we need to find another way, see *get_popup for menus if (style & NSMainMenuWindowMask) { NSDebugLog(@"window id=%d will be a panel", window->window_id); } else if (style & NSBackgroundWindowMask) { NSDebugLog(@"window id=%d will be a ?", window->window_id); } else { NSDebugLog(@"window id=%d will be ordinary", window->window_id); } #endif window->toplevel = xdg_surface_get_toplevel(window->xdg_surface); xdg_surface_set_user_data(window->xdg_surface, window); xdg_surface_add_listener(window->xdg_surface, &xdg_surface_listener, window); if (window->pos_x < 0) { window->pos_x = 0; altered = 1; } #if 0 if (window->pos_y < 31) { window->pos_y = 31; altered = 1; } #endif NSDebugLog(@"creating new window with id=%d: pos=%fx%f, size=%fx%f", window->window_id, window->pos_x, window->pos_y, window->width, window->height); xdg_surface_set_window_geometry(window->xdg_surface, window->pos_x, window->pos_y, window->width, window->height); wl_surface_commit(window->surface); wl_display_flush(wlconfig->display); wl_list_insert(wlconfig->window_list.prev, &window->link); wlconfig->last_window_id++; wlconfig->window_count++; [self _setWindowOwnedByServer: (int)window->window_id]; if (altered) { NSEvent *ev = [NSEvent otherEventWithType: NSAppKitDefined location: NSZeroPoint modifierFlags: 0 timestamp: 0 windowNumber: (int)window->window_id context: GSCurrentContext() subtype: GSAppKitWindowMoved data1: window->pos_x data2: WaylandToNS(window, window->pos_y)]; [(GSWindowWithNumber(window->window_id)) sendEvent: ev]; NSDebugLog(@"window: notifying of move=%fx%f", window->pos_x, WaylandToNS(window, window->pos_y)); } return window->window_id; } - (void) termwindow: (int) win { NSDebugLog(@"termwindow: win=%d", win); struct window *window = get_window_with_id(wlconfig, win); xdg_surface_destroy(window->xdg_surface); wl_buffer_destroy(window->buffer); wl_list_remove(&window->link); free(window); } - (int) nativeWindow: (void *)winref : (NSRect*)frame : (NSBackingStoreType*)type : (unsigned int*)style : (int*)screen { NSDebugLog(@"nativeWindow"); return 0; } - (void) stylewindow: (unsigned int) style : (int) win { NSDebugLog(@"stylewindow"); } - (void) windowbacking: (NSBackingStoreType)type : (int) win { NSDebugLog(@"windowbacking"); } - (void) titlewindow: (NSString *) window_title : (int) win { NSDebugLog(@"titlewindow: win=%d title=%@", win, window_title); if (window_title == @"Window") { return; } struct window *window = get_window_with_id(wlconfig, win); const char *cString = [window_title UTF8String]; xdg_toplevel_set_title(window->toplevel, cString); } - (void) miniwindow: (int) win { NSDebugLog(@"miniwindow"); [self orderwindow: NSWindowOut :0 :win]; } - (void) setWindowdevice: (int) winId forContext: (NSGraphicsContext *)ctxt { NSDebugLog(@"setWindowdevice: %d", winId); struct window *window; window = get_window_with_id(wlconfig, winId); GSSetDevice(ctxt, window, 0.0, window->height); DPSinitmatrix(ctxt); DPSinitclip(ctxt); } - (void) orderwindow: (int) op : (int) otherWin : (int) win { NSDebugLog(@"orderwindow: %d", win); struct window *window = get_window_with_id(wlconfig, win); if (op == NSWindowOut) { NSDebugLog(@"orderwindow: NSWindowOut"); window->is_out = 1; xdg_surface_set_window_geometry(window->xdg_surface, window->pos_x + 32000, window->pos_y + 32000, window->width, window->height); NSRect rect = NSMakeRect(0, 0, window->width, window->height); [window->instance flushwindowrect:rect :window->window_id]; xdg_toplevel_set_minimized(window->toplevel); wl_display_dispatch_pending(window->wlconfig->display); wl_display_flush(window->wlconfig->display); } else /*if (window->is_out)*/ { NSDebugLog(@"orderwindow: restoring to %fx%f", window->pos_x, window->pos_y); xdg_surface_set_window_geometry(window->xdg_surface, window->pos_x, window->pos_y, window->width, window->height); NSRect rect = NSMakeRect(0, 0, window->width, window->height); [window->instance flushwindowrect:rect :window->window_id]; // xdg_toplevel_set_minimized(window->toplevel); // xdg_toplevel_set_fullscreen(window->toplevel, window->output); wl_display_dispatch_pending(window->wlconfig->display); wl_display_flush(window->wlconfig->display); window->is_out = 0; } } - (void) movewindow: (NSPoint)loc : (int) win { NSDebugLog(@"movewindow"); } - (NSRect) _OSFrameToWFrame: (NSRect)o for: (void*)win { struct window *window = (struct window *)win; NSRect x; x.size.width = o.size.width; x.size.height = o.size.height; x.origin.x = o.origin.x; x.origin.y = o.origin.y + o.size.height; x.origin.y = window->output->height - x.origin.y; return x; } - (void) placewindow: (NSRect)rect : (int) win { NSDebugLog(@"placewindow: %d %@", win, NSStringFromRect(rect)); struct window *window = get_window_with_id(wlconfig, win); WaylandConfig *config = window->wlconfig; if (0 && config->pointer.serial && config->pointer.focus && config->pointer.focus->window_id == win) { // FIXME: remove dead branch NSEvent *event; NSEventType eventType; NSPoint eventLocation; NSGraphicsContext *gcontext; unsigned int eventFlags; float deltaX = 0.0; float deltaY = 0.0; int tick; gcontext = GSCurrentContext(); eventLocation = NSMakePoint(config->pointer.x, window->height - config->pointer.y); eventFlags = 0; eventType = NSLeftMouseUp; tick = 0; NSDebugLog(@"sending pointer event at: %fx%f, window=%d", config->pointer.x, config->pointer.y, window->window_id); event = [NSEvent mouseEventWithType: eventType location: eventLocation modifierFlags: eventFlags timestamp: (NSTimeInterval) 0 windowNumber: (int)window->window_id context: gcontext eventNumber: tick clickCount: 1 pressure: 1.0 buttonNumber: 0 /* FIXME */ deltaX: deltaX deltaY: deltaY deltaZ: 0.]; [GSCurrentServer() postEvent: event atStart: NO]; xdg_toplevel_move(window->toplevel, config->seat, config->pointer.serial); } else { NSDebugLog(@"placewindow: oldpos=%fx%f", window->pos_x, window->pos_y); NSDebugLog(@"placewindow: oldsize=%fx%f", window->width, window->height); NSRect frame; NSRect wframe; BOOL resize = NO; BOOL move = NO; frame = [(GSWindowWithNumber(window->window_id)) frame]; if (NSEqualRects(rect, frame) == YES) return; if (NSEqualSizes(rect.size, frame.size) == NO) { resize = YES; move = YES; } if (NSEqualPoints(rect.origin, frame.origin) == NO) { move = YES; } wframe = [self _OSFrameToWFrame: rect for: window]; if (config->pointer.focus && config->pointer.focus->window_id == window->window_id) { config->pointer.y -= (wframe.origin.y - window->pos_y); config->pointer.x -= (wframe.origin.x - window->pos_x); } window->width = wframe.size.width; window->height = wframe.size.height; window->pos_x = wframe.origin.x; window->pos_y = wframe.origin.y; xdg_surface_set_window_geometry(window->xdg_surface, window->pos_x, window->pos_y, window->width, window->height); /* NSRect flushRect = NSMakeRect(0, 0, window->width, window->height); */ [window->instance flushwindowrect:rect :window->window_id]; wl_display_dispatch_pending(window->wlconfig->display); wl_display_flush(window->wlconfig->display); if (resize == YES) { NSEvent *ev = [NSEvent otherEventWithType: NSAppKitDefined location: rect.origin modifierFlags: 0 timestamp: 0 windowNumber: win context: GSCurrentContext() subtype: GSAppKitWindowResized data1: rect.size.width data2: rect.size.height]; [(GSWindowWithNumber(window->window_id)) sendEvent: ev]; NSDebugLog(@"placewindow notify resized=%fx%f", rect.size.width, rect.size.height); } else if (move == YES) { NSEvent *ev = [NSEvent otherEventWithType: NSAppKitDefined location: NSZeroPoint modifierFlags: 0 timestamp: 0 windowNumber: (int)window->window_id context: GSCurrentContext() subtype: GSAppKitWindowMoved data1: rect.origin.x data2: rect.origin.y]; [(GSWindowWithNumber(window->window_id)) sendEvent: ev]; NSDebugLog(@"placewindow notify moved=%fx%f", rect.origin.x, rect.origin.y); } NSDebugLog(@"placewindow: newpos=%fx%f", window->pos_x, window->pos_y); NSDebugLog(@"placewindow: newsize=%fx%f", window->width, window->height); } } - (NSRect) windowbounds: (int) win { struct window *window = get_window_with_id(wlconfig, win); NSDebugLog(@"windowbounds: win=%d, pos=%dx%d size=%dx%d", window->window_id, window->pos_x, window->pos_y, window->width, window->height); return NSMakeRect(window->pos_x, window->output->height - window->pos_y, window->width, window->height); } - (void) setwindowlevel: (int) level : (int) win { NSDebugLog(@"setwindowlevel: level=%d win=%d", level, win); } - (int) windowlevel: (int) win { NSDebugLog(@"windowlevel: %d", win); return 0; } - (int) windowdepth: (int) win { NSDebugLog(@"windowdepth"); return 0; } - (void) setmaxsize: (NSSize)size : (int) win { NSDebugLog(@"setmaxsize"); } - (void) setminsize: (NSSize)size : (int) win { NSDebugLog(@"setminsize"); } - (void) setresizeincrements: (NSSize)size : (int) win { NSDebugLog(@"setresizeincrements"); } - (void) flushwindowrect: (NSRect)rect : (int) win { NSDebugLog(@"flushwindowrect: %d %fx%f", win, NSWidth(rect), NSHeight(rect)); struct window *window = get_window_with_id(wlconfig, win); [[GSCurrentContext() class] handleExposeRect: rect forDriver: window->wcs]; } - (void) styleoffsets: (float*) l : (float*) r : (float*) t : (float*) b : (unsigned int) style { NSDebugLog(@"styleoffsets"); /* XXX - Assume we don't decorate */ *l = *r = *t = *b = 0.0; } - (void) docedited: (int) edited : (int) win { NSDebugLog(@"docedited"); } - (void) setinputstate: (int)state : (int)win { NSDebugLog(@"setinputstate"); } - (void) setinputfocus: (int) win { NSDebugLog(@"setinputfocus"); } - (void) setalpha: (float)alpha : (int) win { NSDebugLog(@"setalpha"); } - (void) setShadow: (BOOL)hasShadow : (int)win { NSDebugLog(@"setshadow"); } - (NSPoint) mouselocation { int aScreen = -1; struct output *output; NSDebugLog(@"mouselocation"); // FIXME: find a cleaner way to get the first element of a wl_list wl_list_for_each(output, &wlconfig->output_list, link) { aScreen = output->server_output_id; break; } if (aScreen < 0) // No outputs in the wl_list. return NSZeroPoint; return [self mouseLocationOnScreen: aScreen window: NULL]; } - (NSPoint) mouseLocationOnScreen: (int)aScreen window: (int *)win { NSDebugLog(@"mouseLocationOnScreen: %d %fx%f", win, wlconfig->pointer.x, wlconfig->pointer.y); struct window *window = wlconfig->pointer.focus; struct output *output; float x; float y; /*if (wlconfig->pointer.serial) { NSDebugLog(@"captured"); x = wlconfig->pointer.captured_x; y = wlconfig->pointer.captured_y; } else*/ { NSDebugLog(@"NOT captured"); x = wlconfig->pointer.x; y = wlconfig->pointer.y; if (window) { x += window->pos_x; y += window->pos_y; if (win) { *win = &window->window_id; } } } wl_list_for_each(output, &wlconfig->output_list, link) { if (output->server_output_id == aScreen) { y = output->height - y; break; } } NSDebugLog(@"mouseLocationOnScreen: returning %fx%f", x, y); return NSMakePoint(x, y); } - (BOOL) capturemouse: (int) win { NSDebugLog(@"capturemouse: %d", win); return NO; } - (void) releasemouse { NSDebugLog(@"releasemouse"); } - (void) setMouseLocation: (NSPoint)mouseLocation onScreen: (int)aScreen { NSDebugLog(@"setMouseLocation"); } - (void) hidecursor { NSDebugLog(@"hidecursor"); } - (void) showcursor { NSDebugLog(@"showcursor"); } - (void) standardcursor: (int) style : (void**) cid { NSDebugLog(@"standardcursor"); } - (void) imagecursor: (NSPoint)hotp : (NSImage *) image : (void**) cid { NSDebugLog(@"imagecursor"); } - (void) setcursorcolor: (NSColor *)fg : (NSColor *)bg : (void*) cid { NSLog(@"Call to obsolete method -setcursorcolor:::"); [self recolorcursor: fg : bg : cid]; [self setcursor: cid]; } - (void) recolorcursor: (NSColor *)fg : (NSColor *)bg : (void*) cid { NSDebugLog(@"recolorcursor"); } - (void) setcursor: (void*) cid { NSDebugLog(@"setcursor"); } - (void) freecursor: (void*) cid { NSDebugLog(@"freecursor"); } - (void) setParentWindow: (int)parentWin forChildWindow: (int)childWin { NSDebugLog(@"setParentWindow: parent=%d child=%d", parentWin, childWin); struct window *parent = get_window_with_id(wlconfig, parentWin); struct window *child = get_window_with_id(wlconfig, childWin); if (parent) { xdg_toplevel_set_parent(child->toplevel, parent->toplevel); } else { xdg_toplevel_set_parent(child->toplevel, NULL); } xdg_toplevel_set_minimized(child->toplevel); wl_display_dispatch_pending(wlconfig->display); wl_display_flush(wlconfig->display); } - (void) setIgnoreMouse: (BOOL)ignoreMouse : (int)win { NSDebugLog(@"setIgnoreMouse"); } - (void) initializeMouseIfRequired { if (!_mouseInitialized) [self initializeMouse]; } - (void) initializeMouse { _mouseInitialized = YES; [self mouseOptionsChanged: nil]; [[NSDistributedNotificationCenter defaultCenter] addObserver: self selector: @selector(mouseOptionsChanged:) name: NSUserDefaultsDidChangeNotification object: nil]; } - (void) mouseOptionsChanged: (NSNotification *)aNotif { NSUserDefaults *defs = [NSUserDefaults standardUserDefaults]; wlconfig->mouse_scroll_multiplier = [defs integerForKey:@"GSMouseScrollMultiplier"]; if (wlconfig->mouse_scroll_multiplier < 0.0001f) wlconfig->mouse_scroll_multiplier = 1.0f; } @end