src/compositor.c

   1 /*
   2  * Copyright © 2010-2011 Intel Corporation
   3  * Copyright © 2008-2011 Kristian Høgsberg
   4  * Copyright © 2012 Collabora, Ltd.
   5  *
   6  * Permission to use, copy, modify, distribute, and sell this software and
   7  * its documentation for any purpose is hereby granted without fee, provided
   8  * that the above copyright notice appear in all copies and that both that
   9  * copyright notice and this permission notice appear in supporting
  10  * documentation, and that the name of the copyright holders not be used in
  11  * advertising or publicity pertaining to distribution of the software
  12  * without specific, written prior permission.  The copyright holders make
  13  * no representations about the suitability of this software for any
  14  * purpose.  It is provided "as is" without express or implied warranty.
  15  *
  16  * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  17  * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
  18  * FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
  19  * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
  20  * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
  21  * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  22  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  23  */
  24
  25 #define _GNU_SOURCE
  26
  27 #include "config.h"
  28
  29 #include <stdio.h>
  30 #include <string.h>
  31 #include <stdlib.h>
  32 #include <stdint.h>
  33 #include <limits.h>
  34 #include <stdarg.h>
  35 #include <assert.h>
  36 #include <sys/ioctl.h>
  37 #include <sys/wait.h>
  38 #include <sys/types.h>
  39 #include <sys/socket.h>
  40 #include <fcntl.h>
  41 #include <unistd.h>
  42 #include <math.h>
  43 #include <linux/input.h>
  44 #include <dlfcn.h>
  45 #include <signal.h>
  46 #include <setjmp.h>
  47 #include <execinfo.h>
  48
  49 #include <wayland-server.h>
  50 #include "compositor.h"
  51
  52 static struct wl_list child_process_list;
  53 static jmp_buf segv_jmp_buf;
  54
  55 static int
  56 sigchld_handler(int signal_number, void *data)
  57 {
  58         struct weston_process *p;
  59         int status;
  60         pid_t pid;
  61
  62         pid = waitpid(-1, &status, WNOHANG);
  63         if (!pid)
  64                 return 1;
  65
  66         wl_list_for_each(p, &child_process_list, link) {
  67                 if (p->pid == pid)
  68                         break;
  69         }
  70
  71         if (&p->link == &child_process_list) {
  72                 fprintf(stderr, "unknown child process exited\n");
  73                 return 1;
  74         }
  75
  76         wl_list_remove(&p->link);
  77         p->cleanup(p, status);
  78
  79         return 1;
  80 }
  81
  82 WL_EXPORT int
  83 weston_output_switch_mode(struct weston_output *output, struct weston_mode *mode)
  84 {
  85         if (!output->switch_mode)
  86                 return -1;
  87
  88         return output->switch_mode(output, mode);
  89 }
  90
  91 WL_EXPORT void
  92 weston_watch_process(struct weston_process *process)
  93 {
  94         wl_list_insert(&child_process_list, &process->link);
  95 }
  96
  97 static void
  98 child_client_exec(int sockfd, const char *path)
  99 {
 100         int clientfd;
 101         char s[32];
 102         sigset_t allsigs;
 103
 104         /* do not give our signal mask to the new process */
 105         sigfillset(&allsigs);
 106         sigprocmask(SIG_UNBLOCK, &allsigs, NULL);
 107
 108         /* Launch clients as the user. */
 109         seteuid(getuid());
 110
 111         /* SOCK_CLOEXEC closes both ends, so we dup the fd to get a
 112          * non-CLOEXEC fd to pass through exec. */
 113         clientfd = dup(sockfd);
 114         if (clientfd == -1) {
 115                 fprintf(stderr, "compositor: dup failed: %m\n");
 116                 return;
 117         }
 118
 119         snprintf(s, sizeof s, "%d", clientfd);
 120         setenv("WAYLAND_SOCKET", s, 1);
 121
 122         if (execl(path, path, NULL) < 0)
 123                 fprintf(stderr, "compositor: executing '%s' failed: %m\n",
 124                         path);
 125 }
 126
 127 WL_EXPORT struct wl_client *
 128 weston_client_launch(struct weston_compositor *compositor,
 129                      struct weston_process *proc,
 130                      const char *path,
 131                      weston_process_cleanup_func_t cleanup)
 132 {
 133         int sv[2];
 134         pid_t pid;
 135         struct wl_client *client;
 136
 137         if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC, 0, sv) < 0) {
 138                 fprintf(stderr, "weston_client_launch: "
 139                         "socketpair failed while launching '%s': %m\n",
 140                         path);
 141                 return NULL;
 142         }
 143
 144         pid = fork();
 145         if (pid == -1) {
 146                 close(sv[0]);
 147                 close(sv[1]);
 148                 fprintf(stderr,  "weston_client_launch: "
 149                         "fork failed while launching '%s': %m\n", path);
 150                 return NULL;
 151         }
 152
 153         if (pid == 0) {
 154                 child_client_exec(sv[1], path);
 155                 exit(-1);
 156         }
 157
 158         close(sv[1]);
 159
 160         client = wl_client_create(compositor->wl_display, sv[0]);
 161         if (!client) {
 162                 close(sv[0]);
 163                 fprintf(stderr, "weston_client_launch: "
 164                         "wl_client_create failed while launching '%s'.\n",
 165                         path);
 166                 return NULL;
 167         }
 168
 169         proc->pid = pid;
 170         proc->cleanup = cleanup;
 171         weston_watch_process(proc);
 172
 173         return client;
 174 }
 175
 176 static void
 177 surface_handle_buffer_destroy(struct wl_listener *listener, void *data)
 178 {
 179         struct weston_surface *es =
 180                 container_of(listener, struct weston_surface,
 181                              buffer_destroy_listener);
 182
 183         es->buffer = NULL;
 184 }
 185
 186 static const pixman_region32_data_t undef_region_data;
 187
 188 static void
 189 undef_region(pixman_region32_t *region)
 190 {
 191         pixman_region32_fini(region);
 192         region->data = (pixman_region32_data_t *) &undef_region_data;
 193 }
 194
 195 static int
 196 region_is_undefined(pixman_region32_t *region)
 197 {
 198         return region->data == &undef_region_data;
 199 }
 200
 201 static void
 202 empty_region(pixman_region32_t *region)
 203 {
 204         if (!region_is_undefined(region))
 205                 pixman_region32_fini(region);
 206
 207         pixman_region32_init(region);
 208 }
 209
 210 WL_EXPORT struct weston_surface *
 211 weston_surface_create(struct weston_compositor *compositor)
 212 {
 213         struct weston_surface *surface;
 214
 215         surface = calloc(1, sizeof *surface);
 216         if (surface == NULL)
 217                 return NULL;
 218
 219         wl_signal_init(&surface->surface.resource.destroy_signal);
 220
 221         wl_list_init(&surface->link);
 222         wl_list_init(&surface->layer_link);
 223
 224         surface->surface.resource.client = NULL;
 225
 226         surface->compositor = compositor;
 227         surface->image = EGL_NO_IMAGE_KHR;
 228         surface->alpha = 255;
 229         surface->brightness = 255;
 230         surface->saturation = 255;
 231         surface->pitch = 1;
 232
 233         surface->buffer = NULL;
 234         surface->output = NULL;
 235
 236         pixman_region32_init(&surface->damage);
 237         pixman_region32_init(&surface->opaque);
 238         pixman_region32_init(&surface->clip);
 239         undef_region(&surface->input);
 240         pixman_region32_init(&surface->transform.opaque);
 241         wl_list_init(&surface->frame_callback_list);
 242
 243         surface->buffer_destroy_listener.notify =
 244                 surface_handle_buffer_destroy;
 245
 246         wl_list_init(&surface->geometry.transformation_list);
 247         wl_list_insert(&surface->geometry.transformation_list,
 248                        &surface->transform.position.link);
 249         weston_matrix_init(&surface->transform.position.matrix);
 250         pixman_region32_init(&surface->transform.boundingbox);
 251         surface->geometry.dirty = 1;
 252
 253         return surface;
 254 }
 255
 256 WL_EXPORT void
 257 weston_surface_set_color(struct weston_surface *surface,
 258                  GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha)
 259 {
 260         surface->color[0] = red;
 261         surface->color[1] = green;
 262         surface->color[2] = blue;
 263         surface->color[3] = alpha;
 264         surface->shader = &surface->compositor->solid_shader;
 265 }
 266
 267 static void
 268 surface_to_global_float(struct weston_surface *surface,
 269                         GLfloat sx, GLfloat sy, GLfloat *x, GLfloat *y)
 270 {
 271         if (surface->transform.enabled) {
 272                 struct weston_vector v = { { sx, sy, 0.0f, 1.0f } };
 273
 274                 weston_matrix_transform(&surface->transform.matrix, &v);
 275
 276                 if (fabsf(v.f[3]) < 1e-6) {
 277                         fprintf(stderr, "warning: numerical instability in "
 278                                 "weston_surface_to_global(), divisor = %g\n",
 279                                 v.f[3]);
 280                         *x = 0;
 281                         *y = 0;
 282                         return;
 283                 }
 284
 285                 *x = v.f[0] / v.f[3];
 286                 *y = v.f[1] / v.f[3];
 287         } else {
 288                 *x = sx + surface->geometry.x;
 289                 *y = sy + surface->geometry.y;
 290         }
 291 }
 292
 293 WL_EXPORT void
 294 weston_surface_damage_below(struct weston_surface *surface)
 295 {
 296         struct weston_compositor *compositor = surface->compositor;
 297         pixman_region32_t damage;
 298
 299         pixman_region32_init(&damage);
 300         pixman_region32_subtract(&damage, &surface->transform.boundingbox,
 301                                  &surface->clip);
 302         pixman_region32_union(&compositor->damage,
 303                               &compositor->damage, &damage);
 304         pixman_region32_fini(&damage);
 305 }
 306
 307 static void
 308 surface_compute_bbox(struct weston_surface *surface, int32_t sx, int32_t sy,
 309                      int32_t width, int32_t height,
 310                      pixman_region32_t *bbox)
 311 {
 312         GLfloat min_x = HUGE_VALF,  min_y = HUGE_VALF;
 313         GLfloat max_x = -HUGE_VALF, max_y = -HUGE_VALF;
 314         int32_t s[4][2] = {
 315                 { sx,         sy },
 316                 { sx,         sy + height },
 317                 { sx + width, sy },
 318                 { sx + width, sy + height }
 319         };
 320         GLfloat int_x, int_y;
 321         int i;
 322
 323         for (i = 0; i < 4; ++i) {
 324                 GLfloat x, y;
 325                 surface_to_global_float(surface, s[i][0], s[i][1], &x, &y);
 326                 if (x < min_x)
 327                         min_x = x;
 328                 if (x > max_x)
 329                         max_x = x;
 330                 if (y < min_y)
 331                         min_y = y;
 332                 if (y > max_y)
 333                         max_y = y;
 334         }
 335
 336         int_x = floorf(min_x);
 337         int_y = floorf(min_y);
 338         pixman_region32_init_rect(bbox, int_x, int_y,
 339                                   ceilf(max_x) - int_x, ceilf(max_y) - int_y);
 340 }
 341
 342 static void
 343 weston_surface_update_transform_disable(struct weston_surface *surface)
 344 {
 345         surface->transform.enabled = 0;
 346
 347         /* round off fractions when not transformed */
 348         surface->geometry.x = roundf(surface->geometry.x);
 349         surface->geometry.y = roundf(surface->geometry.y);
 350
 351         pixman_region32_init_rect(&surface->transform.boundingbox,
 352                                   surface->geometry.x,
 353                                   surface->geometry.y,
 354                                   surface->geometry.width,
 355                                   surface->geometry.height);
 356
 357         if (surface->alpha == 255) {
 358                 pixman_region32_copy(&surface->transform.opaque,
 359                                      &surface->opaque);
 360                 pixman_region32_translate(&surface->transform.opaque,
 361                                           surface->geometry.x,
 362                                           surface->geometry.y);
 363         }
 364 }
 365
 366 static int
 367 weston_surface_update_transform_enable(struct weston_surface *surface)
 368 {
 369         struct weston_matrix *matrix = &surface->transform.matrix;
 370         struct weston_matrix *inverse = &surface->transform.inverse;
 371         struct weston_transform *tform;
 372
 373         surface->transform.enabled = 1;
 374
 375         /* Otherwise identity matrix, but with x and y translation. */
 376         surface->transform.position.matrix.d[12] = surface->geometry.x;
 377         surface->transform.position.matrix.d[13] = surface->geometry.y;
 378
 379         weston_matrix_init(matrix);
 380         wl_list_for_each(tform, &surface->geometry.transformation_list, link)
 381                 weston_matrix_multiply(matrix, &tform->matrix);
 382
 383         if (weston_matrix_invert(inverse, matrix) < 0) {
 384                 /* Oops, bad total transformation, not invertible */
 385                 fprintf(stderr, "error: weston_surface %p"
 386                         " transformation not invertible.\n", surface);
 387                 return -1;
 388         }
 389
 390         surface_compute_bbox(surface, 0, 0, surface->geometry.width,
 391                              surface->geometry.height,
 392                              &surface->transform.boundingbox);
 393
 394         return 0;
 395 }
 396
 397 WL_EXPORT void
 398 weston_surface_update_transform(struct weston_surface *surface)
 399 {
 400         if (!surface->geometry.dirty)
 401                 return;
 402
 403         surface->geometry.dirty = 0;
 404
 405         weston_surface_damage_below(surface);
 406
 407         pixman_region32_fini(&surface->transform.boundingbox);
 408         pixman_region32_fini(&surface->transform.opaque);
 409         pixman_region32_init(&surface->transform.opaque);
 410
 411         if (region_is_undefined(&surface->input))
 412                 pixman_region32_init_rect(&surface->input, 0, 0,
 413                                           surface->geometry.width,
 414                                           surface->geometry.height);
 415
 416         /* transform.position is always in transformation_list */
 417         if (surface->geometry.transformation_list.next ==
 418             &surface->transform.position.link &&
 419             surface->geometry.transformation_list.prev ==
 420             &surface->transform.position.link) {
 421                 weston_surface_update_transform_disable(surface);
 422         } else {
 423                 if (weston_surface_update_transform_enable(surface) < 0)
 424                         weston_surface_update_transform_disable(surface);
 425         }
 426
 427         /* weston_surface_damage() without update */
 428         pixman_region32_union(&surface->damage, &surface->damage,
 429                               &surface->transform.boundingbox);
 430
 431         if (weston_surface_is_mapped(surface))
 432                 weston_surface_assign_output(surface);
 433
 434         weston_compositor_schedule_repaint(surface->compositor);
 435 }
 436
 437 WL_EXPORT void
 438 weston_surface_to_global_float(struct weston_surface *surface,
 439                                GLfloat sx, GLfloat sy, GLfloat *x, GLfloat *y)
 440 {
 441         weston_surface_update_transform(surface);
 442
 443         surface_to_global_float(surface, sx, sy, x, y);
 444 }
 445
 446 WL_EXPORT void
 447 weston_surface_to_global_fixed(struct weston_surface *surface,
 448                                wl_fixed_t sx, wl_fixed_t sy,
 449                                wl_fixed_t *x, wl_fixed_t *y)
 450 {
 451         GLfloat xf, yf;
 452
 453         weston_surface_to_global_float(surface,
 454                                        wl_fixed_to_double(sx),
 455                                        wl_fixed_to_double(sy),
 456                                        &xf, &yf);
 457         *x = wl_fixed_from_double(xf);
 458         *y = wl_fixed_from_double(yf);
 459 }
 460
 461 WL_EXPORT void
 462 weston_surface_to_global(struct weston_surface *surface,
 463                          int32_t sx, int32_t sy, int32_t *x, int32_t *y)
 464 {
 465         GLfloat xf, yf;
 466
 467         weston_surface_to_global_float(surface, sx, sy, &xf, &yf);
 468         *x = floorf(xf);
 469         *y = floorf(yf);
 470 }
 471
 472 static void
 473 surface_from_global_float(struct weston_surface *surface,
 474                           GLfloat x, GLfloat y, GLfloat *sx, GLfloat *sy)
 475 {
 476         if (surface->transform.enabled) {
 477                 struct weston_vector v = { { x, y, 0.0f, 1.0f } };
 478
 479                 weston_matrix_transform(&surface->transform.inverse, &v);
 480
 481                 if (fabsf(v.f[3]) < 1e-6) {
 482                         fprintf(stderr, "warning: numerical instability in "
 483                                 "weston_surface_from_global(), divisor = %g\n",
 484                                 v.f[3]);
 485                         *sx = 0;
 486                         *sy = 0;
 487                         return;
 488                 }
 489
 490                 *sx = v.f[0] / v.f[3];
 491                 *sy = v.f[1] / v.f[3];
 492         } else {
 493                 *sx = x - surface->geometry.x;
 494                 *sy = y - surface->geometry.y;
 495         }
 496 }
 497
 498 WL_EXPORT void
 499 weston_surface_from_global_fixed(struct weston_surface *surface,
 500                                  wl_fixed_t x, wl_fixed_t y,
 501                                  wl_fixed_t *sx, wl_fixed_t *sy)
 502 {
 503         GLfloat sxf, syf;
 504
 505         weston_surface_update_transform(surface);
 506
 507         surface_from_global_float(surface,
 508                                   wl_fixed_to_double(x),
 509                                   wl_fixed_to_double(y),
 510                                   &sxf, &syf);
 511         *sx = wl_fixed_from_double(sxf);
 512         *sy = wl_fixed_from_double(syf);
 513 }
 514
 515 WL_EXPORT void
 516 weston_surface_from_global(struct weston_surface *surface,
 517                            int32_t x, int32_t y, int32_t *sx, int32_t *sy)
 518 {
 519         GLfloat sxf, syf;
 520
 521         weston_surface_update_transform(surface);
 522
 523         surface_from_global_float(surface, x, y, &sxf, &syf);
 524         *sx = floorf(sxf);
 525         *sy = floorf(syf);
 526 }
 527
 528 static void
 529 weston_surface_damage_rectangle(struct weston_surface *surface,
 530                                 int32_t sx, int32_t sy,
 531                                 int32_t width, int32_t height)
 532 {
 533         weston_surface_update_transform(surface);
 534
 535         if (surface->transform.enabled) {
 536                 pixman_region32_t box;
 537                 surface_compute_bbox(surface, sx, sy, width, height, &box);
 538                 pixman_region32_union(&surface->damage, &surface->damage,
 539                                       &box);
 540                 pixman_region32_fini(&box);
 541         } else {
 542                 pixman_region32_union_rect(&surface->damage, &surface->damage,
 543                                            surface->geometry.x + sx,
 544                                            surface->geometry.y + sy,
 545                                            width, height);
 546         }
 547
 548         weston_compositor_schedule_repaint(surface->compositor);
 549 }
 550
 551 WL_EXPORT void
 552 weston_surface_damage(struct weston_surface *surface)
 553 {
 554         weston_surface_update_transform(surface);
 555
 556         pixman_region32_union(&surface->damage, &surface->damage,
 557                               &surface->transform.boundingbox);
 558
 559         weston_compositor_schedule_repaint(surface->compositor);
 560 }
 561
 562 WL_EXPORT void
 563 weston_surface_configure(struct weston_surface *surface,
 564                          GLfloat x, GLfloat y, int width, int height)
 565 {
 566         surface->geometry.x = x;
 567         surface->geometry.y = y;
 568         surface->geometry.width = width;
 569         surface->geometry.height = height;
 570         surface->geometry.dirty = 1;
 571 }
 572
 573 WL_EXPORT void
 574 weston_surface_set_position(struct weston_surface *surface,
 575                             GLfloat x, GLfloat y)
 576 {
 577         surface->geometry.x = x;
 578         surface->geometry.y = y;
 579         surface->geometry.dirty = 1;
 580 }
 581
 582 WL_EXPORT int
 583 weston_surface_is_mapped(struct weston_surface *surface)
 584 {
 585         if (surface->output)
 586                 return 1;
 587         else
 588                 return 0;
 589 }
 590
 591 WL_EXPORT uint32_t
 592 weston_compositor_get_time(void)
 593 {
 594        struct timeval tv;
 595
 596        gettimeofday(&tv, NULL);
 597
 598        return tv.tv_sec * 1000 + tv.tv_usec / 1000;
 599 }
 600
 601 static struct weston_surface *
 602 weston_compositor_pick_surface(struct weston_compositor *compositor,
 603                                wl_fixed_t x, wl_fixed_t y,
 604                                wl_fixed_t *sx, wl_fixed_t *sy)
 605 {
 606         struct weston_surface *surface;
 607
 608         wl_list_for_each(surface, &compositor->surface_list, link) {
 609                 weston_surface_from_global_fixed(surface, x, y, sx, sy);
 610                 if (pixman_region32_contains_point(&surface->input,
 611                                                    wl_fixed_to_int(*sx),
 612                                                    wl_fixed_to_int(*sy),
 613                                                    NULL))
 614                         return surface;
 615         }
 616
 617         return NULL;
 618 }
 619
 620 static void
 621 weston_device_repick(struct wl_input_device *device)
 622 {
 623         struct weston_input_device *wd = (struct weston_input_device *) device;
 624         const struct wl_pointer_grab_interface *interface;
 625         struct weston_surface *surface, *focus;
 626
 627         surface = weston_compositor_pick_surface(wd->compositor,
 628                                                  device->x, device->y,
 629                                                  &device->current_x,
 630                                                  &device->current_y);
 631
 632         if (&surface->surface != device->current) {
 633                 interface = device->pointer_grab->interface;
 634                 interface->focus(device->pointer_grab, &surface->surface,
 635                                  device->current_x, device->current_y);
 636                 device->current = &surface->surface;
 637         }
 638
 639         focus = (struct weston_surface *) device->pointer_grab->focus;
 640         if (focus)
 641                 weston_surface_from_global_fixed(focus, device->x, device->y,
 642                                                  &device->pointer_grab->x,
 643                                                  &device->pointer_grab->y);
 644 }
 645
 646 WL_EXPORT void
 647 weston_compositor_repick(struct weston_compositor *compositor)
 648 {
 649         struct weston_input_device *device;
 650
 651         if (!compositor->focus)
 652                 return;
 653
 654         wl_list_for_each(device, &compositor->input_device_list, link)
 655                 weston_device_repick(&device->input_device);
 656 }
 657
 658 static void
 659 weston_surface_unmap(struct weston_surface *surface)
 660 {
 661         struct wl_input_device *device = surface->compositor->input_device;
 662
 663         weston_surface_damage_below(surface);
 664         surface->output = NULL;
 665         wl_list_remove(&surface->link);
 666         wl_list_remove(&surface->layer_link);
 667
 668         if (device->keyboard_focus == &surface->surface)
 669                 wl_input_device_set_keyboard_focus(device, NULL);
 670         if (device->pointer_focus == &surface->surface)
 671                 wl_input_device_set_pointer_focus(device, NULL,
 672                                                   wl_fixed_from_int(0),
 673                                                   wl_fixed_from_int(0));
 674
 675         weston_compositor_schedule_repaint(surface->compositor);
 676 }
 677
 678 static void
 679 destroy_surface(struct wl_resource *resource)
 680 {
 681         struct weston_surface *surface =
 682                 container_of(resource,
 683                              struct weston_surface, surface.resource);
 684         struct weston_compositor *compositor = surface->compositor;
 685
 686         if (weston_surface_is_mapped(surface))
 687                 weston_surface_unmap(surface);
 688
 689         if (surface->texture)
 690                 glDeleteTextures(1, &surface->texture);
 691
 692         if (surface->buffer)
 693                 wl_list_remove(&surface->buffer_destroy_listener.link);
 694
 695         if (surface->image != EGL_NO_IMAGE_KHR)
 696                 compositor->destroy_image(compositor->display,
 697                                           surface->image);
 698
 699         pixman_region32_fini(&surface->transform.boundingbox);
 700         pixman_region32_fini(&surface->damage);
 701         pixman_region32_fini(&surface->opaque);
 702         pixman_region32_fini(&surface->clip);
 703         if (!region_is_undefined(&surface->input))
 704                 pixman_region32_fini(&surface->input);
 705
 706         free(surface);
 707 }
 708
 709 WL_EXPORT void
 710 weston_surface_destroy(struct weston_surface *surface)
 711 {
 712         /* Not a valid way to destroy a client surface */
 713         assert(surface->surface.resource.client == NULL);
 714
 715         destroy_surface(&surface->surface.resource);
 716 }
 717
 718 static void
 719 weston_surface_attach(struct wl_surface *surface, struct wl_buffer *buffer)
 720 {
 721         struct weston_surface *es = (struct weston_surface *) surface;
 722         struct weston_compositor *ec = es->compositor;
 723
 724         if (es->buffer) {
 725                 weston_buffer_post_release(es->buffer);
 726                 wl_list_remove(&es->buffer_destroy_listener.link);
 727         }
 728
 729         es->buffer = buffer;
 730
 731         if (!buffer) {
 732                 if (weston_surface_is_mapped(es))
 733                         weston_surface_unmap(es);
 734                 return;
 735         }
 736
 737         buffer->busy_count++;
 738         wl_signal_add(&es->buffer->resource.destroy_signal,
 739                       &es->buffer_destroy_listener);
 740
 741         if (es->geometry.width != buffer->width ||
 742             es->geometry.height != buffer->height) {
 743                 undef_region(&es->input);
 744                 pixman_region32_fini(&es->opaque);
 745                 pixman_region32_init(&es->opaque);
 746         }
 747
 748         if (!es->texture) {
 749                 glGenTextures(1, &es->texture);
 750                 glBindTexture(GL_TEXTURE_2D, es->texture);
 751                 glTexParameteri(GL_TEXTURE_2D,
 752                                 GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
 753                 glTexParameteri(GL_TEXTURE_2D,
 754                                 GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
 755                 es->shader = &ec->texture_shader;
 756         } else {
 757                 glBindTexture(GL_TEXTURE_2D, es->texture);
 758         }
 759
 760         if (wl_buffer_is_shm(buffer)) {
 761                 es->pitch = wl_shm_buffer_get_stride(buffer) / 4;
 762                 glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT,
 763                              es->pitch, es->buffer->height, 0,
 764                              GL_BGRA_EXT, GL_UNSIGNED_BYTE, NULL);
 765         } else {
 766                 if (es->image != EGL_NO_IMAGE_KHR)
 767                         ec->destroy_image(ec->display, es->image);
 768                 es->image = ec->create_image(ec->display, NULL,
 769                                              EGL_WAYLAND_BUFFER_WL,
 770                                              buffer, NULL);
 771
 772                 ec->image_target_texture_2d(GL_TEXTURE_2D, es->image);
 773
 774                 es->pitch = buffer->width;
 775         }
 776 }
 777
 778 static int
 779 texture_region(struct weston_surface *es, pixman_region32_t *region)
 780 {
 781         struct weston_compositor *ec = es->compositor;
 782         GLfloat *v, inv_width, inv_height;
 783         GLfloat sx, sy;
 784         pixman_box32_t *rectangles;
 785         unsigned int *p;
 786         int i, n;
 787
 788         rectangles = pixman_region32_rectangles(region, &n);
 789         v = wl_array_add(&ec->vertices, n * 16 * sizeof *v);
 790         p = wl_array_add(&ec->indices, n * 6 * sizeof *p);
 791         inv_width = 1.0 / es->pitch;
 792         inv_height = 1.0 / es->geometry.height;
 793
 794         for (i = 0; i < n; i++, v += 16, p += 6) {
 795                 surface_from_global_float(es, rectangles[i].x1,
 796                                           rectangles[i].y1, &sx, &sy);
 797                 v[ 0] = rectangles[i].x1;
 798                 v[ 1] = rectangles[i].y1;
 799                 v[ 2] = sx * inv_width;
 800                 v[ 3] = sy * inv_height;
 801
 802                 surface_from_global_float(es, rectangles[i].x1,
 803                                           rectangles[i].y2, &sx, &sy);
 804                 v[ 4] = rectangles[i].x1;
 805                 v[ 5] = rectangles[i].y2;
 806                 v[ 6] = sx * inv_width;
 807                 v[ 7] = sy * inv_height;
 808
 809                 surface_from_global_float(es, rectangles[i].x2,
 810                                           rectangles[i].y1, &sx, &sy);
 811                 v[ 8] = rectangles[i].x2;
 812                 v[ 9] = rectangles[i].y1;
 813                 v[10] = sx * inv_width;
 814                 v[11] = sy * inv_height;
 815
 816                 surface_from_global_float(es, rectangles[i].x2,
 817                                           rectangles[i].y2, &sx, &sy);
 818                 v[12] = rectangles[i].x2;
 819                 v[13] = rectangles[i].y2;
 820                 v[14] = sx * inv_width;
 821                 v[15] = sy * inv_height;
 822
 823                 p[0] = i * 4 + 0;
 824                 p[1] = i * 4 + 1;
 825                 p[2] = i * 4 + 2;
 826                 p[3] = i * 4 + 2;
 827                 p[4] = i * 4 + 1;
 828                 p[5] = i * 4 + 3;
 829         }
 830
 831         return n;
 832 }
 833
 834 WL_EXPORT void
 835 weston_surface_draw(struct weston_surface *es, struct weston_output *output,
 836                     pixman_region32_t *damage)
 837 {
 838         struct weston_compositor *ec = es->compositor;
 839         GLfloat *v;
 840         pixman_region32_t repaint;
 841         GLint filter;
 842         int n;
 843
 844         pixman_region32_init(&repaint);
 845         pixman_region32_intersect(&repaint,
 846                                   &es->transform.boundingbox, damage);
 847         pixman_region32_subtract(&repaint, &repaint, &es->clip);
 848
 849         if (!pixman_region32_not_empty(&repaint))
 850                 goto out;
 851
 852         glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
 853         glEnable(GL_BLEND);
 854
 855         if (ec->current_shader != es->shader) {
 856                 glUseProgram(es->shader->program);
 857                 ec->current_shader = es->shader;
 858         }
 859
 860         glUniformMatrix4fv(es->shader->proj_uniform,
 861                            1, GL_FALSE, output->matrix.d);
 862         glUniform1i(es->shader->tex_uniform, 0);
 863         glUniform4fv(es->shader->color_uniform, 1, es->color);
 864         glUniform1f(es->shader->alpha_uniform, es->alpha / 255.0);
 865         glUniform1f(es->shader->brightness_uniform, es->brightness / 255.0);
 866         glUniform1f(es->shader->saturation_uniform, es->saturation / 255.0);
 867         glUniform1f(es->shader->texwidth_uniform,
 868                     (GLfloat)es->geometry.width / es->pitch);
 869
 870         if (es->transform.enabled || output->zoom.active)
 871                 filter = GL_LINEAR;
 872         else
 873                 filter = GL_NEAREST;
 874
 875         n = texture_region(es, &repaint);
 876
 877         glBindTexture(GL_TEXTURE_2D, es->texture);
 878         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, filter);
 879         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, filter);
 880
 881         v = ec->vertices.data;
 882         glVertexAttribPointer(0, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[0]);
 883         glVertexAttribPointer(1, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[2]);
 884         glEnableVertexAttribArray(0);
 885         glEnableVertexAttribArray(1);
 886
 887         glDrawElements(GL_TRIANGLES, n * 6, GL_UNSIGNED_INT, ec->indices.data);
 888
 889         glDisableVertexAttribArray(1);
 890         glDisableVertexAttribArray(0);
 891
 892         ec->vertices.size = 0;
 893         ec->indices.size = 0;
 894
 895 out:
 896         pixman_region32_fini(&repaint);
 897 }
 898
 899 WL_EXPORT void
 900 weston_surface_restack(struct weston_surface *surface, struct wl_list *below)
 901 {
 902         wl_list_remove(&surface->layer_link);
 903         wl_list_insert(below, &surface->layer_link);
 904         weston_surface_damage_below(surface);
 905         weston_surface_damage(surface);
 906 }
 907
 908 WL_EXPORT void
 909 weston_compositor_damage_all(struct weston_compositor *compositor)
 910 {
 911         struct weston_output *output;
 912
 913         wl_list_for_each(output, &compositor->output_list, link)
 914                 weston_output_damage(output);
 915 }
 916
 917 WL_EXPORT void
 918 weston_buffer_post_release(struct wl_buffer *buffer)
 919 {
 920         if (--buffer->busy_count > 0)
 921                 return;
 922
 923         assert(buffer->resource.client != NULL);
 924         wl_resource_queue_event(&buffer->resource, WL_BUFFER_RELEASE);
 925 }
 926
 927 WL_EXPORT void
 928 weston_output_damage(struct weston_output *output)
 929 {
 930         struct weston_compositor *compositor = output->compositor;
 931
 932         pixman_region32_union(&compositor->damage,
 933                               &compositor->damage, &output->region);
 934         weston_compositor_schedule_repaint(compositor);
 935 }
 936
 937 static void
 938 fade_frame(struct weston_animation *animation,
 939            struct weston_output *output, uint32_t msecs)
 940 {
 941         struct weston_compositor *compositor =
 942                 container_of(animation,
 943                              struct weston_compositor, fade.animation);
 944         struct weston_surface *surface;
 945
 946         surface = compositor->fade.surface;
 947         weston_spring_update(&compositor->fade.spring, msecs);
 948         weston_surface_set_color(surface, 0.0, 0.0, 0.0,
 949                                  compositor->fade.spring.current);
 950         weston_surface_damage(surface);
 951
 952         if (weston_spring_done(&compositor->fade.spring)) {
 953                 compositor->fade.spring.current =
 954                         compositor->fade.spring.target;
 955                 wl_list_remove(&animation->link);
 956                 wl_list_init(&animation->link);
 957
 958                 if (compositor->fade.spring.current < 0.001) {
 959                         destroy_surface(&surface->surface.resource);
 960                         compositor->fade.surface = NULL;
 961                 } else if (compositor->fade.spring.current > 0.999) {
 962                         compositor->state = WESTON_COMPOSITOR_SLEEPING;
 963                         wl_signal_emit(&compositor->lock_signal, compositor);
 964                 }
 965         }
 966 }
 967
 968 struct weston_frame_callback {
 969         struct wl_resource resource;
 970         struct wl_list link;
 971 };
 972
 973 static void
 974 weston_output_repaint(struct weston_output *output, int msecs)
 975 {
 976         struct weston_compositor *ec = output->compositor;
 977         struct weston_surface *es;
 978         struct weston_layer *layer;
 979         struct weston_animation *animation, *next;
 980         struct weston_frame_callback *cb, *cnext;
 981         pixman_region32_t opaque, new_damage, output_damage;
 982         int32_t width, height;
 983
 984         weston_compositor_update_drag_surfaces(ec);
 985
 986         width = output->current->width +
 987                 output->border.left + output->border.right;
 988         height = output->current->height +
 989                 output->border.top + output->border.bottom;
 990         glViewport(0, 0, width, height);
 991
 992         /* Rebuild the surface list and update surface transforms up front. */
 993         wl_list_init(&ec->surface_list);
 994         wl_list_for_each(layer, &ec->layer_list, link) {
 995                 wl_list_for_each(es, &layer->surface_list, layer_link) {
 996                         weston_surface_update_transform(es);
 997                         wl_list_insert(ec->surface_list.prev, &es->link);
 998                 }
 999         }
1000
1001         if (output->assign_planes)
1002                 /*
1003                  * This will queue flips for the fbs and sprites where
1004                  * applicable and clear the damage for those surfaces.
1005                  * The repaint loop below will repaint everything
1006                  * else.
1007                  */
1008                 output->assign_planes(output);
1009
1010         pixman_region32_init(&new_damage);
1011         pixman_region32_init(&opaque);
1012
1013         wl_list_for_each(es, &ec->surface_list, link) {
1014                 pixman_region32_subtract(&es->damage, &es->damage, &opaque);
1015                 pixman_region32_union(&new_damage, &new_damage, &es->damage);
1016                 empty_region(&es->damage);
1017                 pixman_region32_copy(&es->clip, &opaque);
1018                 pixman_region32_union(&opaque, &opaque, &es->transform.opaque);
1019         }
1020
1021         pixman_region32_union(&ec->damage, &ec->damage, &new_damage);
1022
1023         pixman_region32_init(&output_damage);
1024         pixman_region32_union(&output_damage,
1025                               &ec->damage, &output->previous_damage);
1026         pixman_region32_copy(&output->previous_damage, &ec->damage);
1027         pixman_region32_intersect(&output_damage,
1028                                   &output_damage, &output->region);
1029         pixman_region32_subtract(&ec->damage, &ec->damage, &output->region);
1030
1031         pixman_region32_fini(&opaque);
1032         pixman_region32_fini(&new_damage);
1033
1034         if (output->dirty)
1035                 weston_output_update_matrix(output);
1036
1037         output->repaint(output, &output_damage);
1038
1039         pixman_region32_fini(&output_damage);
1040
1041         output->repaint_needed = 0;
1042
1043         weston_compositor_repick(ec);
1044         wl_event_loop_dispatch(ec->input_loop, 0);
1045
1046         wl_list_for_each_safe(cb, cnext, &output->frame_callback_list, link) {
1047                 wl_callback_send_done(&cb->resource, msecs);
1048                 wl_resource_destroy(&cb->resource);
1049         }
1050
1051         wl_list_for_each_safe(animation, next, &ec->animation_list, link)
1052                 animation->frame(animation, output, msecs);
1053 }
1054
1055 static int
1056 weston_compositor_read_input(int fd, uint32_t mask, void *data)
1057 {
1058         struct weston_compositor *compositor = data;
1059
1060         wl_event_loop_dispatch(compositor->input_loop, 0);
1061
1062         return 1;
1063 }
1064
1065 WL_EXPORT void
1066 weston_output_finish_frame(struct weston_output *output, int msecs)
1067 {
1068         struct weston_compositor *compositor = output->compositor;
1069         struct wl_event_loop *loop =
1070                 wl_display_get_event_loop(compositor->wl_display);
1071         int fd;
1072
1073         if (output->repaint_needed) {
1074                 weston_output_repaint(output, msecs);
1075                 return;
1076         }
1077
1078         output->repaint_scheduled = 0;
1079         if (compositor->input_loop_source)
1080                 return;
1081
1082         fd = wl_event_loop_get_fd(compositor->input_loop);
1083         compositor->input_loop_source =
1084                 wl_event_loop_add_fd(loop, fd, WL_EVENT_READABLE,
1085                                      weston_compositor_read_input, compositor);
1086 }
1087
1088 static void
1089 idle_repaint(void *data)
1090 {
1091         struct weston_output *output = data;
1092
1093         weston_output_finish_frame(output, weston_compositor_get_time());
1094 }
1095
1096 WL_EXPORT void
1097 weston_layer_init(struct weston_layer *layer, struct wl_list *below)
1098 {
1099         wl_list_init(&layer->surface_list);
1100         wl_list_insert(below, &layer->link);
1101 }
1102
1103 WL_EXPORT void
1104 weston_compositor_schedule_repaint(struct weston_compositor *compositor)
1105 {
1106         struct weston_output *output;
1107         struct wl_event_loop *loop;
1108
1109         if (compositor->state == WESTON_COMPOSITOR_SLEEPING)
1110                 return;
1111
1112         loop = wl_display_get_event_loop(compositor->wl_display);
1113         wl_list_for_each(output, &compositor->output_list, link) {
1114                 output->repaint_needed = 1;
1115                 if (output->repaint_scheduled)
1116                         continue;
1117
1118                 wl_event_loop_add_idle(loop, idle_repaint, output);
1119                 output->repaint_scheduled = 1;
1120         }
1121
1122         if (compositor->input_loop_source) {
1123                 wl_event_source_remove(compositor->input_loop_source);
1124                 compositor->input_loop_source = NULL;
1125         }
1126 }
1127
1128 WL_EXPORT void
1129 weston_compositor_fade(struct weston_compositor *compositor, float tint)
1130 {
1131         struct weston_surface *surface;
1132         int done;
1133
1134         done = weston_spring_done(&compositor->fade.spring);
1135         compositor->fade.spring.target = tint;
1136         if (weston_spring_done(&compositor->fade.spring))
1137                 return;
1138
1139         if (done)
1140                 compositor->fade.spring.timestamp =
1141                         weston_compositor_get_time();
1142
1143         if (compositor->fade.surface == NULL) {
1144                 surface = weston_surface_create(compositor);
1145                 weston_surface_configure(surface, 0, 0, 8192, 8192);
1146                 weston_surface_set_color(surface, 0.0, 0.0, 0.0, 0.0);
1147                 wl_list_insert(&compositor->fade_layer.surface_list,
1148                                &surface->layer_link);
1149                 weston_surface_assign_output(surface);
1150                 compositor->fade.surface = surface;
1151                 pixman_region32_init(&surface->input);
1152         }
1153
1154         weston_surface_damage(compositor->fade.surface);
1155         if (wl_list_empty(&compositor->fade.animation.link))
1156                 wl_list_insert(compositor->animation_list.prev,
1157                                &compositor->fade.animation.link);
1158 }
1159
1160 static void
1161 surface_destroy(struct wl_client *client, struct wl_resource *resource)
1162 {
1163         wl_resource_destroy(resource);
1164 }
1165
1166 static struct wl_resource *
1167 find_resource_for_client(struct wl_list *list, struct wl_client *client)
1168 {
1169         struct wl_resource *r;
1170
1171         wl_list_for_each(r, list, link) {
1172                 if (r->client == client)
1173                         return r;
1174         }
1175
1176         return NULL;
1177 }
1178
1179 static void
1180 weston_surface_update_output_mask(struct weston_surface *es, uint32_t mask)
1181 {
1182         uint32_t different = es->output_mask ^ mask;
1183         uint32_t entered = mask & different;
1184         uint32_t left = es->output_mask & different;
1185         struct weston_output *output;
1186         struct wl_resource *resource;
1187         struct wl_client *client = es->surface.resource.client;
1188
1189         if (es->surface.resource.client == NULL)
1190                 return;
1191         if (different == 0)
1192                 return;
1193
1194         es->output_mask = mask;
1195         wl_list_for_each(output, &es->compositor->output_list, link) {
1196                 if (1 << output->id & different)
1197                         resource =
1198                                 find_resource_for_client(&output->resource_list,
1199                                                          client);
1200                 if (1 << output->id & entered)
1201                         wl_surface_send_enter(&es->surface.resource, resource);
1202                 if (1 << output->id & left)
1203                         wl_surface_send_leave(&es->surface.resource, resource);
1204         }
1205 }
1206
1207 WL_EXPORT void
1208 weston_surface_assign_output(struct weston_surface *es)
1209 {
1210         struct weston_compositor *ec = es->compositor;
1211         struct weston_output *output, *new_output;
1212         pixman_region32_t region;
1213         uint32_t max, area, mask;
1214         pixman_box32_t *e;
1215
1216         weston_surface_update_transform(es);
1217
1218         new_output = NULL;
1219         max = 0;
1220         mask = 0;
1221         pixman_region32_init(&region);
1222         wl_list_for_each(output, &ec->output_list, link) {
1223                 pixman_region32_intersect(&region, &es->transform.boundingbox,
1224                                           &output->region);
1225
1226                 e = pixman_region32_extents(&region);
1227                 area = (e->x2 - e->x1) * (e->y2 - e->y1);
1228
1229                 if (area > 0)
1230                         mask |= 1 << output->id;
1231
1232                 if (area >= max) {
1233                         new_output = output;
1234                         max = area;
1235                 }
1236         }
1237         pixman_region32_fini(&region);
1238
1239         es->output = new_output;
1240         weston_surface_update_output_mask(es, mask);
1241
1242         if (!wl_list_empty(&es->frame_callback_list)) {
1243                 wl_list_insert_list(new_output->frame_callback_list.prev,
1244                                     &es->frame_callback_list);
1245                 wl_list_init(&es->frame_callback_list);
1246         }
1247 }
1248
1249 static void
1250 surface_attach(struct wl_client *client,
1251                struct wl_resource *resource,
1252                struct wl_resource *buffer_resource, int32_t sx, int32_t sy)
1253 {
1254         struct weston_surface *es = resource->data;
1255         struct wl_buffer *buffer = NULL;
1256
1257         if (buffer_resource)
1258                 buffer = buffer_resource->data;
1259
1260         weston_surface_attach(&es->surface, buffer);
1261
1262         if (buffer && es->configure)
1263                 es->configure(es, sx, sy);
1264 }
1265
1266 static void
1267 texture_set_subimage(struct weston_surface *surface,
1268                      int32_t x, int32_t y, int32_t width, int32_t height)
1269 {
1270         glBindTexture(GL_TEXTURE_2D, surface->texture);
1271
1272 #ifdef GL_UNPACK_ROW_LENGTH
1273         /* Mesa does not define GL_EXT_unpack_subimage */
1274
1275         if (surface->compositor->has_unpack_subimage) {
1276                 glPixelStorei(GL_UNPACK_ROW_LENGTH, surface->pitch);
1277                 glPixelStorei(GL_UNPACK_SKIP_PIXELS, x);
1278                 glPixelStorei(GL_UNPACK_SKIP_ROWS, y);
1279
1280                 glTexSubImage2D(GL_TEXTURE_2D, 0, x, y, width, height,
1281                                 GL_BGRA_EXT, GL_UNSIGNED_BYTE,
1282                                 wl_shm_buffer_get_data(surface->buffer));
1283                 return;
1284         }
1285 #endif
1286
1287         glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT,
1288                      surface->pitch, surface->buffer->height, 0,
1289                      GL_BGRA_EXT, GL_UNSIGNED_BYTE,
1290                      wl_shm_buffer_get_data(surface->buffer));
1291 }
1292
1293 static void
1294 surface_damage(struct wl_client *client,
1295                struct wl_resource *resource,
1296                int32_t x, int32_t y, int32_t width, int32_t height)
1297 {
1298         struct weston_surface *es = resource->data;
1299
1300         weston_surface_damage_rectangle(es, x, y, width, height);
1301
1302         if (es->buffer && wl_buffer_is_shm(es->buffer))
1303                 texture_set_subimage(es, x, y, width, height);
1304 }
1305
1306 static void
1307 destroy_frame_callback(struct wl_resource *resource)
1308 {
1309         struct weston_frame_callback *cb = resource->data;
1310
1311         wl_list_remove(&cb->link);
1312         free(cb);
1313 }
1314
1315 static void
1316 surface_frame(struct wl_client *client,
1317               struct wl_resource *resource, uint32_t callback)
1318 {
1319         struct weston_frame_callback *cb;
1320         struct weston_surface *es = resource->data;
1321
1322         cb = malloc(sizeof *cb);
1323         if (cb == NULL) {
1324                 wl_resource_post_no_memory(resource);
1325                 return;
1326         }
1327
1328         cb->resource.object.interface = &wl_callback_interface;
1329         cb->resource.object.id = callback;
1330         cb->resource.destroy = destroy_frame_callback;
1331         cb->resource.client = client;
1332         cb->resource.data = cb;
1333
1334         wl_client_add_resource(client, &cb->resource);
1335
1336         if (es->output) {
1337                 wl_list_insert(es->output->frame_callback_list.prev,
1338                                &cb->link);
1339         } else {
1340                 wl_list_insert(es->frame_callback_list.prev, &cb->link);
1341         }
1342 }
1343
1344 static void
1345 surface_set_opaque_region(struct wl_client *client,
1346                           struct wl_resource *resource,
1347                           struct wl_resource *region_resource)
1348 {
1349         struct weston_surface *surface = resource->data;
1350         struct weston_region *region;
1351
1352         pixman_region32_fini(&surface->opaque);
1353
1354         if (region_resource) {
1355                 region = region_resource->data;
1356                 pixman_region32_init_rect(&surface->opaque, 0, 0,
1357                                           surface->geometry.width,
1358                                           surface->geometry.height);
1359                 pixman_region32_intersect(&surface->opaque,
1360                                           &surface->opaque, &region->region);
1361         } else {
1362                 pixman_region32_init(&surface->opaque);
1363         }
1364
1365         surface->geometry.dirty = 1;
1366 }
1367
1368 static void
1369 surface_set_input_region(struct wl_client *client,
1370                          struct wl_resource *resource,
1371                          struct wl_resource *region_resource)
1372 {
1373         struct weston_surface *surface = resource->data;
1374         struct weston_region *region;
1375
1376         if (region_resource) {
1377                 region = region_resource->data;
1378                 pixman_region32_init_rect(&surface->input, 0, 0,
1379                                           surface->geometry.width,
1380                                           surface->geometry.height);
1381                 pixman_region32_intersect(&surface->input,
1382                                           &surface->input, &region->region);
1383         } else {
1384                 pixman_region32_init_rect(&surface->input, 0, 0,
1385                                           surface->geometry.width,
1386                                           surface->geometry.height);
1387         }
1388
1389         weston_compositor_schedule_repaint(surface->compositor);
1390 }
1391
1392 static const struct wl_surface_interface surface_interface = {
1393         surface_destroy,
1394         surface_attach,
1395         surface_damage,
1396         surface_frame,
1397         surface_set_opaque_region,
1398         surface_set_input_region
1399 };
1400
1401 static void
1402 compositor_create_surface(struct wl_client *client,
1403                           struct wl_resource *resource, uint32_t id)
1404 {
1405         struct weston_compositor *ec = resource->data;
1406         struct weston_surface *surface;
1407
1408         surface = weston_surface_create(ec);
1409         if (surface == NULL) {
1410                 wl_resource_post_no_memory(resource);
1411                 return;
1412         }
1413
1414         surface->surface.resource.destroy = destroy_surface;
1415
1416         surface->surface.resource.object.id = id;
1417         surface->surface.resource.object.interface = &wl_surface_interface;
1418         surface->surface.resource.object.implementation =
1419                 (void (**)(void)) &surface_interface;
1420         surface->surface.resource.data = surface;
1421
1422         wl_client_add_resource(client, &surface->surface.resource);
1423 }
1424
1425 static void
1426 destroy_region(struct wl_resource *resource)
1427 {
1428         struct weston_region *region =
1429                 container_of(resource, struct weston_region, resource);
1430
1431         pixman_region32_fini(&region->region);
1432         free(region);
1433 }
1434
1435 static void
1436 region_destroy(struct wl_client *client, struct wl_resource *resource)
1437 {
1438         wl_resource_destroy(resource);
1439 }
1440
1441 static void
1442 region_add(struct wl_client *client, struct wl_resource *resource,
1443            int32_t x, int32_t y, int32_t width, int32_t height)
1444 {
1445         struct weston_region *region = resource->data;
1446
1447         pixman_region32_union_rect(&region->region, &region->region,
1448                                    x, y, width, height);
1449 }
1450
1451 static void
1452 region_subtract(struct wl_client *client, struct wl_resource *resource,
1453                 int32_t x, int32_t y, int32_t width, int32_t height)
1454 {
1455         struct weston_region *region = resource->data;
1456         pixman_region32_t rect;
1457
1458         pixman_region32_init_rect(&rect, x, y, width, height);
1459         pixman_region32_subtract(&region->region, &region->region, &rect);
1460         pixman_region32_fini(&rect);
1461 }
1462
1463 static const struct wl_region_interface region_interface = {
1464         region_destroy,
1465         region_add,
1466         region_subtract
1467 };
1468
1469 static void
1470 compositor_create_region(struct wl_client *client,
1471                          struct wl_resource *resource, uint32_t id)
1472 {
1473         struct weston_region *region;
1474
1475         region = malloc(sizeof *region);
1476         if (region == NULL) {
1477                 wl_resource_post_no_memory(resource);
1478                 return;
1479         }
1480
1481         region->resource.destroy = destroy_region;
1482
1483         region->resource.object.id = id;
1484         region->resource.object.interface = &wl_region_interface;
1485         region->resource.object.implementation =
1486                 (void (**)(void)) &region_interface;
1487         region->resource.data = region;
1488
1489         pixman_region32_init(&region->region);
1490
1491         wl_client_add_resource(client, &region->resource);
1492 }
1493
1494 static const struct wl_compositor_interface compositor_interface = {
1495         compositor_create_surface,
1496         compositor_create_region
1497 };
1498
1499 WL_EXPORT void
1500 weston_compositor_wake(struct weston_compositor *compositor)
1501 {
1502         compositor->state = WESTON_COMPOSITOR_ACTIVE;
1503         weston_compositor_fade(compositor, 0.0);
1504
1505         wl_event_source_timer_update(compositor->idle_source,
1506                                      compositor->idle_time * 1000);
1507 }
1508
1509 static void
1510 weston_compositor_dpms_on(struct weston_compositor *compositor)
1511 {
1512         struct weston_output *output;
1513
1514         wl_list_for_each(output, &compositor->output_list, link)
1515                 if (output->set_dpms)
1516                         output->set_dpms(output, WESTON_DPMS_ON);
1517 }
1518
1519 WL_EXPORT void
1520 weston_compositor_activity(struct weston_compositor *compositor)
1521 {
1522         if (compositor->state == WESTON_COMPOSITOR_ACTIVE) {
1523                 weston_compositor_wake(compositor);
1524         } else {
1525                 weston_compositor_dpms_on(compositor);
1526                 wl_signal_emit(&compositor->unlock_signal, compositor);
1527         }
1528 }
1529
1530 static void
1531 weston_compositor_idle_inhibit(struct weston_compositor *compositor)
1532 {
1533         weston_compositor_activity(compositor);
1534         compositor->idle_inhibit++;
1535 }
1536
1537 static void
1538 weston_compositor_idle_release(struct weston_compositor *compositor)
1539 {
1540         compositor->idle_inhibit--;
1541         weston_compositor_activity(compositor);
1542 }
1543
1544 static int
1545 idle_handler(void *data)
1546 {
1547         struct weston_compositor *compositor = data;
1548
1549         if (compositor->idle_inhibit)
1550                 return 1;
1551
1552         weston_compositor_fade(compositor, 1.0);
1553
1554         return 1;
1555 }
1556
1557 static  void
1558 weston_input_update_drag_surface(struct wl_input_device *input_device,
1559                                  int dx, int dy);
1560
1561 static void
1562 clip_pointer_motion(struct weston_compositor *ec,
1563                     GLfloat *fx, GLfloat *fy)
1564 {
1565         struct weston_output *output;
1566         int32_t x, y;
1567         int x_valid = 0, y_valid = 0;
1568         int min_x = INT_MAX, min_y = INT_MAX, max_x = INT_MIN, max_y = INT_MIN;
1569
1570         x = *fx;
1571         y = *fy;
1572
1573         wl_list_for_each(output, &ec->output_list, link) {
1574                 if (output->x <= x && x < output->x + output->current->width)
1575                         x_valid = 1;
1576
1577                 if (output->y <= y && y < output->y + output->current->height)
1578                         y_valid = 1;
1579
1580                 /* FIXME: calculate this only on output addition/deletion */
1581                 if (output->x < min_x)
1582                         min_x = output->x;
1583                 if (output->y < min_y)
1584                         min_y = output->y;
1585
1586                 if (output->x + output->current->width > max_x)
1587                         max_x = output->x + output->current->width - 1;
1588                 if (output->y + output->current->height > max_y)
1589                         max_y = output->y + output->current->height - 1;
1590         }
1591
1592         if (!x_valid) {
1593                 if (x < min_x)
1594                         x = min_x;
1595                 else if (x >= max_x)
1596                         x = max_x;
1597         }
1598         if (!y_valid) {
1599                 if (y < min_y)
1600                         y = min_y;
1601                 else  if (y >= max_y)
1602                         y = max_y;
1603         }
1604
1605         *fx = x;
1606         *fy = y;
1607 }
1608
1609 WL_EXPORT void
1610 notify_motion(struct wl_input_device *device, uint32_t time, GLfloat x, GLfloat y)
1611 {
1612         const struct wl_pointer_grab_interface *interface;
1613         struct weston_input_device *wd = (struct weston_input_device *) device;
1614         struct weston_compositor *ec = wd->compositor;
1615         struct weston_output *output;
1616
1617         weston_compositor_activity(ec);
1618
1619         clip_pointer_motion(ec, &x, &y);
1620
1621         weston_input_update_drag_surface(device,
1622                                          x - device->x, y - device->y);
1623
1624         device->x = wl_fixed_from_double(x);
1625         device->y = wl_fixed_from_double(y);
1626
1627         wl_list_for_each(output, &ec->output_list, link)
1628                 if (output->zoom.active &&
1629                     pixman_region32_contains_point(&output->region, x, y, NULL))
1630                         weston_output_update_zoom(output, x, y);
1631
1632         weston_device_repick(device);
1633         interface = device->pointer_grab->interface;
1634         interface->motion(device->pointer_grab, time,
1635                           device->pointer_grab->x, device->pointer_grab->y);
1636
1637         x = wl_fixed_to_double(device->x);
1638         y = wl_fixed_to_double(device->y);
1639
1640         if (wd->sprite) {
1641                 weston_surface_set_position(wd->sprite,
1642                                             x - wd->hotspot_x,
1643                                             y - wd->hotspot_y);
1644                 weston_compositor_schedule_repaint(ec);
1645         }
1646 }
1647
1648 WL_EXPORT void
1649 weston_surface_activate(struct weston_surface *surface,
1650                         struct weston_input_device *device)
1651 {
1652         struct weston_compositor *compositor = device->compositor;
1653
1654         wl_input_device_set_keyboard_focus(&device->input_device,
1655                                            &surface->surface);
1656         wl_data_device_set_keyboard_focus(&device->input_device);
1657
1658         wl_signal_emit(&compositor->activate_signal, surface);
1659 }
1660
1661 WL_EXPORT void
1662 notify_button(struct wl_input_device *device,
1663               uint32_t time, int32_t button, uint32_t state)
1664 {
1665         struct weston_input_device *wd = (struct weston_input_device *) device;
1666         struct weston_compositor *compositor = wd->compositor;
1667         struct weston_surface *focus = (struct weston_surface *) device->pointer_focus;
1668         uint32_t serial = wl_display_next_serial(compositor->wl_display);
1669
1670         if (state) {
1671                 if (compositor->ping_handler && focus)
1672                         compositor->ping_handler(focus, serial);
1673                 weston_compositor_idle_inhibit(compositor);
1674                 if (device->button_count == 0) {
1675                         device->grab_button = button;
1676                         device->grab_time = time;
1677                         device->grab_x = device->x;
1678                         device->grab_y = device->y;
1679                 }
1680                 device->button_count++;
1681         } else {
1682                 weston_compositor_idle_release(compositor);
1683                 device->button_count--;
1684         }
1685
1686         weston_compositor_run_binding(compositor, wd, time, 0, button, 0, state);
1687
1688         device->pointer_grab->interface->button(device->pointer_grab, time, button, state);
1689
1690         if (device->button_count == 1)
1691                 device->grab_serial =
1692                         wl_display_get_serial(compositor->wl_display);
1693 }
1694
1695 WL_EXPORT void
1696 notify_axis(struct wl_input_device *device,
1697               uint32_t time, uint32_t axis, int32_t value)
1698 {
1699         struct weston_input_device *wd = (struct weston_input_device *) device;
1700         struct weston_compositor *compositor = wd->compositor;
1701         struct weston_surface *focus = (struct weston_surface *) device->pointer_focus;
1702         uint32_t serial = wl_display_next_serial(compositor->wl_display);
1703
1704         if (compositor->ping_handler && focus)
1705                 compositor->ping_handler(focus, serial);
1706
1707         weston_compositor_activity(compositor);
1708
1709         if (value)
1710                 weston_compositor_run_binding(compositor, wd,
1711                                                 time, 0, 0, axis, value);
1712         else
1713                 return;
1714
1715         if (device->pointer_focus_resource)
1716                 wl_resource_post_event(device->pointer_focus_resource,
1717                                 WL_INPUT_DEVICE_AXIS, time, axis, value);
1718 }
1719
1720 static void
1721 update_modifier_state(struct weston_input_device *device,
1722                       uint32_t key, uint32_t state)
1723 {
1724         uint32_t modifier;
1725
1726         switch (key) {
1727         case KEY_LEFTCTRL:
1728         case KEY_RIGHTCTRL:
1729                 modifier = MODIFIER_CTRL;
1730                 break;
1731
1732         case KEY_LEFTALT:
1733         case KEY_RIGHTALT:
1734                 modifier = MODIFIER_ALT;
1735                 break;
1736
1737         case KEY_LEFTMETA:
1738         case KEY_RIGHTMETA:
1739                 modifier = MODIFIER_SUPER;
1740                 break;
1741
1742         default:
1743                 modifier = 0;
1744                 break;
1745         }
1746
1747         if (state)
1748                 device->modifier_state |= modifier;
1749         else
1750                 device->modifier_state &= ~modifier;
1751 }
1752
1753 WL_EXPORT void
1754 notify_key(struct wl_input_device *device,
1755            uint32_t time, uint32_t key, uint32_t state)
1756 {
1757         struct weston_input_device *wd = (struct weston_input_device *) device;
1758         struct weston_compositor *compositor = wd->compositor;
1759         struct weston_surface *focus = (struct weston_surface *) device->pointer_focus;
1760         uint32_t serial = wl_display_next_serial(compositor->wl_display);
1761         uint32_t *k, *end;
1762
1763         if (state) {
1764                 if (compositor->ping_handler && focus)
1765                         compositor->ping_handler(focus, serial);
1766
1767                 weston_compositor_idle_inhibit(compositor);
1768                 device->grab_key = key;
1769                 device->grab_time = time;
1770         } else {
1771                 weston_compositor_idle_release(compositor);
1772         }
1773
1774         update_modifier_state(wd, key, state);
1775         end = device->keys.data + device->keys.size;
1776         for (k = device->keys.data; k < end; k++) {
1777                 if (*k == key)
1778                         *k = *--end;
1779         }
1780         device->keys.size = (void *) end - device->keys.data;
1781         if (state) {
1782                 k = wl_array_add(&device->keys, sizeof *k);
1783                 *k = key;
1784         }
1785
1786         if (device->keyboard_grab == &device->default_keyboard_grab)
1787                 weston_compositor_run_binding(compositor, wd,
1788                                               time, key, 0, 0, state);
1789
1790         device->keyboard_grab->interface->key(device->keyboard_grab,
1791                                               time, key, state);
1792 }
1793
1794 WL_EXPORT void
1795 notify_pointer_focus(struct wl_input_device *device,
1796                      struct weston_output *output, GLfloat x, GLfloat y)
1797 {
1798         struct weston_input_device *wd = (struct weston_input_device *) device;
1799         struct weston_compositor *compositor = wd->compositor;
1800
1801         if (output) {
1802                 weston_input_update_drag_surface(device,
1803                                                  x - wl_fixed_to_double(device->x),
1804                                                  y - wl_fixed_to_double(device->y));
1805
1806                 device->x = wl_fixed_from_double(x);
1807                 device->y = wl_fixed_from_double(y);
1808                 compositor->focus = 1;
1809                 weston_compositor_repick(compositor);
1810         } else {
1811                 compositor->focus = 0;
1812                 weston_compositor_repick(compositor);
1813         }
1814 }
1815
1816 static void
1817 destroy_device_saved_kbd_focus(struct wl_listener *listener, void *data)
1818 {
1819         struct weston_input_device *wd;
1820
1821         wd = container_of(listener, struct weston_input_device,
1822                           saved_kbd_focus_listener);
1823
1824         wd->saved_kbd_focus = NULL;
1825 }
1826
1827 WL_EXPORT void
1828 notify_keyboard_focus(struct wl_input_device *device, struct wl_array *keys)
1829 {
1830         struct weston_input_device *wd =
1831                 (struct weston_input_device *) device;
1832         struct weston_compositor *compositor = wd->compositor;
1833         struct wl_surface *surface;
1834         uint32_t *k;
1835
1836         if (keys) {
1837                 wl_array_copy(&wd->input_device.keys, keys);
1838                 wd->modifier_state = 0;
1839                 wl_array_for_each(k, &device->keys) {
1840                         weston_compositor_idle_inhibit(compositor);
1841                         update_modifier_state(wd, *k, 1);
1842                 }
1843
1844                 surface = wd->saved_kbd_focus;
1845
1846                 if (surface) {
1847                         wl_list_remove(&wd->saved_kbd_focus_listener.link);
1848                         wl_input_device_set_keyboard_focus(&wd->input_device,
1849                                                            surface);
1850                         wd->saved_kbd_focus = NULL;
1851                 }
1852         } else {
1853                 wl_array_for_each(k, &device->keys)
1854                         weston_compositor_idle_release(compositor);
1855
1856                 wd->modifier_state = 0;
1857
1858                 surface = wd->input_device.keyboard_focus;
1859
1860                 if (surface) {
1861                         wd->saved_kbd_focus = surface;
1862                         wd->saved_kbd_focus_listener.notify =
1863                                 destroy_device_saved_kbd_focus;
1864                         wl_signal_add(&surface->resource.destroy_signal,
1865                                       &wd->saved_kbd_focus_listener);
1866                 }
1867
1868                 wl_input_device_set_keyboard_focus(&wd->input_device, NULL);
1869                 /* FIXME: We really need keyboard grab cancel here to
1870                  * let the grab shut down properly.  As it is we leak
1871                  * the grab data. */
1872                 wl_input_device_end_keyboard_grab(&wd->input_device);
1873         }
1874 }
1875
1876 static void
1877 lose_touch_focus_resource(struct wl_listener *listener, void *data)
1878 {
1879         struct weston_input_device *device =
1880                 container_of(listener, struct weston_input_device,
1881                              touch_focus_resource_listener);
1882
1883         device->touch_focus_resource = NULL;
1884 }
1885
1886 static void
1887 lose_touch_focus(struct wl_listener *listener, void *data)
1888 {
1889         struct weston_input_device *device =
1890                 container_of(listener, struct weston_input_device,
1891                              touch_focus_listener);
1892
1893         device->touch_focus = NULL;
1894 }
1895
1896 static void
1897 touch_set_focus(struct weston_input_device *device,
1898                 struct wl_surface *surface)
1899 {
1900         struct wl_input_device *input_device = &device->input_device;
1901         struct wl_resource *resource;
1902
1903         if (device->touch_focus == surface)
1904                 return;
1905
1906         if (surface) {
1907                 resource =
1908                         find_resource_for_client(&input_device->resource_list,
1909                                                  surface->resource.client);
1910                 if (!resource) {
1911                         fprintf(stderr, "couldn't find resource\n");
1912                         return;
1913                 }
1914
1915                 device->touch_focus_resource_listener.notify =
1916                         lose_touch_focus_resource;
1917                 wl_signal_add(&resource->destroy_signal,
1918                               &device->touch_focus_resource_listener);
1919                 device->touch_focus_listener.notify = lose_touch_focus;
1920                 wl_signal_add(&surface->resource.destroy_signal,
1921                                &device->touch_focus_listener);
1922
1923                 device->touch_focus = surface;
1924                 device->touch_focus_resource = resource;
1925         } else {
1926                 if (device->touch_focus)
1927                         wl_list_remove(&device->touch_focus_listener.link);
1928                 if (device->touch_focus_resource)
1929                         wl_list_remove(&device->touch_focus_resource_listener.link);
1930                 device->touch_focus = NULL;
1931                 device->touch_focus_resource = NULL;
1932         }
1933 }
1934
1935 /**
1936  * notify_touch - emulates button touches and notifies surfaces accordingly.
1937  *
1938  * It assumes always the correct cycle sequence until it gets here: touch_down
1939  * → touch_update → ... → touch_update → touch_end. The driver is responsible
1940  * for sending along such order.
1941  *
1942  */
1943 WL_EXPORT void
1944 notify_touch(struct wl_input_device *device, uint32_t time, int touch_id,
1945              GLfloat x, GLfloat y, int touch_type)
1946 {
1947         struct weston_input_device *wd = (struct weston_input_device *) device;
1948         struct weston_compositor *ec = wd->compositor;
1949         struct weston_surface *es;
1950         wl_fixed_t fx, fy, sx, sy;
1951         uint32_t serial = 0;
1952
1953         fx = wl_fixed_from_double(x);
1954         fy = wl_fixed_from_double(y);
1955
1956         switch (touch_type) {
1957         case WL_INPUT_DEVICE_TOUCH_DOWN:
1958                 weston_compositor_idle_inhibit(ec);
1959
1960                 wd->num_tp++;
1961
1962                 /* the first finger down picks the surface, and all further go
1963                  * to that surface for the remainder of the touch session i.e.
1964                  * until all touch points are up again. */
1965                 if (wd->num_tp == 1) {
1966                         es = weston_compositor_pick_surface(ec, fx, fy, &sx, &sy);
1967                         touch_set_focus(wd, &es->surface);
1968                 } else if (wd->touch_focus) {
1969                         es = (struct weston_surface *) wd->touch_focus;
1970                         weston_surface_from_global_fixed(es, fx, fy, &sx, &sy);
1971                 }
1972
1973                 if (wd->touch_focus_resource && wd->touch_focus)
1974                         wl_input_device_send_touch_down(wd->touch_focus_resource,
1975                                                         serial, time,
1976                                                         &wd->touch_focus->resource,
1977                                                         touch_id, sx, sy);
1978                 break;
1979         case WL_INPUT_DEVICE_TOUCH_MOTION:
1980                 es = (struct weston_surface *) wd->touch_focus;
1981                 if (!es)
1982                         break;
1983
1984                 weston_surface_from_global_fixed(es, fx, fy, &sx, &sy);
1985                 if (wd->touch_focus_resource)
1986                         wl_input_device_send_touch_motion(wd->touch_focus_resource,
1987                                                           time, touch_id, sx, sy);
1988                 break;
1989         case WL_INPUT_DEVICE_TOUCH_UP:
1990                 weston_compositor_idle_release(ec);
1991                 wd->num_tp--;
1992
1993                 if (wd->touch_focus_resource)
1994                         wl_input_device_send_touch_up(wd->touch_focus_resource,
1995                                                       serial, time, touch_id);
1996                 if (wd->num_tp == 0)
1997                         touch_set_focus(wd, NULL);
1998                 break;
1999         }
2000 }
2001
2002 static void
2003 input_device_attach(struct wl_client *client,
2004                     struct wl_resource *resource,
2005                     uint32_t serial,
2006                     struct wl_resource *buffer_resource, int32_t x, int32_t y)
2007 {
2008         struct weston_input_device *device = resource->data;
2009         struct weston_compositor *compositor = device->compositor;
2010         struct wl_buffer *buffer = NULL;
2011
2012         if (serial < device->input_device.pointer_focus_serial)
2013                 return;
2014         if (device->input_device.pointer_focus == NULL)
2015                 return;
2016         if (device->input_device.pointer_focus->resource.client != client)
2017                 return;
2018
2019         if (buffer_resource)
2020                 buffer = buffer_resource->data;
2021
2022         weston_surface_attach(&device->sprite->surface, buffer);
2023         empty_region(&device->sprite->input);
2024
2025         if (!buffer)
2026                 return;
2027
2028         if (!weston_surface_is_mapped(device->sprite)) {
2029                 wl_list_insert(&compositor->cursor_layer.surface_list,
2030                                &device->sprite->layer_link);
2031                 weston_surface_assign_output(device->sprite);
2032         }
2033
2034
2035         device->hotspot_x = x;
2036         device->hotspot_y = y;
2037         weston_surface_configure(device->sprite,
2038                                  device->input_device.x - device->hotspot_x,
2039                                  device->input_device.y - device->hotspot_y,
2040                                  buffer->width, buffer->height);
2041
2042         surface_damage(NULL, &device->sprite->surface.resource,
2043                        0, 0, buffer->width, buffer->height);
2044 }
2045
2046 static const struct wl_input_device_interface input_device_interface = {
2047         input_device_attach,
2048 };
2049
2050 static void
2051 handle_drag_surface_destroy(struct wl_listener *listener, void *data)
2052 {
2053         struct weston_input_device *device;
2054
2055         device = container_of(listener, struct weston_input_device,
2056                               drag_surface_destroy_listener);
2057
2058         device->drag_surface = NULL;
2059 }
2060
2061 static void unbind_resource(struct wl_resource *resource)
2062 {
2063         wl_list_remove(&resource->link);
2064         free(resource);
2065 }
2066
2067 static void
2068 bind_input_device(struct wl_client *client,
2069                   void *data, uint32_t version, uint32_t id)
2070 {
2071         struct wl_input_device *device = data;
2072         struct wl_resource *resource;
2073
2074         resource = wl_client_add_object(client, &wl_input_device_interface,
2075                                         &input_device_interface, id, data);
2076         wl_list_insert(&device->resource_list, &resource->link);
2077         resource->destroy = unbind_resource;
2078 }
2079
2080 static void
2081 device_handle_new_drag_icon(struct wl_listener *listener, void *data)
2082 {
2083         struct weston_input_device *device;
2084
2085         device = container_of(listener, struct weston_input_device,
2086                               new_drag_icon_listener);
2087
2088         weston_input_update_drag_surface(&device->input_device, 0, 0);
2089 }
2090
2091 WL_EXPORT void
2092 weston_input_device_init(struct weston_input_device *device,
2093                          struct weston_compositor *ec)
2094 {
2095         wl_input_device_init(&device->input_device);
2096
2097         wl_display_add_global(ec->wl_display, &wl_input_device_interface,
2098                               device, bind_input_device);
2099
2100         device->sprite = weston_surface_create(ec);
2101         device->sprite->surface.resource.data = device->sprite;
2102
2103         device->compositor = ec;
2104         device->hotspot_x = 16;
2105         device->hotspot_y = 16;
2106         device->modifier_state = 0;
2107         device->num_tp = 0;
2108
2109         device->drag_surface_destroy_listener.notify =
2110                 handle_drag_surface_destroy;
2111
2112         wl_list_insert(ec->input_device_list.prev, &device->link);
2113
2114         device->new_drag_icon_listener.notify = device_handle_new_drag_icon;
2115         wl_signal_add(&device->input_device.drag_icon_signal,
2116                       &device->new_drag_icon_listener);
2117 }
2118
2119 WL_EXPORT void
2120 weston_input_device_release(struct weston_input_device *device)
2121 {
2122         wl_list_remove(&device->link);
2123         /* The global object is destroyed at wl_display_destroy() time. */
2124
2125         if (device->sprite)
2126                 destroy_surface(&device->sprite->surface.resource);
2127
2128         wl_input_device_release(&device->input_device);
2129 }
2130
2131 static void
2132 drag_surface_configure(struct weston_surface *es, int32_t sx, int32_t sy)
2133 {
2134         weston_surface_configure(es,
2135                                  es->geometry.x + sx, es->geometry.y + sy,
2136                                  es->buffer->width, es->buffer->height);
2137 }
2138
2139 static int
2140 device_setup_new_drag_surface(struct weston_input_device *device,
2141                               struct weston_surface *surface)
2142 {
2143         struct wl_input_device *input_device = &device->input_device;
2144
2145         if (surface->configure) {
2146                 wl_resource_post_error(&surface->surface.resource,
2147                                        WL_DISPLAY_ERROR_INVALID_OBJECT,
2148                                        "surface->configure already set");
2149                 return 0;
2150         }
2151
2152         device->drag_surface = surface;
2153
2154         weston_surface_set_position(device->drag_surface,
2155                                     wl_fixed_to_double(input_device->x),
2156                                     wl_fixed_to_double(input_device->y));
2157
2158         surface->configure = drag_surface_configure;
2159
2160         wl_signal_add(&surface->surface.resource.destroy_signal,
2161                        &device->drag_surface_destroy_listener);
2162
2163         return 1;
2164 }
2165
2166 static void
2167 device_release_drag_surface(struct weston_input_device *device)
2168 {
2169         device->drag_surface->configure = NULL;
2170         undef_region(&device->drag_surface->input);
2171         wl_list_remove(&device->drag_surface_destroy_listener.link);
2172         device->drag_surface = NULL;
2173 }
2174
2175 static void
2176 device_map_drag_surface(struct weston_input_device *device)
2177 {
2178         if (weston_surface_is_mapped(device->drag_surface) ||
2179             !device->drag_surface->buffer)
2180                 return;
2181
2182         wl_list_insert(&device->sprite->layer_link,
2183                        &device->drag_surface->layer_link);
2184         weston_surface_assign_output(device->drag_surface);
2185         empty_region(&device->drag_surface->input);
2186 }
2187
2188 static  void
2189 weston_input_update_drag_surface(struct wl_input_device *input_device,
2190                                  int dx, int dy)
2191 {
2192         int surface_changed = 0;
2193         struct weston_input_device *device = (struct weston_input_device *)
2194                 input_device;
2195
2196         if (!device->drag_surface && !input_device->drag_surface)
2197                 return;
2198
2199         if (device->drag_surface && input_device->drag_surface &&
2200             (&device->drag_surface->surface.resource !=
2201              &input_device->drag_surface->resource))
2202                 /* between calls to this funcion we got a new drag_surface */
2203                 surface_changed = 1;
2204
2205         if (!input_device->drag_surface || surface_changed) {
2206                 device_release_drag_surface(device);
2207                 if (!surface_changed)
2208                         return;
2209         }
2210
2211         if (!device->drag_surface || surface_changed) {
2212                 struct weston_surface *surface = (struct weston_surface *)
2213                         input_device->drag_surface;
2214                 if (!device_setup_new_drag_surface(device, surface))
2215                         return;
2216         }
2217
2218         /* the client may not have attached a buffer to the drag surface
2219          * when we setup it up, so check if map is needed on every update */
2220         device_map_drag_surface(device);
2221
2222         /* the client may have attached a buffer with a different size to
2223          * the drag surface, causing the input region to be reset */
2224         if (region_is_undefined(&device->drag_surface->input))
2225                 empty_region(&device->drag_surface->input);
2226
2227         if (!dx && !dy)
2228                 return;
2229
2230         weston_surface_set_position(device->drag_surface,
2231                                     device->drag_surface->geometry.x + dx,
2232                                     device->drag_surface->geometry.y + dy);
2233 }
2234
2235 WL_EXPORT void
2236 weston_compositor_update_drag_surfaces(struct weston_compositor *compositor)
2237 {
2238         weston_input_update_drag_surface(compositor->input_device, 0, 0);
2239 }
2240
2241 static void
2242 bind_output(struct wl_client *client,
2243             void *data, uint32_t version, uint32_t id)
2244 {
2245         struct weston_output *output = data;
2246         struct weston_mode *mode;
2247         struct wl_resource *resource;
2248
2249         resource = wl_client_add_object(client,
2250                                         &wl_output_interface, NULL, id, data);
2251
2252         wl_list_insert(&output->resource_list, &resource->link);
2253         resource->destroy = unbind_resource;
2254
2255         wl_output_send_geometry(resource,
2256                                 output->x,
2257                                 output->y,
2258                                 output->mm_width,
2259                                 output->mm_height,
2260                                 output->subpixel,
2261                                 output->make, output->model);
2262
2263         wl_list_for_each (mode, &output->mode_list, link) {
2264                 wl_output_send_mode(resource,
2265                                     mode->flags,
2266                                     mode->width,
2267                                     mode->height,
2268                                     mode->refresh);
2269         }
2270 }
2271
2272 static const char vertex_shader[] =
2273         "uniform mat4 proj;\n"
2274         "attribute vec2 position;\n"
2275         "attribute vec2 texcoord;\n"
2276         "varying vec2 v_texcoord;\n"
2277         "void main()\n"
2278         "{\n"
2279         "   gl_Position = proj * vec4(position, 0.0, 1.0);\n"
2280         "   v_texcoord = texcoord;\n"
2281         "}\n";
2282
2283 static const char texture_fragment_shader[] =
2284         "precision mediump float;\n"
2285         "varying vec2 v_texcoord;\n"
2286         "uniform sampler2D tex;\n"
2287         "uniform float alpha;\n"
2288         "uniform float bright;\n"
2289         "uniform float saturation;\n"
2290         "uniform float texwidth;\n"
2291         "void main()\n"
2292         "{\n"
2293         "   if (v_texcoord.x < 0.0 || v_texcoord.x > texwidth ||\n"
2294         "       v_texcoord.y < 0.0 || v_texcoord.y > 1.0)\n"
2295         "      discard;\n"
2296         "   gl_FragColor = texture2D(tex, v_texcoord)\n;"
2297         "   float gray = dot(gl_FragColor.rgb, vec3(0.299, 0.587, 0.114));\n"
2298         "   vec3 range = (gl_FragColor.rgb - vec3 (gray, gray, gray)) * saturation;\n"
2299         "   gl_FragColor = vec4(vec3(gray + range), gl_FragColor.a);\n"
2300         "   gl_FragColor = vec4(vec3(bright, bright, bright) * gl_FragColor.rgb, gl_FragColor.a);\n"
2301         "   gl_FragColor = alpha * gl_FragColor;\n"
2302         "}\n";
2303
2304 static const char solid_fragment_shader[] =
2305         "precision mediump float;\n"
2306         "uniform vec4 color;\n"
2307         "uniform float alpha;\n"
2308         "void main()\n"
2309         "{\n"
2310         "   gl_FragColor = alpha * color\n;"
2311         "}\n";
2312
2313 static int
2314 compile_shader(GLenum type, const char *source)
2315 {
2316         GLuint s;
2317         char msg[512];
2318         GLint status;
2319
2320         s = glCreateShader(type);
2321         glShaderSource(s, 1, &source, NULL);
2322         glCompileShader(s);
2323         glGetShaderiv(s, GL_COMPILE_STATUS, &status);
2324         if (!status) {
2325                 glGetShaderInfoLog(s, sizeof msg, NULL, msg);
2326                 fprintf(stderr, "shader info: %s\n", msg);
2327                 return GL_NONE;
2328         }
2329
2330         return s;
2331 }
2332
2333 static int
2334 weston_shader_init(struct weston_shader *shader,
2335                    const char *vertex_source, const char *fragment_source)
2336 {
2337         char msg[512];
2338         GLint status;
2339
2340         shader->vertex_shader =
2341                 compile_shader(GL_VERTEX_SHADER, vertex_source);
2342         shader->fragment_shader =
2343                 compile_shader(GL_FRAGMENT_SHADER, fragment_source);
2344
2345         shader->program = glCreateProgram();
2346         glAttachShader(shader->program, shader->vertex_shader);
2347         glAttachShader(shader->program, shader->fragment_shader);
2348         glBindAttribLocation(shader->program, 0, "position");
2349         glBindAttribLocation(shader->program, 1, "texcoord");
2350
2351         glLinkProgram(shader->program);
2352         glGetProgramiv(shader->program, GL_LINK_STATUS, &status);
2353         if (!status) {
2354                 glGetProgramInfoLog(shader->program, sizeof msg, NULL, msg);
2355                 fprintf(stderr, "link info: %s\n", msg);
2356                 return -1;
2357         }
2358
2359         shader->proj_uniform = glGetUniformLocation(shader->program, "proj");
2360         shader->tex_uniform = glGetUniformLocation(shader->program, "tex");
2361         shader->alpha_uniform = glGetUniformLocation(shader->program, "alpha");
2362         shader->brightness_uniform = glGetUniformLocation(shader->program, "bright");
2363         shader->saturation_uniform = glGetUniformLocation(shader->program, "saturation");
2364         shader->color_uniform = glGetUniformLocation(shader->program, "color");
2365         shader->texwidth_uniform = glGetUniformLocation(shader->program,
2366                                                         "texwidth");
2367
2368         return 0;
2369 }
2370
2371 WL_EXPORT void
2372 weston_output_destroy(struct weston_output *output)
2373 {
2374         struct weston_compositor *c = output->compositor;
2375
2376         pixman_region32_fini(&output->region);
2377         pixman_region32_fini(&output->previous_damage);
2378         output->compositor->output_id_pool &= ~(1 << output->id);
2379
2380         wl_display_remove_global(c->wl_display, output->global);
2381 }
2382
2383 WL_EXPORT void
2384 weston_output_update_zoom(struct weston_output *output, int x, int y)
2385 {
2386         float ratio;
2387
2388         if (output->zoom.level <= 0)
2389                 return;
2390
2391         output->zoom.magnification = 1 / output->zoom.level;
2392         ratio = 1 - (1 / output->zoom.magnification);
2393
2394         output->zoom.trans_x = (((float)(x - output->x) / output->current->width) * (ratio * 2)) - ratio;
2395         output->zoom.trans_y = (((float)(y - output->y) / output->current->height) * (ratio * 2)) - ratio;
2396
2397         output->dirty = 1;
2398         weston_output_damage(output);
2399 }
2400
2401 WL_EXPORT void
2402 weston_output_update_matrix(struct weston_output *output)
2403 {
2404         int flip;
2405         struct weston_matrix camera;
2406         struct weston_matrix modelview;
2407
2408         weston_matrix_init(&output->matrix);
2409         weston_matrix_translate(&output->matrix,
2410                                 -(output->x + (output->border.right + output->current->width - output->border.left) / 2.0),
2411                                 -(output->y + (output->border.bottom + output->current->height - output->border.top) / 2.0), 0);
2412
2413         flip = (output->flags & WL_OUTPUT_FLIPPED) ? -1 : 1;
2414         weston_matrix_scale(&output->matrix,
2415                             2.0 / (output->current->width + output->border.left + output->border.right),
2416                             flip * 2.0 / (output->current->height + output->border.top + output->border.bottom), 1);
2417         if (output->zoom.active) {
2418                 weston_matrix_init(&camera);
2419                 weston_matrix_init(&modelview);
2420                 weston_matrix_translate(&camera, output->zoom.trans_x, flip * output->zoom.trans_y, 0);
2421                 weston_matrix_invert(&modelview, &camera);
2422                 weston_matrix_scale(&modelview, output->zoom.magnification, output->zoom.magnification, 1.0);
2423                 weston_matrix_multiply(&output->matrix, &modelview);
2424         }
2425
2426         output->dirty = 0;
2427 }
2428
2429 WL_EXPORT void
2430 weston_output_move(struct weston_output *output, int x, int y)
2431 {
2432         output->x = x;
2433         output->y = y;
2434
2435         pixman_region32_init(&output->previous_damage);
2436         pixman_region32_init_rect(&output->region, x, y,
2437                                   output->current->width,
2438                                   output->current->height);
2439 }
2440
2441 WL_EXPORT void
2442 weston_output_init(struct weston_output *output, struct weston_compositor *c,
2443                    int x, int y, int width, int height, uint32_t flags)
2444 {
2445         output->compositor = c;
2446         output->x = x;
2447         output->y = y;
2448         output->border.top = 0;
2449         output->border.bottom = 0;
2450         output->border.left = 0;
2451         output->border.right = 0;
2452         output->mm_width = width;
2453         output->mm_height = height;
2454         output->dirty = 1;
2455         wl_list_init(&output->read_pixels_list);
2456
2457         output->zoom.active = 0;
2458         output->zoom.increment = 0.05;
2459         output->zoom.level = 1.0;
2460         output->zoom.magnification = 1.0;
2461         output->zoom.trans_x = 0.0;
2462         output->zoom.trans_y = 0.0;
2463
2464         output->flags = flags;
2465         weston_output_move(output, x, y);
2466         weston_output_damage(output);
2467
2468         wl_list_init(&output->frame_callback_list);
2469         wl_list_init(&output->resource_list);
2470
2471         output->id = ffs(~output->compositor->output_id_pool) - 1;
2472         output->compositor->output_id_pool |= 1 << output->id;
2473
2474         output->global =
2475                 wl_display_add_global(c->wl_display, &wl_output_interface,
2476                                       output, bind_output);
2477 }
2478
2479 WL_EXPORT void
2480 weston_output_do_read_pixels(struct weston_output *output)
2481 {
2482         struct weston_read_pixels *r, *next;
2483
2484         glPixelStorei(GL_PACK_ALIGNMENT, 1);
2485         wl_list_for_each_safe(r, next, &output->read_pixels_list, link) {
2486                 glReadPixels(r->x, r->y, r->width, r->height,
2487                              output->compositor->read_format,
2488                              GL_UNSIGNED_BYTE, r->data);
2489                 r->done(r, output);
2490         }
2491 }
2492
2493 static void
2494 compositor_bind(struct wl_client *client,
2495                 void *data, uint32_t version, uint32_t id)
2496 {
2497         struct weston_compositor *compositor = data;
2498
2499         wl_client_add_object(client, &wl_compositor_interface,
2500                              &compositor_interface, id, compositor);
2501 }
2502
2503 WL_EXPORT int
2504 weston_compositor_init(struct weston_compositor *ec, struct wl_display *display)
2505 {
2506         struct wl_event_loop *loop;
2507         const char *extensions;
2508
2509         ec->wl_display = display;
2510         wl_signal_init(&ec->destroy_signal);
2511         wl_signal_init(&ec->activate_signal);
2512         wl_signal_init(&ec->lock_signal);
2513         wl_signal_init(&ec->unlock_signal);
2514         ec->launcher_sock = weston_environment_get_fd("WESTON_LAUNCHER_SOCK");
2515
2516         ec->output_id_pool = 0;
2517
2518         if (!wl_display_add_global(display, &wl_compositor_interface,
2519                                    ec, compositor_bind))
2520                 return -1;
2521
2522         wl_display_init_shm(display);
2523
2524         ec->image_target_texture_2d =
2525                 (void *) eglGetProcAddress("glEGLImageTargetTexture2DOES");
2526         ec->image_target_renderbuffer_storage = (void *)
2527                 eglGetProcAddress("glEGLImageTargetRenderbufferStorageOES");
2528         ec->create_image = (void *) eglGetProcAddress("eglCreateImageKHR");
2529         ec->destroy_image = (void *) eglGetProcAddress("eglDestroyImageKHR");
2530         ec->bind_display =
2531                 (void *) eglGetProcAddress("eglBindWaylandDisplayWL");
2532         ec->unbind_display =
2533                 (void *) eglGetProcAddress("eglUnbindWaylandDisplayWL");
2534
2535         extensions = (const char *) glGetString(GL_EXTENSIONS);
2536         if (!extensions) {
2537                 fprintf(stderr, "Retrieving GL extension string failed.\n");
2538                 return -1;
2539         }
2540
2541         if (!strstr(extensions, "GL_EXT_texture_format_BGRA8888")) {
2542                 fprintf(stderr,
2543                         "GL_EXT_texture_format_BGRA8888 not available\n");
2544                 return -1;
2545         }
2546
2547         if (strstr(extensions, "GL_EXT_read_format_bgra"))
2548                 ec->read_format = GL_BGRA_EXT;
2549         else
2550                 ec->read_format = GL_RGBA;
2551
2552         if (strstr(extensions, "GL_EXT_unpack_subimage"))
2553                 ec->has_unpack_subimage = 1;
2554
2555         extensions =
2556                 (const char *) eglQueryString(ec->display, EGL_EXTENSIONS);
2557         if (!extensions) {
2558                 fprintf(stderr, "Retrieving EGL extension string failed.\n");
2559                 return -1;
2560         }
2561
2562         if (strstr(extensions, "EGL_WL_bind_wayland_display"))
2563                 ec->has_bind_display = 1;
2564         if (ec->has_bind_display)
2565                 ec->bind_display(ec->display, ec->wl_display);
2566
2567         wl_list_init(&ec->surface_list);
2568         wl_list_init(&ec->layer_list);
2569         wl_list_init(&ec->input_device_list);
2570         wl_list_init(&ec->output_list);
2571         wl_list_init(&ec->binding_list);
2572         wl_list_init(&ec->animation_list);
2573         weston_spring_init(&ec->fade.spring, 30.0, 1.0, 1.0);
2574         ec->fade.animation.frame = fade_frame;
2575         wl_list_init(&ec->fade.animation.link);
2576
2577         weston_layer_init(&ec->fade_layer, &ec->layer_list);
2578         weston_layer_init(&ec->cursor_layer, &ec->fade_layer.link);
2579
2580         screenshooter_create(ec);
2581
2582         ec->ping_handler = NULL;
2583
2584         wl_data_device_manager_init(ec->wl_display);
2585
2586         glActiveTexture(GL_TEXTURE0);
2587
2588         if (weston_shader_init(&ec->texture_shader,
2589                              vertex_shader, texture_fragment_shader) < 0)
2590                 return -1;
2591         if (weston_shader_init(&ec->solid_shader,
2592                              vertex_shader, solid_fragment_shader) < 0)
2593                 return -1;
2594
2595         loop = wl_display_get_event_loop(ec->wl_display);
2596         ec->idle_source = wl_event_loop_add_timer(loop, idle_handler, ec);
2597         wl_event_source_timer_update(ec->idle_source, ec->idle_time * 1000);
2598
2599         ec->input_loop = wl_event_loop_create();
2600
2601         weston_compositor_schedule_repaint(ec);
2602
2603         return 0;
2604 }
2605
2606 WL_EXPORT void
2607 weston_compositor_shutdown(struct weston_compositor *ec)
2608 {
2609         struct weston_output *output, *next;
2610
2611         wl_event_source_remove(ec->idle_source);
2612         if (ec->input_loop_source)
2613                 wl_event_source_remove(ec->input_loop_source);
2614
2615         /* Destroy all outputs associated with this compositor */
2616         wl_list_for_each_safe(output, next, &ec->output_list, link)
2617                 output->destroy(output);
2618
2619         weston_binding_list_destroy_all(&ec->binding_list);
2620
2621         wl_array_release(&ec->vertices);
2622         wl_array_release(&ec->indices);
2623
2624         wl_event_loop_destroy(ec->input_loop);
2625 }
2626
2627 static int weston_compositor_xkb_init(struct weston_compositor *ec,
2628                                       struct xkb_rule_names *names)
2629 {
2630         ec->xkb_info.context = xkb_context_new();
2631         if (ec->xkb_info.context == NULL) {
2632                 fprintf(stderr, "failed to create XKB context\n");
2633                 return -1;
2634         }
2635
2636         ec->xkb_info.names = *names;
2637         if (!ec->xkb_info.names.rules)
2638                 ec->xkb_info.names.rules = strdup("evdev");
2639         if (!ec->xkb_info.names.model)
2640                 ec->xkb_info.names.model = strdup("pc105");
2641         if (!ec->xkb_info.names.layout)
2642                 ec->xkb_info.names.layout = strdup("us");
2643
2644         ec->xkb_info.keymap = xkb_map_new_from_names(ec->xkb_info.context,
2645                                                      &ec->xkb_info.names);
2646         if (ec->xkb_info.keymap == NULL) {
2647                 fprintf(stderr, "failed to compile XKB keymap\n");
2648                 return -1;
2649         }
2650
2651         ec->xkb_info.state = xkb_state_new(ec->xkb_info.keymap);
2652         if (ec->xkb_info.state == NULL) {
2653                 fprintf(stderr, "failed to initialise XKB state\n");
2654                 return -1;
2655         }
2656
2657         return 0;
2658 }
2659
2660 static void weston_compositor_xkb_destroy(struct weston_compositor *ec)
2661 {
2662         xkb_state_unref(ec->xkb_info.state);
2663         xkb_map_unref(ec->xkb_info.keymap);
2664         xkb_context_unref(ec->xkb_info.context);
2665
2666         free(ec->xkb_info.names.rules);
2667         free(ec->xkb_info.names.model);
2668         free(ec->xkb_info.names.layout);
2669         free(ec->xkb_info.names.variant);
2670         free(ec->xkb_info.names.options);
2671 }
2672
2673 static int on_term_signal(int signal_number, void *data)
2674 {
2675         struct wl_display *display = data;
2676
2677         fprintf(stderr, "caught signal %d\n", signal_number);
2678         wl_display_terminate(display);
2679
2680         return 1;
2681 }
2682
2683 static void
2684 on_segv_signal(int s, siginfo_t *siginfo, void *context)
2685 {
2686         void *buffer[32];
2687         int i, count;
2688         Dl_info info;
2689
2690         fprintf(stderr, "caught segv\n");
2691
2692         count = backtrace(buffer, ARRAY_LENGTH(buffer));
2693         for (i = 0; i < count; i++) {
2694                 dladdr(buffer[i], &info);
2695                 fprintf(stderr, "  [%016lx]  %s  (%s)\n",
2696                         (long) buffer[i],
2697                         info.dli_sname ? info.dli_sname : "--",
2698                         info.dli_fname);
2699         }
2700
2701         longjmp(segv_jmp_buf, 1);
2702 }
2703
2704
2705 static void *
2706 load_module(const char *name, const char *entrypoint, void **handle)
2707 {
2708         char path[PATH_MAX];
2709         void *module, *init;
2710
2711         if (name[0] != '/')
2712                 snprintf(path, sizeof path, MODULEDIR "/%s", name);
2713         else
2714                 snprintf(path, sizeof path, "%s", name);
2715
2716         module = dlopen(path, RTLD_LAZY);
2717         if (!module) {
2718                 fprintf(stderr,
2719                         "failed to load module '%s': %s\n", path, dlerror());
2720                 return NULL;
2721         }
2722
2723         init = dlsym(module, entrypoint);
2724         if (!init) {
2725                 fprintf(stderr,
2726                         "failed to lookup init function in '%s': %s\n",
2727                         path, dlerror());
2728                 return NULL;
2729         }
2730
2731         return init;
2732 }
2733
2734 int main(int argc, char *argv[])
2735 {
2736         struct wl_display *display;
2737         struct weston_compositor *ec;
2738         struct wl_event_source *signals[4];
2739         struct wl_event_loop *loop;
2740         struct sigaction segv_action;
2741         void *shell_module, *backend_module, *xserver_module;
2742         int (*module_init)(struct weston_compositor *ec);
2743         struct weston_compositor
2744                 *(*backend_init)(struct wl_display *display,
2745                                  int argc, char *argv[]);
2746         int i;
2747         char *backend = NULL;
2748         char *shell = NULL;
2749         char *module = NULL;
2750         int32_t idle_time = 300;
2751         int32_t xserver = 0;
2752         char *socket_name = NULL;
2753         char *config_file;
2754         struct xkb_rule_names xkb_names;
2755
2756         const struct config_key shell_config_keys[] = {
2757                 { "type", CONFIG_KEY_STRING, &shell },
2758         };
2759
2760         const struct config_key keyboard_config_keys[] = {
2761                 { "keymap_rules", CONFIG_KEY_STRING, &xkb_names.rules },
2762                 { "keymap_model", CONFIG_KEY_STRING, &xkb_names.model },
2763                 { "keymap_layout", CONFIG_KEY_STRING, &xkb_names.layout },
2764                 { "keymap_variant", CONFIG_KEY_STRING, &xkb_names.variant },
2765                 { "keymap_options", CONFIG_KEY_STRING, &xkb_names.options },
2766         };
2767
2768         const struct config_section cs[] = {
2769                 { "shell",
2770                   shell_config_keys, ARRAY_LENGTH(shell_config_keys) },
2771                 { "keyboard",
2772                   keyboard_config_keys, ARRAY_LENGTH(keyboard_config_keys) },
2773         };
2774
2775         const struct weston_option core_options[] = {
2776                 { WESTON_OPTION_STRING, "backend", 'B', &backend },
2777                 { WESTON_OPTION_STRING, "socket", 'S', &socket_name },
2778                 { WESTON_OPTION_INTEGER, "idle-time", 'i', &idle_time },
2779                 { WESTON_OPTION_BOOLEAN, "xserver", 0, &xserver },
2780                 { WESTON_OPTION_STRING, "module", 0, &module },
2781         };
2782
2783         memset(&xkb_names, 0, sizeof(xkb_names));
2784
2785         argc = parse_options(core_options,
2786                              ARRAY_LENGTH(core_options), argc, argv);
2787
2788         display = wl_display_create();
2789
2790         loop = wl_display_get_event_loop(display);
2791         signals[0] = wl_event_loop_add_signal(loop, SIGTERM, on_term_signal,
2792                                               display);
2793         signals[1] = wl_event_loop_add_signal(loop, SIGINT, on_term_signal,
2794                                               display);
2795         signals[2] = wl_event_loop_add_signal(loop, SIGQUIT, on_term_signal,
2796                                               display);
2797
2798         wl_list_init(&child_process_list);
2799         signals[3] = wl_event_loop_add_signal(loop, SIGCHLD, sigchld_handler,
2800                                               NULL);
2801
2802         segv_action.sa_flags = SA_SIGINFO | SA_RESETHAND;
2803         segv_action.sa_sigaction = on_segv_signal;
2804         sigemptyset(&segv_action.sa_mask);
2805         sigaction(SIGSEGV, &segv_action, NULL);
2806
2807         if (!backend) {
2808                 if (getenv("WAYLAND_DISPLAY"))
2809                         backend = "wayland-backend.so";
2810                 else if (getenv("DISPLAY"))
2811                         backend = "x11-backend.so";
2812                 else if (getenv("OPENWFD"))
2813                         backend = "openwfd-backend.so";
2814                 else
2815                         backend = "drm-backend.so";
2816         }
2817
2818         config_file = config_file_path("weston.ini");
2819         parse_config_file(config_file, cs, ARRAY_LENGTH(cs), shell);
2820         free(config_file);
2821
2822         backend_init = load_module(backend, "backend_init", &backend_module);
2823         if (!backend_init)
2824                 exit(EXIT_FAILURE);
2825
2826         ec = backend_init(display, argc, argv);
2827         if (ec == NULL) {
2828                 fprintf(stderr, "failed to create compositor\n");
2829                 exit(EXIT_FAILURE);
2830         }
2831
2832         for (i = 1; argv[i]; i++)
2833                 fprintf(stderr, "unhandled option: %s\n", argv[i]);
2834         if (argv[1])
2835                 exit(EXIT_FAILURE);
2836
2837         if (weston_compositor_xkb_init(ec, &xkb_names) == -1) {
2838                 fprintf(stderr, "failed to initialise keyboard support\n");
2839                 exit(EXIT_FAILURE);
2840         }
2841
2842         ec->option_idle_time = idle_time;
2843         ec->idle_time = idle_time;
2844
2845         module_init = NULL;
2846         if (xserver)
2847                 module_init = load_module("xserver-launcher.so",
2848                                           "weston_xserver_init",
2849                                           &xserver_module);
2850         if (module_init && module_init(ec) < 0)
2851                 exit(EXIT_FAILURE);
2852
2853         if (!shell)
2854                 shell = "desktop-shell.so";
2855         module_init = load_module(shell, "shell_init", &shell_module);
2856         if (!module_init || module_init(ec) < 0)
2857                 exit(EXIT_FAILURE);
2858
2859
2860         module_init = NULL;
2861         if (module)
2862                 module_init = load_module(module, "module_init", NULL);
2863         if (module_init && module_init(ec) < 0)
2864                 exit(EXIT_FAILURE);
2865
2866         if (wl_display_add_socket(display, socket_name)) {
2867                 fprintf(stderr, "failed to add socket: %m\n");
2868                 exit(EXIT_FAILURE);
2869         }
2870
2871         weston_compositor_dpms_on(ec);
2872         weston_compositor_wake(ec);
2873         if (setjmp(segv_jmp_buf) == 0)
2874                 wl_display_run(display);
2875
2876         /* prevent further rendering while shutting down */
2877         ec->state = WESTON_COMPOSITOR_SLEEPING;
2878
2879         wl_signal_emit(&ec->destroy_signal, ec);
2880
2881         if (ec->has_bind_display)
2882                 ec->unbind_display(ec->display, display);
2883
2884         for (i = ARRAY_LENGTH(signals); i;)
2885                 wl_event_source_remove(signals[--i]);
2886
2887         weston_compositor_xkb_destroy(ec);
2888
2889         ec->destroy(ec);
2890         wl_display_destroy(display);
2891
2892         return 0;
2893 }