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_DRM_BUFFER_FORMAT_MESA, EGL_DRM_BUFFER_FORMAT_ARGB32_MESA,
228 EGL_DRM_BUFFER_USE_MESA, EGL_DRM_BUFFER_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, msecs);
353 wl_event_source_timer_update(compositor->timer_source, 5);
357 wlsc_output_repaint(struct wlsc_output *output)
359 struct wlsc_compositor *ec = output->compositor;
360 struct wlsc_surface *es;
361 struct wlsc_input_device *eid;
363 glViewport(0, 0, output->width, output->height);
365 if (output->background)
366 wlsc_surface_draw(output->background, output);
368 glClear(GL_COLOR_BUFFER_BIT);
370 wl_list_for_each_reverse(es, &ec->surface_list, link)
371 wlsc_surface_draw(es, output);
374 wl_list_for_each(eid, &ec->input_device_list, link)
375 wlsc_surface_draw(eid->sprite, output);
381 struct wlsc_compositor *ec = data;
382 struct wlsc_output *output;
384 if (!ec->repaint_needed) {
385 ec->repaint_on_timeout = 0;
389 wl_list_for_each(output, &ec->output_list, link)
390 wlsc_output_repaint(output);
394 ec->repaint_needed = 0;
398 wlsc_compositor_schedule_repaint(struct wlsc_compositor *compositor)
400 compositor->repaint_needed = 1;
401 if (compositor->repaint_on_timeout)
404 wl_event_source_timer_update(compositor->timer_source, 1);
405 compositor->repaint_on_timeout = 1;
409 surface_destroy(struct wl_client *client,
410 struct wl_surface *surface)
412 wl_resource_destroy(&surface->base, client);
416 surface_attach(struct wl_client *client,
417 struct wl_surface *surface, struct wl_buffer *buffer_base)
419 struct wlsc_surface *es = (struct wlsc_surface *) surface;
420 struct wlsc_buffer *buffer = (struct wlsc_buffer *) buffer_base;
422 glBindTexture(GL_TEXTURE_2D, es->texture);
423 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, buffer->image);
424 es->visual = buffer->visual;
425 wlsc_compositor_schedule_repaint(es->compositor);
429 surface_map(struct wl_client *client,
430 struct wl_surface *surface,
431 int32_t x, int32_t y, int32_t width, int32_t height)
433 struct wlsc_surface *es = (struct wlsc_surface *) surface;
440 wlsc_surface_update_matrix(es);
441 wlsc_compositor_schedule_repaint(es->compositor);
445 surface_damage(struct wl_client *client,
446 struct wl_surface *surface,
447 int32_t x, int32_t y, int32_t width, int32_t height)
449 struct wlsc_surface *es = (struct wlsc_surface *) surface;
451 wlsc_compositor_schedule_repaint(es->compositor);
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);
577 destroy_drag(struct wl_resource *resource, struct wl_client *client)
579 struct wl_drag *drag =
580 container_of(resource, struct wl_drag, resource);
582 /* FIXME: More stuff */
587 const static struct wl_drag_interface drag_interface;
590 shell_create_drag(struct wl_client *client,
591 struct wl_shell *shell, uint32_t id)
593 struct wl_drag *drag;
595 drag = malloc(sizeof *drag);
597 wl_client_post_no_memory(client);
601 memset(drag, 0, sizeof *drag);
602 drag->resource.base.id = id;
603 drag->resource.base.interface = &wl_drag_interface;
604 drag->resource.base.implementation =
605 (void (**)(void)) &drag_interface;
607 drag->resource.destroy = destroy_drag;
609 wl_client_add_resource(client, &drag->resource);
612 const static struct wl_shell_interface shell_interface = {
619 compositor_create_surface(struct wl_client *client,
620 struct wl_compositor *compositor, uint32_t id)
622 struct wlsc_compositor *ec = (struct wlsc_compositor *) compositor;
623 struct wlsc_surface *surface;
625 surface = wlsc_surface_create(ec, NULL, 0, 0, 0, 0);
626 if (surface == NULL) {
627 wl_client_post_no_memory(client);
631 wl_list_insert(ec->surface_list.prev, &surface->link);
632 surface->base.base.destroy = destroy_surface;
634 surface->base.base.base.id = id;
635 surface->base.base.base.interface = &wl_surface_interface;
636 surface->base.base.base.implementation =
637 (void (**)(void)) &surface_interface;
638 surface->base.client = client;
640 wl_client_add_resource(client, &surface->base.base);
643 const static struct wl_compositor_interface compositor_interface = {
644 compositor_create_surface,
648 wlsc_surface_transform(struct wlsc_surface *surface,
649 int32_t x, int32_t y, int32_t *sx, int32_t *sy)
651 struct wlsc_vector v = { { x, y, 0, 1 } };
653 wlsc_matrix_transform(&surface->matrix_inv, &v);
654 *sx = v.f[0] * surface->width;
655 *sy = v.f[1] * surface->height;
659 wlsc_input_device_set_keyboard_focus(struct wlsc_input_device *device,
660 struct wlsc_surface *surface,
663 if (device->keyboard_focus == surface)
666 if (device->keyboard_focus &&
667 (!surface || device->keyboard_focus->base.client != surface->base.client))
668 wl_surface_post_event(&device->keyboard_focus->base,
670 WL_INPUT_DEVICE_KEYBOARD_FOCUS,
671 time, NULL, &device->keys);
674 wl_surface_post_event(&surface->base,
676 WL_INPUT_DEVICE_KEYBOARD_FOCUS,
677 time, &surface->base, &device->keys);
679 device->keyboard_focus = surface;
683 wlsc_input_device_set_pointer_focus(struct wlsc_input_device *device,
684 struct wlsc_surface *surface,
686 int32_t x, int32_t y,
687 int32_t sx, int32_t sy)
689 if (device->pointer_focus == surface)
692 if (device->pointer_focus &&
693 (!surface || device->pointer_focus->base.client != surface->base.client))
694 wl_surface_post_event(&device->pointer_focus->base,
696 WL_INPUT_DEVICE_POINTER_FOCUS,
697 time, NULL, 0, 0, 0, 0);
699 wl_surface_post_event(&surface->base,
701 WL_INPUT_DEVICE_POINTER_FOCUS,
702 time, &surface->base,
706 wlsc_input_device_set_pointer_image(device,
707 WLSC_POINTER_LEFT_PTR);
709 device->pointer_focus = surface;
712 static struct wlsc_surface *
713 pick_surface(struct wlsc_input_device *device, int32_t *sx, int32_t *sy)
715 struct wlsc_compositor *ec = device->ec;
716 struct wlsc_surface *es;
718 wl_list_for_each(es, &ec->surface_list, link) {
719 wlsc_surface_transform(es, device->x, device->y, sx, sy);
720 if (0 <= *sx && *sx < es->width &&
721 0 <= *sy && *sy < es->height)
729 wl_drag_set_pointer_focus(struct wl_drag *drag,
730 struct wlsc_surface *surface, uint32_t time,
731 int32_t x, int32_t y, int32_t sx, int32_t sy);
734 notify_motion(struct wlsc_input_device *device, uint32_t time, int x, int y)
736 struct wlsc_surface *es;
737 struct wlsc_compositor *ec = device->ec;
738 struct wlsc_output *output;
739 int32_t sx, sy, width, height;
741 /* FIXME: We need some multi head love here. */
742 output = container_of(ec->output_list.next, struct wlsc_output, link);
747 if (x >= output->x + output->width)
748 x = output->x + output->width - 1;
749 if (y >= output->y + output->height)
750 y = output->y + output->height - 1;
755 switch (device->grab) {
756 case WLSC_DEVICE_GRAB_NONE:
757 es = pick_surface(device, &sx, &sy);
758 wlsc_input_device_set_pointer_focus(device, es,
761 wl_surface_post_event(&es->base, &device->base.base,
762 WL_INPUT_DEVICE_MOTION,
766 case WLSC_DEVICE_GRAB_MOTION:
767 es = device->pointer_focus;
768 wlsc_surface_transform(es, x, y, &sx, &sy);
769 wl_surface_post_event(&es->base, &device->base.base,
770 WL_INPUT_DEVICE_MOTION,
774 case WLSC_DEVICE_GRAB_MOVE:
775 es = device->grab_surface;
776 es->x = x + device->grab_dx;
777 es->y = y + device->grab_dy;;
778 wl_surface_post_event(&es->base, &ec->shell.base,
781 &es->base, es->x, es->y,
782 es->width, es->height);
784 wlsc_surface_update_matrix(es);
788 case WLSC_DEVICE_GRAB_RESIZE_TOP:
789 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM:
790 case WLSC_DEVICE_GRAB_RESIZE_LEFT:
791 case WLSC_DEVICE_GRAB_RESIZE_TOP_LEFT:
792 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_LEFT:
793 case WLSC_DEVICE_GRAB_RESIZE_RIGHT:
794 case WLSC_DEVICE_GRAB_RESIZE_TOP_RIGHT:
795 case WLSC_DEVICE_GRAB_RESIZE_BOTTOM_RIGHT:
796 case WLSC_DEVICE_GRAB_RESIZE_MASK:
797 es = device->grab_surface;
799 if (device->grab & WLSC_DEVICE_GRAB_RESIZE_LEFT) {
800 sx = x + device->grab_dx;
801 width = device->grab_x - x + device->grab_width;
802 } else if (device->grab & WLSC_DEVICE_GRAB_RESIZE_RIGHT) {
803 sx = device->grab_x + device->grab_dx;
804 width = x - device->grab_x + device->grab_width;
806 sx = device->grab_x + device->grab_dx;
807 width = device->grab_width;
810 if (device->grab & WLSC_DEVICE_GRAB_RESIZE_TOP) {
811 sy = y + device->grab_dy;
812 height = device->grab_y - y + device->grab_height;
813 } else if (device->grab & WLSC_DEVICE_GRAB_RESIZE_BOTTOM) {
814 sy = device->grab_y + device->grab_dy;
815 height = y - device->grab_y + device->grab_height;
817 sy = device->grab_y + device->grab_dy;
818 height = device->grab_height;
821 wl_surface_post_event(&es->base, &ec->shell.base,
822 WL_SHELL_CONFIGURE, time, device->grab,
823 &es->base, sx, sy, width, height);
826 case WLSC_DEVICE_GRAB_DRAG:
827 es = pick_surface(device, &sx, &sy);
828 wl_drag_set_pointer_focus(device->drag,
829 es, time, x, y, sx, sy);
831 wl_surface_post_event(&es->base,
832 &device->drag->drag_offer.base,
833 WL_DRAG_OFFER_MOTION,
839 device->sprite->x = device->x - device->hotspot_x;
840 device->sprite->y = device->y - device->hotspot_y;
841 wlsc_surface_update_matrix(device->sprite);
843 wlsc_compositor_schedule_repaint(device->ec);
847 wlsc_input_device_end_grab(struct wlsc_input_device *device, uint32_t time)
849 struct wl_drag *drag = device->drag;
850 struct wlsc_surface *es;
853 switch (device->grab) {
854 case WLSC_DEVICE_GRAB_DRAG:
856 wl_client_post_event(drag->target,
857 &drag->drag_offer.base,
859 wl_drag_set_pointer_focus(drag, NULL, time, 0, 0, 0, 0);
866 device->grab = WLSC_DEVICE_GRAB_NONE;
867 es = pick_surface(device, &sx, &sy);
868 wlsc_input_device_set_pointer_focus(device, es, time,
869 device->x, device->y, sx, sy);
873 notify_button(struct wlsc_input_device *device,
874 uint32_t time, int32_t button, int32_t state)
876 struct wlsc_surface *surface;
877 struct wlsc_compositor *compositor = device->ec;
879 surface = device->pointer_focus;
881 if (state && device->grab == WLSC_DEVICE_GRAB_NONE) {
882 wlsc_surface_raise(surface);
883 device->grab = WLSC_DEVICE_GRAB_MOTION;
884 device->grab_button = button;
885 device->grab_time = time;
886 device->grab_x = device->x;
887 device->grab_y = device->y;
888 wlsc_input_device_set_keyboard_focus(device,
892 if (state && button == BTN_LEFT &&
893 device->grab == WLSC_DEVICE_GRAB_MOTION &&
894 (device->modifier_state & MODIFIER_SUPER))
895 shell_move(NULL, (struct wl_shell *) &compositor->shell,
896 &surface->base, &device->base, time);
897 else if (state && button == BTN_MIDDLE &&
898 device->grab == WLSC_DEVICE_GRAB_MOTION &&
899 (device->modifier_state & MODIFIER_SUPER))
900 shell_resize(NULL, (struct wl_shell *) &compositor->shell,
902 &surface->base, &device->base, time,
903 WLSC_DEVICE_GRAB_RESIZE_BOTTOM_RIGHT);
904 else if (device->grab == WLSC_DEVICE_GRAB_NONE ||
905 device->grab == WLSC_DEVICE_GRAB_MOTION)
906 wl_surface_post_event(&surface->base,
908 WL_INPUT_DEVICE_BUTTON,
909 time, button, state);
912 device->grab != WLSC_DEVICE_GRAB_NONE &&
913 device->grab_button == button) {
914 wlsc_input_device_end_grab(device, time);
917 wlsc_compositor_schedule_repaint(compositor);
922 notify_key(struct wlsc_input_device *device,
923 uint32_t time, uint32_t key, uint32_t state)
928 switch (key | device->modifier_state) {
929 case KEY_BACKSPACE | MODIFIER_CTRL | MODIFIER_ALT:
937 modifier = MODIFIER_CTRL;
942 modifier = MODIFIER_ALT;
947 modifier = MODIFIER_SUPER;
956 device->modifier_state |= modifier;
958 device->modifier_state &= ~modifier;
960 end = device->keys.data + device->keys.size;
961 for (k = device->keys.data; k < end; k++) {
965 device->keys.size = (void *) end - device->keys.data;
967 k = wl_array_add(&device->keys, sizeof *k);
971 if (device->keyboard_focus != NULL)
972 wl_surface_post_event(&device->keyboard_focus->base,
974 WL_INPUT_DEVICE_KEY, time, key, state);
978 input_device_attach(struct wl_client *client,
979 struct wl_input_device *device_base,
980 struct wl_buffer *buffer_base, int32_t x, int32_t y)
982 struct wlsc_input_device *device =
983 (struct wlsc_input_device *) device_base;
984 struct wlsc_buffer *buffer = (struct wlsc_buffer *) buffer_base;
986 if (device->pointer_focus == NULL)
988 if (device->pointer_focus->base.client != client &&
989 !(&device->pointer_focus->base == &wl_grab_surface &&
990 device->grab_surface->base.client == client))
993 if (buffer == NULL) {
994 wlsc_input_device_set_pointer_image(device,
995 WLSC_POINTER_LEFT_PTR);
999 wlsc_input_device_attach(device, buffer, x, y);
1002 const static struct wl_input_device_interface input_device_interface = {
1003 input_device_attach,
1011 gettimeofday(&tv, NULL);
1013 return tv.tv_sec * 1000 + tv.tv_usec / 1000;
1017 handle_surface_destroy(struct wlsc_listener *listener,
1018 struct wlsc_surface *surface)
1020 struct wlsc_input_device *device =
1021 container_of(listener, struct wlsc_input_device, listener);
1022 uint32_t time = get_time();
1024 if (device->keyboard_focus == surface)
1025 wlsc_input_device_set_keyboard_focus(device, NULL, time);
1026 if (device->pointer_focus == surface ||
1027 (&device->pointer_focus->base == &wl_grab_surface &&
1028 device->grab_surface == surface))
1029 wlsc_input_device_end_grab(device, time);
1033 wl_drag_set_pointer_focus(struct wl_drag *drag,
1034 struct wlsc_surface *surface, uint32_t time,
1035 int32_t x, int32_t y, int32_t sx, int32_t sy)
1039 if (drag->pointer_focus == &surface->base)
1042 if (drag->pointer_focus &&
1043 (!surface || drag->pointer_focus->client != surface->base.client))
1044 wl_surface_post_event(drag->pointer_focus,
1045 &drag->drag_offer.base,
1046 WL_DRAG_OFFER_POINTER_FOCUS,
1047 time, NULL, 0, 0, 0, 0);
1050 (!drag->pointer_focus ||
1051 drag->pointer_focus->client != surface->base.client)) {
1052 wl_client_post_global(surface->base.client,
1053 &drag->drag_offer.base);
1055 end = drag->types.data + drag->types.size;
1056 for (p = drag->types.data; p < end; p++)
1057 wl_surface_post_event(&surface->base,
1058 &drag->drag_offer.base,
1059 WL_DRAG_OFFER_OFFER, *p);
1063 wl_surface_post_event(&surface->base,
1064 &drag->drag_offer.base,
1065 WL_DRAG_OFFER_POINTER_FOCUS,
1066 time, &surface->base,
1071 drag->pointer_focus = &surface->base;
1072 drag->pointer_focus_time = time;
1073 drag->target = NULL;
1077 drag_offer_accept(struct wl_client *client,
1078 struct wl_drag_offer *offer, uint32_t time, const char *type)
1080 struct wl_drag *drag = container_of(offer, struct wl_drag, drag_offer);
1083 /* If the client responds to drag pointer_focus or motion
1084 * events after the pointer has left the surface, we just
1085 * discard the accept requests. The drag source just won't
1086 * get the corresponding 'target' events and eventually the
1087 * next surface/root will start sending events. */
1088 if (time < drag->pointer_focus_time)
1091 drag->target = client;
1093 end = drag->types.data + drag->types.size;
1094 for (p = drag->types.data; p < end; p++)
1095 if (type && strcmp(*p, type) == 0)
1098 wl_surface_post_event(drag->source, &drag->resource.base,
1099 WL_DRAG_TARGET, drag->type);
1103 drag_offer_receive(struct wl_client *client,
1104 struct wl_drag_offer *offer, int fd)
1106 struct wl_drag *drag = container_of(offer, struct wl_drag, drag_offer);
1108 wl_surface_post_event(drag->source, &drag->resource.base,
1109 WL_DRAG_FINISH, fd);
1113 static const struct wl_drag_offer_interface drag_offer_interface = {
1119 drag_offer(struct wl_client *client, struct wl_drag *drag, const char *type)
1123 p = wl_array_add(&drag->types, sizeof *p);
1127 wl_client_post_no_memory(client);
1131 drag_activate(struct wl_client *client,
1132 struct wl_drag *drag,
1133 struct wl_surface *surface,
1134 struct wl_input_device *input_device, uint32_t time)
1136 struct wl_display *display = wl_client_get_display (client);
1137 struct wlsc_input_device *device =
1138 (struct wlsc_input_device *) input_device;
1139 struct wlsc_surface *target;
1142 if (device->grab != WLSC_DEVICE_GRAB_MOTION ||
1143 &device->pointer_focus->base != surface ||
1144 device->grab_time != time)
1147 drag->source = surface;
1148 drag->input_device = input_device;
1150 drag->drag_offer.base.interface = &wl_drag_offer_interface;
1151 drag->drag_offer.base.implementation =
1152 (void (**)(void)) &drag_offer_interface;
1154 wl_display_add_object(display, &drag->drag_offer.base);
1156 wlsc_input_device_start_grab(device, time,
1157 WLSC_DEVICE_GRAB_DRAG);
1159 device->drag = drag;
1160 target = pick_surface(device, &sx, &sy);
1161 wl_drag_set_pointer_focus(device->drag, target, time,
1162 device->x, device->y, sx, sy);
1166 drag_cancel(struct wl_client *client, struct wl_drag *drag)
1168 struct wlsc_input_device *device =
1169 (struct wlsc_input_device *) drag->input_device;
1171 if (drag->source == NULL || drag->source->client != client)
1174 wlsc_input_device_end_grab(device, get_time());
1175 device->drag = NULL;
1178 static const struct wl_drag_interface drag_interface = {
1185 wlsc_input_device_init(struct wlsc_input_device *device,
1186 struct wlsc_compositor *ec)
1188 device->base.base.interface = &wl_input_device_interface;
1189 device->base.base.implementation =
1190 (void (**)(void)) &input_device_interface;
1191 wl_display_add_object(ec->wl_display, &device->base.base);
1192 wl_display_add_global(ec->wl_display, &device->base.base, NULL);
1197 device->sprite = wlsc_surface_create(ec, &ec->argb_visual,
1198 device->x, device->y, 32, 32);
1199 device->hotspot_x = 16;
1200 device->hotspot_y = 16;
1202 device->listener.func = handle_surface_destroy;
1203 wl_list_insert(ec->surface_destroy_listener_list.prev,
1204 &device->listener.link);
1205 wl_list_insert(ec->input_device_list.prev, &device->link);
1207 wlsc_input_device_set_pointer_image(device, WLSC_POINTER_LEFT_PTR);
1211 wlsc_output_post_geometry(struct wl_client *client, struct wl_object *global)
1213 struct wlsc_output *output =
1214 container_of(global, struct wlsc_output, base);
1216 wl_client_post_event(client, global,
1218 output->width, output->height);
1221 static const char vertex_shader[] =
1222 "uniform mat4 proj;\n"
1223 "attribute vec4 position;\n"
1224 "attribute vec2 texcoord;\n"
1225 "varying vec2 v_texcoord;\n"
1228 " gl_Position = proj * position;\n"
1229 " v_texcoord = texcoord;\n"
1232 static const char fragment_shader[] =
1233 /* "precision mediump float;\n" */
1234 "varying vec2 v_texcoord;\n"
1235 "uniform sampler2D tex;\n"
1238 " gl_FragColor = texture2D(tex, v_texcoord)\n;"
1242 init_shaders(struct wlsc_compositor *ec)
1244 GLuint v, f, program;
1247 GLfloat vertices[4 * 5];
1251 v = glCreateShader(GL_VERTEX_SHADER);
1252 glShaderSource(v, 1, &p, NULL);
1254 glGetShaderiv(v, GL_COMPILE_STATUS, &status);
1256 glGetShaderInfoLog(v, sizeof msg, NULL, msg);
1257 fprintf(stderr, "vertex shader info: %s\n", msg);
1261 p = fragment_shader;
1262 f = glCreateShader(GL_FRAGMENT_SHADER);
1263 glShaderSource(f, 1, &p, NULL);
1265 glGetShaderiv(f, GL_COMPILE_STATUS, &status);
1267 glGetShaderInfoLog(f, sizeof msg, NULL, msg);
1268 fprintf(stderr, "fragment shader info: %s\n", msg);
1272 program = glCreateProgram();
1273 glAttachShader(program, v);
1274 glAttachShader(program, f);
1275 glBindAttribLocation(program, 0, "position");
1276 glBindAttribLocation(program, 1, "texcoord");
1278 glLinkProgram(program);
1279 glGetProgramiv(program, GL_LINK_STATUS, &status);
1281 glGetProgramInfoLog(program, sizeof msg, NULL, msg);
1282 fprintf(stderr, "link info: %s\n", msg);
1286 glUseProgram(program);
1287 ec->proj_uniform = glGetUniformLocation(program, "proj");
1288 ec->tex_uniform = glGetUniformLocation(program, "tex");
1314 glGenBuffers(1, &ec->vbo);
1315 glBindBuffer(GL_ARRAY_BUFFER, ec->vbo);
1316 glBufferData(GL_ARRAY_BUFFER, sizeof vertices, vertices, GL_STATIC_DRAW);
1321 static const struct wl_interface visual_interface = {
1326 add_visuals(struct wlsc_compositor *ec)
1328 ec->argb_visual.base.interface = &visual_interface;
1329 ec->argb_visual.base.implementation = NULL;
1330 wl_display_add_object(ec->wl_display, &ec->argb_visual.base);
1331 wl_display_add_global(ec->wl_display, &ec->argb_visual.base, NULL);
1333 ec->premultiplied_argb_visual.base.interface = &visual_interface;
1334 ec->premultiplied_argb_visual.base.implementation = NULL;
1335 wl_display_add_object(ec->wl_display,
1336 &ec->premultiplied_argb_visual.base);
1337 wl_display_add_global(ec->wl_display,
1338 &ec->premultiplied_argb_visual.base, NULL);
1340 ec->rgb_visual.base.interface = &visual_interface;
1341 ec->rgb_visual.base.implementation = NULL;
1342 wl_display_add_object(ec->wl_display, &ec->rgb_visual.base);
1343 wl_display_add_global(ec->wl_display, &ec->rgb_visual.base, NULL);
1347 wlsc_output_init(struct wlsc_output *output, struct wlsc_compositor *c,
1348 int x, int y, int width, int height)
1350 output->compositor = c;
1353 output->width = width;
1354 output->height = height;
1356 output->background =
1357 background_create(output, option_background);
1359 wlsc_matrix_init(&output->matrix);
1360 wlsc_matrix_translate(&output->matrix,
1361 -output->x - output->width / 2.0,
1362 -output->y - output->height / 2.0, 0);
1363 wlsc_matrix_scale(&output->matrix,
1364 2.0 / output->width, 2.0 / output->height, 1);
1366 output->base.interface = &wl_output_interface;
1367 wl_display_add_object(c->wl_display, &output->base);
1368 wl_display_add_global(c->wl_display, &output->base,
1369 wlsc_output_post_geometry);
1373 wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
1375 struct wl_event_loop *loop;
1377 ec->wl_display = display;
1379 ec->base.base.interface = &wl_compositor_interface;
1380 ec->base.base.implementation =
1381 (void (**)(void)) &compositor_interface;
1383 wl_display_add_object(display, &ec->base.base);
1384 if (wl_display_add_global(display, &ec->base.base, NULL))
1387 ec->shell.base.interface = &wl_shell_interface;
1388 ec->shell.base.implementation = (void (**)(void)) &shell_interface;
1389 wl_display_add_object(display, &ec->shell.base);
1390 if (wl_display_add_global(display, &ec->shell.base, NULL))
1395 wl_list_init(&ec->surface_list);
1396 wl_list_init(&ec->input_device_list);
1397 wl_list_init(&ec->output_list);
1398 wl_list_init(&ec->surface_destroy_listener_list);
1400 create_pointer_images(ec);
1402 screenshooter_create(ec);
1404 glGenFramebuffers(1, &ec->fbo);
1405 glBindFramebuffer(GL_FRAMEBUFFER, ec->fbo);
1406 glActiveTexture(GL_TEXTURE0);
1407 if (init_shaders(ec) < 0)
1410 loop = wl_display_get_event_loop(ec->wl_display);
1411 ec->timer_source = wl_event_loop_add_timer(loop, repaint, ec);
1412 wlsc_compositor_schedule_repaint(ec);
1417 /* The plan here is to generate a random anonymous socket name and
1418 * advertise that through a service on the session dbus.
1420 static const char socket_name[] = "\0wayland";
1422 int main(int argc, char *argv[])
1424 struct wl_display *display;
1425 struct wlsc_compositor *ec;
1426 GError *error = NULL;
1427 GOptionContext *context;
1429 g_type_init(); /* GdkPixbuf needs this, it seems. */
1431 context = g_option_context_new(NULL);
1432 g_option_context_add_main_entries(context, option_entries, "Wayland");
1433 if (!g_option_context_parse(context, &argc, &argv, &error)) {
1434 fprintf(stderr, "option parsing failed: %s\n", error->message);
1438 display = wl_display_create();
1440 if (getenv("DISPLAY"))
1441 ec = x11_compositor_create(display);
1443 ec = drm_compositor_create(display);
1446 fprintf(stderr, "failed to create compositor\n");
1450 if (wl_display_add_socket(display, socket_name, sizeof socket_name)) {
1451 fprintf(stderr, "failed to add socket: %m\n");
1455 wl_display_run(display);