compositor: Don't try and use a NULL sprite for the device pointer
[profile/ivi/weston.git] / compositor / compositor.c
index 5ff7a45..e0d7b32 100644 (file)
@@ -1,19 +1,24 @@
 /*
- * Copyright © 2008 Kristian Høgsberg
+ * Copyright © 2010-2011 Intel Corporation
+ * Copyright © 2008-2011 Kristian Høgsberg
  *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
+ * Permission to use, copy, modify, distribute, and sell this software and
+ * its documentation for any purpose is hereby granted without fee, provided
+ * that the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of the copyright holders not be used in
+ * advertising or publicity pertaining to distribution of the software
+ * without specific, written prior permission.  The copyright holders make
+ * no representations about the suitability of this software for any
+ * purpose.  It is provided "as is" without express or implied warranty.
  *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
+ * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
+ * FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
+ * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
+ * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
+ * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
+ * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */
 
 #define _GNU_SOURCE
 #include <stdint.h>
 #include <limits.h>
 #include <stdarg.h>
+#include <assert.h>
 #include <sys/ioctl.h>
+#include <sys/wait.h>
 #include <fcntl.h>
 #include <unistd.h>
-#include <gdk-pixbuf/gdk-pixbuf.h>
 #include <math.h>
 #include <linux/input.h>
+#include <dlfcn.h>
+#include <getopt.h>
+#include <signal.h>
 
 #include "wayland-server.h"
 #include "compositor.h"
  * advertise that through a service on the session dbus.
  */
 static const char *option_socket_name = NULL;
-static const char *option_background = "background.jpg";
-static const char *option_geometry = "1024x640";
-static int option_connector = 0;
-
-static const GOptionEntry option_entries[] = {
-       { "background", 'b', 0, G_OPTION_ARG_STRING,
-         &option_background, "Background image" },
-       { "connector", 'c', 0, G_OPTION_ARG_INT,
-         &option_connector, "KMS connector" },
-       { "geometry", 'g', 0, G_OPTION_ARG_STRING,
-         &option_geometry, "Geometry" },
-       { "socket", 's', 0, G_OPTION_ARG_STRING,
-         &option_socket_name, "Socket Name" },
-       { NULL }
-};
+static int option_idle_time = 300;
 
