2 * Copyright © 2008 Kristian Høgsberg
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software Foundation,
16 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 #include <sys/ioctl.h>
27 #include <gdk-pixbuf/gdk-pixbuf.h>
30 #include <linux/input.h>
32 #include "wayland-server-protocol.h"
33 #include "compositor.h"
35 const char *option_background = "background.jpg";
36 int option_connector = 0;
38 static const GOptionEntry option_entries[] = {
39 { "background", 'b', 0, G_OPTION_ARG_STRING,
40 &option_background, "Background image" },
41 { "connector", 'c', 0, G_OPTION_ARG_INT,
42 &option_connector, "KMS connector" },
47 wlsc_input_device_set_pointer_focus(struct wlsc_input_device *device,
48 struct wlsc_surface *surface,
51 int32_t sx, int32_t sy);
54 wlsc_matrix_init(struct wlsc_matrix *matrix)
56 static const struct wlsc_matrix identity = {
57 { 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1 }
60 memcpy(matrix, &identity, sizeof identity);
64 wlsc_matrix_multiply(struct wlsc_matrix *m, const struct wlsc_matrix *n)
66 struct wlsc_matrix tmp;
67 const GLfloat *row, *column;
71 for (i = 0; i < 16; i++) {
74 row = m->d + d.quot * 4;
75 column = n->d + d.rem;
76 for (j = 0; j < 4; j++)
77 tmp.d[i] += row[j] * column[j * 4];
79 memcpy(m, &tmp, sizeof tmp);
83 wlsc_matrix_translate(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
85 struct wlsc_matrix translate = {
86 { 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, x, y, z, 1 }
89 wlsc_matrix_multiply(matrix, &translate);
93 wlsc_matrix_scale(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
95 struct wlsc_matrix scale = {
96 { x, 0, 0, 0, 0, y, 0, 0, 0, 0, z, 0, 0, 0, 0, 1 }
99 wlsc_matrix_multiply(matrix, &scale);
103 wlsc_matrix_transform(struct wlsc_matrix *matrix, struct wlsc_vector *v)
106 struct wlsc_vector t;
108 for (i = 0; i < 4; i++) {
110 for (j = 0; j < 4; j++)
111 t.f[i] += v->f[j] * matrix->d[i + j * 4];
117 static struct wlsc_surface *
118 wlsc_surface_create(struct wlsc_compositor *compositor,
119 struct wl_visual *visual,
120 int32_t x, int32_t y, int32_t width, int32_t height)
122 struct wlsc_surface *surface;
124 surface = malloc(sizeof *surface);
128 glGenTextures(1, &surface->texture);
129 glBindTexture(GL_TEXTURE_2D, surface->texture);
130 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
131 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
132 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
133 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
135 surface->compositor = compositor;
136 surface->visual = visual;
139 surface->width = width;
140 surface->height = height;
141 wlsc_matrix_init(&surface->matrix);
142 wlsc_matrix_scale(&surface->matrix, width, height, 1);
143 wlsc_matrix_translate(&surface->matrix, x, y, 0);
145 wlsc_matrix_init(&surface->matrix_inv);
146 wlsc_matrix_translate(&surface->matrix_inv, -x, -y, 0);
147 wlsc_matrix_scale(&surface->matrix_inv, 1.0 / width, 1.0 / height, 1);
153 destroy_surface(struct wl_resource *resource, struct wl_client *client)
155 struct wlsc_surface *surface =
156 container_of(resource, struct wlsc_surface, base.base);
157 struct wlsc_compositor *compositor = surface->compositor;
158 struct wlsc_listener *l;
160 wl_list_remove(&surface->link);
161 glDeleteTextures(1, &surface->texture);
163 wl_list_for_each(l, &compositor->surface_destroy_listener_list, link)
168 wlsc_compositor_schedule_repaint(compositor);
172 texture_from_png(const char *filename, int width, int height)
175 GError *error = NULL;
179 pixbuf = gdk_pixbuf_new_from_file_at_scale(filename,
185 data = gdk_pixbuf_get_pixels(pixbuf);
187 if (gdk_pixbuf_get_has_alpha(pixbuf))
192 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA,
193 width, height, 0, format, GL_UNSIGNED_BYTE, data);
195 gdk_pixbuf_unref(pixbuf);
200 static const struct {
201 const char *filename;
202 int hotspot_x, hotspot_y;
203 } pointer_images[] = {
204 { DATADIR "/wayland/bottom_left_corner.png", 6, 30 },
205 { DATADIR "/wayland/bottom_right_corner.png", 28, 28 },
206 { DATADIR "/wayland/bottom_side.png", 16, 20 },
207 { DATADIR "/wayland/grabbing.png", 20, 17 },
208 { DATADIR "/wayland/left_ptr.png", 10, 5 },
209 { DATADIR "/wayland/left_side.png", 10, 20 },
210 { DATADIR "/wayland/right_side.png", 30, 19 },
211 { DATADIR "/wayland/top_left_corner.png", 8, 8 },
212 { DATADIR "/wayland/top_right_corner.png", 26, 8 },
213 { DATADIR "/wayland/top_side.png", 18, 8 },
214 { DATADIR "/wayland/xterm.png", 15, 15 }
218 create_pointer_images(struct wlsc_compositor *ec)
222 const int width = 32, height = 32;
224 EGLint image_attribs[] = {
227 EGL_IMAGE_FORMAT_MESA, EGL_IMAGE_FORMAT_ARGB8888_MESA,
228 EGL_IMAGE_USE_MESA, EGL_IMAGE_USE_SCANOUT_MESA,
232 glGenTextures(1, &texture);
233 glBindTexture(GL_TEXTURE_2D, texture);
234 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
235 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
236 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
237 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
239 image_attribs[1] = width;
240 image_attribs[3] = height;
241 count = ARRAY_LENGTH(pointer_images);
242 ec->pointer_buffers = malloc(count * sizeof *ec->pointer_buffers);
243 for (i = 0; i < count; i++) {
244 ec->pointer_buffers[i].image =
245 eglCreateDRMImageMESA(ec->display, image_attribs);
246 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D,
247 ec->pointer_buffers[i].image);
248 texture_from_png(pointer_images[i].filename, width, height);
249 ec->pointer_buffers[i].visual = &ec->argb_visual;
250 ec->pointer_buffers[i].width = width;
251 ec->pointer_buffers[i].height = height;
255 static struct wlsc_surface *
256 background_create(struct wlsc_output *output, const char *filename)
258 struct wlsc_surface *background;
260 GError *error = NULL;
264 background = wlsc_surface_create(output->compositor,
265 &output->compositor->rgb_visual,
266 output->x, output->y,
267 output->width, output->height);
268 if (background == NULL)
271 pixbuf = gdk_pixbuf_new_from_file_at_scale(filename,
280 data = gdk_pixbuf_get_pixels(pixbuf);
282 if (gdk_pixbuf_get_has_alpha(pixbuf))
287 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGB,
288 output->width, output->height, 0,
289 format, GL_UNSIGNED_BYTE, data);
295 wlsc_surface_draw(struct wlsc_surface *es, struct wlsc_output *output)
297 struct wlsc_compositor *ec = es->compositor;
298 struct wlsc_matrix tmp;
301 wlsc_matrix_multiply(&tmp, &output->matrix);
302 glUniformMatrix4fv(ec->proj_uniform, 1, GL_FALSE, tmp.d);
303 glUniform1i(ec->tex_uniform, 0);
305 if (es->visual == &ec->argb_visual) {
306 glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
308 } else if (es->visual == &ec->premultiplied_argb_visual) {
309 glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
315 glBindTexture(GL_TEXTURE_2D, es->texture);
316 glEnable(GL_TEXTURE_2D);
317 glBindBuffer(GL_ARRAY_BUFFER, ec->vbo);
318 glVertexAttribPointer(0, 3, GL_FLOAT, GL_FALSE,
319 5 * sizeof(GLfloat), NULL);
320 glVertexAttribPointer(1, 2, GL_FLOAT, GL_FALSE,
321 5 * sizeof(GLfloat), (GLfloat *) 0 + 3);
322 glEnableVertexAttribArray(0);
323 glEnableVertexAttribArray(1);
324 glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
328 wlsc_surface_raise(struct wlsc_surface *surface)
330 struct wlsc_compositor *compositor = surface->compositor;
332 wl_list_remove(&surface->link);
333 wl_list_insert(&compositor->surface_list, &surface->link);
337 wlsc_surface_update_matrix(struct wlsc_surface *es)
339 wlsc_matrix_init(&es->matrix);
340 wlsc_matrix_scale(&es->matrix, es->width, es->height, 1);
341 wlsc_matrix_translate(&es->matrix, es->x, es->y, 0);
343 wlsc_matrix_init(&es->matrix_inv);
344 wlsc_matrix_translate(&es->matrix_inv, -es->x, -es->y, 0);
345 wlsc_matrix_scale(&es->matrix_inv,
346 1.0 / es->width, 1.0 / es->height, 1);
350 wlsc_compositor_finish_frame(struct wlsc_compositor *compositor, int msecs)
352 wl_display_post_frame(compositor->wl_display,
354 compositor->current_frame, msecs);
356 wl_event_source_timer_update(compositor->timer_source, 5);
357 compositor->current_frame++;
361 wlsc_output_repaint(struct wlsc_output *output)
363 struct wlsc_compositor *ec = output->compositor;
364 struct wlsc_surface *es;
365 struct wlsc_input_device *eid;
367 glViewport(0, 0, output->width, output->height);
369 if (output->background)
370 wlsc_surface_draw(output->background, output);
372 glClear(GL_COLOR_BUFFER_BIT);
374 wl_list_for_each_reverse(es, &ec->surface_list, link)
375 wlsc_surface_draw(es, output);
378 wl_list_for_each(eid, &ec->input_device_list, link)
379 wlsc_surface_draw(eid->sprite, output);
385 struct wlsc_compositor *ec = data;
386 struct wlsc_output *output;
388 if (!ec->repaint_needed) {
389 ec->repaint_on_timeout = 0;
393 wl_list_for_each(output, &ec->output_list, link)
394 wlsc_output_repaint(output);
398 ec->repaint_needed = 0;
402 wlsc_compositor_schedule_repaint(struct wlsc_compositor *compositor)
404 compositor->repaint_needed = 1;
405 if (compositor->repaint_on_timeout)
408 wl_event_source_timer_update(compositor->timer_source, 1);
409 compositor->repaint_on_timeout = 1;
413 surface_destroy(struct wl_client *client,
414 struct wl_surface *surface)
416 wl_resource_destroy(&surface->base, client);
420 surface_attach(struct wl_client *client,
421 struct wl_surface *surface, struct wl_buffer *buffer_base)
423 struct wlsc_surface *es = (struct wlsc_surface *) surface;
424 struct wlsc_buffer *buffer = (struct wlsc_buffer *) buffer_base;
426 glBindTexture(GL_TEXTURE_2D, es->texture);
427 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, buffer->image);
428 es->visual = buffer->visual;
432 surface_map(struct wl_client *client,
433 struct wl_surface *surface,
434 int32_t x, int32_t y, int32_t width, int32_t height)
436 struct wlsc_surface *es = (struct wlsc_surface *) surface;
443 wlsc_surface_update_matrix(es);
447 surface_damage(struct wl_client *client,
448 struct wl_surface *surface,
449 int32_t x, int32_t y, int32_t width, int32_t height)
451 /* FIXME: This need to take a damage region, of course. */
454 const static struct wl_surface_interface surface_interface = {
462 wlsc_input_device_attach(struct wlsc_input_device *device,
463 struct wlsc_buffer *buffer, int x, int y)
465 struct wlsc_compositor *ec = device->ec;
467 glBindTexture(GL_TEXTURE_2D, device->sprite->texture);
468 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, buffer->image);
469 device->sprite->visual = buffer->visual;
470 device->hotspot_x = x;
471 device->hotspot_y = y;
473 device->sprite->x = device->x - device->hotspot_x;
474 device->sprite->y = device->y - device->hotspot_y;
475 device->sprite->width = buffer->width;
476 device->sprite->height = buffer->height;
477 wlsc_surface_update_matrix(device->sprite);
479 wlsc_compositor_schedule_repaint(ec);
484 wlsc_input_device_set_pointer_image(struct wlsc_input_device *device,
485 enum wlsc_pointer_type type)
487 struct wlsc_compositor *compositor = device->ec;
489 wlsc_input_device_attach(device,
490 &compositor->pointer_buffers[type],
491 pointer_images[type].hotspot_x,
492 pointer_images[type].hotspot_y);
496 wlsc_input_device_start_grab(struct wlsc_input_device *device,
498 enum wlsc_grab_type grab)
501 device->grab_surface = device->pointer_focus;
502 device->grab_dx = device->pointer_focus->x - device->grab_x;
503 device->grab_dy = device->pointer_focus->y - device->grab_y;
504 device->grab_width = device->pointer_focus->width;
505 device->grab_height = device->pointer_focus->height;
507 wlsc_input_device_set_pointer_focus(device,
508 (struct wlsc_surface *) &wl_grab_surface,
513 shell_move(struct wl_client *client, struct wl_shell *shell,
514 struct wl_surface *surface,
515 struct wl_input_device *device, uint32_t time)
517 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
519 if (wd->grab != WLSC_DEVICE_GRAB_MOTION ||
520 wd->grab_time != time ||
521 &wd->pointer_focus->base != surface)
524 wlsc_input_device_start_grab(wd, time, WLSC_DEVICE_GRAB_MOVE);
525 wlsc_input_device_set_pointer_image(wd, WLSC_POINTER_DRAGGING);
529 shell_resize(struct wl_client *client, struct wl_shell *shell,
530 struct wl_surface *surface,
531 struct wl_input_device *device, uint32_t time, uint32_t edges)
533 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
534 enum wlsc_pointer_type pointer = WLSC_POINTER_LEFT_PTR;
536 if (edges == 0 || edges > 15 ||
537 (edges & 3) == 3 || (edges & 12) == 12)
540 if (wd->grab != WLSC_DEVICE_GRAB_MOTION ||
541 wd->grab_time != time ||
542 &wd->pointer_focus->base != surface)
546 case WLSC_DEVICE_GRAB_RESIZE_TOP:
547 pointer = WLSC_POINTER_TOP;
549 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM:
550 pointer = WLSC_POINTER_BOTTOM;
552 case WLSC_DEVICE_GRAB_RESIZE_LEFT:
553 pointer = WLSC_POINTER_LEFT;
555 case WLSC_DEVICE_GRAB_RESIZE_TOP_LEFT:
556 pointer = WLSC_POINTER_TOP_LEFT;
558 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_LEFT:
559 pointer = WLSC_POINTER_BOTTOM_LEFT;
561 case WLSC_DEVICE_GRAB_RESIZE_RIGHT:
562 pointer = WLSC_POINTER_RIGHT;
564 case WLSC_DEVICE_GRAB_RESIZE_TOP_RIGHT:
565 pointer = WLSC_POINTER_TOP_RIGHT;
567 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_RIGHT:
568 pointer = WLSC_POINTER_BOTTOM_RIGHT;
572 wlsc_input_device_start_grab(wd, time, edges);
573 wlsc_input_device_set_pointer_image(wd, pointer);
576 const static struct wl_shell_interface shell_interface = {
582 compositor_create_surface(struct wl_client *client,
583 struct wl_compositor *compositor, uint32_t id)
585 struct wlsc_compositor *ec = (struct wlsc_compositor *) compositor;
586 struct wlsc_surface *surface;
588 surface = wlsc_surface_create(ec, NULL, 0, 0, 0, 0);
589 if (surface == NULL) {
590 wl_client_post_event(client,
591 (struct wl_object *) ec->wl_display,
592 WL_DISPLAY_NO_MEMORY, 0);
596 wl_list_insert(ec->surface_list.prev, &surface->link);
597 surface->base.base.destroy = destroy_surface;
598 wl_client_add_surface(client, &surface->base,
599 &surface_interface, id);
603 compositor_commit(struct wl_client *client,
604 struct wl_compositor *compositor, uint32_t key)
606 struct wlsc_compositor *ec = (struct wlsc_compositor *) compositor;
608 wlsc_compositor_schedule_repaint(ec);
609 wl_client_send_acknowledge(client, compositor, key, ec->current_frame);
612 const static struct wl_compositor_interface compositor_interface = {
613 compositor_create_surface,
618 wlsc_surface_transform(struct wlsc_surface *surface,
619 int32_t x, int32_t y, int32_t *sx, int32_t *sy)
621 struct wlsc_vector v = { { x, y, 0, 1 } };
623 wlsc_matrix_transform(&surface->matrix_inv, &v);
624 *sx = v.f[0] * surface->width;
625 *sy = v.f[1] * surface->height;
629 wlsc_input_device_set_keyboard_focus(struct wlsc_input_device *device,
630 struct wlsc_surface *surface,
633 if (device->keyboard_focus == surface)
636 if (device->keyboard_focus &&
637 (!surface || device->keyboard_focus->base.client != surface->base.client))
638 wl_surface_post_event(&device->keyboard_focus->base,
640 WL_INPUT_DEVICE_KEYBOARD_FOCUS,
641 time, NULL, &device->keys);
644 wl_surface_post_event(&surface->base,
646 WL_INPUT_DEVICE_KEYBOARD_FOCUS,
647 time, &surface->base, &device->keys);
649 device->keyboard_focus = surface;
653 wlsc_input_device_set_pointer_focus(struct wlsc_input_device *device,
654 struct wlsc_surface *surface,
656 int32_t x, int32_t y,
657 int32_t sx, int32_t sy)
659 if (device->pointer_focus == surface)
662 if (device->pointer_focus &&
663 (!surface || device->pointer_focus->base.client != surface->base.client))
664 wl_surface_post_event(&device->pointer_focus->base,
666 WL_INPUT_DEVICE_POINTER_FOCUS,
667 time, NULL, 0, 0, 0, 0);
669 wl_surface_post_event(&surface->base,
671 WL_INPUT_DEVICE_POINTER_FOCUS,
672 time, &surface->base,
676 wlsc_input_device_set_pointer_image(device,
677 WLSC_POINTER_LEFT_PTR);
679 device->pointer_focus = surface;
682 static struct wlsc_surface *
683 pick_surface(struct wlsc_input_device *device, int32_t *sx, int32_t *sy)
685 struct wlsc_compositor *ec = device->ec;
686 struct wlsc_surface *es;
688 wl_list_for_each(es, &ec->surface_list, link) {
689 wlsc_surface_transform(es, device->x, device->y, sx, sy);
690 if (0 <= *sx && *sx < es->width &&
691 0 <= *sy && *sy < es->height)
699 wl_drag_reset(struct wl_drag *drag);
701 wl_drag_set_pointer_focus(struct wl_drag *drag,
702 struct wlsc_surface *surface, uint32_t time,
703 int32_t x, int32_t y, int32_t sx, int32_t sy);
706 notify_motion(struct wlsc_input_device *device, uint32_t time, int x, int y)
708 struct wlsc_surface *es;
709 struct wlsc_compositor *ec = device->ec;
710 struct wlsc_output *output;
711 int32_t sx, sy, width, height;
713 /* FIXME: We need some multi head love here. */
714 output = container_of(ec->output_list.next, struct wlsc_output, link);
719 if (x >= output->x + output->width)
720 x = output->x + output->width - 1;
721 if (y >= output->y + output->height)
722 y = output->y + output->height - 1;
727 switch (device->grab) {
728 case WLSC_DEVICE_GRAB_NONE:
729 es = pick_surface(device, &sx, &sy);
730 wlsc_input_device_set_pointer_focus(device, es,
733 wl_surface_post_event(&es->base, &device->base.base,
734 WL_INPUT_DEVICE_MOTION,
738 case WLSC_DEVICE_GRAB_MOTION:
739 es = device->pointer_focus;
740 wlsc_surface_transform(es, x, y, &sx, &sy);
741 wl_surface_post_event(&es->base, &device->base.base,
742 WL_INPUT_DEVICE_MOTION,
746 case WLSC_DEVICE_GRAB_MOVE:
747 es = device->grab_surface;
748 es->x = x + device->grab_dx;
749 es->y = y + device->grab_dy;;
750 wl_surface_post_event(&es->base, &ec->shell.base,
753 &es->base, es->x, es->y,
754 es->width, es->height);
756 wlsc_surface_update_matrix(es);
760 case WLSC_DEVICE_GRAB_RESIZE_TOP:
761 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM:
762 case WLSC_DEVICE_GRAB_RESIZE_LEFT:
763 case WLSC_DEVICE_GRAB_RESIZE_TOP_LEFT:
764 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_LEFT:
765 case WLSC_DEVICE_GRAB_RESIZE_RIGHT:
766 case WLSC_DEVICE_GRAB_RESIZE_TOP_RIGHT:
767 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_RIGHT:
768 case WLSC_DEVICE_GRAB_RESIZE_MASK:
769 es = device->grab_surface;
771 if (device->grab & WLSC_DEVICE_GRAB_RESIZE_LEFT) {
772 sx = x + device->grab_dx;
773 width = device->grab_x - x + device->grab_width;
774 } else if (device->grab & WLSC_DEVICE_GRAB_RESIZE_RIGHT) {
775 sx = device->grab_x + device->grab_dx;
776 width = x - device->grab_x + device->grab_width;
778 sx = device->grab_x + device->grab_dx;
779 width = device->grab_width;
782 if (device->grab & WLSC_DEVICE_GRAB_RESIZE_TOP) {
783 sy = y + device->grab_dy;
784 height = device->grab_y - y + device->grab_height;
785 } else if (device->grab & WLSC_DEVICE_GRAB_RESIZE_BOTTOM) {
786 sy = device->grab_y + device->grab_dy;
787 height = y - device->grab_y + device->grab_height;
789 sy = device->grab_y + device->grab_dy;
790 height = device->grab_height;
793 wl_surface_post_event(&es->base, &ec->shell.base,
794 WL_SHELL_CONFIGURE, time, device->grab,
795 &es->base, sx, sy, width, height);
798 case WLSC_DEVICE_GRAB_DRAG:
799 es = pick_surface(device, &sx, &sy);
800 wl_drag_set_pointer_focus(&device->drag,
801 es, time, x, y, sx, sy);
803 wl_surface_post_event(&es->base, &device->drag.base,
810 device->sprite->x = device->x - device->hotspot_x;
811 device->sprite->y = device->y - device->hotspot_y;
812 wlsc_surface_update_matrix(device->sprite);
814 wlsc_compositor_schedule_repaint(device->ec);
818 wlsc_input_device_end_grab(struct wlsc_input_device *device, uint32_t time)
820 struct wl_drag *drag = &device->drag;
821 struct wlsc_surface *es;
824 switch (device->grab) {
825 case WLSC_DEVICE_GRAB_DRAG:
826 wl_drag_set_pointer_focus(drag, NULL, time, 0, 0, 0, 0);
827 wl_surface_post_event(drag->source, &drag->base,
835 device->grab = WLSC_DEVICE_GRAB_NONE;
836 es = pick_surface(device, &sx, &sy);
837 wlsc_input_device_set_pointer_focus(device, es, time,
838 device->x, device->y, sx, sy);
842 notify_button(struct wlsc_input_device *device,
843 uint32_t time, int32_t button, int32_t state)
845 struct wlsc_surface *surface;
846 struct wlsc_compositor *compositor = device->ec;
848 surface = device->pointer_focus;
850 if (state && device->grab == WLSC_DEVICE_GRAB_NONE) {
851 wlsc_surface_raise(surface);
852 device->grab = WLSC_DEVICE_GRAB_MOTION;
853 device->grab_button = button;
854 device->grab_time = time;
855 device->grab_x = device->x;
856 device->grab_y = device->y;
857 wlsc_input_device_set_keyboard_focus(device,
861 if (state && button == BTN_LEFT &&
862 device->grab == WLSC_DEVICE_GRAB_MOTION &&
863 (device->modifier_state & MODIFIER_SUPER))
864 shell_move(NULL, (struct wl_shell *) &compositor->shell,
865 &surface->base, &device->base, time);
866 else if (state && button == BTN_MIDDLE &&
867 device->grab == WLSC_DEVICE_GRAB_MOTION &&
868 (device->modifier_state & MODIFIER_SUPER))
869 shell_resize(NULL, (struct wl_shell *) &compositor->shell,
871 &surface->base, &device->base, time,
872 WLSC_DEVICE_GRAB_RESIZE_BOTTOM_RIGHT);
873 else if (device->grab == WLSC_DEVICE_GRAB_NONE ||
874 device->grab == WLSC_DEVICE_GRAB_MOTION)
875 wl_surface_post_event(&surface->base,
877 WL_INPUT_DEVICE_BUTTON,
878 time, button, state);
881 device->grab != WLSC_DEVICE_GRAB_NONE &&
882 device->grab_button == button) {
883 wlsc_input_device_end_grab(device, time);
886 wlsc_compositor_schedule_repaint(compositor);
891 notify_key(struct wlsc_input_device *device,
892 uint32_t time, uint32_t key, uint32_t state)
897 switch (key | device->modifier_state) {
898 case KEY_BACKSPACE | MODIFIER_CTRL | MODIFIER_ALT:
906 modifier = MODIFIER_CTRL;
911 modifier = MODIFIER_ALT;
916 modifier = MODIFIER_SUPER;
925 device->modifier_state |= modifier;
927 device->modifier_state &= ~modifier;
929 end = device->keys.data + device->keys.size;
930 for (k = device->keys.data; k < end; k++) {
934 device->keys.size = (void *) end - device->keys.data;
936 k = wl_array_add(&device->keys, sizeof *k);
940 if (device->keyboard_focus != NULL)
941 wl_surface_post_event(&device->keyboard_focus->base,
943 WL_INPUT_DEVICE_KEY, time, key, state);
947 input_device_attach(struct wl_client *client,
948 struct wl_input_device *device_base,
949 struct wl_buffer *buffer_base, int32_t x, int32_t y)
951 struct wlsc_input_device *device =
952 (struct wlsc_input_device *) device_base;
953 struct wlsc_buffer *buffer = (struct wlsc_buffer *) buffer_base;
955 if (device->pointer_focus == NULL ||
956 device->pointer_focus->base.client != client)
959 if (buffer == NULL) {
960 wlsc_input_device_set_pointer_image(device,
961 WLSC_POINTER_LEFT_PTR);
965 wlsc_input_device_attach(device, buffer, x, y);
968 const static struct wl_input_device_interface input_device_interface = {
977 gettimeofday(&tv, NULL);
979 return tv.tv_sec * 1000 + tv.tv_usec / 1000;
983 handle_surface_destroy(struct wlsc_listener *listener,
984 struct wlsc_surface *surface)
986 struct wlsc_input_device *device =
987 container_of(listener, struct wlsc_input_device, listener);
988 uint32_t time = get_time();
990 if (device->keyboard_focus == surface)
991 wlsc_input_device_set_keyboard_focus(device, NULL, time);
992 if (device->pointer_focus == surface ||
993 (&device->pointer_focus->base == &wl_grab_surface &&
994 device->grab_surface == surface))
995 wlsc_input_device_end_grab(device, time);
999 wl_drag_set_pointer_focus(struct wl_drag *drag,
1000 struct wlsc_surface *surface, uint32_t time,
1001 int32_t x, int32_t y, int32_t sx, int32_t sy)
1003 if (drag->pointer_focus == &surface->base)
1006 if (drag->pointer_focus &&
1007 (!surface || drag->pointer_focus->client != surface->base.client))
1008 wl_surface_post_event(drag->pointer_focus,
1010 WL_DRAG_POINTER_FOCUS,
1011 time, NULL, 0, 0, 0, 0);
1013 wl_surface_post_event(&surface->base,
1015 WL_DRAG_POINTER_FOCUS,
1016 time, &surface->base,
1019 drag->pointer_focus = &surface->base;
1023 wl_drag_reset(struct wl_drag *drag)
1027 end = drag->types.data + drag->types.size;
1028 for (p = drag->types.data; p < end; p++)
1030 wl_array_release(&drag->types);
1031 wl_array_init(&drag->types);
1033 drag->source = NULL;
1034 drag->target = NULL;
1036 drag->pointer_focus = NULL;
1040 drag_prepare(struct wl_client *client,
1041 struct wl_drag *drag, struct wl_surface *surface, uint32_t time,
1042 struct wl_buffer *buffer, int32_t hotspot_x, int32_t hotspot_y)
1044 struct wlsc_input_device *device =
1045 (struct wlsc_input_device *) drag->input_device;
1047 if (&device->pointer_focus->base != surface ||
1048 device->grab_time != time)
1051 wl_drag_reset(drag);
1052 drag->source = surface;
1054 drag->buffer = buffer;
1055 drag->hotspot_x = hotspot_x;
1056 drag->hotspot_y = hotspot_y;
1060 drag_offer(struct wl_client *client, struct wl_drag *drag, const char *type)
1062 struct wl_display *display = wl_client_get_display (client);
1063 struct wlsc_input_device *device =
1064 (struct wlsc_input_device *) drag->input_device;
1067 if (drag->source == NULL ||
1068 drag->source->client != client ||
1069 device->grab != WLSC_DEVICE_GRAB_MOTION ||
1070 &device->pointer_focus->base != drag->source ||
1071 device->grab_time != drag->time)
1074 p = wl_array_add(&drag->types, sizeof *p);
1078 wl_client_post_event(client,
1079 (struct wl_object *) display,
1080 WL_DISPLAY_NO_MEMORY);
1084 drag_activate(struct wl_client *client,
1085 struct wl_drag *drag)
1087 struct wlsc_input_device *device =
1088 (struct wlsc_input_device *) drag->input_device;
1089 struct wlsc_surface *surface;
1092 if (drag->source == NULL ||
1093 drag->source->client != client ||
1094 device->grab != WLSC_DEVICE_GRAB_MOTION ||
1095 &device->pointer_focus->base != drag->source ||
1096 device->grab_time != drag->time)
1099 wlsc_input_device_start_grab(device, drag->time,
1100 WLSC_DEVICE_GRAB_DRAG);
1101 wlsc_input_device_attach(device, (struct wlsc_buffer *) drag->buffer,
1102 drag->hotspot_x, drag->hotspot_y);
1104 surface = pick_surface(device, &sx, &sy);
1105 wl_drag_set_pointer_focus(&device->drag, surface, drag->time,
1106 device->x, device->y, sx, sy);
1110 drag_cancel(struct wl_client *client, struct wl_drag *drag)
1112 struct wlsc_input_device *device =
1113 (struct wlsc_input_device *) drag->input_device;
1115 if (drag->source == NULL ||
1116 drag->source->client != client ||
1117 device->grab != WLSC_DEVICE_GRAB_DRAG)
1120 wlsc_input_device_end_grab(device, get_time());
1124 drag_send(struct wl_client *client,
1125 struct wl_drag *drag, struct wl_array *contents)
1127 wl_client_post_event(client, &drag->base, WL_DRAG_DROP, contents);
1131 drag_accept(struct wl_client *client,
1132 struct wl_drag *drag, const char *type)
1136 if (drag->pointer_focus->client != client)
1139 /* FIXME: We need a serial number here to correlate the accept
1140 * request with a pointer_focus/motion event. */
1141 drag->target = client;
1143 end = drag->types.data + drag->types.size;
1144 for (p = drag->types.data; p < end; p++)
1145 if (strcmp(*p, type) == 0)
1148 wl_surface_post_event(drag->source, &drag->base,
1149 WL_DRAG_TARGET, drag->type);
1152 static const struct wl_drag_interface drag_interface = {
1162 wl_drag_post_device(struct wl_client *client, struct wl_object *global)
1164 struct wl_drag *drag = container_of(global, struct wl_drag, base);
1166 wl_client_post_event(client, global,
1167 WL_DRAG_DEVICE, drag->input_device);
1171 wl_drag_init(struct wl_drag *drag,
1172 struct wl_display *display, struct wl_input_device *input_device)
1174 drag->base.interface = &wl_drag_interface;
1175 drag->base.implementation = (void (**)(void))
1178 wl_display_add_object(display, &drag->base);
1179 wl_display_add_global(display, &drag->base, wl_drag_post_device);
1181 drag->source = NULL;
1182 wl_array_init(&drag->types);
1183 drag->input_device = input_device;
1187 wlsc_input_device_init(struct wlsc_input_device *device,
1188 struct wlsc_compositor *ec)
1190 device->base.base.interface = &wl_input_device_interface;
1191 device->base.base.implementation =
1192 (void (**)(void)) &input_device_interface;
1193 wl_display_add_object(ec->wl_display, &device->base.base);
1194 wl_display_add_global(ec->wl_display, &device->base.base, NULL);
1196 wl_drag_init(&device->drag, ec->wl_display, &device->base);
1201 device->sprite = wlsc_surface_create(ec, &ec->argb_visual,
1202 device->x, device->y, 32, 32);
1203 device->hotspot_x = 16;
1204 device->hotspot_y = 16;
1206 device->listener.func = handle_surface_destroy;
1207 wl_list_insert(ec->surface_destroy_listener_list.prev,
1208 &device->listener.link);
1209 wl_list_insert(ec->input_device_list.prev, &device->link);
1211 wlsc_input_device_set_pointer_image(device, WLSC_POINTER_LEFT_PTR);
1215 wlsc_output_post_geometry(struct wl_client *client, struct wl_object *global)
1217 struct wlsc_output *output =
1218 container_of(global, struct wlsc_output, base);
1220 wl_client_post_event(client, global,
1222 output->width, output->height);
1225 static const char vertex_shader[] =
1226 "uniform mat4 proj;\n"
1227 "attribute vec4 position;\n"
1228 "attribute vec2 texcoord;\n"
1229 "varying vec2 v_texcoord;\n"
1232 " gl_Position = proj * position;\n"
1233 " v_texcoord = texcoord;\n"
1236 static const char fragment_shader[] =
1237 /* "precision mediump float;\n" */
1238 "varying vec2 v_texcoord;\n"
1239 "uniform sampler2D tex;\n"
1242 " gl_FragColor = texture2D(tex, v_texcoord)\n;"
1246 init_shaders(struct wlsc_compositor *ec)
1248 GLuint v, f, program;
1251 GLfloat vertices[4 * 5];
1255 v = glCreateShader(GL_VERTEX_SHADER);
1256 glShaderSource(v, 1, &p, NULL);
1258 glGetShaderiv(v, GL_COMPILE_STATUS, &status);
1260 glGetShaderInfoLog(v, sizeof msg, NULL, msg);
1261 fprintf(stderr, "vertex shader info: %s\n", msg);
1265 p = fragment_shader;
1266 f = glCreateShader(GL_FRAGMENT_SHADER);
1267 glShaderSource(f, 1, &p, NULL);
1269 glGetShaderiv(f, GL_COMPILE_STATUS, &status);
1271 glGetShaderInfoLog(f, sizeof msg, NULL, msg);
1272 fprintf(stderr, "fragment shader info: %s\n", msg);
1276 program = glCreateProgram();
1277 glAttachShader(program, v);
1278 glAttachShader(program, f);
1279 glBindAttribLocation(program, 0, "position");
1280 glBindAttribLocation(program, 1, "texcoord");
1282 glLinkProgram(program);
1283 glGetProgramiv(program, GL_LINK_STATUS, &status);
1285 glGetProgramInfoLog(program, sizeof msg, NULL, msg);
1286 fprintf(stderr, "link info: %s\n", msg);
1290 glUseProgram(program);
1291 ec->proj_uniform = glGetUniformLocation(program, "proj");
1292 ec->tex_uniform = glGetUniformLocation(program, "tex");
1318 glGenBuffers(1, &ec->vbo);
1319 glBindBuffer(GL_ARRAY_BUFFER, ec->vbo);
1320 glBufferData(GL_ARRAY_BUFFER, sizeof vertices, vertices, GL_STATIC_DRAW);
1325 static const struct wl_interface visual_interface = {
1330 add_visuals(struct wlsc_compositor *ec)
1332 ec->argb_visual.base.interface = &visual_interface;
1333 ec->argb_visual.base.implementation = NULL;
1334 wl_display_add_object(ec->wl_display, &ec->argb_visual.base);
1335 wl_display_add_global(ec->wl_display, &ec->argb_visual.base, NULL);
1337 ec->premultiplied_argb_visual.base.interface = &visual_interface;
1338 ec->premultiplied_argb_visual.base.implementation = NULL;
1339 wl_display_add_object(ec->wl_display,
1340 &ec->premultiplied_argb_visual.base);
1341 wl_display_add_global(ec->wl_display,
1342 &ec->premultiplied_argb_visual.base, NULL);
1344 ec->rgb_visual.base.interface = &visual_interface;
1345 ec->rgb_visual.base.implementation = NULL;
1346 wl_display_add_object(ec->wl_display, &ec->rgb_visual.base);
1347 wl_display_add_global(ec->wl_display, &ec->rgb_visual.base, NULL);
1351 wlsc_output_init(struct wlsc_output *output, struct wlsc_compositor *c,
1352 int x, int y, int width, int height)
1354 output->compositor = c;
1357 output->width = width;
1358 output->height = height;
1360 output->background =
1361 background_create(output, option_background);
1363 wlsc_matrix_init(&output->matrix);
1364 wlsc_matrix_translate(&output->matrix,
1365 -output->x - output->width / 2.0,
1366 -output->y - output->height / 2.0, 0);
1367 wlsc_matrix_scale(&output->matrix,
1368 2.0 / output->width, 2.0 / output->height, 1);
1370 output->base.interface = &wl_output_interface;
1371 wl_display_add_object(c->wl_display, &output->base);
1372 wl_display_add_global(c->wl_display, &output->base,
1373 wlsc_output_post_geometry);
1377 wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
1379 struct wl_event_loop *loop;
1381 ec->wl_display = display;
1383 wl_display_set_compositor(display, &ec->base, &compositor_interface);
1385 ec->shell.base.interface = &wl_shell_interface;
1386 ec->shell.base.implementation = (void (**)(void)) &shell_interface;
1387 wl_display_add_object(display, &ec->shell.base);
1388 if (wl_display_add_global(display, &ec->shell.base, NULL))
1393 wl_list_init(&ec->surface_list);
1394 wl_list_init(&ec->input_device_list);
1395 wl_list_init(&ec->output_list);
1396 wl_list_init(&ec->surface_destroy_listener_list);
1398 create_pointer_images(ec);
1400 screenshooter_create(ec);
1402 glGenFramebuffers(1, &ec->fbo);
1403 glBindFramebuffer(GL_FRAMEBUFFER, ec->fbo);
1404 glActiveTexture(GL_TEXTURE0);
1405 if (init_shaders(ec) < 0)
1408 loop = wl_display_get_event_loop(ec->wl_display);
1409 ec->timer_source = wl_event_loop_add_timer(loop, repaint, ec);
1410 wlsc_compositor_schedule_repaint(ec);
1415 /* The plan here is to generate a random anonymous socket name and
1416 * advertise that through a service on the session dbus.
1418 static const char socket_name[] = "\0wayland";
1420 int main(int argc, char *argv[])
1422 struct wl_display *display;
1423 struct wlsc_compositor *ec;
1424 GError *error = NULL;
1425 GOptionContext *context;
1427 g_type_init(); /* GdkPixbuf needs this, it seems. */
1429 context = g_option_context_new(NULL);
1430 g_option_context_add_main_entries(context, option_entries, "Wayland");
1431 if (!g_option_context_parse(context, &argc, &argv, &error)) {
1432 fprintf(stderr, "option parsing failed: %s\n", error->message);
1436 display = wl_display_create();
1438 if (getenv("DISPLAY"))
1439 ec = x11_compositor_create(display);
1441 ec = drm_compositor_create(display);
1444 fprintf(stderr, "failed to create compositor\n");
1448 if (wl_display_add_socket(display, socket_name, sizeof socket_name)) {
1449 fprintf(stderr, "failed to add socket: %m\n");
1453 wl_display_run(display);