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.
29 #include <sys/ioctl.h>
32 #include <gdk-pixbuf/gdk-pixbuf.h>
34 #include <linux/input.h>
36 #include "wayland-server.h"
37 #include "compositor.h"
39 /* The plan here is to generate a random anonymous socket name and
40 * advertise that through a service on the session dbus.
42 static const char *option_socket_name = NULL;
43 static const char *option_background = "background.jpg";
44 static const char *option_geometry = "1024x640";
45 static int option_connector = 0;
47 static const GOptionEntry option_entries[] = {
48 { "background", 'b', 0, G_OPTION_ARG_STRING,
49 &option_background, "Background image" },
50 { "connector", 'c', 0, G_OPTION_ARG_INT,
51 &option_connector, "KMS connector" },
52 { "geometry", 'g', 0, G_OPTION_ARG_STRING,
53 &option_geometry, "Geometry" },
54 { "socket", 's', 0, G_OPTION_ARG_STRING,
55 &option_socket_name, "Socket Name" },
60 wlsc_matrix_init(struct wlsc_matrix *matrix)
62 static const struct wlsc_matrix identity = {
63 { 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1 }
66 memcpy(matrix, &identity, sizeof identity);
70 wlsc_matrix_multiply(struct wlsc_matrix *m, const struct wlsc_matrix *n)
72 struct wlsc_matrix tmp;
73 const GLfloat *row, *column;
77 for (i = 0; i < 16; i++) {
80 row = m->d + d.quot * 4;
81 column = n->d + d.rem;
82 for (j = 0; j < 4; j++)
83 tmp.d[i] += row[j] * column[j * 4];
85 memcpy(m, &tmp, sizeof tmp);
89 wlsc_matrix_translate(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
91 struct wlsc_matrix translate = {
92 { 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, x, y, z, 1 }
95 wlsc_matrix_multiply(matrix, &translate);
99 wlsc_matrix_scale(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
101 struct wlsc_matrix scale = {
102 { x, 0, 0, 0, 0, y, 0, 0, 0, 0, z, 0, 0, 0, 0, 1 }
105 wlsc_matrix_multiply(matrix, &scale);
109 wlsc_matrix_transform(struct wlsc_matrix *matrix, struct wlsc_vector *v)
112 struct wlsc_vector t;
114 for (i = 0; i < 4; i++) {
116 for (j = 0; j < 4; j++)
117 t.f[i] += v->f[j] * matrix->d[i + j * 4];
123 struct wlsc_surface *
124 wlsc_surface_create(struct wlsc_compositor *compositor,
125 int32_t x, int32_t y, int32_t width, int32_t height)
127 struct wlsc_surface *surface;
129 surface = malloc(sizeof *surface);
133 wl_list_init(&surface->surface.destroy_listener_list);
134 wl_list_init(&surface->link);
135 surface->map_type = WLSC_SURFACE_MAP_UNMAPPED;
137 glGenTextures(1, &surface->texture);
138 glBindTexture(GL_TEXTURE_2D, surface->texture);
139 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
140 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
141 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
142 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
144 surface->compositor = compositor;
145 surface->visual = NULL;
146 surface->image = EGL_NO_IMAGE_KHR;
147 surface->saved_texture = 0;
150 surface->width = width;
151 surface->height = height;
152 wlsc_matrix_init(&surface->matrix);
153 wlsc_matrix_scale(&surface->matrix, width, height, 1);
154 wlsc_matrix_translate(&surface->matrix, x, y, 0);
156 wlsc_matrix_init(&surface->matrix_inv);
157 wlsc_matrix_translate(&surface->matrix_inv, -x, -y, 0);
158 wlsc_matrix_scale(&surface->matrix_inv, 1.0 / width, 1.0 / height, 1);
164 wlsc_surface_damage_rectangle(struct wlsc_surface *surface,
165 int32_t x, int32_t y,
166 int32_t width, int32_t height)
168 struct wlsc_compositor *compositor = surface->compositor;
170 pixman_region32_union_rect(&compositor->damage_region,
171 &compositor->damage_region,
172 surface->x + x, surface->y + y,
174 wlsc_compositor_schedule_repaint(compositor);
178 wlsc_surface_damage(struct wlsc_surface *surface)
180 wlsc_surface_damage_rectangle(surface, 0, 0,
181 surface->width, surface->height);
189 gettimeofday(&tv, NULL);
191 return tv.tv_sec * 1000 + tv.tv_usec / 1000;
195 destroy_surface(struct wl_resource *resource, struct wl_client *client)
197 struct wlsc_surface *surface =
198 container_of(resource, struct wlsc_surface, surface.resource);
199 struct wl_listener *l, *next;
202 wlsc_surface_damage(surface);
204 wl_list_remove(&surface->link);
205 if (surface->saved_texture == 0)
206 glDeleteTextures(1, &surface->texture);
208 glDeleteTextures(1, &surface->saved_texture);
211 if (surface->image != EGL_NO_IMAGE_KHR)
212 eglDestroyImageKHR(surface->compositor->display,
216 wl_list_for_each_safe(l, next,
217 &surface->surface.destroy_listener_list, link)
218 l->func(l, &surface->surface, time);
224 wlsc_load_image(const char *filename, int width, int height)
227 GError *error = NULL;
228 int stride, i, n_channels;
229 unsigned char *pixels, *end, *argb_pixels, *s, *d;
231 pixbuf = gdk_pixbuf_new_from_file_at_scale(filename,
235 fprintf(stderr, "failed to load image: %s\n", error->message);
240 stride = gdk_pixbuf_get_rowstride(pixbuf);
241 pixels = gdk_pixbuf_get_pixels(pixbuf);
242 n_channels = gdk_pixbuf_get_n_channels(pixbuf);
244 argb_pixels = malloc (height * width * 4);
245 if (argb_pixels == NULL) {
246 g_object_unref(pixbuf);
250 if (n_channels == 4) {
251 for (i = 0; i < height; i++) {
252 s = pixels + i * stride;
254 d = argb_pixels + i * width * 4;
258 #define MULT(_d,c,a,t) \
259 do { t = c * a + 0x7f; _d = ((t >> 8) + t) >> 8; } while (0)
261 MULT(d[0], s[2], s[3], t);
262 MULT(d[1], s[1], s[3], t);
263 MULT(d[2], s[0], s[3], t);
269 } else if (n_channels == 3) {
270 for (i = 0; i < height; i++) {
271 s = pixels + i * stride;
273 d = argb_pixels + i * width * 4;
285 g_object_unref(pixbuf);
287 return (uint32_t *) argb_pixels;
291 wlsc_buffer_attach(struct wl_buffer *buffer, struct wl_surface *surface)
293 struct wlsc_surface *es = (struct wlsc_surface *) surface;
294 struct wlsc_compositor *ec = es->compositor;
296 if (buffer->attach) {
297 buffer->attach(buffer, surface);
299 es->image = eglCreateImageKHR(ec->display, ec->context,
300 EGL_WAYLAND_BUFFER_WL,
303 if (es->saved_texture != 0)
304 es->texture = es->saved_texture;
305 glBindTexture(GL_TEXTURE_2D, es->texture);
306 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, es->image);
307 es->visual = buffer->visual;
312 wlsc_sprite_attach(struct wlsc_sprite *sprite, struct wl_surface *surface)
314 struct wlsc_surface *es = (struct wlsc_surface *) surface;
316 es->image = sprite->image;
317 if (sprite->image != EGL_NO_IMAGE_KHR) {
318 glBindTexture(GL_TEXTURE_2D, es->texture);
319 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, es->image);
321 if (es->saved_texture == 0)
322 es->saved_texture = es->texture;
323 es->texture = sprite->texture;
326 es->visual = sprite->visual;
330 SPRITE_USE_CURSOR = (1 << 0),
333 static struct wlsc_sprite *
334 create_sprite_from_png(struct wlsc_compositor *ec,
335 const char *filename, int width, int height,
339 struct wlsc_sprite *sprite;
341 pixels = wlsc_load_image(filename, width, height);
345 sprite = malloc(sizeof *sprite);
346 if (sprite == NULL) {
351 sprite->visual = &ec->compositor.premultiplied_argb_visual;
352 sprite->width = width;
353 sprite->height = height;
354 sprite->image = EGL_NO_IMAGE_KHR;
356 if (usage & SPRITE_USE_CURSOR && ec->create_cursor_image != NULL)
357 sprite->image = ec->create_cursor_image(ec, width, height);
359 glGenTextures(1, &sprite->texture);
360 glBindTexture(GL_TEXTURE_2D, sprite->texture);
361 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
362 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
363 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
364 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
366 if (sprite->image != EGL_NO_IMAGE_KHR) {
367 glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, sprite->image);
368 glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, width, height,
369 GL_BGRA_EXT, GL_UNSIGNED_BYTE, pixels);
371 glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT, width, height, 0,
372 GL_BGRA_EXT, GL_UNSIGNED_BYTE, pixels);
380 static const struct {
381 const char *filename;
382 int hotspot_x, hotspot_y;
383 } pointer_images[] = {
384 { DATADIR "/wayland/bottom_left_corner.png", 6, 30 },
385 { DATADIR "/wayland/bottom_right_corner.png", 28, 28 },
386 { DATADIR "/wayland/bottom_side.png", 16, 20 },
387 { DATADIR "/wayland/grabbing.png", 20, 17 },
388 { DATADIR "/wayland/left_ptr.png", 10, 5 },
389 { DATADIR "/wayland/left_side.png", 10, 20 },
390 { DATADIR "/wayland/right_side.png", 30, 19 },
391 { DATADIR "/wayland/top_left_corner.png", 8, 8 },
392 { DATADIR "/wayland/top_right_corner.png", 26, 8 },
393 { DATADIR "/wayland/top_side.png", 18, 8 },
394 { DATADIR "/wayland/xterm.png", 15, 15 }
398 create_pointer_images(struct wlsc_compositor *ec)
401 const int width = 32, height = 32;
403 count = ARRAY_LENGTH(pointer_images);
404 ec->pointer_sprites = malloc(count * sizeof *ec->pointer_sprites);
405 for (i = 0; i < count; i++) {
406 ec->pointer_sprites[i] =
407 create_sprite_from_png(ec,
408 pointer_images[i].filename,
414 static struct wlsc_surface *
415 background_create(struct wlsc_output *output, const char *filename)
417 struct wlsc_surface *background;
418 struct wlsc_sprite *sprite;
420 background = wlsc_surface_create(output->compositor,
421 output->x, output->y,
422 output->width, output->height);
423 if (background == NULL)
426 sprite = create_sprite_from_png(output->compositor, filename,
427 output->width, output->height, 0);
428 if (sprite == NULL) {
433 wlsc_sprite_attach(sprite, &background->surface);
439 wlsc_surface_draw(struct wlsc_surface *es,
440 struct wlsc_output *output, pixman_region32_t *clip)
442 struct wlsc_compositor *ec = es->compositor;
443 GLfloat *v, inv_width, inv_height;
445 pixman_region32_t repaint;
446 pixman_box32_t *rectangles;
449 pixman_region32_init_rect(&repaint,
450 es->x, es->y, es->width, es->height);
451 pixman_region32_intersect(&repaint, &repaint, clip);
452 if (!pixman_region32_not_empty(&repaint))
455 if (es->visual == &ec->compositor.argb_visual) {
456 glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
458 } else if (es->visual == &ec->compositor.premultiplied_argb_visual) {
459 glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
465 rectangles = pixman_region32_rectangles(&repaint, &n);
466 v = wl_array_add(&ec->vertices, n * 16 * sizeof *v);
467 p = wl_array_add(&ec->indices, n * 6 * sizeof *p);
468 inv_width = 1.0 / es->width;
469 inv_height = 1.0 / es->height;
470 for (i = 0; i < n; i++, v += 16, p += 6) {
471 v[ 0] = rectangles[i].x1;
472 v[ 1] = rectangles[i].y1;
473 v[ 2] = (GLfloat) (rectangles[i].x1 - es->x) * inv_width;
474 v[ 3] = (GLfloat) (rectangles[i].y1 - es->y) * inv_height;
476 v[ 4] = rectangles[i].x1;
477 v[ 5] = rectangles[i].y2;
479 v[ 7] = (GLfloat) (rectangles[i].y2 - es->y) * inv_height;
481 v[ 8] = rectangles[i].x2;
482 v[ 9] = rectangles[i].y1;
483 v[10] = (GLfloat) (rectangles[i].x2 - es->x) * inv_width;
486 v[12] = rectangles[i].x2;
487 v[13] = rectangles[i].y2;
499 glBindTexture(GL_TEXTURE_2D, es->texture);
500 v = ec->vertices.data;
501 glVertexAttribPointer(0, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[0]);
502 glVertexAttribPointer(1, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[2]);
503 glEnableVertexAttribArray(0);
504 glEnableVertexAttribArray(1);
505 glDrawElements(GL_TRIANGLES, n * 6, GL_UNSIGNED_INT, ec->indices.data);
507 ec->vertices.size = 0;
508 ec->indices.size = 0;
509 pixman_region32_fini(&repaint);
513 wlsc_surface_raise(struct wlsc_surface *surface)
515 struct wlsc_compositor *compositor = surface->compositor;
517 wl_list_remove(&surface->link);
518 wl_list_insert(&compositor->surface_list, &surface->link);
522 wlsc_surface_update_matrix(struct wlsc_surface *es)
524 wlsc_matrix_init(&es->matrix);
525 wlsc_matrix_scale(&es->matrix, es->width, es->height, 1);
526 wlsc_matrix_translate(&es->matrix, es->x, es->y, 0);
528 wlsc_matrix_init(&es->matrix_inv);
529 wlsc_matrix_translate(&es->matrix_inv, -es->x, -es->y, 0);
530 wlsc_matrix_scale(&es->matrix_inv,
531 1.0 / es->width, 1.0 / es->height, 1);
535 wlsc_output_finish_frame(struct wlsc_output *output, int msecs)
537 struct wlsc_compositor *compositor = output->compositor;
538 struct wlsc_surface *es;
540 wl_list_for_each(es, &compositor->surface_list, link) {
541 if (es->output == output) {
542 wl_display_post_frame(compositor->wl_display,
543 &es->surface, msecs);
547 output->finished = 1;
549 wl_event_source_timer_update(compositor->timer_source, 5);
550 compositor->repaint_on_timeout = 1;
554 wlsc_output_repaint(struct wlsc_output *output)
556 struct wlsc_compositor *ec = output->compositor;
557 struct wlsc_surface *es;
558 struct wlsc_input_device *eid;
559 pixman_region32_t new_damage, total_damage, repaint;
560 int using_hardware_cursor = 1;
562 output->prepare_render(output);
564 glViewport(0, 0, output->width, output->height);
566 glUniformMatrix4fv(ec->proj_uniform, 1, GL_FALSE, output->matrix.d);
567 glUniform1i(ec->tex_uniform, 0);
569 pixman_region32_init(&new_damage);
570 pixman_region32_init(&total_damage);
571 pixman_region32_intersect_rect(&new_damage,
573 output->x, output->y,
574 output->width, output->height);
575 pixman_region32_subtract(&ec->damage_region,
576 &ec->damage_region, &new_damage);
577 pixman_region32_union(&total_damage, &new_damage,
578 &output->previous_damage_region);
579 pixman_region32_copy(&output->previous_damage_region, &new_damage);
582 if (output->set_hardware_cursor(output, ec->input_device) < 0)
583 using_hardware_cursor = 0;
585 es = container_of(ec->surface_list.next, struct wlsc_surface, link);
586 if (es->map_type == WLSC_SURFACE_MAP_FULLSCREEN &&
587 es->fullscreen_output == output) {
588 if (es->visual == &ec->compositor.rgb_visual &&
589 using_hardware_cursor) {
590 if (output->prepare_scanout_surface(output, es) == 0) {
591 /* We're drawing nothing now,
592 * draw the damaged regions later. */
593 pixman_region32_union(&ec->damage_region,
600 if (es->width < output->width ||
601 es->height < output->height)
602 glClear(GL_COLOR_BUFFER_BIT);
603 wlsc_surface_draw(es, output, &total_damage);
605 wl_list_for_each(es, &ec->surface_list, link) {
606 if (es->visual != &ec->compositor.rgb_visual)
609 pixman_region32_init_rect(&repaint,
611 es->width, es->height);
612 wlsc_surface_draw(es, output, &total_damage);
613 pixman_region32_subtract(&total_damage,
614 &total_damage, &repaint);
617 if (output->background)
618 wlsc_surface_draw(output->background,
619 output, &total_damage);
621 glClear(GL_COLOR_BUFFER_BIT);
623 wl_list_for_each_reverse(es, &ec->surface_list, link) {
624 if (ec->overlay == es)
627 if (es->visual == &ec->compositor.rgb_visual) {
628 pixman_region32_union_rect(&total_damage,
631 es->width, es->height);
635 wlsc_surface_draw(es, output, &total_damage);
640 wlsc_surface_draw(ec->overlay, output, &total_damage);
643 wl_list_for_each(eid, &ec->input_device_list, link) {
644 if (&eid->input_device != ec->input_device ||
645 !using_hardware_cursor)
646 wlsc_surface_draw(eid->sprite, output,
654 struct wlsc_compositor *ec = data;
655 struct wlsc_output *output;
656 int repainted_all_outputs = 1;
658 wl_list_for_each(output, &ec->output_list, link) {
659 if (!output->repaint_needed)
662 if (!output->finished) {
663 repainted_all_outputs = 0;
667 wlsc_output_repaint(output);
668 output->finished = 0;
669 output->repaint_needed = 0;
670 output->present(output);
673 if (repainted_all_outputs)
674 ec->repaint_on_timeout = 0;
676 wl_event_source_timer_update(ec->timer_source, 1);
680 wlsc_compositor_schedule_repaint(struct wlsc_compositor *compositor)
682 struct wlsc_output *output;
684 wl_list_for_each(output, &compositor->output_list, link)
685 output->repaint_needed = 1;
687 if (compositor->repaint_on_timeout)
690 wl_event_source_timer_update(compositor->timer_source, 1);
691 compositor->repaint_on_timeout = 1;
695 surface_destroy(struct wl_client *client,
696 struct wl_surface *surface)
698 wl_resource_destroy(&surface->resource, client);
702 wlsc_surface_assign_output(struct wlsc_surface *es)
704 struct wlsc_compositor *ec = es->compositor;
705 struct wlsc_output *output;
707 struct wlsc_output *tmp = es->output;
710 wl_list_for_each(output, &ec->output_list, link) {
711 if (output->x < es->x && es->x < output->x + output->width &&
712 output->y < es->y && es->y < output->y + output->height) {
714 printf("assiging surface %p to output %p\n",
720 if (es->output == NULL) {
721 printf("no output found\n");
722 es->output = container_of(ec->output_list.next,
723 struct wlsc_output, link);
728 surface_attach(struct wl_client *client,
729 struct wl_surface *surface, struct wl_buffer *buffer,
730 int32_t x, int32_t y)
732 struct wlsc_surface *es = (struct wlsc_surface *) surface;
734 /* FIXME: This damages the entire old surface, but we should
735 * really just damage the part that's no longer covered by the
736 * surface. Anything covered by the new surface will be
737 * damaged by the client. */
738 wlsc_surface_damage(es);
740 wlsc_buffer_attach(buffer, surface);
745 es->width = buffer->width;
746 es->height = buffer->height;
747 if (x != 0 || y != 0)
748 wlsc_surface_assign_output(es);
749 wlsc_surface_update_matrix(es);
753 surface_map_toplevel(struct wl_client *client,
754 struct wl_surface *surface)
756 struct wlsc_surface *es = (struct wlsc_surface *) surface;
757 struct wlsc_compositor *ec = es->compositor;
759 switch (es->map_type) {
760 case WLSC_SURFACE_MAP_UNMAPPED:
761 es->x = 10 + random() % 400;
762 es->y = 10 + random() % 400;
763 wlsc_surface_update_matrix(es);
764 /* assign to first output */
765 es->output = container_of(ec->output_list.next,
766 struct wlsc_output, link);
767 wl_list_insert(&es->compositor->surface_list, &es->link);
769 case WLSC_SURFACE_MAP_TOPLEVEL:
771 case WLSC_SURFACE_MAP_FULLSCREEN:
772 es->fullscreen_output = NULL;
775 wlsc_surface_update_matrix(es);
781 wlsc_surface_damage(es);
782 es->map_type = WLSC_SURFACE_MAP_TOPLEVEL;
786 surface_map_transient(struct wl_client *client,
787 struct wl_surface *surface, struct wl_surface *parent,
788 int x, int y, uint32_t flags)
790 struct wlsc_surface *es = (struct wlsc_surface *) surface;
791 struct wlsc_surface *pes = (struct wlsc_surface *) parent;
793 switch (es->map_type) {
794 case WLSC_SURFACE_MAP_UNMAPPED:
795 wl_list_insert(&es->compositor->surface_list, &es->link);
796 /* assign to parents output */
797 es->output = pes->output;
799 case WLSC_SURFACE_MAP_FULLSCREEN:
800 es->fullscreen_output = NULL;
809 wlsc_surface_update_matrix(es);
810 wlsc_surface_damage(es);
811 es->map_type = WLSC_SURFACE_MAP_TRANSIENT;
815 surface_map_fullscreen(struct wl_client *client, struct wl_surface *surface)
817 struct wlsc_surface *es = (struct wlsc_surface *) surface;
818 struct wlsc_output *output;
820 /* FIXME: Fullscreen on first output */
821 /* FIXME: Handle output going away */
822 output = container_of(es->compositor->output_list.next,
823 struct wlsc_output, link);
825 switch (es->map_type) {
826 case WLSC_SURFACE_MAP_UNMAPPED:
827 es->x = 10 + random() % 400;
828 es->y = 10 + random() % 400;
829 /* assign to first output */
831 wl_list_insert(&es->compositor->surface_list, &es->link);
833 case WLSC_SURFACE_MAP_FULLSCREEN:
841 es->x = (output->width - es->width) / 2;
842 es->y = (output->height - es->height) / 2;
843 es->fullscreen_output = output;
844 wlsc_surface_update_matrix(es);
845 wlsc_surface_damage(es);
846 es->map_type = WLSC_SURFACE_MAP_FULLSCREEN;
850 surface_damage(struct wl_client *client,
851 struct wl_surface *surface,
852 int32_t x, int32_t y, int32_t width, int32_t height)
854 struct wlsc_surface *es = (struct wlsc_surface *) surface;
856 es->buffer->damage(es->buffer, surface, x, y, width, height);
858 wlsc_surface_damage_rectangle(es, x, y, width, height);
861 const static struct wl_surface_interface surface_interface = {
864 surface_map_toplevel,
865 surface_map_transient,
866 surface_map_fullscreen,
871 wlsc_input_device_attach(struct wlsc_input_device *device,
872 int x, int y, int width, int height)
874 wlsc_surface_damage(device->sprite);
876 device->hotspot_x = x;
877 device->hotspot_y = y;
879 device->sprite->x = device->input_device.x - device->hotspot_x;
880 device->sprite->y = device->input_device.y - device->hotspot_y;
881 device->sprite->width = width;
882 device->sprite->height = height;
883 wlsc_surface_update_matrix(device->sprite);
885 wlsc_surface_damage(device->sprite);
889 wlsc_input_device_attach_buffer(struct wlsc_input_device *device,
890 struct wl_buffer *buffer, int x, int y)
892 wlsc_buffer_attach(buffer, &device->sprite->surface);
893 wlsc_input_device_attach(device, x, y, buffer->width, buffer->height);
897 wlsc_input_device_attach_sprite(struct wlsc_input_device *device,
898 struct wlsc_sprite *sprite, int x, int y)
900 wlsc_sprite_attach(sprite, &device->sprite->surface);
901 wlsc_input_device_attach(device, x, y, sprite->width, sprite->height);
905 wlsc_input_device_set_pointer_image(struct wlsc_input_device *device,
906 enum wlsc_pointer_type type)
908 struct wlsc_compositor *compositor =
909 (struct wlsc_compositor *) device->input_device.compositor;
911 wlsc_input_device_attach_sprite(device,
912 compositor->pointer_sprites[type],
913 pointer_images[type].hotspot_x,
914 pointer_images[type].hotspot_y);
918 compositor_create_surface(struct wl_client *client,
919 struct wl_compositor *compositor, uint32_t id)
921 struct wlsc_compositor *ec = (struct wlsc_compositor *) compositor;
922 struct wlsc_surface *surface;
924 surface = wlsc_surface_create(ec, 0, 0, 0, 0);
925 if (surface == NULL) {
926 wl_client_post_no_memory(client);
930 surface->surface.resource.destroy = destroy_surface;
932 surface->surface.resource.object.id = id;
933 surface->surface.resource.object.interface = &wl_surface_interface;
934 surface->surface.resource.object.implementation =
935 (void (**)(void)) &surface_interface;
936 surface->surface.client = client;
938 wl_client_add_resource(client, &surface->surface.resource);
941 const static struct wl_compositor_interface compositor_interface = {
942 compositor_create_surface,
946 wlsc_surface_transform(struct wlsc_surface *surface,
947 int32_t x, int32_t y, int32_t *sx, int32_t *sy)
949 struct wlsc_vector v = { { x, y, 0, 1 } };
951 wlsc_matrix_transform(&surface->matrix_inv, &v);
952 *sx = v.f[0] * surface->width;
953 *sy = v.f[1] * surface->height;
956 struct wlsc_surface *
957 pick_surface(struct wl_input_device *device, int32_t *sx, int32_t *sy)
959 struct wlsc_compositor *ec =
960 (struct wlsc_compositor *) device->compositor;
961 struct wlsc_surface *es;
963 wl_list_for_each(es, &ec->surface_list, link) {
964 wlsc_surface_transform(es, device->x, device->y, sx, sy);
965 if (0 <= *sx && *sx < es->width &&
966 0 <= *sy && *sy < es->height)
975 motion_grab_motion(struct wl_grab *grab,
976 uint32_t time, int32_t x, int32_t y)
978 struct wlsc_input_device *device =
979 (struct wlsc_input_device *) grab->input_device;
980 struct wlsc_surface *es =
981 (struct wlsc_surface *) device->input_device.pointer_focus;
984 wlsc_surface_transform(es, x, y, &sx, &sy);
985 wl_client_post_event(es->surface.client,
986 &device->input_device.object,
987 WL_INPUT_DEVICE_MOTION,
992 motion_grab_button(struct wl_grab *grab,
993 uint32_t time, int32_t button, int32_t state)
995 wl_client_post_event(grab->input_device->pointer_focus->client,
996 &grab->input_device->object,
997 WL_INPUT_DEVICE_BUTTON,
998 time, button, state);
1002 motion_grab_end(struct wl_grab *grab, uint32_t time)
1006 static const struct wl_grab_interface motion_grab_interface = {
1013 notify_motion(struct wl_input_device *device, uint32_t time, int x, int y)
1015 struct wlsc_surface *es;
1016 struct wlsc_compositor *ec =
1017 (struct wlsc_compositor *) device->compositor;
1018 struct wlsc_output *output;
1019 const struct wl_grab_interface *interface;
1020 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
1022 int x_valid = 0, y_valid = 0;
1023 int min_x = INT_MAX, min_y = INT_MAX, max_x = INT_MIN, max_y = INT_MIN;
1025 wl_list_for_each(output, &ec->output_list, link) {
1026 if (output->x <= x && x <= output->x + output->width)
1029 if (output->y <= y && y <= output->y + output->height)
1032 /* FIXME: calculate this only on output addition/deletion */
1033 if (output->x < min_x)
1035 if (output->y < min_y)
1038 if (output->x + output->width > max_x)
1039 max_x = output->x + output->width;
1040 if (output->y + output->height > max_y)
1041 max_y = output->y + output->height;
1047 else if (x >= max_x)
1053 else if (y >= max_y)
1061 interface = device->grab->interface;
1062 interface->motion(device->grab, time, x, y);
1064 es = pick_surface(device, &sx, &sy);
1065 wl_input_device_set_pointer_focus(device,
1067 time, x, y, sx, sy);
1069 wl_client_post_event(es->surface.client,
1071 WL_INPUT_DEVICE_MOTION,
1072 time, x, y, sx, sy);
1075 wlsc_surface_damage(wd->sprite);
1077 wd->sprite->x = device->x - wd->hotspot_x;
1078 wd->sprite->y = device->y - wd->hotspot_y;
1079 wlsc_surface_update_matrix(wd->sprite);
1081 wlsc_surface_damage(wd->sprite);
1085 wlsc_surface_activate(struct wlsc_surface *surface,
1086 struct wlsc_input_device *device, uint32_t time)
1088 wlsc_surface_raise(surface);
1089 if (device->selection)
1090 wlsc_selection_set_focus(device->selection,
1091 &surface->surface, time);
1093 wl_input_device_set_keyboard_focus(&device->input_device,
1098 struct wlsc_binding {
1102 wlsc_binding_handler_t handler;
1104 struct wl_list link;
1108 notify_button(struct wl_input_device *device,
1109 uint32_t time, int32_t button, int32_t state)
1111 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
1112 struct wlsc_compositor *compositor =
1113 (struct wlsc_compositor *) device->compositor;
1114 struct wlsc_binding *b;
1115 struct wlsc_surface *surface =
1116 (struct wlsc_surface *) device->pointer_focus;
1118 if (state && surface && device->grab == NULL) {
1119 wlsc_surface_activate(surface, wd, time);
1120 wl_input_device_start_grab(device,
1121 &device->motion_grab,
1125 wl_list_for_each(b, &compositor->binding_list, link) {
1126 if (b->button == button &&
1127 b->modifier == wd->modifier_state && state) {
1128 b->handler(&wd->input_device,
1129 time, 0, button, state, b->data);
1135 device->grab->interface->button(device->grab, time,
1138 if (!state && device->grab && device->grab_button == button)
1139 wl_input_device_end_grab(device, time);
1143 terminate_binding(struct wl_input_device *device, uint32_t time,
1144 uint32_t key, uint32_t button, uint32_t state, void *data)
1146 struct wlsc_compositor *compositor = data;
1148 wl_display_terminate(compositor->wl_display);
1151 struct wlsc_binding *
1152 wlsc_compositor_add_binding(struct wlsc_compositor *compositor,
1153 uint32_t key, uint32_t button, uint32_t modifier,
1154 wlsc_binding_handler_t handler, void *data)
1156 struct wlsc_binding *binding;
1158 binding = malloc(sizeof *binding);
1159 if (binding == NULL)
1163 binding->button = button;
1164 binding->modifier = modifier;
1165 binding->handler = handler;
1166 binding->data = data;
1167 wl_list_insert(compositor->binding_list.prev, &binding->link);
1173 wlsc_binding_destroy(struct wlsc_binding *binding)
1175 wl_list_remove(&binding->link);
1180 update_modifier_state(struct wlsc_input_device *device,
1181 uint32_t key, uint32_t state)
1188 modifier = MODIFIER_CTRL;
1193 modifier = MODIFIER_ALT;
1198 modifier = MODIFIER_SUPER;
1207 device->modifier_state |= modifier;
1209 device->modifier_state &= ~modifier;
1213 notify_key(struct wl_input_device *device,
1214 uint32_t time, uint32_t key, uint32_t state)
1216 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
1217 struct wlsc_compositor *compositor =
1218 (struct wlsc_compositor *) device->compositor;
1220 struct wlsc_binding *b;
1222 wl_list_for_each(b, &compositor->binding_list, link) {
1223 if (b->key == key &&
1224 b->modifier == wd->modifier_state && state) {
1225 b->handler(&wd->input_device,
1226 time, key, 0, state, b->data);
1231 update_modifier_state(wd, key, state);
1232 end = device->keys.data + device->keys.size;
1233 for (k = device->keys.data; k < end; k++) {
1237 device->keys.size = (void *) end - device->keys.data;
1239 k = wl_array_add(&device->keys, sizeof *k);
1243 if (device->keyboard_focus != NULL)
1244 wl_client_post_event(device->keyboard_focus->client,
1246 WL_INPUT_DEVICE_KEY, time, key, state);
1250 notify_pointer_focus(struct wl_input_device *device,
1251 uint32_t time, struct wlsc_output *output,
1252 int32_t x, int32_t y)
1254 struct wlsc_input_device *wd = (struct wlsc_input_device *) device;
1255 struct wlsc_compositor *compositor =
1256 (struct wlsc_compositor *) device->compositor;
1257 struct wlsc_surface *es;
1263 es = pick_surface(device, &sx, &sy);
1264 wl_input_device_set_pointer_focus(device,
1266 time, x, y, sx, sy);
1268 compositor->focus = 1;
1270 wd->sprite->x = device->x - wd->hotspot_x;
1271 wd->sprite->y = device->y - wd->hotspot_y;
1272 wlsc_surface_update_matrix(wd->sprite);
1274 wl_input_device_set_pointer_focus(device, NULL,
1276 compositor->focus = 0;
1279 wlsc_surface_damage(wd->sprite);
1283 notify_keyboard_focus(struct wl_input_device *device,
1284 uint32_t time, struct wlsc_output *output,
1285 struct wl_array *keys)
1287 struct wlsc_input_device *wd =
1288 (struct wlsc_input_device *) device;
1289 struct wlsc_compositor *compositor =
1290 (struct wlsc_compositor *) device->compositor;
1291 struct wlsc_surface *es;
1294 if (!wl_list_empty(&compositor->surface_list))
1295 es = container_of(compositor->surface_list.next,
1296 struct wlsc_surface, link);
1301 wl_array_copy(&wd->input_device.keys, keys);
1302 wd->modifier_state = 0;
1303 end = device->keys.data + device->keys.size;
1304 for (k = device->keys.data; k < end; k++) {
1305 update_modifier_state(wd, *k, 1);
1308 wl_input_device_set_keyboard_focus(&wd->input_device,
1309 &es->surface, time);
1311 wd->modifier_state = 0;
1312 wl_input_device_set_keyboard_focus(&wd->input_device,
1319 input_device_attach(struct wl_client *client,
1320 struct wl_input_device *device_base,
1322 struct wl_buffer *buffer, int32_t x, int32_t y)
1324 struct wlsc_input_device *device =
1325 (struct wlsc_input_device *) device_base;
1327 if (time < device->input_device.pointer_focus_time)
1329 if (device->input_device.pointer_focus == NULL)
1331 if (device->input_device.pointer_focus->client != client)
1334 if (buffer == NULL) {
1335 wlsc_input_device_set_pointer_image(device,
1336 WLSC_POINTER_LEFT_PTR);
1340 wlsc_input_device_attach_buffer(device, buffer, x, y);
1343 const static struct wl_input_device_interface input_device_interface = {
1344 input_device_attach,
1348 wlsc_input_device_init(struct wlsc_input_device *device,
1349 struct wlsc_compositor *ec)
1351 wl_input_device_init(&device->input_device, &ec->compositor);
1353 device->input_device.object.interface = &wl_input_device_interface;
1354 device->input_device.object.implementation =
1355 (void (**)(void)) &input_device_interface;
1356 wl_display_add_object(ec->wl_display, &device->input_device.object);
1357 wl_display_add_global(ec->wl_display, &device->input_device.object, NULL);
1359 device->sprite = wlsc_surface_create(ec,
1360 device->input_device.x,
1361 device->input_device.y, 32, 32);
1362 device->hotspot_x = 16;
1363 device->hotspot_y = 16;
1364 device->modifier_state = 0;
1366 device->input_device.motion_grab.interface = &motion_grab_interface;
1368 wl_list_insert(ec->input_device_list.prev, &device->link);
1370 wlsc_input_device_set_pointer_image(device, WLSC_POINTER_LEFT_PTR);
1374 wlsc_output_post_geometry(struct wl_client *client,
1375 struct wl_object *global, uint32_t version)
1377 struct wlsc_output *output =
1378 container_of(global, struct wlsc_output, object);
1380 wl_client_post_event(client, global,
1382 output->x, output->y,
1383 output->width, output->height);
1386 static const char vertex_shader[] =
1387 "uniform mat4 proj;\n"
1388 "attribute vec2 position;\n"
1389 "attribute vec2 texcoord;\n"
1390 "varying vec2 v_texcoord;\n"
1393 " gl_Position = proj * vec4(position, 0.0, 1.0);\n"
1394 " v_texcoord = texcoord;\n"
1397 static const char fragment_shader[] =
1398 "precision mediump float;\n"
1399 "varying vec2 v_texcoord;\n"
1400 "uniform sampler2D tex;\n"
1403 " gl_FragColor = texture2D(tex, v_texcoord)\n;"
1407 init_shaders(struct wlsc_compositor *ec)
1409 GLuint v, f, program;
1415 v = glCreateShader(GL_VERTEX_SHADER);
1416 glShaderSource(v, 1, &p, NULL);
1418 glGetShaderiv(v, GL_COMPILE_STATUS, &status);
1420 glGetShaderInfoLog(v, sizeof msg, NULL, msg);
1421 fprintf(stderr, "vertex shader info: %s\n", msg);
1425 p = fragment_shader;
1426 f = glCreateShader(GL_FRAGMENT_SHADER);
1427 glShaderSource(f, 1, &p, NULL);
1429 glGetShaderiv(f, GL_COMPILE_STATUS, &status);
1431 glGetShaderInfoLog(f, sizeof msg, NULL, msg);
1432 fprintf(stderr, "fragment shader info: %s\n", msg);
1436 program = glCreateProgram();
1437 glAttachShader(program, v);
1438 glAttachShader(program, f);
1439 glBindAttribLocation(program, 0, "position");
1440 glBindAttribLocation(program, 1, "texcoord");
1442 glLinkProgram(program);
1443 glGetProgramiv(program, GL_LINK_STATUS, &status);
1445 glGetProgramInfoLog(program, sizeof msg, NULL, msg);
1446 fprintf(stderr, "link info: %s\n", msg);
1450 glUseProgram(program);
1451 ec->proj_uniform = glGetUniformLocation(program, "proj");
1452 ec->tex_uniform = glGetUniformLocation(program, "tex");
1458 wlsc_output_destroy(struct wlsc_output *output)
1460 destroy_surface(&output->background->surface.resource, NULL);
1464 wlsc_output_move(struct wlsc_output *output, int x, int y)
1466 struct wlsc_compositor *c = output->compositor;
1472 if (output->background) {
1473 output->background->x = x;
1474 output->background->y = y;
1475 wlsc_surface_update_matrix(output->background);
1478 pixman_region32_init(&output->previous_damage_region);
1480 wlsc_matrix_init(&output->matrix);
1481 wlsc_matrix_translate(&output->matrix,
1482 -output->x - output->width / 2.0,
1483 -output->y - output->height / 2.0, 0);
1485 flip = (output->flags & WL_OUTPUT_FLIPPED) ? -1 : 1;
1486 wlsc_matrix_scale(&output->matrix,
1487 2.0 / output->width,
1488 flip * 2.0 / output->height, 1);
1490 pixman_region32_union_rect(&c->damage_region,
1492 x, y, output->width, output->height);
1496 wlsc_output_init(struct wlsc_output *output, struct wlsc_compositor *c,
1497 int x, int y, int width, int height, uint32_t flags)
1499 output->compositor = c;
1502 output->width = width;
1503 output->height = height;
1505 output->background =
1506 background_create(output, option_background);
1508 output->flags = flags;
1509 output->finished = 1;
1510 wlsc_output_move(output, x, y);
1512 output->object.interface = &wl_output_interface;
1513 wl_display_add_object(c->wl_display, &output->object);
1514 wl_display_add_global(c->wl_display, &output->object,
1515 wlsc_output_post_geometry);
1519 wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
1521 struct wl_event_loop *loop;
1522 const char *extensions;
1524 ec->wl_display = display;
1526 wl_compositor_init(&ec->compositor, &compositor_interface, display);
1529 eglBindWaylandDisplayWL(ec->display, ec->wl_display);
1531 wl_list_init(&ec->surface_list);
1532 wl_list_init(&ec->input_device_list);
1533 wl_list_init(&ec->output_list);
1534 wl_list_init(&ec->binding_list);
1536 wlsc_shell_init(ec);
1537 wlsc_switcher_init(ec);
1539 wlsc_compositor_add_binding(ec, KEY_BACKSPACE, 0,
1540 MODIFIER_CTRL | MODIFIER_ALT,
1541 terminate_binding, ec);
1543 create_pointer_images(ec);
1545 screenshooter_create(ec);
1547 extensions = (const char *) glGetString(GL_EXTENSIONS);
1548 if (!strstr(extensions, "GL_EXT_texture_format_BGRA8888")) {
1550 "GL_EXT_texture_format_BGRA8888 not available\n");
1554 glActiveTexture(GL_TEXTURE0);
1555 if (init_shaders(ec) < 0)
1558 loop = wl_display_get_event_loop(ec->wl_display);
1559 ec->timer_source = wl_event_loop_add_timer(loop, repaint, ec);
1560 pixman_region32_init(&ec->damage_region);
1561 wlsc_compositor_schedule_repaint(ec);
1566 static void on_term_signal(int signal_number, void *data)
1568 struct wlsc_compositor *ec = data;
1570 wl_display_terminate(ec->wl_display);
1573 int main(int argc, char *argv[])
1575 struct wl_display *display;
1576 struct wlsc_compositor *ec;
1577 struct wl_event_loop *loop;
1578 GError *error = NULL;
1579 GOptionContext *context;
1582 g_type_init(); /* GdkPixbuf needs this, it seems. */
1584 context = g_option_context_new(NULL);
1585 g_option_context_add_main_entries(context, option_entries, "Wayland");
1586 if (!g_option_context_parse(context, &argc, &argv, &error)) {
1587 fprintf(stderr, "option parsing failed: %s\n", error->message);
1590 if (sscanf(option_geometry, "%dx%d", &width, &height) != 2) {
1591 fprintf(stderr, "invalid geometry option: %s \n",
1596 display = wl_display_create();
1600 #if BUILD_WAYLAND_COMPOSITOR
1601 if (getenv("WAYLAND_DISPLAY"))
1602 ec = wayland_compositor_create(display, width, height);
1605 #if BUILD_X11_COMPOSITOR
1606 if (ec == NULL && getenv("DISPLAY"))
1607 ec = x11_compositor_create(display, width, height);
1610 #if BUILD_OPENWFD_COMPOSITOR
1611 if (ec == NULL && getenv("OPENWFD"))
1612 ec = wfd_compositor_create(display, option_connector);
1615 #if BUILD_DRM_COMPOSITOR
1617 ec = drm_compositor_create(display, option_connector);
1621 fprintf(stderr, "failed to create compositor\n");
1625 if (wl_display_add_socket(display, option_socket_name)) {
1626 fprintf(stderr, "failed to add socket: %m\n");
1630 loop = wl_display_get_event_loop(ec->wl_display);
1631 wl_event_loop_add_signal(loop, SIGTERM, on_term_signal, ec);
1632 wl_event_loop_add_signal(loop, SIGINT, on_term_signal, ec);
1634 wl_display_run(display);
1636 eglUnbindWaylandDisplayWL(ec->display, display);
1637 wl_display_destroy(display);