-static void
+static struct wl_list child_process_list;
+
+static int
+sigchld_handler(int signal_number, void *data)
+{
+       struct wlsc_process *p;
+       int status;
+       pid_t pid;
+
+       pid = wait(&status);
+       wl_list_for_each(p, &child_process_list, link) {
+               if (p->pid == pid)
+                       break;
+       }
+
+       if (&p->link == &child_process_list) {
+               fprintf(stderr, "unknown child process exited\n");
+               return 1;
+       }
+
+       wl_list_remove(&p->link);
+       p->cleanup(p, status);
+
+       return 1;
+}
+
+WL_EXPORT void
+wlsc_watch_process(struct wlsc_process *process)
+{
+       wl_list_insert(&child_process_list, &process->link);
+}
+
+WL_EXPORT void
 wlsc_matrix_init(struct wlsc_matrix *matrix)
 {
        static const struct wlsc_matrix identity = {
@@ -85,7 +112,7 @@ wlsc_matrix_multiply(struct wlsc_matrix *m, const struct wlsc_matrix *n)
        memcpy(m, &tmp, sizeof tmp);
 }
 
-static void
+WL_EXPORT void
 wlsc_matrix_translate(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
 {
        struct wlsc_matrix translate = {
@@ -95,7 +122,7 @@ wlsc_matrix_translate(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat
        wlsc_matrix_multiply(matrix, &translate);
 }
 
-static void
+WL_EXPORT void
 wlsc_matrix_scale(struct wlsc_matrix *matrix, GLfloat x, GLfloat y, GLfloat z)
 {
        struct wlsc_matrix scale = {
@@ -120,7 +147,87 @@ wlsc_matrix_transform(struct wlsc_matrix *matrix, struct wlsc_vector *v)
        *v = t;
 }
 
-struct wlsc_surface *
+WL_EXPORT void
+wlsc_spring_init(struct wlsc_spring *spring,
+                double k, double current, double target)
+{
+       spring->k = k;
+       spring->friction = 100.0;
+       spring->current = current;
+       spring->previous = current;
+       spring->target = target;
+}
+
+WL_EXPORT void
+wlsc_spring_update(struct wlsc_spring *spring, uint32_t msec)
+{
+       double force, v, current, step;
+
+       step = (msec - spring->timestamp) / 300.0;
+       spring->timestamp = msec;
+
+       current = spring->current;
+       v = current - spring->previous;
+       force = spring->k * (spring->target - current) / 10.0 +
+               (spring->previous - current) - v * spring->friction;
+
+       spring->current =
+               current + (current - spring->previous) + force * step * step;
+       spring->previous = current;
+
+#if 0
+       if (spring->current >= 1.0) {
+#ifdef TWEENER_BOUNCE
+               spring->current = 2.0 - spring->current;
+               spring->previous = 2.0 - spring->previous;
+#else
+               spring->current = 1.0;
+               spring->previous = 1.0;
+#endif
+       }
+
+       if (spring->current <= 0.0) {
+               spring->current = 0.0;
+               spring->previous = 0.0;
+       }
+#endif
+}
+
+WL_EXPORT int
+wlsc_spring_done(struct wlsc_spring *spring)
+{
+       return fabs(spring->previous - spring->target) < 0.0002 &&
+               fabs(spring->current - spring->target) < 0.0002;
+}
+
+static void
+surface_handle_buffer_destroy(struct wl_listener *listener,
+                             struct wl_resource *resource, uint32_t time)
+{
+       struct wlsc_surface *es = container_of(listener, struct wlsc_surface,
+                                              buffer_destroy_listener);
+       struct wl_buffer *buffer = (struct wl_buffer *) resource;
+
+       wl_list_init(&es->buffer_destroy_listener.link);
+       if (es->buffer == buffer)
+               es->buffer = NULL;
+}
+
+static void
+output_handle_scanout_buffer_destroy(struct wl_listener *listener,
+                                    struct wl_resource *resource,
+                                    uint32_t time)
+{
+       struct wlsc_output *output =
+               container_of(listener, struct wlsc_output,
+                            scanout_buffer_destroy_listener);
+       struct wl_buffer *buffer = (struct wl_buffer *) resource;
+
+       if (output->scanout_buffer == buffer)
+               output->scanout_buffer = NULL;
+}
+
+WL_EXPORT struct wlsc_surface *
 wlsc_surface_create(struct wlsc_compositor *compositor,
                    int32_t x, int32_t y, int32_t width, int32_t height)
 {
@@ -130,59 +237,104 @@ wlsc_surface_create(struct wlsc_compositor *compositor,
        if (surface == NULL)
                return NULL;
 
-       wl_list_init(&surface->surface.destroy_listener_list);
        wl_list_init(&surface->link);
+       wl_list_init(&surface->buffer_link);
        surface->map_type = WLSC_SURFACE_MAP_UNMAPPED;
 
        glGenTextures(1, &surface->texture);
        glBindTexture(GL_TEXTURE_2D, surface->texture);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
-       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
-       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
+
+       surface->surface.resource.client = NULL;
 
        surface->compositor = compositor;
-       surface->visual = NULL;
+       surface->visual = WLSC_NONE_VISUAL;
        surface->image = EGL_NO_IMAGE_KHR;
        surface->saved_texture = 0;
        surface->x = x;
        surface->y = y;
        surface->width = width;
        surface->height = height;
-       wlsc_matrix_init(&surface->matrix);
-       wlsc_matrix_scale(&surface->matrix, width, height, 1);
-       wlsc_matrix_translate(&surface->matrix, x, y, 0);
 
-       wlsc_matrix_init(&surface->matrix_inv);
-       wlsc_matrix_translate(&surface->matrix_inv, -x, -y, 0);
-       wlsc_matrix_scale(&surface->matrix_inv, 1.0 / width, 1.0 / height, 1);
+       surface->fullscreen_output = NULL;
+       surface->buffer = NULL;
+       surface->output = NULL;
+
+       pixman_region32_init(&surface->damage);
+       pixman_region32_init(&surface->opaque);
+
+       surface->buffer_destroy_listener.func = surface_handle_buffer_destroy;
+       wl_list_init(&surface->buffer_destroy_listener.link);
+
+       surface->transform = NULL;
 
        return surface;
 }
 
-void
+WL_EXPORT void
 wlsc_surface_damage_rectangle(struct wlsc_surface *surface,
                              int32_t x, int32_t y,
                              int32_t width, int32_t height)
 {
        struct wlsc_compositor *compositor = surface->compositor;
 
-       pixman_region32_union_rect(&compositor->damage_region,
-                                  &compositor->damage_region,
+       pixman_region32_union_rect(&surface->damage,
+                                  &surface->damage,
                                   surface->x + x, surface->y + y,
                                   width, height);
        wlsc_compositor_schedule_repaint(compositor);
 }
 
-void
+WL_EXPORT void
 wlsc_surface_damage(struct wlsc_surface *surface)
 {
        wlsc_surface_damage_rectangle(surface, 0, 0,
                                      surface->width, surface->height);
 }
 
-uint32_t
-get_time(void)
+WL_EXPORT void
+wlsc_surface_damage_below(struct wlsc_surface *surface)
+{
+       struct wlsc_surface *below;
+
+       if (surface->link.next == &surface->compositor->surface_list)
+               return;
+
+       below = container_of(surface->link.next, struct wlsc_surface, link);
+
+       pixman_region32_union_rect(&below->damage,
+                                  &below->damage,
+                                  surface->x, surface->y,
+                                  surface->width, surface->height);
+       wlsc_compositor_schedule_repaint(surface->compositor);
+}
+
+WL_EXPORT void
+wlsc_surface_configure(struct wlsc_surface *surface,
+                      int x, int y, int width, int height)
+{
+       wlsc_surface_damage_below(surface);
+
+       surface->x = x;
+       surface->y = y;
+       surface->width = width;
+       surface->height = height;
+
+       wlsc_surface_assign_output(surface);
+       wlsc_surface_damage(surface);
+
+       pixman_region32_fini(&surface->opaque);
+       if (surface->visual == WLSC_RGB_VISUAL)
+               pixman_region32_init_rect(&surface->opaque,
+                                         surface->x, surface->y,
+                                         surface->width, surface->height);
+       else
+               pixman_region32_init(&surface->opaque);
+}
+
+WL_EXPORT uint32_t
+wlsc_compositor_get_time(void)
 {
        struct timeval tv;
 
@@ -192,119 +344,107 @@ get_time(void)
 }
 
 static void
-destroy_surface(struct wl_resource *resource, struct wl_client *client)
+wlsc_compositor_repick(struct wlsc_compositor *compositor)
+{
+       struct wlsc_input_device *device;
+       struct wlsc_surface *surface;
+       int32_t sx, sy;
+       uint32_t time;
+
+       time = wlsc_compositor_get_time();
+       wl_list_for_each(device, &compositor->input_device_list, link) {
+               if (device->input_device.grab)
+                       continue;
+               surface = pick_surface(&device->input_device, &sx, &sy);
+               wl_input_device_set_pointer_focus(&device->input_device,
+                                                 &surface->surface,
+                                                 time,
+                                                 device->input_device.x,
+                                                 device->input_device.y,
+                                                 sx, sy);
+       }
+}
+
+static void
+destroy_surface(struct wl_resource *resource)
 {
        struct wlsc_surface *surface =
                container_of(resource, struct wlsc_surface, surface.resource);
-       struct wl_listener *l, *next;
-       uint32_t time;
+       struct wlsc_compositor *compositor = surface->compositor;
 
-       wlsc_surface_damage(surface);
+       wlsc_surface_damage_below(surface);
 
        wl_list_remove(&surface->link);
+       wlsc_compositor_repick(compositor);
+
        if (surface->saved_texture == 0)
                glDeleteTextures(1, &surface->texture);
        else
                glDeleteTextures(1, &surface->saved_texture);
 
+       if (surface->buffer)
+               wl_list_remove(&surface->buffer_destroy_listener.link);
 
        if (surface->image != EGL_NO_IMAGE_KHR)
-               eglDestroyImageKHR(surface->compositor->display,
-                                  surface->image);
+               compositor->destroy_image(compositor->display,
+                                         surface->image);
 
-       time = get_time();
-       wl_list_for_each_safe(l, next,
-                             &surface->surface.destroy_listener_list, link)
-               l->func(l, &surface->surface, time);
+       wl_list_remove(&surface->buffer_link);
 
        free(surface);
 }
 
-uint32_t *
-wlsc_load_image(const char *filename, int width, int height)
+static void
+wlsc_buffer_attach(struct wl_buffer *buffer, struct wl_surface *surface)
 {
-       GdkPixbuf *pixbuf;
-       GError *error = NULL;
-       int stride, i, n_channels;
-       unsigned char *pixels, *end, *argb_pixels, *s, *d;
-
-       pixbuf = gdk_pixbuf_new_from_file_at_scale(filename,
-                                                  width, height,
-                                                  FALSE, &error);
-       if (error != NULL) {
-               fprintf(stderr, "failed to load image: %s\n", error->message);
-               g_error_free(error);
-               return NULL;
-       }
-
-       stride = gdk_pixbuf_get_rowstride(pixbuf);
-       pixels = gdk_pixbuf_get_pixels(pixbuf);
-       n_channels = gdk_pixbuf_get_n_channels(pixbuf);
+       struct wlsc_surface *es = (struct wlsc_surface *) surface;
+       struct wlsc_compositor *ec = es->compositor;
+       struct wl_list *surfaces_attached_to;
 
-       argb_pixels = malloc (height * width * 4);
-       if (argb_pixels == NULL) {
-               g_object_unref(pixbuf);
-               return NULL;
-       }
+       if (es->saved_texture != 0)
+               es->texture = es->saved_texture;
 
-       if (n_channels == 4) {
-               for (i = 0; i < height; i++) {
-                       s = pixels + i * stride;
-                       end = s + width * 4;
-                       d = argb_pixels + i * width * 4;
-                       while (s < end) {
-                               unsigned int t;
+       glBindTexture(GL_TEXTURE_2D, es->texture);
 
-#define MULT(_d,c,a,t) \
-       do { t = c * a + 0x7f; _d = ((t >> 8) + t) >> 8; } while (0)
-                               
-                               MULT(d[0], s[2], s[3], t);
-                               MULT(d[1], s[1], s[3], t);
-                               MULT(d[2], s[0], s[3], t);
-                               d[3] = s[3];
-                               s += 4;
-                               d += 4;
-                       }
-               }
-       } else if (n_channels == 3) {
-               for (i = 0; i < height; i++) {
-                       s = pixels + i * stride;
-                       end = s + width * 3;
-                       d = argb_pixels + i * width * 4;
-                       while (s < end) {
-                               d[0] = s[2];
-                               d[1] = s[1];
-                               d[2] = s[0];
-                               d[3] = 0xff;
-                               s += 3;
-                               d += 4;
-                       }
+       if (wl_buffer_is_shm(buffer)) {
+               /* Unbind any EGLImage texture that may be bound, so we don't
+                * overwrite it.*/
+               glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT,
+                            0, 0, 0, GL_BGRA_EXT, GL_UNSIGNED_BYTE, NULL);
+               es->pitch = wl_shm_buffer_get_stride(buffer) / 4;
+               glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT,
+                            es->pitch, buffer->height, 0,
+                            GL_BGRA_EXT, GL_UNSIGNED_BYTE,
+                            wl_shm_buffer_get_data(buffer));
+
+               switch (wl_shm_buffer_get_format(buffer)) {
+               case WL_SHM_FORMAT_ARGB32:
+                       es->visual = WLSC_ARGB_VISUAL;
+                       break;
+               case WL_SHM_FORMAT_PREMULTIPLIED_ARGB32:
+                       es->visual = WLSC_PREMUL_ARGB_VISUAL;
+                       break;
+               case WL_SHM_FORMAT_XRGB32:
+                       es->visual = WLSC_RGB_VISUAL;
+                       break;
                }
-       }
 
-       g_object_unref(pixbuf);
+               surfaces_attached_to = buffer->user_data;
 
-       return (uint32_t *) argb_pixels;
-}
-
-static void
-wlsc_buffer_attach(struct wl_buffer *buffer, struct wl_surface *surface)
-{
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-       struct wlsc_compositor *ec = es->compositor;
-
-       if (buffer->attach) {
-               buffer->attach(buffer, surface);
+               wl_list_remove(&es->buffer_link);
+               wl_list_insert(surfaces_attached_to, &es->buffer_link);
        } else {
-               es->image = eglCreateImageKHR(ec->display, ec->context,
-                                             EGL_WAYLAND_BUFFER_WL,
-                                             buffer, NULL);
-
-               if (es->saved_texture != 0)
-                       es->texture = es->saved_texture;
-               glBindTexture(GL_TEXTURE_2D, es->texture);
-               glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, es->image);
-               es->visual = buffer->visual;
+               if (es->image != EGL_NO_IMAGE_KHR)
+                       ec->destroy_image(ec->display, es->image);
+               es->image = ec->create_image(ec->display, NULL,
+                                            EGL_WAYLAND_BUFFER_WL,
+                                            buffer, NULL);
+               
+               ec->image_target_texture_2d(GL_TEXTURE_2D, es->image);
+
+               /* FIXME: we need to get the visual from the wl_buffer */
+               es->visual = WLSC_PREMUL_ARGB_VISUAL;
+               es->pitch = es->width;
        }
 }
 
@@ -312,11 +452,13 @@ static void
 wlsc_sprite_attach(struct wlsc_sprite *sprite, struct wl_surface *surface)
 {
        struct wlsc_surface *es = (struct wlsc_surface *) surface;
+       struct wlsc_compositor *ec = es->compositor;
 
+       es->pitch = es->width;
        es->image = sprite->image;
        if (sprite->image != EGL_NO_IMAGE_KHR) {
                glBindTexture(GL_TEXTURE_2D, es->texture);
-               glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, es->image);
+               ec->image_target_texture_2d(GL_TEXTURE_2D, es->image);
        } else {
                if (es->saved_texture == 0)
                        es->saved_texture = es->texture;
@@ -324,6 +466,9 @@ wlsc_sprite_attach(struct wlsc_sprite *sprite, struct wl_surface *surface)
        }
 
        es->visual = sprite->visual;
+
+       if (es->buffer)
+               es->buffer = NULL;
 }
 
 enum sprite_usage {
@@ -332,14 +477,15 @@ enum sprite_usage {
 
 static struct wlsc_sprite *
 create_sprite_from_png(struct wlsc_compositor *ec,
-                      const char *filename, int width, int height,
-                      uint32_t usage)
+                      const char *filename, uint32_t usage)
 {
        uint32_t *pixels;
        struct wlsc_sprite *sprite;
+       int32_t width, height;
+       uint32_t stride;
 
-       pixels = wlsc_load_image(filename, width, height);
-       if(pixels == NULL)
+       pixels = wlsc_load_image(filename, &width, &height, &stride);
+       if (pixels == NULL)
                return NULL;
 
        sprite = malloc(sizeof *sprite);
@@ -348,7 +494,7 @@ create_sprite_from_png(struct wlsc_compositor *ec,
                return NULL;
        }
 
-       sprite->visual = &ec->compositor.premultiplied_argb_visual;
+       sprite->visual = WLSC_PREMUL_ARGB_VISUAL;
        sprite->width = width;
        sprite->height = height;
        sprite->image = EGL_NO_IMAGE_KHR;
@@ -364,7 +510,7 @@ create_sprite_from_png(struct wlsc_compositor *ec,
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
 
        if (sprite->image != EGL_NO_IMAGE_KHR) {
-               glEGLImageTargetTexture2DOES(GL_TEXTURE_2D, sprite->image);
+               ec->image_target_texture_2d(GL_TEXTURE_2D, sprite->image);
                glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, width, height,
                                GL_BGRA_EXT, GL_UNSIGNED_BYTE, pixels);
        } else {
@@ -398,7 +544,6 @@ static void
 create_pointer_images(struct wlsc_compositor *ec)
 {
        int i, count;
-       const int width = 32, height = 32;
 
        count = ARRAY_LENGTH(pointer_images);
        ec->pointer_sprites = malloc(count * sizeof *ec->pointer_sprites);
@@ -406,67 +551,25 @@ create_pointer_images(struct wlsc_compositor *ec)
                ec->pointer_sprites[i] =
                        create_sprite_from_png(ec,
                                               pointer_images[i].filename,
-                                              width, height,
                                               SPRITE_USE_CURSOR);
        }
 }
 
-static struct wlsc_surface *
-background_create(struct wlsc_output *output, const char *filename)
-{
-       struct wlsc_surface *background;
-       struct wlsc_sprite *sprite;
-
-       background = wlsc_surface_create(output->compositor,
-                                        output->x, output->y,
-                                        output->width, output->height);
-       if (background == NULL)
-               return NULL;
-
-       sprite = create_sprite_from_png(output->compositor, filename,
-                                       output->width, output->height, 0);
-       if (sprite == NULL) {
-               free(background);
-               return NULL;
-       }
-
-       wlsc_sprite_attach(sprite, &background->surface);
-
-       return background;
-}
-
-static void
-wlsc_surface_draw(struct wlsc_surface *es,
-                 struct wlsc_output *output, pixman_region32_t *clip)
+static int
+texture_region(struct wlsc_surface *es, pixman_region32_t *region)
 {
        struct wlsc_compositor *ec = es->compositor;
        GLfloat *v, inv_width, inv_height;
-       unsigned int *p;
-       pixman_region32_t repaint;
        pixman_box32_t *rectangles;
+       unsigned int *p;
        int i, n;
 
-       pixman_region32_init_rect(&repaint,
-                                 es->x, es->y, es->width, es->height);
-       pixman_region32_intersect(&repaint, &repaint, clip);
-       if (!pixman_region32_not_empty(&repaint))
-               return;
-
-       if (es->visual == &ec->compositor.argb_visual) {
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable(GL_BLEND);
-       } else if (es->visual == &ec->compositor.premultiplied_argb_visual) {
-               glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable(GL_BLEND);
-       } else {
-               glDisable(GL_BLEND);
-       }
-
-       rectangles = pixman_region32_rectangles(&repaint, &n);
+       rectangles = pixman_region32_rectangles(region, &n);
        v = wl_array_add(&ec->vertices, n * 16 * sizeof *v);
        p = wl_array_add(&ec->indices, n * 6 * sizeof *p);
-       inv_width = 1.0 / es->width;
+       inv_width = 1.0 / es->pitch;
        inv_height = 1.0 / es->height;
+
        for (i = 0; i < n; i++, v += 16, p += 6) {
                v[ 0] = rectangles[i].x1;
                v[ 1] = rectangles[i].y1;
@@ -496,7 +599,99 @@ wlsc_surface_draw(struct wlsc_surface *es,
                p[5] = i * 4 + 3;
        }
 
+       return n;
+}
+
+static void
+transform_vertex(struct wlsc_surface *surface,
+                GLfloat x, GLfloat y, GLfloat u, GLfloat v, GLfloat *r)
+{
+       struct wlsc_vector t;
+
+       t.f[0] = x;
+       t.f[1] = y;
+       t.f[2] = 0.0;
+       t.f[3] = 1.0;
+
+       wlsc_matrix_transform(&surface->transform->matrix, &t);
+
+       r[ 0] = t.f[0];
+       r[ 1] = t.f[1];
+       r[ 2] = u;
+       r[ 3] = v;
+}
+
+static int
+texture_transformed_surface(struct wlsc_surface *es)
+{
+       struct wlsc_compositor *ec = es->compositor;
+       GLfloat *v;
+       unsigned int *p;
+
+       v = wl_array_add(&ec->vertices, 16 * sizeof *v);
+       p = wl_array_add(&ec->indices, 6 * sizeof *p);
+
+       transform_vertex(es, es->x, es->y, 0.0, 0.0, &v[0]);
+       transform_vertex(es, es->x, es->y + es->height, 0.0, 1.0, &v[4]);
+       transform_vertex(es, es->x + es->width, es->y, 1.0, 0.0, &v[8]);
+       transform_vertex(es, es->x + es->width, es->y + es->height,
+                        1.0, 1.0, &v[12]);
+
+       p[0] = 0;
+       p[1] = 1;
+       p[2] = 2;
+       p[3] = 2;
+       p[4] = 1;
+       p[5] = 3;
+
+       return 1;
+}
+
+static void
+wlsc_surface_draw(struct wlsc_surface *es,
+                 struct wlsc_output *output, pixman_region32_t *clip)
+{
+       struct wlsc_compositor *ec = es->compositor;
+       GLfloat *v;
+       pixman_region32_t repaint;
+       GLint filter;
+       int n;
+
+       pixman_region32_init_rect(&repaint,
+                                 es->x, es->y, es->width, es->height);
+       pixman_region32_intersect(&repaint, &repaint, clip);
+       if (!pixman_region32_not_empty(&repaint))
+               return;
+
+       switch (es->visual) {
+       case WLSC_ARGB_VISUAL:
+               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+               glEnable(GL_BLEND);
+               break;
+       case WLSC_PREMUL_ARGB_VISUAL:
+               glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
+               glEnable(GL_BLEND);
+               break;
+       case WLSC_RGB_VISUAL:
+               glDisable(GL_BLEND);
+               break;
+       default:
+               fprintf(stderr, "bogus visual\n");
+               break;
+       }
+
+       if (es->transform == NULL) {
+               filter = GL_NEAREST;
+               n = texture_region(es, &repaint);
+       } else {
+               filter = GL_LINEAR;
+               n = texture_transformed_surface(es);
+       }
+
        glBindTexture(GL_TEXTURE_2D, es->texture);
+       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, filter);
+       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, filter);
+
        v = ec->vertices.data;
        glVertexAttribPointer(0, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[0]);
        glVertexAttribPointer(1, 2, GL_FLOAT, GL_FALSE, 4 * sizeof *v, &v[2]);
@@ -516,53 +711,132 @@ wlsc_surface_raise(struct wlsc_surface *surface)
 
        wl_list_remove(&surface->link);
        wl_list_insert(&compositor->surface_list, &surface->link);
+       wlsc_compositor_repick(compositor);
+       wlsc_surface_damage(surface);
 }
 
-void
-wlsc_surface_update_matrix(struct wlsc_surface *es)
+WL_EXPORT void
+wlsc_compositor_damage_all(struct wlsc_compositor *compositor)
 {
-       wlsc_matrix_init(&es->matrix);
-       wlsc_matrix_scale(&es->matrix, es->width, es->height, 1);
-       wlsc_matrix_translate(&es->matrix, es->x, es->y, 0);
+       struct wlsc_output *output;
 
-       wlsc_matrix_init(&es->matrix_inv);
-       wlsc_matrix_translate(&es->matrix_inv, -es->x, -es->y, 0);
-       wlsc_matrix_scale(&es->matrix_inv,
-                         1.0 / es->width, 1.0 / es->height, 1);
+       wl_list_for_each(output, &compositor->output_list, link)
+               wlsc_output_damage(output);
 }
 
-void
-wlsc_output_finish_frame(struct wlsc_output *output, int msecs)
+static inline void
+wlsc_buffer_post_release(struct wl_buffer *buffer)
+{
+       if (buffer == NULL || --buffer->busy_count > 0)
+               return;
+
+       assert(buffer->resource.client != NULL);
+       wl_resource_post_event(&buffer->resource, WL_BUFFER_RELEASE);
+}
+
+WL_EXPORT void
+wlsc_output_damage(struct wlsc_output *output)
 {
        struct wlsc_compositor *compositor = output->compositor;
-       struct wlsc_surface *es;
 
-       wl_list_for_each(es, &compositor->surface_list, link) {
-               if (es->output == output) {
-                       wl_display_post_frame(compositor->wl_display,
-                                             &es->surface, msecs);
+       pixman_region32_union(&compositor->damage,
+                             &compositor->damage, &output->region);
+       wlsc_compositor_schedule_repaint(compositor);
+}
+
+static void
+fade_frame(struct wlsc_animation *animation,
+          struct wlsc_output *output, uint32_t msecs)
+{
+       struct wlsc_compositor *compositor =
+               container_of(animation,
+                            struct wlsc_compositor, fade.animation);
+
+       wlsc_spring_update(&compositor->fade.spring, msecs);
+       if (wlsc_spring_done(&compositor->fade.spring)) {
+               if (compositor->fade.spring.current > 0.999) {
+                       compositor->state = WLSC_COMPOSITOR_SLEEPING;
+                       compositor->shell->lock(compositor->shell);
                }
+               compositor->fade.spring.current =
+                       compositor->fade.spring.target;
+               wl_list_remove(&animation->link);
+               wl_list_init(&animation->link);
        }
 
-       output->finished = 1;
+       wlsc_output_damage(output);
+}
+
+static void
+fade_output(struct wlsc_output *output,
+           GLfloat tint, pixman_region32_t *region)
+{
+       struct wlsc_compositor *compositor = output->compositor;
+       struct wlsc_surface surface;
+       GLfloat color[4] = { 0.0, 0.0, 0.0, tint };
+
+       surface.compositor = compositor;
+       surface.x = output->x;
+       surface.y = output->y;
+       surface.pitch = output->current->width;
+       surface.width = output->current->width;
+       surface.height = output->current->height;
+       surface.texture = GL_NONE;
+       surface.transform = NULL;
+
+       if (tint <= 1.0)
+               surface.visual = WLSC_PREMUL_ARGB_VISUAL;
+       else
+               surface.visual = WLSC_RGB_VISUAL;
 
-       wl_event_source_timer_update(compositor->timer_source, 5);
-       compositor->repaint_on_timeout = 1;
+       glUseProgram(compositor->solid_shader.program);
+       glUniformMatrix4fv(compositor->solid_shader.proj_uniform,
+                          1, GL_FALSE, output->matrix.d);
+       glUniform4fv(compositor->solid_shader.color_uniform, 1, color);
+       wlsc_surface_draw(&surface, output, region);
 }
 
-static int
-wlsc_surface_is_scanoutable(struct wlsc_surface *es,
-                           struct wlsc_output *output)
+static void
+wlsc_output_set_cursor(struct wlsc_output *output,
+                      struct wl_input_device *dev, int force_sw)
 {
-       if (es->width != output->width ||
-           es->height != output->height ||
-           es->image == NULL)
-               return 0;
+       struct wlsc_compositor *ec = output->compositor;
+       struct wlsc_input_device *device = (struct wlsc_input_device *) dev;
+       pixman_region32_t cursor_region;
+       int use_hardware_cursor = 1, prior_was_hardware;
 
-       if (!output->image_is_scanoutable(output, es->image))
-               return 0;
+       pixman_region32_init_rect(&cursor_region,
+                                 device->sprite->x, device->sprite->y,
+                                 device->sprite->width,
+                                 device->sprite->height);
 
-       return 1;
+       pixman_region32_intersect(&cursor_region, &cursor_region, &output->region);
+
+       if (!pixman_region32_not_empty(&cursor_region)) {
+               output->set_hardware_cursor(output, NULL);
+               goto out;
+       }
+
+       prior_was_hardware = wl_list_empty(&device->sprite->link);
+       if (force_sw || output->set_hardware_cursor(output, device) < 0) {
+               if (prior_was_hardware) {
+                       wlsc_surface_damage(device->sprite);
+                       output->set_hardware_cursor(output, NULL);
+               }
+               use_hardware_cursor = 0;
+       } else if (!prior_was_hardware) {
+               wlsc_surface_damage_below(device->sprite);
+       }
+
+       /* Remove always to be on top. */
+       wl_list_remove(&device->sprite->link);
+       if (!use_hardware_cursor && ec->focus)
+               wl_list_insert(&ec->surface_list, &device->sprite->link);
+       else
+               wl_list_init(&device->sprite->link);
+
+out:
+       pixman_region32_fini(&cursor_region);
 }
 
 static void
@@ -570,323 +844,298 @@ wlsc_output_repaint(struct wlsc_output *output)
 {
        struct wlsc_compositor *ec = output->compositor;
        struct wlsc_surface *es;
-       struct wlsc_input_device *eid;
-       pixman_region32_t new_damage, total_damage, repaint;
-       int using_hardware_cursor = 1;
+       pixman_region32_t opaque, new_damage, total_damage, repaint;
 
        output->prepare_render(output);
 
-       glViewport(0, 0, output->width, output->height);
+       glViewport(0, 0, output->current->width, output->current->height);
+
+       glUseProgram(ec->texture_shader.program);
+       glUniformMatrix4fv(ec->texture_shader.proj_uniform,
+                          1, GL_FALSE, output->matrix.d);
+       glUniform1i(ec->texture_shader.tex_uniform, 0);
 
-       glUniformMatrix4fv(ec->proj_uniform, 1, GL_FALSE, output->matrix.d);
-       glUniform1i(ec->tex_uniform, 0);
+       wlsc_output_set_cursor(output, ec->input_device,
+                              ec->fade.spring.current >= 0.001);
 
        pixman_region32_init(&new_damage);
+       pixman_region32_copy(&new_damage, &ec->damage);
+       pixman_region32_init(&opaque);
+                               
+       wl_list_for_each(es, &ec->surface_list, link) {
+               pixman_region32_subtract(&es->damage, &es->damage, &opaque);
+               pixman_region32_union(&new_damage, &new_damage, &es->damage);
+               pixman_region32_union(&opaque, &opaque, &es->opaque);
+       }
+
+       pixman_region32_subtract(&ec->damage, &ec->damage, &output->region);
+
        pixman_region32_init(&total_damage);
-       pixman_region32_intersect_rect(&new_damage,
-                                      &ec->damage_region,
-                                      output->x, output->y,
-                                      output->width, output->height);
-       pixman_region32_subtract(&ec->damage_region,
-                                &ec->damage_region, &new_damage);
        pixman_region32_union(&total_damage, &new_damage,
-                             &output->previous_damage_region);
-       pixman_region32_copy(&output->previous_damage_region, &new_damage);
-
-       if (ec->focus)
-               if (output->set_hardware_cursor(output, ec->input_device) < 0)
-                       using_hardware_cursor = 0;
+                             &output->previous_damage);
+       pixman_region32_intersect(&output->previous_damage,
+                                 &new_damage, &output->region);
 
-       output->scanout_surface = NULL;
+       pixman_region32_fini(&opaque);
+       pixman_region32_fini(&new_damage);
 
        es = container_of(ec->surface_list.next, struct wlsc_surface, link);
-       if (es->map_type == WLSC_SURFACE_MAP_FULLSCREEN &&
-           es->fullscreen_output == output) {
-               if (es->visual == &ec->compositor.rgb_visual &&
-                   using_hardware_cursor &&
-                   wlsc_surface_is_scanoutable(es, output)) {
-                       output->scanout_surface = es;
-                       /* we're drawing nothing now, draw the damages later */
-                       pixman_region32_union(&ec->damage_region,
-                                             &ec->damage_region,
-                                             &total_damage);
-               } else {
-                       if (es->width < output->width ||
-                           es->height < output->height)
-                               glClear(GL_COLOR_BUFFER_BIT);
-                       wlsc_surface_draw(es, output, &total_damage);
-               }
+
+       if (es->visual == WLSC_RGB_VISUAL &&
+           output->prepare_scanout_surface(output, es) == 0) {
+               /* We're drawing nothing now,
+                * draw the damaged regions later. */
+               pixman_region32_union(&ec->damage, &ec->damage, &total_damage);
+
+               output->scanout_buffer = es->buffer;
+               output->scanout_buffer->busy_count++;
+
+               wl_list_remove(&output->scanout_buffer_destroy_listener.link);
+               wl_list_insert(output->scanout_buffer->resource.destroy_listener_list.prev,
+                              &output->scanout_buffer_destroy_listener.link);
+
+               return;
+       }
+
+       if (es->fullscreen_output == output) {
+               if (es->width < output->current->width ||
+                   es->height < output->current->height)
+                       glClear(GL_COLOR_BUFFER_BIT);
+               wlsc_surface_draw(es, output, &total_damage);
        } else {
                wl_list_for_each(es, &ec->surface_list, link) {
-                       if (es->visual != &ec->compositor.rgb_visual)
-                               continue;
-
-                       pixman_region32_init_rect(&repaint,
-                                                 es->x, es->y,
-                                                 es->width, es->height);
-                       wlsc_surface_draw(es, output, &total_damage);
-                       pixman_region32_subtract(&total_damage,
-                                                &total_damage, &repaint);
+                       pixman_region32_copy(&es->damage, &total_damage);
+                       pixman_region32_subtract(&total_damage, &total_damage, &es->opaque);
                }
 
-               if (output->background)
-                       wlsc_surface_draw(output->background,
-                                         output, &total_damage);
-               else
-                       glClear(GL_COLOR_BUFFER_BIT);
-
                wl_list_for_each_reverse(es, &ec->surface_list, link) {
-                       if (ec->overlay == es)
-                               continue;
-
-                       if (es->visual == &ec->compositor.rgb_visual) {
-                               pixman_region32_union_rect(&total_damage,
-                                                          &total_damage,
-                                                          es->x, es->y,
-                                                          es->width, es->height);
-                               continue;
-                       }
-
-                       wlsc_surface_draw(es, output, &total_damage);
+                       pixman_region32_init(&repaint);
+                       pixman_region32_intersect(&repaint, &output->region,
+                                                 &es->damage);
+                       wlsc_surface_draw(es, output, &repaint);
+                       pixman_region32_subtract(&es->damage,
+                                                &es->damage, &output->region);
                }
        }
 
-       if (ec->overlay)
-               wlsc_surface_draw(ec->overlay, output, &total_damage);
+       if (ec->fade.spring.current > 0.001)
+               fade_output(output, ec->fade.spring.current, &total_damage);
+}
+
+struct wlsc_frame_callback {
+       struct wl_resource resource;
+       struct wl_list link;
+};
+
+static void
+repaint(void *data, int msecs)
+{
+       struct wlsc_output *output = data;
+       struct wlsc_compositor *compositor = output->compositor;
+       struct wlsc_animation *animation, *next;
+       struct wlsc_frame_callback *cb, *cnext;
+
+       wlsc_output_repaint(output);
+       output->repaint_needed = 0;
+       output->repaint_scheduled = 1;
+       output->present(output);
+
+       wl_list_for_each_safe(cb, cnext, &output->frame_callback_list, link) {
+               wl_resource_post_event(&cb->resource, WL_CALLBACK_DONE, msecs);
+               wl_resource_destroy(&cb->resource, 0);
+       }
+
+       wl_list_for_each_safe(animation, next,
+                             &compositor->animation_list, link)
+               animation->frame(animation, output, msecs);
+}
+
+static void
+idle_repaint(void *data)
+{
+       repaint(data, wlsc_compositor_get_time());
+}
+
+WL_EXPORT void
+wlsc_output_finish_frame(struct wlsc_output *output, int msecs)
+{
+       wlsc_buffer_post_release(output->scanout_buffer);
+       output->scanout_buffer = NULL;
+       output->repaint_scheduled = 0;
 
-       if (ec->focus)
-               wl_list_for_each(eid, &ec->input_device_list, link) {
-                       if (&eid->input_device != ec->input_device ||
-                           !using_hardware_cursor)
-                               wlsc_surface_draw(eid->sprite, output,
-                                                 &total_damage);
-               }
+       if (output->repaint_needed)
+               repaint(output, msecs);
 }
 
-static void
-repaint(void *data)
+WL_EXPORT void
+wlsc_compositor_schedule_repaint(struct wlsc_compositor *compositor)
 {
-       struct wlsc_compositor *ec = data;
        struct wlsc_output *output;
-       int repainted_all_outputs = 1;
+       struct wl_event_loop *loop;
 
-       wl_list_for_each(output, &ec->output_list, link) {
-               if (!output->repaint_needed)
-                       continue;
+       if (compositor->state == WLSC_COMPOSITOR_SLEEPING)
+               return;
 
-               if (!output->finished) {
-                       repainted_all_outputs = 0;
+       loop = wl_display_get_event_loop(compositor->wl_display);
+       wl_list_for_each(output, &compositor->output_list, link) {
+               output->repaint_needed = 1;
+               if (output->repaint_scheduled)
                        continue;
-               }
 
-               wlsc_output_repaint(output);
-               output->finished = 0;
-               output->repaint_needed = 0;
-               output->present(output);
+               wl_event_loop_add_idle(loop, idle_repaint, output);
+               output->repaint_scheduled = 1;
        }
-
-       if (repainted_all_outputs)
-               ec->repaint_on_timeout = 0;
-       else
-               wl_event_source_timer_update(ec->timer_source, 1);
 }
 
-void
-wlsc_compositor_schedule_repaint(struct wlsc_compositor *compositor)
+WL_EXPORT void
+wlsc_compositor_fade(struct wlsc_compositor *compositor, float tint)
 {
-       struct wlsc_output *output;
-
-       wl_list_for_each(output, &compositor->output_list, link)
-               output->repaint_needed = 1;
+       int done;
 
-       if (compositor->repaint_on_timeout)
+       done = wlsc_spring_done(&compositor->fade.spring);
+       compositor->fade.spring.target = tint;
+       if (wlsc_spring_done(&compositor->fade.spring))
                return;
 
-       wl_event_source_timer_update(compositor->timer_source, 1);
-       compositor->repaint_on_timeout = 1;
+       if (done)
+               compositor->fade.spring.timestamp =
+                       wlsc_compositor_get_time();
+
+       wlsc_compositor_damage_all(compositor);
+       if (wl_list_empty(&compositor->fade.animation.link))
+               wl_list_insert(compositor->animation_list.prev,
+                              &compositor->fade.animation.link);
 }
 
 static void
-surface_destroy(struct wl_client *client,
-               struct wl_surface *surface)
+surface_destroy(struct wl_client *client, struct wl_resource *resource)
 {
-       wl_resource_destroy(&surface->resource, client);
+       wl_resource_destroy(resource, wlsc_compositor_get_time());
 }
 
-void
+WL_EXPORT void
 wlsc_surface_assign_output(struct wlsc_surface *es)
 {
        struct wlsc_compositor *ec = es->compositor;
        struct wlsc_output *output;
+       pixman_region32_t region;
+       uint32_t max, area;
+       pixman_box32_t *e;
 
-       struct wlsc_output *tmp = es->output;
-       es->output = NULL;
-
+       max = 0;
        wl_list_for_each(output, &ec->output_list, link) {
-               if (output->x < es->x && es->x < output->x + output->width &&
-                   output->y < es->y && es->y < output->y + output->height) {
-                       if (output != tmp)
-                               printf("assiging surface %p to output %p\n",
-                                      es, output);
+               pixman_region32_init_rect(&region,
+                                         es->x, es->y, es->width, es->height);
+               pixman_region32_intersect(&region, &region, &output->region);
+
+               e = pixman_region32_extents(&region);
+               area = (e->x2 - e->x1) * (e->y2 - e->y1);
+
+               if (area >= max) {
                        es->output = output;
+                       max = area;
                }
        }
-       
-       if (es->output == NULL) {
-               printf("no output found\n");
-               es->output = container_of(ec->output_list.next,
-                                         struct wlsc_output, link);
-       }
 }
 
 static void
 surface_attach(struct wl_client *client,
-              struct wl_surface *surface, struct wl_buffer *buffer,
-              int32_t x, int32_t y)
+              struct wl_resource *resource,
+              struct wl_resource *buffer_resource, int32_t x, int32_t y)
 {
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-
-       /* FIXME: This damages the entire old surface, but we should
-        * really just damage the part that's no longer covered by the
-        * surface.  Anything covered by the new surface will be
-        * damaged by the client. */
-       wlsc_surface_damage(es);
+       struct wlsc_surface *es = resource->data;
+       struct wl_buffer *buffer = buffer_resource->data;
+       int repick = 0;
 
-       wlsc_buffer_attach(buffer, surface);
+       buffer->busy_count++;
+       wlsc_buffer_post_release(es->buffer);
 
        es->buffer = buffer;
-       es->x += x;
-       es->y += y;
-       es->width = buffer->width;
-       es->height = buffer->height;
-       if (x != 0 || y != 0)
-               wlsc_surface_assign_output(es);
-       wlsc_surface_update_matrix(es);
-}
-
-static void
-surface_map_toplevel(struct wl_client *client,
-                    struct wl_surface *surface)
-{
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-       struct wlsc_compositor *ec = es->compositor;
+       wl_list_remove(&es->buffer_destroy_listener.link);
+       wl_list_insert(es->buffer->resource.destroy_listener_list.prev,
+                      &es->buffer_destroy_listener.link);
 
-       switch (es->map_type) {
-       case WLSC_SURFACE_MAP_UNMAPPED:
-               es->x = 10 + random() % 400;
-               es->y = 10 + random() % 400;
-               wlsc_surface_update_matrix(es);
-               /* assign to first output */
-               es->output = container_of(ec->output_list.next,
-                                         struct wlsc_output, link);
+       if (es->visual == WLSC_NONE_VISUAL) {
                wl_list_insert(&es->compositor->surface_list, &es->link);
-               break;
-       case WLSC_SURFACE_MAP_TOPLEVEL:
-               return;
-       case WLSC_SURFACE_MAP_FULLSCREEN:
-               es->fullscreen_output = NULL;
-               es->x = es->saved_x;
-               es->y = es->saved_y;
-               wlsc_surface_update_matrix(es);
-               break;
-       default:
-               break;
+               repick = 1;
+       }
+
+       if (x != 0 || y != 0 ||
+           es->width != buffer->width || es->height != buffer->height) {
+               wlsc_surface_configure(es, es->x + x, es->y + y,
+                                      buffer->width, buffer->height);
+               repick = 1;
        }
 
-       wlsc_surface_damage(es);
-       es->map_type = WLSC_SURFACE_MAP_TOPLEVEL;
+       wlsc_buffer_attach(buffer, &es->surface);
+
+       es->compositor->shell->attach(es->compositor->shell, es);
+
+       if (repick)
+               wlsc_compositor_repick(es->compositor);
 }
 
 static void
-surface_map_transient(struct wl_client *client,
-                     struct wl_surface *surface, struct wl_surface *parent,
-                     int x, int y, uint32_t flags)
+surface_damage(struct wl_client *client,
+              struct wl_resource *resource,
+              int32_t x, int32_t y, int32_t width, int32_t height)
 {
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-       struct wlsc_surface *pes = (struct wlsc_surface *) parent;
-
-       switch (es->map_type) {
-       case WLSC_SURFACE_MAP_UNMAPPED:
-               wl_list_insert(&es->compositor->surface_list, &es->link);
-               /* assign to parents output  */
-               es->output = pes->output;
-               break;
-       case WLSC_SURFACE_MAP_FULLSCREEN:
-               es->fullscreen_output = NULL;
-               break;
-       default:
-               break;
-       }
-
-       es->x = pes->x + x;
-       es->y = pes->y + y;
+       struct wlsc_surface *es = resource->data;
 
-       wlsc_surface_update_matrix(es);
-       wlsc_surface_damage(es);
-       es->map_type = WLSC_SURFACE_MAP_TRANSIENT;
+       wlsc_surface_damage_rectangle(es, x, y, width, height);
 }
 
 static void
-surface_map_fullscreen(struct wl_client *client, struct wl_surface *surface)
+destroy_frame_callback(struct wl_resource *resource)
 {
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-       struct wlsc_output *output;
-
-       /* FIXME: Fullscreen on first output */
-       /* FIXME: Handle output going away */
-       output = container_of(es->compositor->output_list.next,
-                             struct wlsc_output, link);
-
-       switch (es->map_type) {
-       case WLSC_SURFACE_MAP_UNMAPPED:
-               es->x = 10 + random() % 400;
-               es->y = 10 + random() % 400;
-               /* assign to first output */
-               es->output = output;
-               wl_list_insert(&es->compositor->surface_list, &es->link);
-               break;
-       case WLSC_SURFACE_MAP_FULLSCREEN:
-               return;
-       default:
-               break;
-       }
+       struct wlsc_frame_callback *cb = resource->data;
 
-       es->saved_x = es->x;
-       es->saved_y = es->y;
-       es->x = (output->width - es->width) / 2;
-       es->y = (output->height - es->height) / 2;
-       es->fullscreen_output = output;
-       wlsc_surface_update_matrix(es);
-       wlsc_surface_damage(es);
-       es->map_type = WLSC_SURFACE_MAP_FULLSCREEN;
+       wl_list_remove(&cb->link);
+       free(resource);
 }
 
 static void
-surface_damage(struct wl_client *client,
-              struct wl_surface *surface,
-              int32_t x, int32_t y, int32_t width, int32_t height)
+surface_frame(struct wl_client *client,
+             struct wl_resource *resource, uint32_t callback)
 {
-       struct wlsc_surface *es = (struct wlsc_surface *) surface;
-
-       es->buffer->damage(es->buffer, surface, x, y, width, height);
+       struct wlsc_frame_callback *cb;
+       struct wlsc_surface *es = resource->data;
 
-       wlsc_surface_damage_rectangle(es, x, y, width, height);
+       cb = malloc(sizeof *cb);
+       if (cb == NULL) {
+               wl_resource_post_no_memory(resource);
+               return;
+       }
+               
+       cb->resource.object.interface = &wl_callback_interface;
+       cb->resource.object.id = callback;
+       cb->resource.destroy = destroy_frame_callback;
+       cb->resource.client = client;
+       cb->resource.data = cb;
+
+       wl_client_add_resource(client, &cb->resource);
+
+       if (es->output) {
+               wl_list_insert(es->output->frame_callback_list.prev,
+                              &cb->link);
+       } else {
+               wl_list_init(&cb->link);
+               wl_resource_destroy(&cb->resource, 0);
+       }
 }
 
 const static struct wl_surface_interface surface_interface = {
        surface_destroy,
        surface_attach,
-       surface_map_toplevel,
-       surface_map_transient,
-       surface_map_fullscreen,
-       surface_damage
+       surface_damage,
+       surface_frame
 };
 
 static void
 wlsc_input_device_attach(struct wlsc_input_device *device,
                         int x, int y, int width, int height)
 {
-       wlsc_surface_damage(device->sprite);
+       wlsc_surface_damage_below(device->sprite);
 
        device->hotspot_x = x;
        device->hotspot_y = y;
@@ -895,7 +1144,6 @@ wlsc_input_device_attach(struct wlsc_input_device *device,
        device->sprite->y = device->input_device.y - device->hotspot_y;
        device->sprite->width = width;
        device->sprite->height = height;
-       wlsc_surface_update_matrix(device->sprite);
 
        wlsc_surface_damage(device->sprite);
 }
@@ -912,11 +1160,14 @@ static void
 wlsc_input_device_attach_sprite(struct wlsc_input_device *device,
                                struct wlsc_sprite *sprite, int x, int y)
 {
+       if (!sprite)
+               return;
+
        wlsc_sprite_attach(sprite, &device->sprite->surface);
        wlsc_input_device_attach(device, x, y, sprite->width, sprite->height);
 }
 
-void
+WL_EXPORT void
 wlsc_input_device_set_pointer_image(struct wlsc_input_device *device,
                                    enum wlsc_pointer_type type)
 {
@@ -931,14 +1182,14 @@ wlsc_input_device_set_pointer_image(struct wlsc_input_device *device,
 
 static void
 compositor_create_surface(struct wl_client *client,
-                         struct wl_compositor *compositor, uint32_t id)
+                         struct wl_resource *resource, uint32_t id)
 {
-       struct wlsc_compositor *ec = (struct wlsc_compositor *) compositor;
+       struct wlsc_compositor *ec = resource->data;
        struct wlsc_surface *surface;
 
        surface = wlsc_surface_create(ec, 0, 0, 0, 0);
        if (surface == NULL) {
-               wl_client_post_no_memory(client);
+               wl_resource_post_no_memory(resource);
                return;
        }
 
@@ -948,7 +1199,7 @@ compositor_create_surface(struct wl_client *client,
        surface->surface.resource.object.interface = &wl_surface_interface;
        surface->surface.resource.object.implementation =
                (void (**)(void)) &surface_interface;
-       surface->surface.client = client;
+       surface->surface.resource.data = surface;
 
        wl_client_add_resource(client, &surface->surface.resource);
 }
@@ -961,14 +1212,11 @@ static void
 wlsc_surface_transform(struct wlsc_surface *surface,
                       int32_t x, int32_t y, int32_t *sx, int32_t *sy)
 {
-       struct wlsc_vector v = { { x, y, 0, 1 } };
-
-       wlsc_matrix_transform(&surface->matrix_inv, &v);
-       *sx = v.f[0] * surface->width;
-       *sy = v.f[1] * surface->height;
+       *sx = x - surface->x;
+       *sy = y - surface->y;
 }
 
-struct wlsc_surface *
+WL_EXPORT struct wlsc_surface *
 pick_surface(struct wl_input_device *device, int32_t *sx, int32_t *sy)
 {
        struct wlsc_compositor *ec =
@@ -976,6 +1224,8 @@ pick_surface(struct wl_input_device *device, int32_t *sx, int32_t *sy)
        struct wlsc_surface *es;
 
        wl_list_for_each(es, &ec->surface_list, link) {
+               if (es->surface.resource.client == NULL)
+                       continue;
                wlsc_surface_transform(es, device->x, device->y, sx, sy);
                if (0 <= *sx && *sx < es->width &&
                    0 <= *sy && *sy < es->height)
@@ -987,44 +1237,88 @@ pick_surface(struct wl_input_device *device, int32_t *sx, int32_t *sy)
 
 
 static void
-motion_grab_motion(struct wl_grab *grab,
-                  uint32_t time, int32_t x, int32_t y)
+implicit_grab_motion(struct wl_grab *grab,
+                    uint32_t time, int32_t x, int32_t y)
 {
        struct wlsc_input_device *device =
                (struct wlsc_input_device *) grab->input_device;
        struct wlsc_surface *es =
                (struct wlsc_surface *) device->input_device.pointer_focus;
        int32_t sx, sy;
+       struct wl_resource *resource;
 
-       wlsc_surface_transform(es, x, y, &sx, &sy);
-       wl_client_post_event(es->surface.client,
-                            &device->input_device.object,
-                            WL_INPUT_DEVICE_MOTION,
-                            time, x, y, sx, sy);
+       resource = grab->input_device->pointer_focus_resource;
+       if (resource) {
+               wlsc_surface_transform(es, x, y, &sx, &sy);
+               wl_resource_post_event(resource, WL_INPUT_DEVICE_MOTION,
+                                      time, x, y, sx, sy);
+       }
 }
 
 static void
-motion_grab_button(struct wl_grab *grab,
-                  uint32_t time, int32_t button, int32_t state)
+implicit_grab_button(struct wl_grab *grab,
+                    uint32_t time, int32_t button, int32_t state)
 {
-       wl_client_post_event(grab->input_device->pointer_focus->client,
-                            &grab->input_device->object,
-                            WL_INPUT_DEVICE_BUTTON,
-                            time, button, state);
+       struct wl_resource *resource;
+
+       resource = grab->input_device->pointer_focus_resource;
+       if (resource)
+               wl_resource_post_event(resource, WL_INPUT_DEVICE_BUTTON,
+                                      time, button, state);
 }
 
 static void
-motion_grab_end(struct wl_grab *grab, uint32_t time)
+implicit_grab_end(struct wl_grab *grab, uint32_t time)
 {
 }
 
-static const struct wl_grab_interface motion_grab_interface = {
-       motion_grab_motion,
-       motion_grab_button,
-       motion_grab_end
+static const struct wl_grab_interface implicit_grab_interface = {
+       implicit_grab_motion,
+       implicit_grab_button,
+       implicit_grab_end
 };
 
-void
+WL_EXPORT void
+wlsc_compositor_wake(struct wlsc_compositor *compositor)
+{
+       if (compositor->idle_inhibit)
+               return;
+
+       wlsc_compositor_fade(compositor, 0.0);
+       compositor->state = WLSC_COMPOSITOR_ACTIVE;
+
+       wl_event_source_timer_update(compositor->idle_source,
+                                    option_idle_time * 1000);
+}
+
+static void
+wlsc_compositor_idle_inhibit(struct wlsc_compositor *compositor)
+{
+       wlsc_compositor_wake(compositor);
+       compositor->idle_inhibit++;
+}
+
+static void
+wlsc_compositor_idle_release(struct wlsc_compositor *compositor)
+{
+       compositor->idle_inhibit--;
+       wlsc_compositor_wake(compositor);
+}
+
+static int
+idle_handler(void *data)
+{
+       struct wlsc_compositor *compositor = data;
+
+       if (compositor->idle_inhibit)
+               return 1;
+
+       wlsc_compositor_fade(compositor, 1.0);
+
+       return 1;
+}
+
+WL_EXPORT void
 notify_motion(struct wl_input_device *device, uint32_t time, int x, int y)
 {
        struct wlsc_surface *es;
@@ -1037,11 +1331,13 @@ notify_motion(struct wl_input_device *device, uint32_t time, int x, int y)
        int x_valid = 0, y_valid = 0;
        int min_x = INT_MAX, min_y = INT_MAX, max_x = INT_MIN, max_y = INT_MIN;
 
+       wlsc_compositor_wake(ec);
+
        wl_list_for_each(output, &ec->output_list, link) {
-               if (output->x <= x && x <= output->x + output->width)
+               if (output->x <= x && x <= output->x + output->current->width)
                        x_valid = 1;
 
-               if (output->y <= y && y <= output->y + output->height)
+               if (output->y <= y && y <= output->y + output->current->height)
                        y_valid = 1;
 
                /* FIXME: calculate this only on output addition/deletion */
@@ -1050,10 +1346,10 @@ notify_motion(struct wl_input_device *device, uint32_t time, int x, int y)
                if (output->y < min_y)
                        min_y = output->y;
 
-               if (output->x + output->width > max_x)
-                       max_x = output->x + output->width;
-               if (output->y + output->height > max_y)
-                       max_y = output->y + output->height;
+               if (output->x + output->current->width > max_x)
+                       max_x = output->x + output->current->width;
+               if (output->y + output->current->height > max_y)
+                       max_y = output->y + output->current->height;
        }
        
        if (!x_valid) {
@@ -1080,30 +1376,31 @@ notify_motion(struct wl_input_device *device, uint32_t time, int x, int y)
                wl_input_device_set_pointer_focus(device,
                                                  &es->surface,
                                                  time, x, y, sx, sy);
-               if (es)
-                       wl_client_post_event(es->surface.client,
-                                            &device->object,
-                                            WL_INPUT_DEVICE_MOTION,
-                                            time, x, y, sx, sy);
+               if (device->pointer_focus_resource)
+                       wl_resource_post_event(device->pointer_focus_resource,
+                                              WL_INPUT_DEVICE_MOTION,
+                                              time, x, y, sx, sy);
        }
 
-       wlsc_surface_damage(wd->sprite);
+       wlsc_surface_damage_below(wd->sprite);
 
        wd->sprite->x = device->x - wd->hotspot_x;
        wd->sprite->y = device->y - wd->hotspot_y;
-       wlsc_surface_update_matrix(wd->sprite);
 
        wlsc_surface_damage(wd->sprite);
 }
 
-void
+WL_EXPORT void
 wlsc_surface_activate(struct wlsc_surface *surface,
                      struct wlsc_input_device *device, uint32_t time)
 {
+       struct wlsc_shell *shell = surface->compositor->shell;
+
        wlsc_surface_raise(surface);
        if (device->selection)
-               wlsc_selection_set_focus(device->selection,
-                                        &surface->surface, time);
+               shell->set_selection_focus(shell,
+                                          device->selection,
+                                          &surface->surface, time);
 
        wl_input_device_set_keyboard_focus(&device->input_device,
                                           &surface->surface,
@@ -1119,7 +1416,7 @@ struct wlsc_binding {
        struct wl_list link;
 };
 
-void
+WL_EXPORT void
 notify_button(struct wl_input_device *device,
              uint32_t time, int32_t button, int32_t state)
 {
@@ -1129,11 +1426,18 @@ notify_button(struct wl_input_device *device,
        struct wlsc_binding *b;
        struct wlsc_surface *surface =
                (struct wlsc_surface *) device->pointer_focus;
+       int32_t sx, sy;
+
+       if (state)
+               wlsc_compositor_idle_inhibit(compositor);
+       else
+               wlsc_compositor_idle_release(compositor);
 
        if (state && surface && device->grab == NULL) {
-               wlsc_surface_activate(surface, wd, time);
+               compositor->shell->activate(compositor->shell,
+                                           surface, wd, time);
                wl_input_device_start_grab(device,
-                                          &device->motion_grab,
+                                          &device->implicit_grab,
                                           button, time);
        }
 
@@ -1150,8 +1454,13 @@ notify_button(struct wl_input_device *device,
                device->grab->interface->button(device->grab, time,
                                                button, state);
 
-       if (!state && device->grab && device->grab_button == button)
+       if (!state && device->grab && device->grab_button == button) {
                wl_input_device_end_grab(device, time);
+               surface = pick_surface(device, &sx, &sy);
+               wl_input_device_set_pointer_focus(device, &surface->surface,
+                                                 time, device->x, device->y,
+                                                 sx, sy);
+       }
 }
 
 static void
@@ -1160,10 +1469,11 @@ terminate_binding(struct wl_input_device *device, uint32_t time,
 {
        struct wlsc_compositor *compositor = data;
 
-       wl_display_terminate(compositor->wl_display);
+       if (state)
+               wl_display_terminate(compositor->wl_display);
 }
 
-struct wlsc_binding *
+WL_EXPORT struct wlsc_binding *
 wlsc_compositor_add_binding(struct wlsc_compositor *compositor,
                            uint32_t key, uint32_t button, uint32_t modifier,
                            wlsc_binding_handler_t handler, void *data)
@@ -1184,7 +1494,7 @@ wlsc_compositor_add_binding(struct wlsc_compositor *compositor,
        return binding;
 }
 
-void
+WL_EXPORT void
 wlsc_binding_destroy(struct wlsc_binding *binding)
 {
        wl_list_remove(&binding->link);
@@ -1224,7 +1534,7 @@ update_modifier_state(struct wlsc_input_device *device,
                device->modifier_state &= ~modifier;
 }
 
-void
+WL_EXPORT void
 notify_key(struct wl_input_device *device,
           uint32_t time, uint32_t key, uint32_t state)
 {
@@ -1234,9 +1544,14 @@ notify_key(struct wl_input_device *device,
        uint32_t *k, *end;
        struct wlsc_binding *b;
 
+       if (state)
+               wlsc_compositor_idle_inhibit(compositor);
+       else
+               wlsc_compositor_idle_release(compositor);
+
        wl_list_for_each(b, &compositor->binding_list, link) {
                if (b->key == key &&
-                   b->modifier == wd->modifier_state && state) {
+                   b->modifier == wd->modifier_state) {
                        b->handler(&wd->input_device,
                                   time, key, 0, state, b->data);
                        break;
@@ -1255,13 +1570,12 @@ notify_key(struct wl_input_device *device,
                *k = key;
        }
 
-       if (device->keyboard_focus != NULL)
-               wl_client_post_event(device->keyboard_focus->client,
-                                    &device->object,
-                                    WL_INPUT_DEVICE_KEY, time, key, state);
+       if (device->keyboard_focus_resource)
+               wl_resource_post_event(device->keyboard_focus_resource,
+                                      WL_INPUT_DEVICE_KEY, time, key, state);
 }
 
-void
+WL_EXPORT void
 notify_pointer_focus(struct wl_input_device *device,
                     uint32_t time, struct wlsc_output *output,
                     int32_t x, int32_t y)
@@ -1284,7 +1598,6 @@ notify_pointer_focus(struct wl_input_device *device,
 
                wd->sprite->x = device->x - wd->hotspot_x;
                wd->sprite->y = device->y - wd->hotspot_y;
-               wlsc_surface_update_matrix(wd->sprite);
        } else {
                wl_input_device_set_pointer_focus(device, NULL,
                                                  time, 0, 0, 0, 0);
@@ -1294,7 +1607,7 @@ notify_pointer_focus(struct wl_input_device *device,
        wlsc_surface_damage(wd->sprite);
 }
 
-void
+WL_EXPORT void
 notify_keyboard_focus(struct wl_input_device *device,
                      uint32_t time, struct wlsc_output *output,
                      struct wl_array *keys)
@@ -1317,12 +1630,18 @@ notify_keyboard_focus(struct wl_input_device *device,
                wd->modifier_state = 0;
                end = device->keys.data + device->keys.size;
                for (k = device->keys.data; k < end; k++) {
+                       wlsc_compositor_idle_inhibit(compositor);
                        update_modifier_state(wd, *k, 1);
                }
 
-               wl_input_device_set_keyboard_focus(&wd->input_device,
-                                                  &es->surface, time);
+               if (es && es->surface.resource.client)
+                       wl_input_device_set_keyboard_focus(&wd->input_device,
+                                                          &es->surface, time);
        } else {
+               end = device->keys.data + device->keys.size;
+               for (k = device->keys.data; k < end; k++)
+                       wlsc_compositor_idle_release(compositor);
+
                wd->modifier_state = 0;
                wl_input_device_set_keyboard_focus(&wd->input_device,
                                                   NULL, time);
@@ -1332,53 +1651,72 @@ notify_keyboard_focus(struct wl_input_device *device,
 
 static void
 input_device_attach(struct wl_client *client,
-                   struct wl_input_device *device_base,
+                   struct wl_resource *resource,
                    uint32_t time,
-                   struct wl_buffer *buffer, int32_t x, int32_t y)
+                   struct wl_resource *buffer_resource, int32_t x, int32_t y)
 {
-       struct wlsc_input_device *device =
-               (struct wlsc_input_device *) device_base;
+       struct wlsc_input_device *device = resource->data;
+       struct wl_buffer *buffer;
 
        if (time < device->input_device.pointer_focus_time)
                return;
        if (device->input_device.pointer_focus == NULL)
                return;
-       if (device->input_device.pointer_focus->client != client)
+       if (device->input_device.pointer_focus->resource.client != client)
                return;
 
-       if (buffer == NULL) {
+       if (buffer_resource) {
+               buffer = buffer_resource->data;
+               wlsc_input_device_attach_buffer(device, buffer, x, y);
+       } else {
                wlsc_input_device_set_pointer_image(device,
                                                    WLSC_POINTER_LEFT_PTR);
                return;
        }
-
-       wlsc_input_device_attach_buffer(device, buffer, x, y);
 }
 
 const static struct wl_input_device_interface input_device_interface = {
        input_device_attach,
 };
 
-void
+static void unbind_input_device(struct wl_resource *resource)
+{
+       wl_list_remove(&resource->link);
+       free(resource);
+}
+
+static void
+bind_input_device(struct wl_client *client,
+                 void *data, uint32_t version, uint32_t id)
+{
+       struct wl_input_device *device = data;
+       struct wl_resource *resource;
+
+       resource = wl_client_add_object(client, &wl_input_device_interface,
+                                       &input_device_interface, id, data);
+       wl_list_insert(&device->resource_list, &resource->link);
+       resource->destroy = unbind_input_device;
+}
+
+WL_EXPORT void
 wlsc_input_device_init(struct wlsc_input_device *device,
                       struct wlsc_compositor *ec)
 {
        wl_input_device_init(&device->input_device, &ec->compositor);
 
-       device->input_device.object.interface = &wl_input_device_interface;
-       device->input_device.object.implementation =
-               (void (**)(void)) &input_device_interface;
-       wl_display_add_object(ec->wl_display, &device->input_device.object);
-       wl_display_add_global(ec->wl_display, &device->input_device.object, NULL);
+       wl_display_add_global(ec->wl_display, &wl_input_device_interface,
+                             device, bind_input_device);
 
        device->sprite = wlsc_surface_create(ec,
                                             device->input_device.x,
                                             device->input_device.y, 32, 32);
+       wl_list_insert(&ec->surface_list, &device->sprite->link);
+
        device->hotspot_x = 16;
        device->hotspot_y = 16;
        device->modifier_state = 0;
 
-       device->input_device.motion_grab.interface = &motion_grab_interface;
+       device->input_device.implicit_grab.interface = &implicit_grab_interface;
 
        wl_list_insert(ec->input_device_list.prev, &device->link);
 
@@ -1386,15 +1724,33 @@ wlsc_input_device_init(struct wlsc_input_device *device,
 }
 
 static void
-wlsc_output_post_geometry(struct wl_client *client, struct wl_object *global)
+bind_output(struct wl_client *client,
+           void *data, uint32_t version, uint32_t id)
 {
-       struct wlsc_output *output =
-               container_of(global, struct wlsc_output, object);
-
-       wl_client_post_event(client, global,
-                            WL_OUTPUT_GEOMETRY,
-                            output->x, output->y,
-                            output->width, output->height);
+       struct wlsc_output *output = data;
+       struct wlsc_mode *mode;
+       struct wl_resource *resource;
+
+       resource = wl_client_add_object(client,
+                                       &wl_output_interface, NULL, id, data);
+
+       wl_resource_post_event(resource,
+                              WL_OUTPUT_GEOMETRY,
+                              output->x,
+                              output->y,
+                              output->mm_width,
+                              output->mm_height,
+                              output->subpixel,
+                              output->make, output->model);
+
+       wl_list_for_each (mode, &output->mode_list, link) {
+               wl_resource_post_event(resource,
+                                      WL_OUTPUT_MODE,
+                                      mode->flags,
+                                      mode->width,
+                                      mode->height,
+                                      mode->refresh);
+       }
 }
 
 static const char vertex_shader[] =
@@ -1408,7 +1764,7 @@ static const char vertex_shader[] =
        "   v_texcoord = texcoord;\n"
        "}\n";
 
-static const char fragment_shader[] =
+static const char texture_fragment_shader[] =
        "precision mediump float;\n"
        "varying vec2 v_texcoord;\n"
        "uniform sampler2D tex;\n"
@@ -1417,64 +1773,105 @@ static const char fragment_shader[] =
        "   gl_FragColor = texture2D(tex, v_texcoord)\n;"
        "}\n";
 
+static const char solid_fragment_shader[] =
+       "precision mediump float;\n"
+       "uniform vec4 color;\n"
+       "void main()\n"
+       "{\n"
+       "   gl_FragColor = color\n;"
+       "}\n";
+
 static int
-init_shaders(struct wlsc_compositor *ec)
+compile_shader(GLenum type, const char *source)
 {
-       GLuint v, f, program;
-       const char *p;
+       GLuint s;
        char msg[512];
        GLint status;
 
-       p = vertex_shader;
-       v = glCreateShader(GL_VERTEX_SHADER);
-       glShaderSource(v, 1, &p, NULL);
-       glCompileShader(v);
-       glGetShaderiv(v, GL_COMPILE_STATUS, &status);
+       s = glCreateShader(type);
+       glShaderSource(s, 1, &source, NULL);
+       glCompileShader(s);
+       glGetShaderiv(s, GL_COMPILE_STATUS, &status);
        if (!status) {
-               glGetShaderInfoLog(v, sizeof msg, NULL, msg);
-               fprintf(stderr, "vertex shader info: %s\n", msg);
-               return -1;
+               glGetShaderInfoLog(s, sizeof msg, NULL, msg);
+               fprintf(stderr, "shader info: %s\n", msg);
+               return GL_NONE;
        }
 
-       p = fragment_shader;
-       f = glCreateShader(GL_FRAGMENT_SHADER);
-       glShaderSource(f, 1, &p, NULL);
-       glCompileShader(f);
-       glGetShaderiv(f, GL_COMPILE_STATUS, &status);
-       if (!status) {
-               glGetShaderInfoLog(f, sizeof msg, NULL, msg);
-               fprintf(stderr, "fragment shader info: %s\n", msg);
-               return -1;
-       }
+       return s;
+}
+
+static int
+wlsc_shader_init(struct wlsc_shader *shader,
+                const char *vertex_source, const char *fragment_source)
+{
+       char msg[512];
+       GLint status;
+
+       shader->vertex_shader =
+               compile_shader(GL_VERTEX_SHADER, vertex_source);
+       shader->fragment_shader =
+               compile_shader(GL_FRAGMENT_SHADER, fragment_source);
 
-       program = glCreateProgram();
-       glAttachShader(program, v);
-       glAttachShader(program, f);
-       glBindAttribLocation(program, 0, "position");
-       glBindAttribLocation(program, 1, "texcoord");
+       shader->program = glCreateProgram();
+       glAttachShader(shader->program, shader->vertex_shader);
+       glAttachShader(shader->program, shader->fragment_shader);
+       glBindAttribLocation(shader->program, 0, "position");
+       glBindAttribLocation(shader->program, 1, "texcoord");
 
-       glLinkProgram(program);
-       glGetProgramiv(program, GL_LINK_STATUS, &status);
+       glLinkProgram(shader->program);
+       glGetProgramiv(shader->program, GL_LINK_STATUS, &status);
        if (!status) {
-               glGetProgramInfoLog(program, sizeof msg, NULL, msg);
+               glGetProgramInfoLog(shader->program, sizeof msg, NULL, msg);
                fprintf(stderr, "link info: %s\n", msg);
                return -1;
        }
 
-       glUseProgram(program);
-       ec->proj_uniform = glGetUniformLocation(program, "proj");
-       ec->tex_uniform = glGetUniformLocation(program, "tex");
+       shader->proj_uniform = glGetUniformLocation(shader->program, "proj");
+       shader->tex_uniform = glGetUniformLocation(shader->program, "tex");
+
+       return 0;
+}
+
+static int
+init_solid_shader(struct wlsc_shader *shader,
+                 GLuint vertex_shader, const char *fragment_source)
+{
+       GLint status;
+       char msg[512];
+
+       shader->vertex_shader = vertex_shader;
+       shader->fragment_shader =
+               compile_shader(GL_FRAGMENT_SHADER, fragment_source);
+
+       shader->program = glCreateProgram();
+       glAttachShader(shader->program, shader->vertex_shader);
+       glAttachShader(shader->program, shader->fragment_shader);
+       glBindAttribLocation(shader->program, 0, "position");
+       glBindAttribLocation(shader->program, 1, "texcoord");
+
+       glLinkProgram(shader->program);
+       glGetProgramiv(shader->program, GL_LINK_STATUS, &status);
+       if (!status) {
+               glGetProgramInfoLog(shader->program, sizeof msg, NULL, msg);
+               fprintf(stderr, "link info: %s\n", msg);
+               return -1;
+       }
+       shader->proj_uniform = glGetUniformLocation(shader->program, "proj");
+       shader->color_uniform = glGetUniformLocation(shader->program, "color");
 
        return 0;
 }
 
-void
+WL_EXPORT void
 wlsc_output_destroy(struct wlsc_output *output)
 {
-       destroy_surface(&output->background->surface.resource, NULL);
+       pixman_region32_fini(&output->region);
+       pixman_region32_fini(&output->previous_damage);
 }
 
-void
+WL_EXPORT void
 wlsc_output_move(struct wlsc_output *output, int x, int y)
 {
        struct wlsc_compositor *c = output->compositor;
@@ -1483,53 +1880,103 @@ wlsc_output_move(struct wlsc_output *output, int x, int y)
        output->x = x;
        output->y = y;
 
-       if (output->background) {
-               output->background->x = x;
-               output->background->y = y;
-               wlsc_surface_update_matrix(output->background);
-       }
-
-       pixman_region32_init(&output->previous_damage_region);
+       pixman_region32_init(&output->previous_damage);
+       pixman_region32_init_rect(&output->region, x, y, 
+                                 output->current->width,
+                                 output->current->height);
 
        wlsc_matrix_init(&output->matrix);
        wlsc_matrix_translate(&output->matrix,
-                             -output->x - output->width / 2.0,
-                             -output->y - output->height / 2.0, 0);
+                             -output->x - output->current->width / 2.0,
+                             -output->y - output->current->height / 2.0, 0);
 
        flip = (output->flags & WL_OUTPUT_FLIPPED) ? -1 : 1;
        wlsc_matrix_scale(&output->matrix,
-                         2.0 / output->width,
-                         flip * 2.0 / output->height, 1);
+                         2.0 / output->current->width,
+                         flip * 2.0 / output->current->height, 1);
 
-       pixman_region32_union_rect(&c->damage_region,
-                                  &c->damage_region,
-                                  x, y, output->width, output->height);
+       pixman_region32_union(&c->damage, &c->damage, &output->region);
 }
 
-void
+WL_EXPORT void
 wlsc_output_init(struct wlsc_output *output, struct wlsc_compositor *c,
                 int x, int y, int width, int height, uint32_t flags)
 {
        output->compositor = c;
        output->x = x;
        output->y = y;
-       output->width = width;
-       output->height = height;
-
-       output->background =
-               background_create(output, option_background);
+       output->mm_width = width;
+       output->mm_height = height;
 
        output->flags = flags;
-       output->finished = 1;
        wlsc_output_move(output, x, y);
 
-       output->object.interface = &wl_output_interface;
-       wl_display_add_object(c->wl_display, &output->object);
-       wl_display_add_global(c->wl_display, &output->object,
-                             wlsc_output_post_geometry);
+       output->scanout_buffer_destroy_listener.func =
+               output_handle_scanout_buffer_destroy;
+       wl_list_init(&output->scanout_buffer_destroy_listener.link);
+       wl_list_init(&output->frame_callback_list);
+
+       output->resource.object.interface = &wl_output_interface;
+       wl_display_add_global(c->wl_display,
+                             &wl_output_interface, output, bind_output);
+}
+
+static void
+shm_buffer_created(struct wl_buffer *buffer)
+{
+       struct wl_list *surfaces_attached_to;
+
+       surfaces_attached_to = malloc(sizeof *surfaces_attached_to);
+       if (!surfaces_attached_to) {
+               buffer->user_data = NULL;
+               return;
+       }
+
+       wl_list_init(surfaces_attached_to);
+
+       buffer->user_data = surfaces_attached_to;
+}
+
+static void
+shm_buffer_damaged(struct wl_buffer *buffer,
+                  int32_t x, int32_t y, int32_t width, int32_t height)
+{
+       struct wl_list *surfaces_attached_to = buffer->user_data;
+       struct wlsc_surface *es;
+       GLsizei tex_width = wl_shm_buffer_get_stride(buffer) / 4;
+
+       wl_list_for_each(es, surfaces_attached_to, buffer_link) {
+               glBindTexture(GL_TEXTURE_2D, es->texture);
+               glTexImage2D(GL_TEXTURE_2D, 0, GL_BGRA_EXT,
+                            tex_width, buffer->height, 0,
+                            GL_BGRA_EXT, GL_UNSIGNED_BYTE,
+                            wl_shm_buffer_get_data(buffer));
+               /* Hmm, should use glTexSubImage2D() here but GLES2 doesn't
+                * support any unpack attributes except GL_UNPACK_ALIGNMENT. */
+       }
+}
+
+static void
+shm_buffer_destroyed(struct wl_buffer *buffer)
+{
+       struct wl_list *surfaces_attached_to = buffer->user_data;
+       struct wlsc_surface *es, *next;
+
+       wl_list_for_each_safe(es, next, surfaces_attached_to, buffer_link) {
+               wl_list_remove(&es->buffer_link);
+               wl_list_init(&es->buffer_link);
+       }
+
+       free(surfaces_attached_to);
 }
 
-int
+const static struct wl_shm_callbacks shm_callbacks = {
+       shm_buffer_created,
+       shm_buffer_damaged,
+       shm_buffer_destroyed
+};
+
+WL_EXPORT int
 wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
 {
        struct wl_event_loop *loop;
@@ -1539,16 +1986,41 @@ wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
 
        wl_compositor_init(&ec->compositor, &compositor_interface, display);
 
-       wlsc_shm_init(ec);
-       eglBindWaylandDisplayWL(ec->display, ec->wl_display);
+       ec->shm = wl_shm_init(display, &shm_callbacks);
+
+       ec->image_target_texture_2d =
+               (void *) eglGetProcAddress("glEGLImageTargetTexture2DOES");
+       ec->image_target_renderbuffer_storage = (void *)
+               eglGetProcAddress("glEGLImageTargetRenderbufferStorageOES");
+       ec->create_image = (void *) eglGetProcAddress("eglCreateImageKHR");
+       ec->destroy_image = (void *) eglGetProcAddress("eglDestroyImageKHR");
+       ec->bind_display =
+               (void *) eglGetProcAddress("eglBindWaylandDisplayWL");
+       ec->unbind_display =
+               (void *) eglGetProcAddress("eglUnbindWaylandDisplayWL");
+
+       extensions = (const char *) glGetString(GL_EXTENSIONS);
+       if (!strstr(extensions, "GL_EXT_texture_format_BGRA8888")) {
+               fprintf(stderr,
+                       "GL_EXT_texture_format_BGRA8888 not available\n");
+               return -1;
+       }
+
+       extensions =
+               (const char *) eglQueryString(ec->display, EGL_EXTENSIONS);
+       if (strstr(extensions, "EGL_WL_bind_wayland_display"))
+               ec->has_bind_display = 1;
+       if (ec->has_bind_display)
+               ec->bind_display(ec->display, ec->wl_display);
 
        wl_list_init(&ec->surface_list);
        wl_list_init(&ec->input_device_list);
        wl_list_init(&ec->output_list);
        wl_list_init(&ec->binding_list);
-
-       wlsc_shell_init(ec);
-       wlsc_switcher_init(ec);
+       wl_list_init(&ec->animation_list);
+       wlsc_spring_init(&ec->fade.spring, 0.8, 0.0, 0.0);
+       ec->fade.animation.frame = fade_frame;
+       wl_list_init(&ec->fade.animation.link);
 
        wlsc_compositor_add_binding(ec, KEY_BACKSPACE, 0,
                                    MODIFIER_CTRL | MODIFIER_ALT,
@@ -1558,30 +2030,72 @@ wlsc_compositor_init(struct wlsc_compositor *ec, struct wl_display *display)
 
        screenshooter_create(ec);
 
-       extensions = (const char *) glGetString(GL_EXTENSIONS);
-       if (!strstr(extensions, "GL_EXT_texture_format_BGRA8888")) {
-               fprintf(stderr,
-                       "GL_EXT_texture_format_BGRA8888 not available\n");
-               return -1;
-       }
-
        glActiveTexture(GL_TEXTURE0);
-       if (init_shaders(ec) < 0)
+
+       if (wlsc_shader_init(&ec->texture_shader,
+                            vertex_shader, texture_fragment_shader) < 0)
+               return -1;
+       if (init_solid_shader(&ec->solid_shader,
+                             ec->texture_shader.vertex_shader,
+                             solid_fragment_shader) < 0)
                return -1;
 
        loop = wl_display_get_event_loop(ec->wl_display);
-       ec->timer_source = wl_event_loop_add_timer(loop, repaint, ec);
-       pixman_region32_init(&ec->damage_region);
+       ec->idle_source = wl_event_loop_add_timer(loop, idle_handler, ec);
+       wl_event_source_timer_update(ec->idle_source, option_idle_time * 1000);
+
+       pixman_region32_init(&ec->damage);
        wlsc_compositor_schedule_repaint(ec);
 
        return 0;
 }
 
-static void on_term_signal(int signal_number, void *data)
+WL_EXPORT void
+wlsc_compositor_shutdown(struct wlsc_compositor *ec)
+{
+       struct wlsc_output *output;
+
+       /* Destroy all outputs associated with this compositor */
+       wl_list_for_each(output, &ec->output_list, link)
+               output->destroy(output);
+}
+
+static int on_term_signal(int signal_number, void *data)
+{
+       struct wl_display *display = data;
+
+       fprintf(stderr, "caught signal %d\n", signal_number);
+       wl_display_terminate(display);
+
+       return 1;
+}
+
+static void *
+load_module(const char *name, const char *entrypoint, void **handle)
 {
-       struct wlsc_compositor *ec = data;
+       char path[PATH_MAX];
+       void *module, *init;
+
+       if (name[0] != '/')
+               snprintf(path, sizeof path, MODULEDIR "/%s", name);
+       else
+               snprintf(path, sizeof path, "%s", name);
+
+       module = dlopen(path, RTLD_LAZY);
+       if (!module) {
+               fprintf(stderr,
+                       "failed to load module: %s\n", dlerror());
+               return NULL;
+       }
+
+       init = dlsym(module, entrypoint);
+       if (!init) {
+               fprintf(stderr,
+                       "failed to lookup init function: %s\n", dlerror());
+               return NULL;
+       }
 
-       wl_display_terminate(ec->wl_display);
+       return init;
 }
 
 int main(int argc, char *argv[])
@@ -1589,60 +2103,112 @@ int main(int argc, char *argv[])
        struct wl_display *display;
        struct wlsc_compositor *ec;
        struct wl_event_loop *loop;
-       GError *error = NULL;
-       GOptionContext *context;
-       int width, height;
-
-       g_type_init(); /* GdkPixbuf needs this, it seems. */
+       int o, xserver = 0;
+       void *shell_module, *backend_module;
+       int (*shell_init)(struct wlsc_compositor *ec);
+       struct wlsc_compositor
+               *(*backend_init)(struct wl_display *display, char *options);
+       char *backend = NULL;
+       char *backend_options = "";
+       char *shell = NULL;
+       char *p;
+
+       static const char opts[] = "B:b:o:S:i:s:x";
+       static const struct option longopts[ ] = {
+               { "backend", 1, NULL, 'B' },
+               { "backend-options", 1, NULL, 'o' },
+               { "socket", 1, NULL, 'S' },
+               { "idle-time", 1, NULL, 'i' },
+               { "shell", 1, NULL, 's' },
+               { "xserver", 0, NULL, 'x' },
+               { NULL, }
+       };
 
-       context = g_option_context_new(NULL);
-       g_option_context_add_main_entries(context, option_entries, "Wayland");
-       if (!g_option_context_parse(context, &argc, &argv, &error)) {
-               fprintf(stderr, "option parsing failed: %s\n", error->message);
-               exit(EXIT_FAILURE);
-       }
-       if (sscanf(option_geometry, "%dx%d", &width, &height) != 2) {
-               fprintf(stderr, "invalid geometry option: %s \n",
-                       option_geometry);
-               exit(EXIT_FAILURE);
+       while (o = getopt_long(argc, argv, opts, longopts, &o), o > 0) {
+               switch (o) {
+               case 'B':
+                       backend = optarg;
+                       break;
+               case 'o':
+                       backend_options = optarg;
+                       break;
+               case 'S':
+                       option_socket_name = optarg;
+                       break;
+               case 'i':
+                       option_idle_time = strtol(optarg, &p, 0);
+                       if (*p != '\0') {
+                               fprintf(stderr,
+                                       "invalid idle time option: %s\n",
+                                       optarg);
+                               exit(EXIT_FAILURE);
+                       }
+                       break;
+               case 's':
+                       shell = optarg;
+                       break;
+               case 'x':
+                       xserver = 1;
+                       break;
+               }
        }
 
        display = wl_display_create();
 
-       ec = NULL;
+       loop = wl_display_get_event_loop(display);
+       wl_event_loop_add_signal(loop, SIGTERM, on_term_signal, display);
+       wl_event_loop_add_signal(loop, SIGINT, on_term_signal, display);
+       wl_event_loop_add_signal(loop, SIGQUIT, on_term_signal, display);
+
+       wl_list_init(&child_process_list);
+       wl_event_loop_add_signal(loop, SIGCHLD, sigchld_handler, NULL);
+
+       if (!backend) {
+               if (getenv("WAYLAND_DISPLAY"))
+                       backend = "wayland-backend.so";
+               else if (getenv("DISPLAY"))
+                       backend = "x11-backend.so";
+               else if (getenv("OPENWFD"))
+                       backend = "openwfd-backend.so";
+               else
+                       backend = "drm-backend.so";
+       }
 
-#if BUILD_WAYLAND_COMPOSITOR
-       if (getenv("WAYLAND_DISPLAY"))
-               ec = wayland_compositor_create(display, width, height);
-#endif
+       if (!shell)
+               shell = "desktop-shell.so";
 
-#if BUILD_X11_COMPOSITOR
-       if (ec == NULL && getenv("DISPLAY"))
-               ec = x11_compositor_create(display, width, height);
-#endif
+       backend_init = load_module(backend, "backend_init", &backend_module);
+       if (!backend_init)
+               exit(EXIT_FAILURE);
 
-#if BUILD_DRM_COMPOSITOR
-       if (ec == NULL)
-               ec = drm_compositor_create(display, option_connector);
-#endif
+       shell_init = load_module(shell, "shell_init", &shell_module);
+       if (!shell_init)
+               exit(EXIT_FAILURE);
 
+       ec = backend_init(display, backend_options);
        if (ec == NULL) {
                fprintf(stderr, "failed to create compositor\n");
                exit(EXIT_FAILURE);
        }
 
+       if (shell_init(ec) < 0)
+               exit(EXIT_FAILURE);
+
+       if (xserver)
+               wlsc_xserver_init(ec);
+
        if (wl_display_add_socket(display, option_socket_name)) {
                fprintf(stderr, "failed to add socket: %m\n");
                exit(EXIT_FAILURE);
        }
 
-       loop = wl_display_get_event_loop(ec->wl_display);
-       wl_event_loop_add_signal(loop, SIGTERM, on_term_signal, ec);
-       wl_event_loop_add_signal(loop, SIGINT, on_term_signal, ec);
-
        wl_display_run(display);
 
-       eglUnbindWaylandDisplayWL(ec->display, display);
+       if (xserver)
+               wlsc_xserver_destroy(ec);
+
+       if (ec->has_bind_display)
+               ec->unbind_display(ec->display, display);
        wl_display_destroy(display);
 
        ec->destroy(ec);