/* * Copyright © 2008-2010 Kristian Høgsberg * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software Foundation, * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "compositor.h" #define ARRAY_SIZE(array) (sizeof(array) / sizeof(array[0])) struct x11_compositor { struct wlsc_compositor base; Display *dpy; xcb_connection_t *conn; xcb_screen_t *screen; xcb_cursor_t null_cursor; struct wl_array keys; struct wl_event_source *xcb_source; struct { xcb_atom_t wm_protocols; xcb_atom_t wm_normal_hints; xcb_atom_t wm_size_hints; xcb_atom_t wm_delete_window; xcb_atom_t wm_class; xcb_atom_t net_wm_name; xcb_atom_t net_wm_icon; xcb_atom_t net_wm_state; xcb_atom_t net_wm_state_fullscreen; xcb_atom_t string; xcb_atom_t utf8_string; xcb_atom_t cardinal; } atom; }; struct x11_output { struct wlsc_output base; xcb_window_t window; EGLSurface egl_surface; struct wlsc_mode mode; }; struct x11_input { struct wlsc_input_device base; }; static int x11_input_create(struct x11_compositor *c) { struct x11_input *input; input = malloc(sizeof *input); if (input == NULL) return -1; memset(input, 0, sizeof *input); wlsc_input_device_init(&input->base, &c->base); c->base.input_device = &input->base.input_device; return 0; } static int x11_compositor_init_egl(struct x11_compositor *c) { EGLint major, minor; EGLint n; const char *extensions; EGLint config_attribs[] = { EGL_SURFACE_TYPE, EGL_WINDOW_BIT, EGL_RED_SIZE, 1, EGL_GREEN_SIZE, 1, EGL_BLUE_SIZE, 1, EGL_DEPTH_SIZE, 1, EGL_RENDERABLE_TYPE, EGL_OPENGL_ES2_BIT, EGL_NONE }; static const EGLint context_attribs[] = { EGL_CONTEXT_CLIENT_VERSION, 2, EGL_NONE }; setenv("EGL_PLATFORM", "x11", 1); c->base.display = eglGetDisplay(c->dpy); if (c->base.display == NULL) { fprintf(stderr, "failed to create display\n"); return -1; } if (!eglInitialize(c->base.display, &major, &minor)) { fprintf(stderr, "failed to initialize display\n"); return -1; } extensions = eglQueryString(c->base.display, EGL_EXTENSIONS); if (!strstr(extensions, "EGL_KHR_surfaceless_opengl")) { fprintf(stderr, "EGL_KHR_surfaceless_opengl not available\n"); return -1; } if (!eglBindAPI(EGL_OPENGL_ES_API)) { fprintf(stderr, "failed to bind EGL_OPENGL_ES_API\n"); return -1; } if (!eglChooseConfig(c->base.display, config_attribs, &c->base.config, 1, &n) || n == 0) { fprintf(stderr, "failed to choose config: %d\n", n); return -1; } c->base.context = eglCreateContext(c->base.display, c->base.config, EGL_NO_CONTEXT, context_attribs); if (c->base.context == NULL) { fprintf(stderr, "failed to create context\n"); return -1; } if (!eglMakeCurrent(c->base.display, EGL_NO_SURFACE, EGL_NO_SURFACE, c->base.context)) { fprintf(stderr, "failed to make context current\n"); return -1; } return 0; } static int x11_output_prepare_render(struct wlsc_output *output_base) { struct x11_output *output = (struct x11_output *) output_base; struct wlsc_compositor *ec = output->base.compositor; if (!eglMakeCurrent(ec->display, output->egl_surface, output->egl_surface, ec->context)) { fprintf(stderr, "failed to make current\n"); return -1; } return 0; } static int x11_output_present(struct wlsc_output *output_base) { struct x11_output *output = (struct x11_output *) output_base; struct wlsc_compositor *ec = output->base.compositor; struct timeval tv; uint32_t msec; if (x11_output_prepare_render(&output->base)) return -1; eglSwapBuffers(ec->display, output->egl_surface); gettimeofday(&tv, NULL); msec = tv.tv_sec * 1000 + tv.tv_usec / 1000; wlsc_output_finish_frame(&output->base, msec); return 0; } static int x11_output_prepare_scanout_surface(struct wlsc_output *output_base, struct wlsc_surface *es) { return -1; } static int x11_output_set_cursor(struct wlsc_output *output_base, struct wlsc_input_device *input) { return -1; } static void x11_output_destroy(struct wlsc_output *output_base) { return; } static void x11_output_set_wm_protocols(struct x11_output *output) { xcb_atom_t list[1]; struct x11_compositor *c = (struct x11_compositor *) output->base.compositor; list[0] = c->atom.wm_delete_window; xcb_change_property (c->conn, XCB_PROP_MODE_REPLACE, output->window, c->atom.wm_protocols, XCB_ATOM_ATOM, 32, ARRAY_SIZE(list), list); } static void x11_output_change_state(struct x11_output *output, int add, xcb_atom_t state) { xcb_client_message_event_t event; struct x11_compositor *c = (struct x11_compositor *) output->base.compositor; xcb_screen_iterator_t iter; #define _NET_WM_STATE_REMOVE 0 /* remove/unset property */ #define _NET_WM_STATE_ADD 1 /* add/set property */ #define _NET_WM_STATE_TOGGLE 2 /* toggle property */ memset(&event, 0, sizeof event); event.response_type = XCB_CLIENT_MESSAGE; event.format = 32; event.window = output->window; event.type = c->atom.net_wm_state; event.data.data32[0] = add ? _NET_WM_STATE_ADD : _NET_WM_STATE_REMOVE; event.data.data32[1] = state; event.data.data32[2] = 0; event.data.data32[3] = 0; event.data.data32[4] = 0; iter = xcb_setup_roots_iterator(xcb_get_setup(c->conn)); xcb_send_event(c->conn, 0, iter.data->root, XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY | XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT, (void *) &event); } struct wm_normal_hints { uint32_t flags; uint32_t pad[4]; int32_t min_width, min_height; int32_t max_width, max_height; int32_t width_inc, height_inc; int32_t min_aspect_x, min_aspect_y; int32_t max_aspect_x, max_aspect_y; int32_t base_width, base_height; int32_t win_gravity; }; #define WM_NORMAL_HINTS_MIN_SIZE 16 #define WM_NORMAL_HINTS_MAX_SIZE 32 static void x11_output_set_icon(struct x11_compositor *c, struct x11_output *output, const char *filename) { uint32_t *icon, *pixels, stride; int32_t width, height; pixels = wlsc_load_image(filename, &width, &height, &stride); if (!pixels) return; icon = malloc(width * height * 4 + 8); if (!icon) { free(pixels); return; } icon[0] = width; icon[1] = height; memcpy(icon + 2, pixels, width * height * 4); xcb_change_property(c->conn, XCB_PROP_MODE_REPLACE, output->window, c->atom.net_wm_icon, c->atom.cardinal, 32, width * height + 2, icon); free(icon); free(pixels); } static int x11_compositor_create_output(struct x11_compositor *c, int x, int y, int width, int height, int fullscreen) { static const char name[] = "Wayland Compositor"; static const char class[] = "wayland-1\0Wayland Compositor"; struct x11_output *output; xcb_screen_iterator_t iter; struct wm_normal_hints normal_hints; uint32_t mask = XCB_CW_EVENT_MASK | XCB_CW_CURSOR; uint32_t values[2] = { XCB_EVENT_MASK_KEY_PRESS | XCB_EVENT_MASK_KEY_RELEASE | XCB_EVENT_MASK_BUTTON_PRESS | XCB_EVENT_MASK_BUTTON_RELEASE | XCB_EVENT_MASK_POINTER_MOTION | XCB_EVENT_MASK_EXPOSURE | XCB_EVENT_MASK_STRUCTURE_NOTIFY | XCB_EVENT_MASK_ENTER_WINDOW | XCB_EVENT_MASK_LEAVE_WINDOW | XCB_EVENT_MASK_KEYMAP_STATE | XCB_EVENT_MASK_FOCUS_CHANGE, 0 }; output = malloc(sizeof *output); if (output == NULL) return -1; memset(output, 0, sizeof *output); output->mode.flags = WL_OUTPUT_MODE_CURRENT | WL_OUTPUT_MODE_PREFERRED; output->mode.width = width; output->mode.height = height; output->mode.refresh = 60; wl_list_init(&output->base.mode_list); wl_list_insert(&output->base.mode_list, &output->mode.link); output->base.current = &output->mode; wlsc_output_init(&output->base, &c->base, x, y, width, height, WL_OUTPUT_FLIPPED); values[1] = c->null_cursor; output->window = xcb_generate_id(c->conn); iter = xcb_setup_roots_iterator(xcb_get_setup(c->conn)); xcb_create_window(c->conn, XCB_COPY_FROM_PARENT, output->window, iter.data->root, 0, 0, width, height, 0, XCB_WINDOW_CLASS_INPUT_OUTPUT, iter.data->root_visual, mask, values); /* Don't resize me. */ memset(&normal_hints, 0, sizeof normal_hints); normal_hints.flags = WM_NORMAL_HINTS_MAX_SIZE | WM_NORMAL_HINTS_MIN_SIZE; normal_hints.min_width = width; normal_hints.min_height = height; normal_hints.max_width = width; normal_hints.max_height = height; xcb_change_property (c->conn, XCB_PROP_MODE_REPLACE, output->window, c->atom.wm_normal_hints, c->atom.wm_size_hints, 32, sizeof normal_hints / 4, (uint8_t *) &normal_hints); /* Set window name. Don't bother with non-EWMH WMs. */ xcb_change_property(c->conn, XCB_PROP_MODE_REPLACE, output->window, c->atom.net_wm_name, c->atom.utf8_string, 8, strlen(name), name); xcb_change_property(c->conn, XCB_PROP_MODE_REPLACE, output->window, c->atom.wm_class, c->atom.string, 8, sizeof class, class); x11_output_set_icon(c, output, DATADIR "/wayland/wayland.png"); xcb_map_window(c->conn, output->window); x11_output_set_wm_protocols(output); if (fullscreen) x11_output_change_state(output, 1, c->atom.net_wm_state_fullscreen); output->egl_surface = eglCreateWindowSurface(c->base.display, c->base.config, output->window, NULL); if (!output->egl_surface) { fprintf(stderr, "failed to create window surface\n"); return -1; } if (!eglMakeCurrent(c->base.display, output->egl_surface, output->egl_surface, c->base.context)) { fprintf(stderr, "failed to make surface current\n"); return -1; } output->base.prepare_render = x11_output_prepare_render; output->base.present = x11_output_present; output->base.prepare_scanout_surface = x11_output_prepare_scanout_surface; output->base.set_hardware_cursor = x11_output_set_cursor; output->base.destroy = x11_output_destroy; wl_list_insert(c->base.output_list.prev, &output->base.link); return 0; } static struct x11_output * x11_compositor_find_output(struct x11_compositor *c, xcb_window_t window) { struct x11_output *output; wl_list_for_each(output, &c->base.output_list, base.link) { if (output->window == window) return output; } return NULL; } static int x11_compositor_next_event(struct x11_compositor *c, xcb_generic_event_t **event, uint32_t mask) { if (mask & WL_EVENT_READABLE) { *event = xcb_poll_for_event(c->conn); } else { #ifdef HAVE_XCB_POLL_FOR_QUEUED_EVENT *event = xcb_poll_for_queued_event(c->conn); #else *event = xcb_poll_for_event(c->conn); #endif } return *event != NULL; } static int x11_compositor_handle_event(int fd, uint32_t mask, void *data) { struct x11_compositor *c = data; struct x11_output *output; xcb_generic_event_t *event, *prev; xcb_client_message_event_t *client_message; xcb_motion_notify_event_t *motion_notify; xcb_enter_notify_event_t *enter_notify; xcb_key_press_event_t *key_press, *key_release; xcb_button_press_event_t *button_press; xcb_keymap_notify_event_t *keymap_notify; xcb_focus_in_event_t *focus_in; xcb_atom_t atom; uint32_t *k; int i, set; prev = NULL; while (x11_compositor_next_event(c, &event, mask)) { switch (prev ? prev->response_type & ~0x80 : 0x80) { case XCB_KEY_RELEASE: key_release = (xcb_key_press_event_t *) prev; key_press = (xcb_key_press_event_t *) event; if ((event->response_type & ~0x80) == XCB_KEY_PRESS && key_release->time == key_press->time && key_release->detail == key_press->detail) { /* Don't deliver the held key release * event or the new key press event. */ free(event); free(prev); prev = NULL; continue; } else { /* Deliver the held key release now * and fall through and handle the new * event below. */ notify_key(c->base.input_device, key_release->time, key_release->detail - 8, 0); free(prev); prev = NULL; break; } case XCB_FOCUS_IN: /* assert event is keymap_notify */ focus_in = (xcb_focus_in_event_t *) prev; keymap_notify = (xcb_keymap_notify_event_t *) event; c->keys.size = 0; for (i = 0; i < ARRAY_LENGTH(keymap_notify->keys) * 8; i++) { set = keymap_notify->keys[i >> 3] & (1 << (i & 7)); if (set) { k = wl_array_add(&c->keys, sizeof *k); *k = i; } } output = x11_compositor_find_output(c, focus_in->event); notify_keyboard_focus(c->base.input_device, wlsc_compositor_get_time(), &output->base, &c->keys); free(prev); prev = NULL; break; default: /* No previous event held */ break; } switch (event->response_type & ~0x80) { case XCB_KEY_PRESS: key_press = (xcb_key_press_event_t *) event; notify_key(c->base.input_device, key_press->time, key_press->detail - 8, 1); break; case XCB_KEY_RELEASE: prev = event; break; case XCB_BUTTON_PRESS: button_press = (xcb_button_press_event_t *) event; notify_button(c->base.input_device, button_press->time, button_press->detail + BTN_LEFT - 1, 1); break; case XCB_BUTTON_RELEASE: button_press = (xcb_button_press_event_t *) event; notify_button(c->base.input_device, button_press->time, button_press->detail + BTN_LEFT - 1, 0); break; case XCB_MOTION_NOTIFY: motion_notify = (xcb_motion_notify_event_t *) event; output = x11_compositor_find_output(c, motion_notify->event); notify_motion(c->base.input_device, motion_notify->time, output->base.x + motion_notify->event_x, output->base.y + motion_notify->event_y); break; case XCB_EXPOSE: /* FIXME: schedule output repaint */ /* output = x11_compositor_find_output(c, expose->window); */ wlsc_compositor_schedule_repaint(&c->base); break; case XCB_ENTER_NOTIFY: enter_notify = (xcb_enter_notify_event_t *) event; if (enter_notify->state >= Button1Mask) break; output = x11_compositor_find_output(c, enter_notify->event); notify_pointer_focus(c->base.input_device, enter_notify->time, &output->base, output->base.x + enter_notify->event_x, output->base.y + enter_notify->event_y); break; case XCB_LEAVE_NOTIFY: enter_notify = (xcb_enter_notify_event_t *) event; if (enter_notify->state >= Button1Mask) break; output = x11_compositor_find_output(c, enter_notify->event); notify_pointer_focus(c->base.input_device, enter_notify->time, NULL, output->base.x + enter_notify->event_x, output->base.y + enter_notify->event_y); break; case XCB_CLIENT_MESSAGE: client_message = (xcb_client_message_event_t *) event; atom = client_message->data.data32[0]; if (atom == c->atom.wm_delete_window) wl_display_terminate(c->base.wl_display); break; case XCB_FOCUS_IN: focus_in = (xcb_focus_in_event_t *) event; if (focus_in->mode == XCB_NOTIFY_MODE_WHILE_GRABBED) break; prev = event; break; case XCB_FOCUS_OUT: focus_in = (xcb_focus_in_event_t *) event; if (focus_in->mode == XCB_NOTIFY_MODE_WHILE_GRABBED) break; notify_keyboard_focus(c->base.input_device, wlsc_compositor_get_time(), NULL, NULL); break; default: break; } if (prev != event) free (event); } switch (prev ? prev->response_type & ~0x80 : 0x80) { case XCB_KEY_RELEASE: key_release = (xcb_key_press_event_t *) prev; notify_key(c->base.input_device, key_release->time, key_release->detail - 8, 0); free(prev); prev = NULL; break; default: break; } return event != NULL; } #define F(field) offsetof(struct x11_compositor, field) static void x11_compositor_get_resources(struct x11_compositor *c) { static const struct { const char *name; int offset; } atoms[] = { { "WM_PROTOCOLS", F(atom.wm_protocols) }, { "WM_NORMAL_HINTS", F(atom.wm_normal_hints) }, { "WM_SIZE_HINTS", F(atom.wm_size_hints) }, { "WM_DELETE_WINDOW", F(atom.wm_delete_window) }, { "WM_CLASS", F(atom.wm_class) }, { "_NET_WM_NAME", F(atom.net_wm_name) }, { "_NET_WM_ICON", F(atom.net_wm_icon) }, { "_NET_WM_STATE", F(atom.net_wm_state) }, { "_NET_WM_STATE_FULLSCREEN", F(atom.net_wm_state_fullscreen) }, { "STRING", F(atom.string) }, { "UTF8_STRING", F(atom.utf8_string) }, { "CARDINAL", F(atom.cardinal) }, }; xcb_intern_atom_cookie_t cookies[ARRAY_SIZE(atoms)]; xcb_intern_atom_reply_t *reply; xcb_pixmap_t pixmap; xcb_gc_t gc; int i; uint8_t data[] = { 0, 0, 0, 0 }; for (i = 0; i < ARRAY_SIZE(atoms); i++) cookies[i] = xcb_intern_atom (c->conn, 0, strlen(atoms[i].name), atoms[i].name); for (i = 0; i < ARRAY_SIZE(atoms); i++) { reply = xcb_intern_atom_reply (c->conn, cookies[i], NULL); *(xcb_atom_t *) ((char *) c + atoms[i].offset) = reply->atom; free(reply); } pixmap = xcb_generate_id(c->conn); gc = xcb_generate_id(c->conn); xcb_create_pixmap(c->conn, 1, pixmap, c->screen->root, 1, 1); xcb_create_gc(c->conn, gc, pixmap, 0, NULL); xcb_put_image(c->conn, XCB_IMAGE_FORMAT_XY_PIXMAP, pixmap, gc, 1, 1, 0, 0, 0, 32, sizeof data, data); c->null_cursor = xcb_generate_id(c->conn); xcb_create_cursor (c->conn, c->null_cursor, pixmap, pixmap, 0, 0, 0, 0, 0, 0, 1, 1); xcb_free_gc(c->conn, gc); xcb_free_pixmap(c->conn, pixmap); } static void x11_destroy(struct wlsc_compositor *ec) { wlsc_compositor_shutdown(ec); free(ec); } static struct wlsc_compositor * x11_compositor_create(struct wl_display *display, int width, int height, int count, int fullscreen) { struct x11_compositor *c; struct wl_event_loop *loop; xcb_screen_iterator_t s; int i, x; c = malloc(sizeof *c); if (c == NULL) return NULL; memset(c, 0, sizeof *c); c->dpy = XOpenDisplay(NULL); if (c->dpy == NULL) return NULL; c->conn = XGetXCBConnection(c->dpy); XSetEventQueueOwner(c->dpy, XCBOwnsEventQueue); if (xcb_connection_has_error(c->conn)) return NULL; s = xcb_setup_roots_iterator(xcb_get_setup(c->conn)); c->screen = s.data; wl_array_init(&c->keys); x11_compositor_get_resources(c); c->base.wl_display = display; if (x11_compositor_init_egl(c) < 0) return NULL; c->base.destroy = x11_destroy; /* Can't init base class until we have a current egl context */ if (wlsc_compositor_init(&c->base, display) < 0) return NULL; for (i = 0, x = 0; i < count; i++) { if (x11_compositor_create_output(c, x, 0, width, height, fullscreen) < 0) return NULL; x += width; } if (x11_input_create(c) < 0) return NULL; loop = wl_display_get_event_loop(c->base.wl_display); c->xcb_source = wl_event_loop_add_fd(loop, xcb_get_file_descriptor(c->conn), WL_EVENT_READABLE, x11_compositor_handle_event, c); wl_event_source_check(c->xcb_source); return &c->base; } struct wlsc_compositor * backend_init(struct wl_display *display, char *options); WL_EXPORT struct wlsc_compositor * backend_init(struct wl_display *display, char *options) { int width = 1024, height = 640, fullscreen = 0, count = 1, i; char *p, *value; static char * const tokens[] = { "width", "height", "fullscreen", "output-count", NULL }; p = options; while (i = getsubopt(&p, tokens, &value), i != -1) { switch (i) { case 0: width = strtol(value, NULL, 0); break; case 1: height = strtol(value, NULL, 0); break; case 2: fullscreen = 1; break; case 3: count = strtol(value, NULL, 0); break; } } return x11_compositor_create(display, width, height, count, fullscreen); }