/* Crafter®.Graphics Copyright (C) 2025 Catcrafts® Catcrafts.net 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 3.0 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; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ module; #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "../lib/xdg-shell-client-protocol.h" #include "../lib/wayland-xdg-decoration-unstable-v1-client-protocol.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include module Crafter.Graphics:Window_impl; import :Window; import std; import Crafter.Event; using namespace Crafter; void randname(char *buf) { struct timespec ts; clock_gettime(CLOCK_REALTIME, &ts); long r = ts.tv_nsec; for (int i = 0; i < 6; ++i) { buf[i] = 'A'+(r&15)+(r&16)*2; r >>= 5; } } int anonymous_shm_open(void) { char name[] = "/hello-wayland-XXXXXX"; int retries = 100; do { randname(name + strlen(name) - 6); --retries; // shm_open guarantees that O_CLOEXEC is set int fd = shm_open(name, O_RDWR | O_CREAT | O_EXCL, 0600); if (fd >= 0) { shm_unlink(name); return fd; } } while (retries > 0 && errno == EEXIST); return -1; } int create_shm_file(off_t size) { int fd = anonymous_shm_open(); if (fd < 0) { return fd; } if (ftruncate(fd, size) < 0) { close(fd); return -1; } return fd; } int counter = 0; void ScaleBitmapR8G8B8(Pixel_BU8_GU8_RU8_AU8* dst, const Pixel_BU8_GU8_RU8_AU8* src, std::uint32_t srcWidth, std::uint32_t srcHeight, std::uint32_t dstWidth, std::uint32_t dstHeight) { for (std::uint32_t y = 0; y < dstHeight; y++) { std::uint32_t srcY = y * srcHeight / dstHeight; for (std::uint32_t x = 0; x < dstWidth; x++) { std::uint32_t srcX = x * srcWidth / dstWidth; const Pixel_BU8_GU8_RU8_AU8* srcPixel = src + (srcY * srcWidth + srcX); Pixel_BU8_GU8_RU8_AU8* dstPixel = dst + (y * dstWidth + x); dstPixel[0] = srcPixel[0]; } } } Window::Window(std::string name, std::uint32_t width, std::uint32_t height) : name(name), width(width), height(height) { display = wl_display_connect(NULL); if (display == NULL) { std::cerr << "failed to create display" << std::endl; } wl_registry* registry = wl_display_get_registry(display); wl_registry_add_listener(registry, ®istry_listener, this); if (wl_display_roundtrip(display) == -1) { exit(EXIT_FAILURE); } if (shm == NULL || compositor == NULL || xdgWmBase == NULL) { std::cerr << "no wl_shm, wl_compositor or xdg_wm_base support" << std::endl; exit(EXIT_FAILURE); } surface = wl_compositor_create_surface(compositor); xdgSurface = xdg_wm_base_get_xdg_surface(xdgWmBase, surface); xdgToplevel = xdg_surface_get_toplevel(xdgSurface); cb = wl_surface_frame(surface); wl_callback_add_listener(cb, &surface_frame_listener, this); xdg_surface_add_listener(xdgSurface, &xdg_surface_listener, this); xdg_toplevel_add_listener(xdgToplevel, &xdg_toplevel_listener, this); wl_surface_commit(surface); xdg_toplevel_set_title(xdgToplevel, name.c_str()); while (wl_display_dispatch(display) != -1 && !configured) {} wl_surface_commit(surface); zxdg_toplevel_decoration_v1* decoration = zxdg_decoration_manager_v1_get_toplevel_decoration(manager, xdgToplevel); zxdg_toplevel_decoration_v1_set_mode(decoration, ZXDG_TOPLEVEL_DECORATION_V1_MODE_SERVER_SIDE); // Create a wl_buffer, attach it to the surface and commit the surface int stride = width * 4; int size = stride * height; // Allocate a shared memory file with the right size int fd = create_shm_file(size); if (fd < 0) { fprintf(stderr, "creating a buffer file for %d B failed: %m\n", size); } // Map the shared memory file framebuffer = reinterpret_cast(mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0)); if (framebuffer == MAP_FAILED) { fprintf(stderr, "mmap failed: %m\n"); close(fd); } // Create a wl_buffer from our shared memory file descriptor wl_shm_pool *pool = wl_shm_create_pool(shm, fd, size); buffer = wl_shm_pool_create_buffer(pool, 0, width, height, stride, WL_SHM_FORMAT_ARGB8888); wl_shm_pool_destroy(pool); // Now that we've mapped the file and created the wl_buffer, we no longer // need to keep file descriptor opened close(fd); if (buffer == NULL) { exit(EXIT_FAILURE); } wl_surface_attach(surface, buffer, 0, 0); wl_surface_commit(surface); } ScaleData Window::ScaleElement(const UiElement& element) { ScaleData data; if(element.ignoreScaling) { if(element.useRelativeSize) { data.width = element.relativeWidth*width; data.height = element.relativeHeight*height; } else { data.width = element.absoluteWidth; data.height = element.absoluteHeight; } } else { if(element.useRelativeSize) { data.width = element.relativeWidth*width*scale; data.height = element.relativeHeight*height*scale; } else { data.width = element.absoluteWidth*scale; data.height = element.absoluteHeight*scale; } } data.x = (element.anchorX*width)-(element.anchorOffsetX*data.width); data.y = (element.anchorY*height)-(element.anchorOffsetY*data.height); return data; } ScaleData ScaleElement(const UiElement& element, const ScaleData& parent, const Window* window) { ScaleData data; if(element.ignoreScaling) { if(element.useRelativeSize) { data.width = element.relativeWidth*parent.width; data.height = element.relativeHeight*parent.height; } else { data.width = element.absoluteWidth; data.height = element.absoluteHeight; } } else { if(element.useRelativeSize) { data.width = element.relativeWidth*parent.width*window->scale; data.height = element.relativeHeight*parent.height*window->scale; } else { data.width = element.absoluteWidth*window->scale; data.height = element.absoluteHeight*window->scale; } } data.x = ((element.anchorX*parent.width)-(element.anchorOffsetX*data.width))+parent.x; data.y = ((element.anchorY*parent.height)-(element.anchorOffsetY*data.height))+parent.y; return data; } static void xdg_wm_base_handle_ping(void* data, xdg_wm_base* xdg_wm_base, std::uint32_t serial) { xdg_wm_base_pong(xdg_wm_base, serial); } xdg_wm_base_listener xdgWmBaseListener = { .ping = xdg_wm_base_handle_ping, }; void RenderElements(Window* window, const UiElement& parent, const ScaleData& parentScale) { std::vector drawOrder; drawOrder.reserve(parent.children.size()); for (const std::unique_ptr& e : parent.children) drawOrder.push_back(e.get()); std::sort(drawOrder.begin(), drawOrder.end(), [](UiElement* a, UiElement* b){ return a->z < b->z; }); for(const UiElement* element : drawOrder) { ScaleData data = ScaleElement(*element, parentScale, window); std::vector scaled(data.width*data.height); ScaleBitmapR8G8B8(scaled.data(), element->buffer.data(), element->bufferWidth, element->bufferHeight, data.width, data.height); for (std::int32_t x = data.x; x - data.x < data.width; x++) { for (std::int32_t y = data.y; y - data.y < data.height; y++) { if (x >= 0 && x < window->width && y >= 0 && y < window->height) { Pixel_BU8_GU8_RU8_AU8& dst = window->framebuffer[y * window->width + x]; const Pixel_BU8_GU8_RU8_AU8& src = scaled[(y - data.y) * data.width + (x - data.x)]; float srcA = src.a / 255.0f; float dstA = dst.a / 255.0f; float outA = srcA + dstA * (1.0f - srcA); if (outA > 0.0f) { dst.r = static_cast((src.r * srcA + dst.r * dstA * (1.0f - srcA)) / outA); dst.g = static_cast((src.g * srcA + dst.g * dstA * (1.0f - srcA)) / outA); dst.b = static_cast((src.b * srcA + dst.b * dstA * (1.0f - srcA)) / outA); dst.a = static_cast(outA * 255); } } } } RenderElements(window, *element, data); } } void Window::wl_surface_frame_done(void* data, struct wl_callback *cb, uint32_t time) { wl_callback_destroy(cb); Window* window = reinterpret_cast(data); cb = wl_surface_frame(window->surface); wl_callback_add_listener(cb, &Window::surface_frame_listener, window); std::vector drawOrder; drawOrder.reserve(window->elements.size()); for (UiElement& e : window->elements) drawOrder.push_back(&e); std::sort(drawOrder.begin(), drawOrder.end(), [](UiElement* a, UiElement* b){ return a->z < b->z; }); for(const UiElement* element : drawOrder) { ScaleData data = window->ScaleElement(*element); std::vector scaled(data.width*data.height); ScaleBitmapR8G8B8(scaled.data(), element->buffer.data(), element->bufferWidth, element->bufferHeight, data.width, data.height); for (std::int32_t x = data.x; x - data.x < data.width; x++) { for (std::int32_t y = data.y; y - data.y < data.height; y++) { if (x >= 0 && x < window->width && y >= 0 && y < window->height) { Pixel_BU8_GU8_RU8_AU8& dst = window->framebuffer[y * window->width + x]; const Pixel_BU8_GU8_RU8_AU8& src = scaled[(y - data.y) * data.width + (x - data.x)]; float srcA = src.a / 255.0f; float dstA = dst.a / 255.0f; float outA = srcA + dstA * (1.0f - srcA); if (outA > 0.0f) { dst.r = static_cast((src.r * srcA + dst.r * dstA * (1.0f - srcA)) / outA); dst.g = static_cast((src.g * srcA + dst.g * dstA * (1.0f - srcA)) / outA); dst.b = static_cast((src.b * srcA + dst.b * dstA * (1.0f - srcA)) / outA); dst.a = static_cast(outA * 255); } } } } RenderElements(window, *element, data); } wl_surface_attach(window->surface, window->buffer, 0, 0); wl_surface_damage(window->surface, 0, 0, window->width, window->height); wl_surface_commit(window->surface); } wl_callback_listener Window::surface_frame_listener = { .done = wl_surface_frame_done, }; void Window::pointer_handle_button(void* data, wl_pointer* pointer, std::uint32_t serial, std::uint32_t time, std::uint32_t button, std::uint32_t state) { Window* window = reinterpret_cast(data); if (button == BTN_LEFT) { if(state == WL_POINTER_BUTTON_STATE_PRESSED) { window->mouseLeftHeld = true; window->onMouseLeftClick.Invoke(window->currentMousePos); for(UiElement& element : window->elements) { ScaleData data = window->ScaleElement(element); if(window->currentMousePos.x >= data.x && window->currentMousePos.x <= data.x+data.width && window->currentMousePos.y > data.y && window->currentMousePos.y < data.y+data.height) { element.onMouseLeftClick.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } } else { window->mouseLeftHeld = false; window->onMouseLeftRelease.Invoke(window->currentMousePos); for(UiElement& element : window->elements) { ScaleData data = window->ScaleElement(element); if(window->currentMousePos.x >= data.x && window->currentMousePos.x <= data.x+data.width && window->currentMousePos.y > data.y && window->currentMousePos.y < data.y+data.height) { element.onMouseLeftRelease.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } } } else if(button == BTN_RIGHT){ if(state == WL_POINTER_BUTTON_STATE_PRESSED) { window->mouseRightHeld = true; window->onMouseRightClick.Invoke(window->currentMousePos); for(UiElement& element : window->elements) { ScaleData data = window->ScaleElement(element); if(window->currentMousePos.x >= data.x && window->currentMousePos.x <= data.x+data.width && window->currentMousePos.y > data.y && window->currentMousePos.y < data.y+data.height) { element.onMouseRightClick.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } } else { window->mouseRightHeld = true; window->onMouseRightRelease.Invoke(window->currentMousePos); for(UiElement& element : window->elements) { ScaleData data = window->ScaleElement(element); if(window->currentMousePos.x >= data.x && window->currentMousePos.x <= data.x+data.width && window->currentMousePos.y > data.y && window->currentMousePos.y < data.y+data.height) { element.onMouseRightRelease.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } } } } void Window::PointerListenerHandleMotion(void* data, wl_pointer* wl_pointer, uint time, wl_fixed_t surface_x, wl_fixed_t surface_y) { Window* window = reinterpret_cast(data); MousePoint pos = {wl_fixed_to_double(surface_x), wl_fixed_to_double(surface_y)}; window->lastMousePos = window->currentMousePos; window->currentMousePos = pos; window->mouseDelta = {window->currentMousePos.x-window->lastMousePos.x, window->currentMousePos.y-window->lastMousePos.y}; window->onMouseMove.Invoke({window->lastMousePos, window->currentMousePos, window->mouseDelta}); for(UiElement& element : window->elements) { ScaleData data = window->ScaleElement(element); if(window->currentMousePos.x >= data.x && window->currentMousePos.x <= data.x+data.width && window->currentMousePos.y > data.y && window->currentMousePos.y < data.y+data.height) { element.onMouseMove.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); if(!(window->lastMousePos.x >= data.x && window->lastMousePos.x <= data.x+data.width && window->lastMousePos.y > data.y && window->lastMousePos.y < data.y+data.height)) { element.onMouseEnter.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } else if(window->lastMousePos.x >= data.x && window->lastMousePos.x <= data.x+data.width && window->lastMousePos.y > data.y && window->lastMousePos.y < data.y+data.height) { element.onMouseLeave.Invoke({window->currentMousePos.x-data.x, window->currentMousePos.y-data.y}); } } } void Window::PointerListenerHandleEnter(void* data, wl_pointer* wl_pointer, uint serial, wl_surface* surface, wl_fixed_t surface_x, wl_fixed_t surface_y) { Window* window = reinterpret_cast(data); window->onMouseEnter.Invoke({window->lastMousePos, window->currentMousePos, window->mouseDelta}); } void Window::PointerListenerHandleLeave(void* data, wl_pointer*, std::uint32_t, wl_surface*) { Window* window = reinterpret_cast(data); window->onMouseEnter.Invoke({window->lastMousePos, window->currentMousePos, window->mouseDelta}); } void Window::PointerListenerHandleAxis(void*, wl_pointer*, std::uint32_t, std::uint32_t, wl_fixed_t value) { } wl_pointer_listener Window::pointer_listener = { .enter = Window::PointerListenerHandleEnter, .leave = Window::PointerListenerHandleLeave, .motion = Window::PointerListenerHandleMotion, .button = Window::pointer_handle_button, .axis = Window::PointerListenerHandleAxis, }; xkb_keymap* xkb_keymap; xkb_context* xkb_context = xkb_context_new(XKB_CONTEXT_NO_FLAGS); xkb_state* xkb_state; void keyboard_keymap(void *data, wl_keyboard *keyboard, uint32_t format, int fd, uint32_t size) { if (format != WL_KEYBOARD_KEYMAP_FORMAT_XKB_V1) { close(fd); fprintf(stderr, "Unsupported keymap format\n"); return; } void *map = mmap(NULL, size, PROT_READ, MAP_SHARED, fd, 0); if (map == MAP_FAILED) { close(fd); perror("mmap"); return; } xkb_context = xkb_context_new(XKB_CONTEXT_NO_FLAGS); xkb_keymap = xkb_keymap_new_from_string(xkb_context, (const char *)map, XKB_KEYMAP_FORMAT_TEXT_V1,XKB_KEYMAP_COMPILE_NO_FLAGS); munmap(map, size); close(fd); xkb_state = xkb_state_new(xkb_keymap); } void keyboard_enter(void *data, wl_keyboard *keyboard, uint32_t serial, wl_surface *surface, wl_array *keys) { } void keyboard_leave(void *data, wl_keyboard *keyboard, uint32_t serial, wl_surface *surface) { } void keyboard_key(void *data, wl_keyboard *keyboard, uint32_t serial, uint32_t time, uint32_t key, uint32_t state) { if (!xkb_state) { return; } Window* window = reinterpret_cast(data); xkb_keycode_t keycode = key + 8; xkb_keysym_t keysym = xkb_state_key_get_one_sym(xkb_state, keycode); char utf8[8] = {0}; int len = xkb_keysym_to_utf8(keysym, utf8, sizeof(utf8)); if (len != 0) { char keypress = utf8[0]; if(state == WL_KEYBOARD_KEY_STATE_PRESSED) { if(window->heldkeys[keypress]) { window->onKeyHold[keypress].Invoke(); window->onAnyKeyHold.Invoke(keypress); } else{ window->heldkeys[keypress] = true; window->onKeyDown[keypress].Invoke(); window->onAnyKeyDown.Invoke(keypress); } } else{ window->heldkeys[keypress] = false; window->onKeyUp[keypress].Invoke(); window->onAnyKeyUp.Invoke(keypress); } } else { // // fallback for keys like Return, Escape, etc. // char name[64]; // if (xkb_keysym_get_name(keysym, name, sizeof(name)) > 0) { // printf("Key %s pressed (non-printable or multi-char)\n", name); // } } } void keyboard_modifiers(void *data, wl_keyboard *keyboard, uint32_t serial, uint32_t mods_depressed, uint32_t mods_latched, uint32_t mods_locked, uint32_t group) { } void keyboard_repeat_info(void *data, wl_keyboard *keyboard, int32_t rate, int32_t delay) { } wl_keyboard_listener Window::keyboard_listener = { .keymap = keyboard_keymap, .enter = keyboard_enter, .leave = keyboard_leave, .key = keyboard_key, .modifiers = keyboard_modifiers, .repeat_info = keyboard_repeat_info, }; void Window::seat_handle_capabilities(void* data, wl_seat* seat, uint32_t capabilities) { Window* window = reinterpret_cast(data); window->seat = seat; if (capabilities & WL_SEAT_CAPABILITY_POINTER) { wl_pointer* pointer = wl_seat_get_pointer(seat); wl_pointer_add_listener(pointer, &pointer_listener, window); } if (capabilities & WL_SEAT_CAPABILITY_KEYBOARD) { wl_keyboard* keyboard = wl_seat_get_keyboard(seat); wl_keyboard_add_listener(keyboard, &keyboard_listener, window); } } wl_seat_listener Window::seat_listener = { .capabilities = seat_handle_capabilities, }; void Window::handle_global(void *data, wl_registry *registry, std::uint32_t name, const char *interface, std::uint32_t version) { Window* window = reinterpret_cast(data); if (strcmp(interface, wl_shm_interface.name) == 0) { window->shm = reinterpret_cast(wl_registry_bind(registry, name, &wl_shm_interface, 1)); } else if (strcmp(interface, wl_seat_interface.name) == 0) { wl_seat* seat = reinterpret_cast(wl_registry_bind(registry, name, &wl_seat_interface, 1)); wl_seat_add_listener(seat, &seat_listener, window); } else if (compositor == NULL && strcmp(interface, wl_compositor_interface.name) == 0) { compositor = reinterpret_cast(wl_registry_bind(registry, name, &wl_compositor_interface, 1)); } else if (strcmp(interface, xdg_wm_base_interface.name) == 0) { window->xdgWmBase = reinterpret_cast(wl_registry_bind(registry, name, &xdg_wm_base_interface, 1)); xdg_wm_base_add_listener(window->xdgWmBase, &xdgWmBaseListener, NULL); } else if (strcmp(interface, zxdg_decoration_manager_v1_interface.name) == 0) { window->manager = reinterpret_cast(wl_registry_bind(registry, name, &zxdg_decoration_manager_v1_interface, 1)); } } static void handle_global_remove(void* data, wl_registry* registry, uint32_t name) { } wl_registry_listener Window::registry_listener = { .global = Window::handle_global, .global_remove = handle_global_remove, }; static void noop5(void*, xdg_toplevel*, std::int32_t, std::int32_t, wl_array*){ } void Window::xdg_toplevel_handle_close(void* data, xdg_toplevel*) { Window* window = reinterpret_cast(data); window->onClose.Invoke(); window->open = false; } xdg_toplevel_listener Window::xdg_toplevel_listener = { .configure = noop5, .close = Window::xdg_toplevel_handle_close, }; void Window::xdg_surface_handle_configure(void* data, xdg_surface* xdg_surface, std::uint32_t serial) { Window* window = reinterpret_cast(data); // The compositor configures our surface, acknowledge the configure event xdg_surface_ack_configure(xdg_surface, serial); if (window->configured) { // If this isn't the first configure event we've received, we already // have a buffer attached, so no need to do anything. Commit the // surface to apply the configure acknowledgement. wl_surface_commit(window->surface); } window->configured = true; } xdg_surface_listener Window::xdg_surface_listener = { .configure = xdg_surface_handle_configure, }; Window::~Window() { xdg_toplevel_destroy(xdgToplevel); xdg_surface_destroy(xdgSurface); wl_surface_destroy(surface); wl_buffer_destroy(buffer); } void Window::StartSync() { while (open && wl_display_dispatch(display) != -1) { } }