xwayland/window-manager.c

   1 /*
   2  * Copyright © 2011 Intel Corporation
   3  *
   4  * Permission to use, copy, modify, distribute, and sell this software and
   5  * its documentation for any purpose is hereby granted without fee, provided
   6  * that the above copyright notice appear in all copies and that both that
   7  * copyright notice and this permission notice appear in supporting
   8  * documentation, and that the name of the copyright holders not be used in
   9  * advertising or publicity pertaining to distribution of the software
  10  * without specific, written prior permission.  The copyright holders make
  11  * no representations about the suitability of this software for any
  12  * purpose.  It is provided "as is" without express or implied warranty.
  13  *
  14  * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  15  * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
  16  * FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
  17  * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
  18  * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
  19  * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  20  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  21  */
  22
  23 #include "config.h"
  24
  25 #include <stdlib.h>
  26 #include <stdio.h>
  27 #include <string.h>
  28 #include <sys/socket.h>
  29 #include <sys/un.h>
  30 #include <fcntl.h>
  31 #include <errno.h>
  32 #include <unistd.h>
  33 #include <signal.h>
  34 #include <X11/Xcursor/Xcursor.h>
  35 #include <linux/input.h>
  36
  37 #include "xwayland.h"
  38
  39 #include "cairo-util.h"
  40 #include "compositor.h"
  41 #include "hash.h"
  42
  43 struct wm_size_hints {
  44         uint32_t flags;
  45         int32_t x, y;
  46         int32_t width, height;  /* should set so old wm's don't mess up */
  47         int32_t min_width, min_height;
  48         int32_t max_width, max_height;
  49         int32_t width_inc, height_inc;
  50         struct {
  51                 int32_t x;
  52                 int32_t y;
  53         } min_aspect, max_aspect;
  54         int32_t base_width, base_height;
  55         int32_t win_gravity;
  56 };
  57
  58 #define USPosition      (1L << 0)
  59 #define USSize          (1L << 1)
  60 #define PPosition       (1L << 2)
  61 #define PSize           (1L << 3)
  62 #define PMinSize        (1L << 4)
  63 #define PMaxSize        (1L << 5)
  64 #define PResizeInc      (1L << 6)
  65 #define PAspect         (1L << 7)
  66 #define PBaseSize       (1L << 8)
  67 #define PWinGravity     (1L << 9)
  68
  69 struct motif_wm_hints {
  70         uint32_t flags;
  71         uint32_t functions;
  72         uint32_t decorations;
  73         int32_t input_mode;
  74         uint32_t status;
  75 };
  76
  77 #define MWM_HINTS_FUNCTIONS     (1L << 0)
  78 #define MWM_HINTS_DECORATIONS   (1L << 1)
  79 #define MWM_HINTS_INPUT_MODE    (1L << 2)
  80 #define MWM_HINTS_STATUS        (1L << 3)
  81
  82 #define MWM_FUNC_ALL            (1L << 0)
  83 #define MWM_FUNC_RESIZE         (1L << 1)
  84 #define MWM_FUNC_MOVE           (1L << 2)
  85 #define MWM_FUNC_MINIMIZE       (1L << 3)
  86 #define MWM_FUNC_MAXIMIZE       (1L << 4)
  87 #define MWM_FUNC_CLOSE          (1L << 5)
  88
  89 #define MWM_DECOR_ALL           (1L << 0)
  90 #define MWM_DECOR_BORDER        (1L << 1)
  91 #define MWM_DECOR_RESIZEH       (1L << 2)
  92 #define MWM_DECOR_TITLE         (1L << 3)
  93 #define MWM_DECOR_MENU          (1L << 4)
  94 #define MWM_DECOR_MINIMIZE      (1L << 5)
  95 #define MWM_DECOR_MAXIMIZE      (1L << 6)
  96
  97 #define MWM_INPUT_MODELESS 0
  98 #define MWM_INPUT_PRIMARY_APPLICATION_MODAL 1
  99 #define MWM_INPUT_SYSTEM_MODAL 2
 100 #define MWM_INPUT_FULL_APPLICATION_MODAL 3
 101 #define MWM_INPUT_APPLICATION_MODAL MWM_INPUT_PRIMARY_APPLICATION_MODAL
 102
 103 #define MWM_TEAROFF_WINDOW      (1L<<0)
 104
 105 #define _NET_WM_MOVERESIZE_SIZE_TOPLEFT      0
 106 #define _NET_WM_MOVERESIZE_SIZE_TOP          1
 107 #define _NET_WM_MOVERESIZE_SIZE_TOPRIGHT     2
 108 #define _NET_WM_MOVERESIZE_SIZE_RIGHT        3
 109 #define _NET_WM_MOVERESIZE_SIZE_BOTTOMRIGHT  4
 110 #define _NET_WM_MOVERESIZE_SIZE_BOTTOM       5
 111 #define _NET_WM_MOVERESIZE_SIZE_BOTTOMLEFT   6
 112 #define _NET_WM_MOVERESIZE_SIZE_LEFT         7
 113 #define _NET_WM_MOVERESIZE_MOVE              8   /* movement only */
 114 #define _NET_WM_MOVERESIZE_SIZE_KEYBOARD     9   /* size via keyboard */
 115 #define _NET_WM_MOVERESIZE_MOVE_KEYBOARD    10   /* move via keyboard */
 116 #define _NET_WM_MOVERESIZE_CANCEL           11   /* cancel operation */
 117
 118 struct weston_wm_window {
 119         struct weston_wm *wm;
 120         xcb_window_t id;
 121         xcb_window_t frame_id;
 122         struct frame *frame;
 123         cairo_surface_t *cairo_surface;
 124         uint32_t surface_id;
 125         struct weston_surface *surface;
 126         struct shell_surface *shsurf;
 127         struct weston_view *view;
 128         struct wl_listener surface_destroy_listener;
 129         struct wl_event_source *repaint_source;
 130         struct wl_event_source *configure_source;
 131         int properties_dirty;
 132         int pid;
 133         char *machine;
 134         char *class;
 135         char *name;
 136         struct weston_wm_window *transient_for;
 137         uint32_t protocols;
 138         xcb_atom_t type;
 139         int width, height;
 140         int x, y;
 141         int saved_width, saved_height;
 142         int decorate;
 143         int override_redirect;
 144         int fullscreen;
 145         int has_alpha;
 146         int delete_window;
 147         struct wm_size_hints size_hints;
 148         struct motif_wm_hints motif_hints;
 149         struct wl_list link;
 150 };
 151
 152 static struct weston_wm_window *
 153 get_wm_window(struct weston_surface *surface);
 154
 155 static void
 156 weston_wm_window_schedule_repaint(struct weston_wm_window *window);
 157
 158 static void
 159 xserver_map_shell_surface(struct weston_wm_window *window,
 160                           struct weston_surface *surface);
 161
 162 static int __attribute__ ((format (printf, 1, 2)))
 163 wm_log(const char *fmt, ...)
 164 {
 165 #ifdef WM_DEBUG
 166         int l;
 167         va_list argp;
 168
 169         va_start(argp, fmt);
 170         l = weston_vlog(fmt, argp);
 171         va_end(argp);
 172
 173         return l;
 174 #else
 175         return 0;
 176 #endif
 177 }
 178
 179 static int __attribute__ ((format (printf, 1, 2)))
 180 wm_log_continue(const char *fmt, ...)
 181 {
 182 #ifdef WM_DEBUG
 183         int l;
 184         va_list argp;
 185
 186         va_start(argp, fmt);
 187         l = weston_vlog_continue(fmt, argp);
 188         va_end(argp);
 189
 190         return l;
 191 #else
 192         return 0;
 193 #endif
 194 }
 195
 196
 197 const char *
 198 get_atom_name(xcb_connection_t *c, xcb_atom_t atom)
 199 {
 200         xcb_get_atom_name_cookie_t cookie;
 201         xcb_get_atom_name_reply_t *reply;
 202         xcb_generic_error_t *e;
 203         static char buffer[64];
 204
 205         if (atom == XCB_ATOM_NONE)
 206                 return "None";
 207
 208         cookie = xcb_get_atom_name (c, atom);
 209         reply = xcb_get_atom_name_reply (c, cookie, &e);
 210
 211         if(reply) {
 212                 snprintf(buffer, sizeof buffer, "%.*s",
 213                          xcb_get_atom_name_name_length (reply),
 214                          xcb_get_atom_name_name (reply));
 215         } else {
 216                 snprintf(buffer, sizeof buffer, "(atom %u)", atom);
 217         }
 218
 219         free(reply);
 220
 221         return buffer;
 222 }
 223
 224 static xcb_cursor_t
 225 xcb_cursor_image_load_cursor(struct weston_wm *wm, const XcursorImage *img)
 226 {
 227         xcb_connection_t *c = wm->conn;
 228         xcb_screen_iterator_t s = xcb_setup_roots_iterator(xcb_get_setup(c));
 229         xcb_screen_t *screen = s.data;
 230         xcb_gcontext_t gc;
 231         xcb_pixmap_t pix;
 232         xcb_render_picture_t pic;
 233         xcb_cursor_t cursor;
 234         int stride = img->width * 4;
 235
 236         pix = xcb_generate_id(c);
 237         xcb_create_pixmap(c, 32, pix, screen->root, img->width, img->height);
 238
 239         pic = xcb_generate_id(c);
 240         xcb_render_create_picture(c, pic, pix, wm->format_rgba.id, 0, 0);
 241
 242         gc = xcb_generate_id(c);
 243         xcb_create_gc(c, gc, pix, 0, 0);
 244
 245         xcb_put_image(c, XCB_IMAGE_FORMAT_Z_PIXMAP, pix, gc,
 246                       img->width, img->height, 0, 0, 0, 32,
 247                       stride * img->height, (uint8_t *) img->pixels);
 248         xcb_free_gc(c, gc);
 249
 250         cursor = xcb_generate_id(c);
 251         xcb_render_create_cursor(c, cursor, pic, img->xhot, img->yhot);
 252
 253         xcb_render_free_picture(c, pic);
 254         xcb_free_pixmap(c, pix);
 255
 256         return cursor;
 257 }
 258
 259 static xcb_cursor_t
 260 xcb_cursor_images_load_cursor(struct weston_wm *wm, const XcursorImages *images)
 261 {
 262         /* TODO: treat animated cursors as well */
 263         if (images->nimage != 1)
 264                 return -1;
 265
 266         return xcb_cursor_image_load_cursor(wm, images->images[0]);
 267 }
 268
 269 static xcb_cursor_t
 270 xcb_cursor_library_load_cursor(struct weston_wm *wm, const char *file)
 271 {
 272         xcb_cursor_t cursor;
 273         XcursorImages *images;
 274         char *v = NULL;
 275         int size = 0;
 276
 277         if (!file)
 278                 return 0;
 279
 280         v = getenv ("XCURSOR_SIZE");
 281         if (v)
 282                 size = atoi(v);
 283
 284         if (!size)
 285                 size = 32;
 286
 287         images = XcursorLibraryLoadImages (file, NULL, size);
 288         if (!images)
 289                 return -1;
 290
 291         cursor = xcb_cursor_images_load_cursor (wm, images);
 292         XcursorImagesDestroy (images);
 293
 294         return cursor;
 295 }
 296
 297 void
 298 dump_property(struct weston_wm *wm,
 299               xcb_atom_t property, xcb_get_property_reply_t *reply)
 300 {
 301         int32_t *incr_value;
 302         const char *text_value, *name;
 303         xcb_atom_t *atom_value;
 304         int width, len;
 305         uint32_t i;
 306
 307         width = wm_log_continue("%s: ", get_atom_name(wm->conn, property));
 308         if (reply == NULL) {
 309                 wm_log_continue("(no reply)\n");
 310                 return;
 311         }
 312
 313         width += wm_log_continue("%s/%d, length %d (value_len %d): ",
 314                                  get_atom_name(wm->conn, reply->type),
 315                                  reply->format,
 316                                  xcb_get_property_value_length(reply),
 317                                  reply->value_len);
 318
 319         if (reply->type == wm->atom.incr) {
 320                 incr_value = xcb_get_property_value(reply);
 321                 wm_log_continue("%d\n", *incr_value);
 322         } else if (reply->type == wm->atom.utf8_string ||
 323               reply->type == wm->atom.string) {
 324                 text_value = xcb_get_property_value(reply);
 325                 if (reply->value_len > 40)
 326                         len = 40;
 327                 else
 328                         len = reply->value_len;
 329                 wm_log_continue("\"%.*s\"\n", len, text_value);
 330         } else if (reply->type == XCB_ATOM_ATOM) {
 331                 atom_value = xcb_get_property_value(reply);
 332                 for (i = 0; i < reply->value_len; i++) {
 333                         name = get_atom_name(wm->conn, atom_value[i]);
 334                         if (width + strlen(name) + 2 > 78) {
 335                                 wm_log_continue("\n    ");
 336                                 width = 4;
 337                         } else if (i > 0) {
 338                                 width +=  wm_log_continue(", ");
 339                         }
 340
 341                         width +=  wm_log_continue("%s", name);
 342                 }
 343                 wm_log_continue("\n");
 344         } else {
 345                 wm_log_continue("huh?\n");
 346         }
 347 }
 348
 349 static void
 350 read_and_dump_property(struct weston_wm *wm,
 351                        xcb_window_t window, xcb_atom_t property)
 352 {
 353         xcb_get_property_reply_t *reply;
 354         xcb_get_property_cookie_t cookie;
 355
 356         cookie = xcb_get_property(wm->conn, 0, window,
 357                                   property, XCB_ATOM_ANY, 0, 2048);
 358         reply = xcb_get_property_reply(wm->conn, cookie, NULL);
 359
 360         dump_property(wm, property, reply);
 361
 362         free(reply);
 363 }
 364
 365 /* We reuse some predefined, but otherwise useles atoms */
 366 #define TYPE_WM_PROTOCOLS       XCB_ATOM_CUT_BUFFER0
 367 #define TYPE_MOTIF_WM_HINTS     XCB_ATOM_CUT_BUFFER1
 368 #define TYPE_NET_WM_STATE       XCB_ATOM_CUT_BUFFER2
 369 #define TYPE_WM_NORMAL_HINTS    XCB_ATOM_CUT_BUFFER3
 370
 371 static void
 372 weston_wm_window_read_properties(struct weston_wm_window *window)
 373 {
 374         struct weston_wm *wm = window->wm;
 375         struct weston_shell_interface *shell_interface =
 376                 &wm->server->compositor->shell_interface;
 377
 378 #define F(field) offsetof(struct weston_wm_window, field)
 379         const struct {
 380                 xcb_atom_t atom;
 381                 xcb_atom_t type;
 382                 int offset;
 383         } props[] = {
 384                 { XCB_ATOM_WM_CLASS, XCB_ATOM_STRING, F(class) },
 385                 { XCB_ATOM_WM_NAME, XCB_ATOM_STRING, F(name) },
 386                 { XCB_ATOM_WM_TRANSIENT_FOR, XCB_ATOM_WINDOW, F(transient_for) },
 387                 { wm->atom.wm_protocols, TYPE_WM_PROTOCOLS, F(protocols) },
 388                 { wm->atom.wm_normal_hints, TYPE_WM_NORMAL_HINTS, F(protocols) },
 389                 { wm->atom.net_wm_state, TYPE_NET_WM_STATE },
 390                 { wm->atom.net_wm_window_type, XCB_ATOM_ATOM, F(type) },
 391                 { wm->atom.net_wm_name, XCB_ATOM_STRING, F(name) },
 392                 { wm->atom.net_wm_pid, XCB_ATOM_CARDINAL, F(pid) },
 393                 { wm->atom.motif_wm_hints, TYPE_MOTIF_WM_HINTS, 0 },
 394                 { wm->atom.wm_client_machine, XCB_ATOM_WM_CLIENT_MACHINE, F(machine) },
 395         };
 396 #undef F
 397
 398         xcb_get_property_cookie_t cookie[ARRAY_LENGTH(props)];
 399         xcb_get_property_reply_t *reply;
 400         void *p;
 401         uint32_t *xid;
 402         xcb_atom_t *atom;
 403         uint32_t i;
 404
 405         if (!window->properties_dirty)
 406                 return;
 407         window->properties_dirty = 0;
 408
 409         for (i = 0; i < ARRAY_LENGTH(props); i++)
 410                 cookie[i] = xcb_get_property(wm->conn,
 411                                              0, /* delete */
 412                                              window->id,
 413                                              props[i].atom,
 414                                              XCB_ATOM_ANY, 0, 2048);
 415
 416         window->decorate = !window->override_redirect;
 417         window->size_hints.flags = 0;
 418         window->motif_hints.flags = 0;
 419         window->delete_window = 0;
 420
 421         for (i = 0; i < ARRAY_LENGTH(props); i++)  {
 422                 reply = xcb_get_property_reply(wm->conn, cookie[i], NULL);
 423                 if (!reply)
 424                         /* Bad window, typically */
 425                         continue;
 426                 if (reply->type == XCB_ATOM_NONE) {
 427                         /* No such property */
 428                         free(reply);
 429                         continue;
 430                 }
 431
 432                 p = ((char *) window + props[i].offset);
 433
 434                 switch (props[i].type) {
 435                 case XCB_ATOM_WM_CLIENT_MACHINE:
 436                 case XCB_ATOM_STRING:
 437                         /* FIXME: We're using this for both string and
 438                            utf8_string */
 439                         if (*(char **) p)
 440                                 free(*(char **) p);
 441
 442                         *(char **) p =
 443                                 strndup(xcb_get_property_value(reply),
 444                                         xcb_get_property_value_length(reply));
 445                         break;
 446                 case XCB_ATOM_WINDOW:
 447                         xid = xcb_get_property_value(reply);
 448                         *(struct weston_wm_window **) p =
 449                                 hash_table_lookup(wm->window_hash, *xid);
 450                         break;
 451                 case XCB_ATOM_CARDINAL:
 452                 case XCB_ATOM_ATOM:
 453                         atom = xcb_get_property_value(reply);
 454                         *(xcb_atom_t *) p = *atom;
 455                         break;
 456                 case TYPE_WM_PROTOCOLS:
 457                         atom = xcb_get_property_value(reply);
 458                         for (i = 0; i < reply->value_len; i++)
 459                                 if (atom[i] == wm->atom.wm_delete_window)
 460                                         window->delete_window = 1;
 461                         break;
 462
 463                         break;
 464                 case TYPE_WM_NORMAL_HINTS:
 465                         memcpy(&window->size_hints,
 466                                xcb_get_property_value(reply),
 467                                sizeof window->size_hints);
 468                         break;
 469                 case TYPE_NET_WM_STATE:
 470                         window->fullscreen = 0;
 471                         atom = xcb_get_property_value(reply);
 472                         for (i = 0; i < reply->value_len; i++)
 473                                 if (atom[i] == wm->atom.net_wm_state_fullscreen)
 474                                         window->fullscreen = 1;
 475                         break;
 476                 case TYPE_MOTIF_WM_HINTS:
 477                         memcpy(&window->motif_hints,
 478                                xcb_get_property_value(reply),
 479                                sizeof window->motif_hints);
 480                         if (window->motif_hints.flags & MWM_HINTS_DECORATIONS)
 481                                 window->decorate =
 482                                         window->motif_hints.decorations > 0;
 483                         break;
 484                 default:
 485                         break;
 486                 }
 487                 free(reply);
 488         }
 489
 490         if (window->shsurf && window->name)
 491                 shell_interface->set_title(window->shsurf, window->name);
 492         if (window->frame && window->name)
 493                 frame_set_title(window->frame, window->name);
 494 }
 495
 496 static void
 497 weston_wm_window_get_frame_size(struct weston_wm_window *window,
 498                                 int *width, int *height)
 499 {
 500         struct theme *t = window->wm->theme;
 501
 502         if (window->fullscreen) {
 503                 *width = window->width;
 504                 *height = window->height;
 505         } else if (window->decorate && window->frame) {
 506                 *width = frame_width(window->frame);
 507                 *height = frame_height(window->frame);
 508         } else {
 509                 *width = window->width + t->margin * 2;
 510                 *height = window->height + t->margin * 2;
 511         }
 512 }
 513
 514 static void
 515 weston_wm_window_get_child_position(struct weston_wm_window *window,
 516                                     int *x, int *y)
 517 {
 518         struct theme *t = window->wm->theme;
 519
 520         if (window->fullscreen) {
 521                 *x = 0;
 522                 *y = 0;
 523         } else if (window->decorate && window->frame) {
 524                 frame_interior(window->frame, x, y, NULL, NULL);
 525         } else {
 526                 *x = t->margin;
 527                 *y = t->margin;
 528         }
 529 }
 530
 531 static void
 532 weston_wm_window_send_configure_notify(struct weston_wm_window *window)
 533 {
 534         xcb_configure_notify_event_t configure_notify;
 535         struct weston_wm *wm = window->wm;
 536         int x, y;
 537
 538         weston_wm_window_get_child_position(window, &x, &y);
 539         configure_notify.response_type = XCB_CONFIGURE_NOTIFY;
 540         configure_notify.pad0 = 0;
 541         configure_notify.event = window->id;
 542         configure_notify.window = window->id;
 543         configure_notify.above_sibling = XCB_WINDOW_NONE;
 544         configure_notify.x = x;
 545         configure_notify.y = y;
 546         configure_notify.width = window->width;
 547         configure_notify.height = window->height;
 548         configure_notify.border_width = 0;
 549         configure_notify.override_redirect = 0;
 550         configure_notify.pad1 = 0;
 551
 552         xcb_send_event(wm->conn, 0, window->id,
 553                        XCB_EVENT_MASK_STRUCTURE_NOTIFY,
 554                        (char *) &configure_notify);
 555 }
 556
 557 static void
 558 weston_wm_handle_configure_request(struct weston_wm *wm, xcb_generic_event_t *event)
 559 {
 560         xcb_configure_request_event_t *configure_request =
 561                 (xcb_configure_request_event_t *) event;
 562         struct weston_wm_window *window;
 563         uint32_t mask, values[16];
 564         int x, y, width, height, i = 0;
 565
 566         wm_log("XCB_CONFIGURE_REQUEST (window %d) %d,%d @ %dx%d\n",
 567                configure_request->window,
 568                configure_request->x, configure_request->y,
 569                configure_request->width, configure_request->height);
 570
 571         window = hash_table_lookup(wm->window_hash, configure_request->window);
 572
 573         if (window->fullscreen) {
 574                 weston_wm_window_send_configure_notify(window);
 575                 return;
 576         }
 577
 578         if (configure_request->value_mask & XCB_CONFIG_WINDOW_WIDTH)
 579                 window->width = configure_request->width;
 580         if (configure_request->value_mask & XCB_CONFIG_WINDOW_HEIGHT)
 581                 window->height = configure_request->height;
 582
 583         if (window->frame)
 584                 frame_resize_inside(window->frame, window->width, window->height);
 585
 586         weston_wm_window_get_child_position(window, &x, &y);
 587         values[i++] = x;
 588         values[i++] = y;
 589         values[i++] = window->width;
 590         values[i++] = window->height;
 591         values[i++] = 0;
 592         mask = XCB_CONFIG_WINDOW_X | XCB_CONFIG_WINDOW_Y |
 593                 XCB_CONFIG_WINDOW_WIDTH | XCB_CONFIG_WINDOW_HEIGHT |
 594                 XCB_CONFIG_WINDOW_BORDER_WIDTH;
 595         if (configure_request->value_mask & XCB_CONFIG_WINDOW_SIBLING) {
 596                 values[i++] = configure_request->sibling;
 597                 mask |= XCB_CONFIG_WINDOW_SIBLING;
 598         }
 599         if (configure_request->value_mask & XCB_CONFIG_WINDOW_STACK_MODE) {
 600                 values[i++] = configure_request->stack_mode;
 601                 mask |= XCB_CONFIG_WINDOW_STACK_MODE;
 602         }
 603
 604         xcb_configure_window(wm->conn, window->id, mask, values);
 605
 606         weston_wm_window_get_frame_size(window, &width, &height);
 607         values[0] = width;
 608         values[1] = height;
 609         mask = XCB_CONFIG_WINDOW_WIDTH | XCB_CONFIG_WINDOW_HEIGHT;
 610         xcb_configure_window(wm->conn, window->frame_id, mask, values);
 611
 612         weston_wm_window_schedule_repaint(window);
 613 }
 614
 615 static int
 616 our_resource(struct weston_wm *wm, uint32_t id)
 617 {
 618         const xcb_setup_t *setup;
 619
 620         setup = xcb_get_setup(wm->conn);
 621
 622         return (id & ~setup->resource_id_mask) == setup->resource_id_base;
 623 }
 624
 625 static void
 626 weston_wm_handle_configure_notify(struct weston_wm *wm, xcb_generic_event_t *event)
 627 {
 628         xcb_configure_notify_event_t *configure_notify =
 629                 (xcb_configure_notify_event_t *) event;
 630         struct weston_wm_window *window;
 631
 632         wm_log("XCB_CONFIGURE_NOTIFY (window %d) %d,%d @ %dx%d\n",
 633                configure_notify->window,
 634                configure_notify->x, configure_notify->y,
 635                configure_notify->width, configure_notify->height);
 636
 637         window = hash_table_lookup(wm->window_hash, configure_notify->window);
 638         window->x = configure_notify->x;
 639         window->y = configure_notify->y;
 640         if (window->override_redirect) {
 641                 window->width = configure_notify->width;
 642                 window->height = configure_notify->height;
 643                 if (window->frame)
 644                         frame_resize_inside(window->frame,
 645                                             window->width, window->height);
 646         }
 647 }
 648
 649 static void
 650 weston_wm_kill_client(struct wl_listener *listener, void *data)
 651 {
 652         struct weston_surface *surface = data;
 653         struct weston_wm_window *window = get_wm_window(surface);
 654         char name[1024];
 655
 656         if (!window)
 657                 return;
 658
 659         gethostname(name, 1024);
 660
 661         /* this is only one heuristic to guess the PID of a client is valid,
 662          * assuming it's compliant with icccm and ewmh. Non-compliants and
 663          * remote applications of course fail. */
 664         if (!strcmp(window->machine, name) && window->pid != 0)
 665                 kill(window->pid, SIGKILL);
 666 }
 667
 668 static void
 669 weston_wm_create_surface(struct wl_listener *listener, void *data)
 670 {
 671         struct weston_surface *surface = data;
 672         struct weston_wm *wm =
 673                 container_of(listener,
 674                              struct weston_wm, create_surface_listener);
 675         struct weston_wm_window *window;
 676
 677         if (wl_resource_get_client(surface->resource) != wm->server->client)
 678                 return;
 679
 680         wl_list_for_each(window, &wm->unpaired_window_list, link)
 681                 if (window->surface_id ==
 682                     wl_resource_get_id(surface->resource)) {
 683                         xserver_map_shell_surface(window, surface);
 684                         window->surface_id = 0;
 685                         wl_list_remove(&window->link);
 686                         break;
 687                 }
 688 }
 689
 690 static void
 691 weston_wm_window_activate(struct wl_listener *listener, void *data)
 692 {
 693         struct weston_surface *surface = data;
 694         struct weston_wm_window *window = NULL;
 695         struct weston_wm *wm =
 696                 container_of(listener, struct weston_wm, activate_listener);
 697         xcb_client_message_event_t client_message;
 698
 699         if (surface) {
 700                 window = get_wm_window(surface);
 701         }
 702
 703         if (window) {
 704                 if (window->override_redirect)
 705                         return;
 706
 707                 client_message.response_type = XCB_CLIENT_MESSAGE;
 708                 client_message.format = 32;
 709                 client_message.window = window->id;
 710                 client_message.type = wm->atom.wm_protocols;
 711                 client_message.data.data32[0] = wm->atom.wm_take_focus;
 712                 client_message.data.data32[1] = XCB_TIME_CURRENT_TIME;
 713
 714                 xcb_send_event(wm->conn, 0, window->id,
 715                                XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT,
 716                                (char *) &client_message);
 717
 718                 xcb_set_input_focus (wm->conn, XCB_INPUT_FOCUS_POINTER_ROOT,
 719                                      window->id, XCB_TIME_CURRENT_TIME);
 720         } else {
 721                 xcb_set_input_focus (wm->conn,
 722                                      XCB_INPUT_FOCUS_POINTER_ROOT,
 723                                      XCB_NONE,
 724                                      XCB_TIME_CURRENT_TIME);
 725         }
 726
 727         if (wm->focus_window) {
 728                 if (wm->focus_window->frame)
 729                         frame_unset_flag(wm->focus_window->frame, FRAME_FLAG_ACTIVE);
 730                 weston_wm_window_schedule_repaint(wm->focus_window);
 731         }
 732         wm->focus_window = window;
 733         if (wm->focus_window) {
 734                 if (wm->focus_window->frame)
 735                         frame_set_flag(wm->focus_window->frame, FRAME_FLAG_ACTIVE);
 736                 weston_wm_window_schedule_repaint(wm->focus_window);
 737         }
 738 }
 739
 740 static void
 741 weston_wm_window_transform(struct wl_listener *listener, void *data)
 742 {
 743         struct weston_surface *surface = data;
 744         struct weston_wm_window *window = get_wm_window(surface);
 745         struct weston_wm *wm =
 746                 container_of(listener, struct weston_wm, transform_listener);
 747         uint32_t mask, values[2];
 748
 749         if (!window || !wm)
 750                 return;
 751
 752         if (!window->view || !weston_view_is_mapped(window->view))
 753                 return;
 754
 755         if (window->x != window->view->geometry.x ||
 756             window->y != window->view->geometry.y) {
 757                 values[0] = window->view->geometry.x;
 758                 values[1] = window->view->geometry.y;
 759                 mask = XCB_CONFIG_WINDOW_X | XCB_CONFIG_WINDOW_Y;
 760
 761                 xcb_configure_window(wm->conn, window->frame_id, mask, values);
 762                 xcb_flush(wm->conn);
 763         }
 764 }
 765
 766 #define ICCCM_WITHDRAWN_STATE   0
 767 #define ICCCM_NORMAL_STATE      1
 768 #define ICCCM_ICONIC_STATE      3
 769
 770 static void
 771 weston_wm_window_set_wm_state(struct weston_wm_window *window, int32_t state)
 772 {
 773         struct weston_wm *wm = window->wm;
 774         uint32_t property[2];
 775
 776         property[0] = state;
 777         property[1] = XCB_WINDOW_NONE;
 778
 779         xcb_change_property(wm->conn,
 780                             XCB_PROP_MODE_REPLACE,
 781                             window->id,
 782                             wm->atom.wm_state,
 783                             wm->atom.wm_state,
 784                             32, /* format */
 785                             2, property);
 786 }
 787
 788 static void
 789 weston_wm_window_set_net_wm_state(struct weston_wm_window *window)
 790 {
 791         struct weston_wm *wm = window->wm;
 792         uint32_t property[1];
 793         int i;
 794
 795         i = 0;
 796         if (window->fullscreen)
 797                 property[i++] = wm->atom.net_wm_state_fullscreen;
 798
 799         xcb_change_property(wm->conn,
 800                             XCB_PROP_MODE_REPLACE,
 801                             window->id,
 802                             wm->atom.net_wm_state,
 803                             XCB_ATOM_ATOM,
 804                             32, /* format */
 805                             i, property);
 806 }
 807
 808 static void
 809 weston_wm_window_create_frame(struct weston_wm_window *window)
 810 {
 811         struct weston_wm *wm = window->wm;
 812         uint32_t values[3];
 813         int x, y, width, height;
 814
 815         window->frame = frame_create(window->wm->theme,
 816                                      window->width, window->height,
 817                                      FRAME_BUTTON_CLOSE, window->name);
 818         frame_resize_inside(window->frame, window->width, window->height);
 819
 820         weston_wm_window_get_frame_size(window, &width, &height);
 821         weston_wm_window_get_child_position(window, &x, &y);
 822
 823         values[0] = wm->screen->black_pixel;
 824         values[1] =
 825                 XCB_EVENT_MASK_KEY_PRESS |
 826                 XCB_EVENT_MASK_KEY_RELEASE |
 827                 XCB_EVENT_MASK_BUTTON_PRESS |
 828                 XCB_EVENT_MASK_BUTTON_RELEASE |
 829                 XCB_EVENT_MASK_POINTER_MOTION |
 830                 XCB_EVENT_MASK_ENTER_WINDOW |
 831                 XCB_EVENT_MASK_LEAVE_WINDOW |
 832                 XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY |
 833                 XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT;
 834         values[2] = wm->colormap;
 835
 836         window->frame_id = xcb_generate_id(wm->conn);
 837         xcb_create_window(wm->conn,
 838                           32,
 839                           window->frame_id,
 840                           wm->screen->root,
 841                           0, 0,
 842                           width, height,
 843                           0,
 844                           XCB_WINDOW_CLASS_INPUT_OUTPUT,
 845                           wm->visual_id,
 846                           XCB_CW_BORDER_PIXEL |
 847                           XCB_CW_EVENT_MASK |
 848                           XCB_CW_COLORMAP, values);
 849
 850         xcb_reparent_window(wm->conn, window->id, window->frame_id, x, y);
 851
 852         values[0] = 0;
 853         xcb_configure_window(wm->conn, window->id,
 854                              XCB_CONFIG_WINDOW_BORDER_WIDTH, values);
 855
 856         window->cairo_surface =
 857                 cairo_xcb_surface_create_with_xrender_format(wm->conn,
 858                                                              wm->screen,
 859                                                              window->frame_id,
 860                                                              &wm->format_rgba,
 861                                                              width, height);
 862
 863         hash_table_insert(wm->window_hash, window->frame_id, window);
 864 }
 865
 866 static void
 867 weston_wm_handle_map_request(struct weston_wm *wm, xcb_generic_event_t *event)
 868 {
 869         xcb_map_request_event_t *map_request =
 870                 (xcb_map_request_event_t *) event;
 871         struct weston_wm_window *window;
 872
 873         if (our_resource(wm, map_request->window)) {
 874                 wm_log("XCB_MAP_REQUEST (window %d, ours)\n",
 875                        map_request->window);
 876                 return;
 877         }
 878
 879         window = hash_table_lookup(wm->window_hash, map_request->window);
 880
 881         weston_wm_window_read_properties(window);
 882
 883         if (window->frame_id == XCB_WINDOW_NONE)
 884                 weston_wm_window_create_frame(window);
 885
 886         wm_log("XCB_MAP_REQUEST (window %d, %p, frame %d)\n",
 887                window->id, window, window->frame_id);
 888
 889         weston_wm_window_set_wm_state(window, ICCCM_NORMAL_STATE);
 890         weston_wm_window_set_net_wm_state(window);
 891
 892         xcb_map_window(wm->conn, map_request->window);
 893         xcb_map_window(wm->conn, window->frame_id);
 894 }
 895
 896 static void
 897 weston_wm_handle_map_notify(struct weston_wm *wm, xcb_generic_event_t *event)
 898 {
 899         xcb_map_notify_event_t *map_notify = (xcb_map_notify_event_t *) event;
 900
 901         if (our_resource(wm, map_notify->window)) {
 902                 wm_log("XCB_MAP_NOTIFY (window %d, ours)\n",
 903                        map_notify->window);
 904                         return;
 905         }
 906
 907         wm_log("XCB_MAP_NOTIFY (window %d)\n", map_notify->window);
 908 }
 909
 910 static void
 911 weston_wm_handle_unmap_notify(struct weston_wm *wm, xcb_generic_event_t *event)
 912 {
 913         xcb_unmap_notify_event_t *unmap_notify =
 914                 (xcb_unmap_notify_event_t *) event;
 915         struct weston_wm_window *window;
 916
 917         wm_log("XCB_UNMAP_NOTIFY (window %d, event %d%s)\n",
 918                unmap_notify->window,
 919                unmap_notify->event,
 920                our_resource(wm, unmap_notify->window) ? ", ours" : "");
 921
 922         if (our_resource(wm, unmap_notify->window))
 923                 return;
 924
 925         if (unmap_notify->response_type & SEND_EVENT_MASK)
 926                 /* We just ignore the ICCCM 4.1.4 synthetic unmap notify
 927                  * as it may come in after we've destroyed the window. */
 928                 return;
 929
 930         window = hash_table_lookup(wm->window_hash, unmap_notify->window);
 931         if (wm->focus_window == window)
 932                 wm->focus_window = NULL;
 933         if (window->surface)
 934                 wl_list_remove(&window->surface_destroy_listener.link);
 935         window->surface = NULL;
 936         window->shsurf = NULL;
 937         window->view = NULL;
 938         xcb_unmap_window(wm->conn, window->frame_id);
 939 }
 940
 941 static void
 942 weston_wm_window_draw_decoration(void *data)
 943 {
 944         struct weston_wm_window *window = data;
 945         struct weston_wm *wm = window->wm;
 946         struct theme *t = wm->theme;
 947         cairo_t *cr;
 948         int x, y, width, height;
 949         int32_t input_x, input_y, input_w, input_h;
 950         struct weston_shell_interface *shell_interface =
 951                 &wm->server->compositor->shell_interface;
 952         uint32_t flags = 0;
 953
 954         weston_wm_window_read_properties(window);
 955
 956         window->repaint_source = NULL;
 957
 958         weston_wm_window_get_frame_size(window, &width, &height);
 959         weston_wm_window_get_child_position(window, &x, &y);
 960
 961         cairo_xcb_surface_set_size(window->cairo_surface, width, height);
 962         cr = cairo_create(window->cairo_surface);
 963
 964         if (window->fullscreen) {
 965                 /* nothing */
 966         } else if (window->decorate) {
 967                 if (wm->focus_window == window)
 968                         flags |= THEME_FRAME_ACTIVE;
 969
 970                 frame_repaint(window->frame, cr);
 971         } else {
 972                 cairo_set_operator(cr, CAIRO_OPERATOR_SOURCE);
 973                 cairo_set_source_rgba(cr, 0, 0, 0, 0);
 974                 cairo_paint(cr);
 975
 976                 cairo_set_operator(cr, CAIRO_OPERATOR_OVER);
 977                 cairo_set_source_rgba(cr, 0, 0, 0, 0.45);
 978                 tile_mask(cr, t->shadow, 2, 2, width + 8, height + 8, 64, 64);
 979         }
 980
 981         cairo_destroy(cr);
 982
 983         if (window->surface) {
 984                 pixman_region32_fini(&window->surface->pending.opaque);
 985                 if(window->has_alpha) {
 986                         pixman_region32_init(&window->surface->pending.opaque);
 987                 } else {
 988                         /* We leave an extra pixel around the X window area to
 989                          * make sure we don't sample from the undefined alpha
 990                          * channel when filtering. */
 991                         pixman_region32_init_rect(&window->surface->pending.opaque,
 992                                                   x - 1, y - 1,
 993                                                   window->width + 2,
 994                                                   window->height + 2);
 995                 }
 996                 if (window->view)
 997                         weston_view_geometry_dirty(window->view);
 998
 999                 pixman_region32_fini(&window->surface->pending.input);
1000
1001                 if (window->fullscreen) {
1002                         input_x = 0;
1003                         input_y = 0;
1004                         input_w = window->width;
1005                         input_h = window->height;
1006                 } else if (window->decorate) {
1007                         frame_input_rect(window->frame, &input_x, &input_y,
1008                                          &input_w, &input_h);
1009                 }
1010
1011                 pixman_region32_init_rect(&window->surface->pending.input,
1012                                           input_x, input_y, input_w, input_h);
1013
1014                 shell_interface->set_window_geometry(window->shsurf,
1015                                                      input_x, input_y, input_w, input_h);
1016         }
1017 }
1018
1019 static void
1020 weston_wm_window_schedule_repaint(struct weston_wm_window *window)
1021 {
1022         struct weston_wm *wm = window->wm;
1023         int width, height;
1024
1025         if (window->frame_id == XCB_WINDOW_NONE) {
1026                 if (window->surface != NULL) {
1027                         weston_wm_window_get_frame_size(window, &width, &height);
1028                         pixman_region32_fini(&window->surface->pending.opaque);
1029                         if(window->has_alpha) {
1030                                 pixman_region32_init(&window->surface->pending.opaque);
1031                         } else {
1032                                 pixman_region32_init_rect(&window->surface->pending.opaque, 0, 0,
1033                                                           width, height);
1034                         }
1035                         if (window->view)
1036                                 weston_view_geometry_dirty(window->view);
1037                 }
1038                 return;
1039         }
1040
1041         if (window->repaint_source)
1042                 return;
1043
1044         window->repaint_source =
1045                 wl_event_loop_add_idle(wm->server->loop,
1046                                        weston_wm_window_draw_decoration,
1047                                        window);
1048 }
1049
1050 static void
1051 weston_wm_handle_property_notify(struct weston_wm *wm, xcb_generic_event_t *event)
1052 {
1053         xcb_property_notify_event_t *property_notify =
1054                 (xcb_property_notify_event_t *) event;
1055         struct weston_wm_window *window;
1056
1057         window = hash_table_lookup(wm->window_hash, property_notify->window);
1058         if (!window)
1059                 return;
1060
1061         window->properties_dirty = 1;
1062
1063         wm_log("XCB_PROPERTY_NOTIFY: window %d, ", property_notify->window);
1064         if (property_notify->state == XCB_PROPERTY_DELETE)
1065                 wm_log("deleted\n");
1066         else
1067                 read_and_dump_property(wm, property_notify->window,
1068                                        property_notify->atom);
1069
1070         if (property_notify->atom == wm->atom.net_wm_name ||
1071             property_notify->atom == XCB_ATOM_WM_NAME)
1072                 weston_wm_window_schedule_repaint(window);
1073 }
1074
1075 static void
1076 weston_wm_window_create(struct weston_wm *wm,
1077                         xcb_window_t id, int width, int height, int x, int y, int override)
1078 {
1079         struct weston_wm_window *window;
1080         uint32_t values[1];
1081         xcb_get_geometry_cookie_t geometry_cookie;
1082         xcb_get_geometry_reply_t *geometry_reply;
1083
1084         window = zalloc(sizeof *window);
1085         if (window == NULL) {
1086                 wm_log("failed to allocate window\n");
1087                 return;
1088         }
1089
1090         geometry_cookie = xcb_get_geometry(wm->conn, id);
1091
1092         values[0] = XCB_EVENT_MASK_PROPERTY_CHANGE;
1093         xcb_change_window_attributes(wm->conn, id, XCB_CW_EVENT_MASK, values);
1094
1095         window->wm = wm;
1096         window->id = id;
1097         window->properties_dirty = 1;
1098         window->override_redirect = override;
1099         window->width = width;
1100         window->height = height;
1101         window->x = x;
1102         window->y = y;
1103
1104         geometry_reply = xcb_get_geometry_reply(wm->conn, geometry_cookie, NULL);
1105         /* technically we should use XRender and check the visual format's
1106         alpha_mask, but checking depth is simpler and works in all known cases */
1107         if(geometry_reply != NULL)
1108                 window->has_alpha = geometry_reply->depth == 32;
1109         free(geometry_reply);
1110
1111         hash_table_insert(wm->window_hash, id, window);
1112 }
1113
1114 static void
1115 weston_wm_window_destroy(struct weston_wm_window *window)
1116 {
1117         struct weston_wm *wm = window->wm;
1118
1119         if (window->repaint_source)
1120                 wl_event_source_remove(window->repaint_source);
1121         if (window->cairo_surface)
1122                 cairo_surface_destroy(window->cairo_surface);
1123
1124         if (window->frame_id) {
1125                 xcb_reparent_window(wm->conn, window->id, wm->wm_window, 0, 0);
1126                 xcb_destroy_window(wm->conn, window->frame_id);
1127                 weston_wm_window_set_wm_state(window, ICCCM_WITHDRAWN_STATE);
1128                 hash_table_remove(wm->window_hash, window->frame_id);
1129                 window->frame_id = XCB_WINDOW_NONE;
1130         }
1131
1132         if (window->surface_id)
1133                 wl_list_remove(&window->link);
1134
1135         hash_table_remove(window->wm->window_hash, window->id);
1136         free(window);
1137 }
1138
1139 static void
1140 weston_wm_handle_create_notify(struct weston_wm *wm, xcb_generic_event_t *event)
1141 {
1142         xcb_create_notify_event_t *create_notify =
1143                 (xcb_create_notify_event_t *) event;
1144
1145         wm_log("XCB_CREATE_NOTIFY (window %d, width %d, height %d%s%s)\n",
1146                create_notify->window,
1147                create_notify->width, create_notify->height,
1148                create_notify->override_redirect ? ", override" : "",
1149                our_resource(wm, create_notify->window) ? ", ours" : "");
1150
1151         if (our_resource(wm, create_notify->window))
1152                 return;
1153
1154         weston_wm_window_create(wm, create_notify->window,
1155                                 create_notify->width, create_notify->height,
1156                                 create_notify->x, create_notify->y,
1157                                 create_notify->override_redirect);
1158 }
1159
1160 static void
1161 weston_wm_handle_destroy_notify(struct weston_wm *wm, xcb_generic_event_t *event)
1162 {
1163         xcb_destroy_notify_event_t *destroy_notify =
1164                 (xcb_destroy_notify_event_t *) event;
1165         struct weston_wm_window *window;
1166
1167         wm_log("XCB_DESTROY_NOTIFY, win %d, event %d%s\n",
1168                destroy_notify->window,
1169                destroy_notify->event,
1170                our_resource(wm, destroy_notify->window) ? ", ours" : "");
1171
1172         if (our_resource(wm, destroy_notify->window))
1173                 return;
1174
1175         window = hash_table_lookup(wm->window_hash, destroy_notify->window);
1176         weston_wm_window_destroy(window);
1177 }
1178
1179 static void
1180 weston_wm_handle_reparent_notify(struct weston_wm *wm, xcb_generic_event_t *event)
1181 {
1182         xcb_reparent_notify_event_t *reparent_notify =
1183                 (xcb_reparent_notify_event_t *) event;
1184         struct weston_wm_window *window;
1185
1186         wm_log("XCB_REPARENT_NOTIFY (window %d, parent %d, event %d)\n",
1187                reparent_notify->window,
1188                reparent_notify->parent,
1189                reparent_notify->event);
1190
1191         if (reparent_notify->parent == wm->screen->root) {
1192                 weston_wm_window_create(wm, reparent_notify->window, 10, 10,
1193                                         reparent_notify->x, reparent_notify->y,
1194                                         reparent_notify->override_redirect);
1195         } else if (!our_resource(wm, reparent_notify->parent)) {
1196                 window = hash_table_lookup(wm->window_hash,
1197                                            reparent_notify->window);
1198                 weston_wm_window_destroy(window);
1199         }
1200 }
1201
1202 struct weston_seat *
1203 weston_wm_pick_seat(struct weston_wm *wm)
1204 {
1205         return container_of(wm->server->compositor->seat_list.next,
1206                             struct weston_seat, link);
1207 }
1208
1209 static struct weston_seat *
1210 weston_wm_pick_seat_for_window(struct weston_wm_window *window)
1211 {
1212         struct weston_wm *wm = window->wm;
1213         struct weston_seat *seat, *s;
1214
1215         seat = NULL;
1216         wl_list_for_each(s, &wm->server->compositor->seat_list, link) {
1217                 if (s->pointer != NULL &&
1218                     s->pointer->focus == window->view &&
1219                     s->pointer->button_count > 0 &&
1220                     (seat == NULL ||
1221                      s->pointer->grab_serial -
1222                      seat->pointer->grab_serial < (1 << 30)))
1223                         seat = s;
1224         }
1225
1226         return seat;
1227 }
1228
1229 static void
1230 weston_wm_window_handle_moveresize(struct weston_wm_window *window,
1231                                    xcb_client_message_event_t *client_message)
1232 {
1233         static const int map[] = {
1234                 THEME_LOCATION_RESIZING_TOP_LEFT,
1235                 THEME_LOCATION_RESIZING_TOP,
1236                 THEME_LOCATION_RESIZING_TOP_RIGHT,
1237                 THEME_LOCATION_RESIZING_RIGHT,
1238                 THEME_LOCATION_RESIZING_BOTTOM_RIGHT,
1239                 THEME_LOCATION_RESIZING_BOTTOM,
1240                 THEME_LOCATION_RESIZING_BOTTOM_LEFT,
1241                 THEME_LOCATION_RESIZING_LEFT
1242         };
1243
1244         struct weston_wm *wm = window->wm;
1245         struct weston_seat *seat = weston_wm_pick_seat_for_window(window);
1246         int detail;
1247         struct weston_shell_interface *shell_interface =
1248                 &wm->server->compositor->shell_interface;
1249
1250         if (seat == NULL || seat->pointer->button_count != 1
1251             || !window->view || seat->pointer->focus != window->view)
1252                 return;
1253
1254         detail = client_message->data.data32[2];
1255         switch (detail) {
1256         case _NET_WM_MOVERESIZE_MOVE:
1257                 shell_interface->move(window->shsurf, seat);
1258                 break;
1259         case _NET_WM_MOVERESIZE_SIZE_TOPLEFT:
1260         case _NET_WM_MOVERESIZE_SIZE_TOP:
1261         case _NET_WM_MOVERESIZE_SIZE_TOPRIGHT:
1262         case _NET_WM_MOVERESIZE_SIZE_RIGHT:
1263         case _NET_WM_MOVERESIZE_SIZE_BOTTOMRIGHT:
1264         case _NET_WM_MOVERESIZE_SIZE_BOTTOM:
1265         case _NET_WM_MOVERESIZE_SIZE_BOTTOMLEFT:
1266         case _NET_WM_MOVERESIZE_SIZE_LEFT:
1267                 shell_interface->resize(window->shsurf, seat, map[detail]);
1268                 break;
1269         case _NET_WM_MOVERESIZE_CANCEL:
1270                 break;
1271         }
1272 }
1273
1274 #define _NET_WM_STATE_REMOVE    0
1275 #define _NET_WM_STATE_ADD       1
1276 #define _NET_WM_STATE_TOGGLE    2
1277
1278 static int
1279 update_state(int action, int *state)
1280 {
1281         int new_state, changed;
1282
1283         switch (action) {
1284         case _NET_WM_STATE_REMOVE:
1285                 new_state = 0;
1286                 break;
1287         case _NET_WM_STATE_ADD:
1288                 new_state = 1;
1289                 break;
1290         case _NET_WM_STATE_TOGGLE:
1291                 new_state = !*state;
1292                 break;
1293         default:
1294                 return 0;
1295         }
1296
1297         changed = (*state != new_state);
1298         *state = new_state;
1299
1300         return changed;
1301 }
1302
1303 static void
1304 weston_wm_window_configure(void *data);
1305
1306 static void
1307 weston_wm_window_handle_state(struct weston_wm_window *window,
1308                               xcb_client_message_event_t *client_message)
1309 {
1310         struct weston_wm *wm = window->wm;
1311         struct weston_shell_interface *shell_interface =
1312                 &wm->server->compositor->shell_interface;
1313         uint32_t action, property;
1314
1315         action = client_message->data.data32[0];
1316         property = client_message->data.data32[1];
1317
1318         if (property == wm->atom.net_wm_state_fullscreen &&
1319             update_state(action, &window->fullscreen)) {
1320                 weston_wm_window_set_net_wm_state(window);
1321                 if (window->fullscreen) {
1322                         window->saved_width = window->width;
1323                         window->saved_height = window->height;
1324
1325                         if (window->shsurf)
1326                                 shell_interface->set_fullscreen(window->shsurf,
1327                                                                 WL_SHELL_SURFACE_FULLSCREEN_METHOD_DEFAULT,
1328                                                                 0, NULL);
1329                 } else {
1330                         shell_interface->set_toplevel(window->shsurf);
1331                         window->width = window->saved_width;
1332                         window->height = window->saved_height;
1333                         if (window->frame)
1334                                 frame_resize_inside(window->frame,
1335                                                     window->width,
1336                                                     window->height);
1337                         weston_wm_window_configure(window);
1338                 }
1339         }
1340 }
1341
1342 static void
1343 surface_destroy(struct wl_listener *listener, void *data)
1344 {
1345         struct weston_wm_window *window =
1346                 container_of(listener,
1347                              struct weston_wm_window, surface_destroy_listener);
1348
1349         wm_log("surface for xid %d destroyed\n", window->id);
1350
1351         /* This should have been freed by the shell.
1352          * Don't try to use it later. */
1353         window->shsurf = NULL;
1354         window->surface = NULL;
1355         window->view = NULL;
1356 }
1357
1358 static void
1359 weston_wm_window_handle_surface_id(struct weston_wm_window *window,
1360                                    xcb_client_message_event_t *client_message)
1361 {
1362         struct weston_wm *wm = window->wm;
1363         struct wl_resource *resource;
1364
1365         if (window->surface_id != 0) {
1366                 wm_log("already have surface id for window %d\n", window->id);
1367                 return;
1368         }
1369
1370         /* Xwayland will send the wayland requests to create the
1371          * wl_surface before sending this client message.  Even so, we
1372          * can end up handling the X event before the wayland requests
1373          * and thus when we try to look up the surface ID, the surface
1374          * hasn't been created yet.  In that case put the window on
1375          * the unpaired window list and continue when the surface gets
1376          * created. */
1377         uint32_t id = client_message->data.data32[0];
1378         resource = wl_client_get_object(wm->server->client, id);
1379         if (resource) {
1380                 window->surface_id = 0;
1381                 xserver_map_shell_surface(window,
1382                                           wl_resource_get_user_data(resource));
1383         }
1384         else {
1385                 window->surface_id = id;
1386                 wl_list_insert(&wm->unpaired_window_list, &window->link);
1387         }
1388 }
1389
1390 static void
1391 weston_wm_handle_client_message(struct weston_wm *wm,
1392                                 xcb_generic_event_t *event)
1393 {
1394         xcb_client_message_event_t *client_message =
1395                 (xcb_client_message_event_t *) event;
1396         struct weston_wm_window *window;
1397
1398         window = hash_table_lookup(wm->window_hash, client_message->window);
1399
1400         wm_log("XCB_CLIENT_MESSAGE (%s %d %d %d %d %d win %d)\n",
1401                get_atom_name(wm->conn, client_message->type),
1402                client_message->data.data32[0],
1403                client_message->data.data32[1],
1404                client_message->data.data32[2],
1405                client_message->data.data32[3],
1406                client_message->data.data32[4],
1407                client_message->window);
1408
1409         /* The window may get created and destroyed before we actually
1410          * handle the message.  If it doesn't exist, bail.
1411          */
1412         if (!window)
1413                 return;
1414
1415         if (client_message->type == wm->atom.net_wm_moveresize)
1416                 weston_wm_window_handle_moveresize(window, client_message);
1417         else if (client_message->type == wm->atom.net_wm_state)
1418                 weston_wm_window_handle_state(window, client_message);
1419         else if (client_message->type == wm->atom.wl_surface_id)
1420                 weston_wm_window_handle_surface_id(window, client_message);
1421 }
1422
1423 enum cursor_type {
1424         XWM_CURSOR_TOP,
1425         XWM_CURSOR_BOTTOM,
1426         XWM_CURSOR_LEFT,
1427         XWM_CURSOR_RIGHT,
1428         XWM_CURSOR_TOP_LEFT,
1429         XWM_CURSOR_TOP_RIGHT,
1430         XWM_CURSOR_BOTTOM_LEFT,
1431         XWM_CURSOR_BOTTOM_RIGHT,
1432         XWM_CURSOR_LEFT_PTR,
1433 };
1434
1435 /*
1436  * The following correspondences between file names and cursors was copied
1437  * from: https://bugs.kde.org/attachment.cgi?id=67313
1438  */
1439
1440 static const char *bottom_left_corners[] = {
1441         "bottom_left_corner",
1442         "sw-resize",
1443         "size_bdiag"
1444 };
1445
1446 static const char *bottom_right_corners[] = {
1447         "bottom_right_corner",
1448         "se-resize",
1449         "size_fdiag"
1450 };
1451
1452 static const char *bottom_sides[] = {
1453         "bottom_side",
1454         "s-resize",
1455         "size_ver"
1456 };
1457
1458 static const char *left_ptrs[] = {
1459         "left_ptr",
1460         "default",
1461         "top_left_arrow",
1462         "left-arrow"
1463 };
1464
1465 static const char *left_sides[] = {
1466         "left_side",
1467         "w-resize",
1468         "size_hor"
1469 };
1470
1471 static const char *right_sides[] = {
1472         "right_side",
1473         "e-resize",
1474         "size_hor"
1475 };
1476
1477 static const char *top_left_corners[] = {
1478         "top_left_corner",
1479         "nw-resize",
1480         "size_fdiag"
1481 };
1482
1483 static const char *top_right_corners[] = {
1484         "top_right_corner",
1485         "ne-resize",
1486         "size_bdiag"
1487 };
1488
1489 static const char *top_sides[] = {
1490         "top_side",
1491         "n-resize",
1492         "size_ver"
1493 };
1494
1495 struct cursor_alternatives {
1496         const char **names;
1497         size_t count;
1498 };
1499
1500 static const struct cursor_alternatives cursors[] = {
1501         {top_sides, ARRAY_LENGTH(top_sides)},
1502         {bottom_sides, ARRAY_LENGTH(bottom_sides)},
1503         {left_sides, ARRAY_LENGTH(left_sides)},
1504         {right_sides, ARRAY_LENGTH(right_sides)},
1505         {top_left_corners, ARRAY_LENGTH(top_left_corners)},
1506         {top_right_corners, ARRAY_LENGTH(top_right_corners)},
1507         {bottom_left_corners, ARRAY_LENGTH(bottom_left_corners)},
1508         {bottom_right_corners, ARRAY_LENGTH(bottom_right_corners)},
1509         {left_ptrs, ARRAY_LENGTH(left_ptrs)},
1510 };
1511
1512 static void
1513 weston_wm_create_cursors(struct weston_wm *wm)
1514 {
1515         const char *name;
1516         int i, count = ARRAY_LENGTH(cursors);
1517         size_t j;
1518
1519         wm->cursors = malloc(count * sizeof(xcb_cursor_t));
1520         for (i = 0; i < count; i++) {
1521                 for (j = 0; j < cursors[i].count; j++) {
1522                         name = cursors[i].names[j];
1523                         wm->cursors[i] =
1524                                 xcb_cursor_library_load_cursor(wm, name);
1525                         if (wm->cursors[i] != (xcb_cursor_t)-1)
1526                                 break;
1527                 }
1528         }
1529
1530         wm->last_cursor = -1;
1531 }
1532
1533 static void
1534 weston_wm_destroy_cursors(struct weston_wm *wm)
1535 {
1536         uint8_t i;
1537
1538         for (i = 0; i < ARRAY_LENGTH(cursors); i++)
1539                 xcb_free_cursor(wm->conn, wm->cursors[i]);
1540
1541         free(wm->cursors);
1542 }
1543
1544 static int
1545 get_cursor_for_location(enum theme_location location)
1546 {
1547         // int location = theme_get_location(t, x, y, width, height, 0);
1548
1549         switch (location) {
1550                 case THEME_LOCATION_RESIZING_TOP:
1551                         return XWM_CURSOR_TOP;
1552                 case THEME_LOCATION_RESIZING_BOTTOM:
1553                         return XWM_CURSOR_BOTTOM;
1554                 case THEME_LOCATION_RESIZING_LEFT:
1555                         return XWM_CURSOR_LEFT;
1556                 case THEME_LOCATION_RESIZING_RIGHT:
1557                         return XWM_CURSOR_RIGHT;
1558                 case THEME_LOCATION_RESIZING_TOP_LEFT:
1559                         return XWM_CURSOR_TOP_LEFT;
1560                 case THEME_LOCATION_RESIZING_TOP_RIGHT:
1561                         return XWM_CURSOR_TOP_RIGHT;
1562                 case THEME_LOCATION_RESIZING_BOTTOM_LEFT:
1563                         return XWM_CURSOR_BOTTOM_LEFT;
1564                 case THEME_LOCATION_RESIZING_BOTTOM_RIGHT:
1565                         return XWM_CURSOR_BOTTOM_RIGHT;
1566                 case THEME_LOCATION_EXTERIOR:
1567                 case THEME_LOCATION_TITLEBAR:
1568                 default:
1569                         return XWM_CURSOR_LEFT_PTR;
1570         }
1571 }
1572
1573 static void
1574 weston_wm_window_set_cursor(struct weston_wm *wm, xcb_window_t window_id,
1575                             int cursor)
1576 {
1577         uint32_t cursor_value_list;
1578
1579         if (wm->last_cursor == cursor)
1580                 return;
1581
1582         wm->last_cursor = cursor;
1583
1584         cursor_value_list = wm->cursors[cursor];
1585         xcb_change_window_attributes (wm->conn, window_id,
1586                                       XCB_CW_CURSOR, &cursor_value_list);
1587         xcb_flush(wm->conn);
1588 }
1589
1590 static void
1591 weston_wm_window_close(struct weston_wm_window *window, xcb_timestamp_t time)
1592 {
1593         xcb_client_message_event_t client_message;
1594
1595         if (window->delete_window) {
1596                 client_message.response_type = XCB_CLIENT_MESSAGE;
1597                 client_message.format = 32;
1598                 client_message.window = window->id;
1599                 client_message.type = window->wm->atom.wm_protocols;
1600                 client_message.data.data32[0] =
1601                         window->wm->atom.wm_delete_window;
1602                 client_message.data.data32[1] = time;
1603
1604                 xcb_send_event(window->wm->conn, 0, window->id,
1605                                XCB_EVENT_MASK_NO_EVENT,
1606                                (char *) &client_message);
1607         } else {
1608                 xcb_kill_client(window->wm->conn, window->id);
1609         }
1610 }
1611
1612 static void
1613 weston_wm_handle_button(struct weston_wm *wm, xcb_generic_event_t *event)
1614 {
1615         xcb_button_press_event_t *button = (xcb_button_press_event_t *) event;
1616         struct weston_shell_interface *shell_interface =
1617                 &wm->server->compositor->shell_interface;
1618         struct weston_seat *seat;
1619         struct weston_wm_window *window;
1620         enum theme_location location;
1621         enum frame_button_state button_state;
1622         uint32_t button_id;
1623
1624         wm_log("XCB_BUTTON_%s (detail %d)\n",
1625                button->response_type == XCB_BUTTON_PRESS ?
1626                "PRESS" : "RELEASE", button->detail);
1627
1628         window = hash_table_lookup(wm->window_hash, button->event);
1629         if (!window || !window->decorate)
1630                 return;
1631
1632         if (button->detail != 1 && button->detail != 2)
1633                 return;
1634
1635         seat = weston_wm_pick_seat_for_window(window);
1636
1637         button_state = button->response_type == XCB_BUTTON_PRESS ?
1638                 FRAME_BUTTON_PRESSED : FRAME_BUTTON_RELEASED;
1639         button_id = button->detail == 1 ? BTN_LEFT : BTN_RIGHT;
1640
1641         /* Make sure we're looking at the right location.  The frame
1642          * could have received a motion event from a pointer from a
1643          * different wl_seat, but under X it looks like our core
1644          * pointer moved.  Move the frame pointer to the button press
1645          * location before deciding what to do. */
1646         location = frame_pointer_motion(window->frame, NULL,
1647                                         button->event_x, button->event_y);
1648         location = frame_pointer_button(window->frame, NULL,
1649                                         button_id, button_state);
1650         if (frame_status(window->frame) & FRAME_STATUS_REPAINT)
1651                 weston_wm_window_schedule_repaint(window);
1652
1653         if (frame_status(window->frame) & FRAME_STATUS_MOVE) {
1654                 if (seat != NULL)
1655                         shell_interface->move(window->shsurf, seat);
1656                 frame_status_clear(window->frame, FRAME_STATUS_MOVE);
1657         }
1658
1659         if (frame_status(window->frame) & FRAME_STATUS_RESIZE) {
1660                 if (seat != NULL)
1661                         shell_interface->resize(window->shsurf, seat, location);
1662                 frame_status_clear(window->frame, FRAME_STATUS_RESIZE);
1663         }
1664
1665         if (frame_status(window->frame) & FRAME_STATUS_CLOSE) {
1666                 weston_wm_window_close(window, button->time);
1667                 frame_status_clear(window->frame, FRAME_STATUS_CLOSE);
1668         }
1669 }
1670
1671 static void
1672 weston_wm_handle_motion(struct weston_wm *wm, xcb_generic_event_t *event)
1673 {
1674         xcb_motion_notify_event_t *motion = (xcb_motion_notify_event_t *) event;
1675         struct weston_wm_window *window;
1676         enum theme_location location;
1677         int cursor;
1678
1679         window = hash_table_lookup(wm->window_hash, motion->event);
1680         if (!window || !window->decorate)
1681                 return;
1682
1683         location = frame_pointer_motion(window->frame, NULL,
1684                                         motion->event_x, motion->event_y);
1685         if (frame_status(window->frame) & FRAME_STATUS_REPAINT)
1686                 weston_wm_window_schedule_repaint(window);
1687
1688         cursor = get_cursor_for_location(location);
1689         weston_wm_window_set_cursor(wm, window->frame_id, cursor);
1690 }
1691
1692 static void
1693 weston_wm_handle_enter(struct weston_wm *wm, xcb_generic_event_t *event)
1694 {
1695         xcb_enter_notify_event_t *enter = (xcb_enter_notify_event_t *) event;
1696         struct weston_wm_window *window;
1697         enum theme_location location;
1698         int cursor;
1699
1700         window = hash_table_lookup(wm->window_hash, enter->event);
1701         if (!window || !window->decorate)
1702                 return;
1703
1704         location = frame_pointer_enter(window->frame, NULL,
1705                                        enter->event_x, enter->event_y);
1706         if (frame_status(window->frame) & FRAME_STATUS_REPAINT)
1707                 weston_wm_window_schedule_repaint(window);
1708
1709         cursor = get_cursor_for_location(location);
1710         weston_wm_window_set_cursor(wm, window->frame_id, cursor);
1711 }
1712
1713 static void
1714 weston_wm_handle_leave(struct weston_wm *wm, xcb_generic_event_t *event)
1715 {
1716         xcb_leave_notify_event_t *leave = (xcb_leave_notify_event_t *) event;
1717         struct weston_wm_window *window;
1718
1719         window = hash_table_lookup(wm->window_hash, leave->event);
1720         if (!window || !window->decorate)
1721                 return;
1722
1723         frame_pointer_leave(window->frame, NULL);
1724         if (frame_status(window->frame) & FRAME_STATUS_REPAINT)
1725                 weston_wm_window_schedule_repaint(window);
1726
1727         weston_wm_window_set_cursor(wm, window->frame_id, XWM_CURSOR_LEFT_PTR);
1728 }
1729
1730 static int
1731 weston_wm_handle_event(int fd, uint32_t mask, void *data)
1732 {
1733         struct weston_wm *wm = data;
1734         xcb_generic_event_t *event;
1735         int count = 0;
1736
1737         while (event = xcb_poll_for_event(wm->conn), event != NULL) {
1738                 if (weston_wm_handle_selection_event(wm, event)) {
1739                         free(event);
1740                         count++;
1741                         continue;
1742                 }
1743
1744                 if (weston_wm_handle_dnd_event(wm, event)) {
1745                         free(event);
1746                         count++;
1747                         continue;
1748                 }
1749
1750                 switch (EVENT_TYPE(event)) {
1751                 case XCB_BUTTON_PRESS:
1752                 case XCB_BUTTON_RELEASE:
1753                         weston_wm_handle_button(wm, event);
1754                         break;
1755                 case XCB_ENTER_NOTIFY:
1756                         weston_wm_handle_enter(wm, event);
1757                         break;
1758                 case XCB_LEAVE_NOTIFY:
1759                         weston_wm_handle_leave(wm, event);
1760                         break;
1761                 case XCB_MOTION_NOTIFY:
1762                         weston_wm_handle_motion(wm, event);
1763                         break;
1764                 case XCB_CREATE_NOTIFY:
1765                         weston_wm_handle_create_notify(wm, event);
1766                         break;
1767                 case XCB_MAP_REQUEST:
1768                         weston_wm_handle_map_request(wm, event);
1769                         break;
1770                 case XCB_MAP_NOTIFY:
1771                         weston_wm_handle_map_notify(wm, event);
1772                         break;
1773                 case XCB_UNMAP_NOTIFY:
1774                         weston_wm_handle_unmap_notify(wm, event);
1775                         break;
1776                 case XCB_REPARENT_NOTIFY:
1777                         weston_wm_handle_reparent_notify(wm, event);
1778                         break;
1779                 case XCB_CONFIGURE_REQUEST:
1780                         weston_wm_handle_configure_request(wm, event);
1781                         break;
1782                 case XCB_CONFIGURE_NOTIFY:
1783                         weston_wm_handle_configure_notify(wm, event);
1784                         break;
1785                 case XCB_DESTROY_NOTIFY:
1786                         weston_wm_handle_destroy_notify(wm, event);
1787                         break;
1788                 case XCB_MAPPING_NOTIFY:
1789                         wm_log("XCB_MAPPING_NOTIFY\n");
1790                         break;
1791                 case XCB_PROPERTY_NOTIFY:
1792                         weston_wm_handle_property_notify(wm, event);
1793                         break;
1794                 case XCB_CLIENT_MESSAGE:
1795                         weston_wm_handle_client_message(wm, event);
1796                         break;
1797                 }
1798
1799                 free(event);
1800                 count++;
1801         }
1802
1803         xcb_flush(wm->conn);
1804
1805         return count;
1806 }
1807
1808 static void
1809 weston_wm_get_visual_and_colormap(struct weston_wm *wm)
1810 {
1811         xcb_depth_iterator_t d_iter;
1812         xcb_visualtype_iterator_t vt_iter;
1813         xcb_visualtype_t *visualtype;
1814
1815         d_iter = xcb_screen_allowed_depths_iterator(wm->screen);
1816         visualtype = NULL;
1817         while (d_iter.rem > 0) {
1818                 if (d_iter.data->depth == 32) {
1819                         vt_iter = xcb_depth_visuals_iterator(d_iter.data);
1820                         visualtype = vt_iter.data;
1821                         break;
1822                 }
1823
1824                 xcb_depth_next(&d_iter);
1825         }
1826
1827         if (visualtype == NULL) {
1828                 weston_log("no 32 bit visualtype\n");
1829                 return;
1830         }
1831
1832         wm->visual_id = visualtype->visual_id;
1833         wm->colormap = xcb_generate_id(wm->conn);
1834         xcb_create_colormap(wm->conn, XCB_COLORMAP_ALLOC_NONE,
1835                             wm->colormap, wm->screen->root, wm->visual_id);
1836 }
1837
1838 static void
1839 weston_wm_get_resources(struct weston_wm *wm)
1840 {
1841
1842 #define F(field) offsetof(struct weston_wm, field)
1843
1844         static const struct { const char *name; int offset; } atoms[] = {
1845                 { "WM_PROTOCOLS",       F(atom.wm_protocols) },
1846                 { "WM_NORMAL_HINTS",    F(atom.wm_normal_hints) },
1847                 { "WM_TAKE_FOCUS",      F(atom.wm_take_focus) },
1848                 { "WM_DELETE_WINDOW",   F(atom.wm_delete_window) },
1849                 { "WM_STATE",           F(atom.wm_state) },
1850                 { "WM_S0",              F(atom.wm_s0) },
1851                 { "WM_CLIENT_MACHINE",  F(atom.wm_client_machine) },
1852                 { "_NET_WM_CM_S0",      F(atom.net_wm_cm_s0) },
1853                 { "_NET_WM_NAME",       F(atom.net_wm_name) },
1854                 { "_NET_WM_PID",        F(atom.net_wm_pid) },
1855                 { "_NET_WM_ICON",       F(atom.net_wm_icon) },
1856                 { "_NET_WM_STATE",      F(atom.net_wm_state) },
1857                 { "_NET_WM_STATE_FULLSCREEN", F(atom.net_wm_state_fullscreen) },
1858                 { "_NET_WM_USER_TIME", F(atom.net_wm_user_time) },
1859                 { "_NET_WM_ICON_NAME", F(atom.net_wm_icon_name) },
1860                 { "_NET_WM_WINDOW_TYPE", F(atom.net_wm_window_type) },
1861
1862                 { "_NET_WM_WINDOW_TYPE_DESKTOP", F(atom.net_wm_window_type_desktop) },
1863                 { "_NET_WM_WINDOW_TYPE_DOCK", F(atom.net_wm_window_type_dock) },
1864                 { "_NET_WM_WINDOW_TYPE_TOOLBAR", F(atom.net_wm_window_type_toolbar) },
1865                 { "_NET_WM_WINDOW_TYPE_MENU", F(atom.net_wm_window_type_menu) },
1866                 { "_NET_WM_WINDOW_TYPE_UTILITY", F(atom.net_wm_window_type_utility) },
1867                 { "_NET_WM_WINDOW_TYPE_SPLASH", F(atom.net_wm_window_type_splash) },
1868                 { "_NET_WM_WINDOW_TYPE_DIALOG", F(atom.net_wm_window_type_dialog) },
1869                 { "_NET_WM_WINDOW_TYPE_DROPDOWN_MENU", F(atom.net_wm_window_type_dropdown) },
1870                 { "_NET_WM_WINDOW_TYPE_POPUP_MENU", F(atom.net_wm_window_type_popup) },
1871                 { "_NET_WM_WINDOW_TYPE_TOOLTIP", F(atom.net_wm_window_type_tooltip) },
1872                 { "_NET_WM_WINDOW_TYPE_NOTIFICATION", F(atom.net_wm_window_type_notification) },
1873                 { "_NET_WM_WINDOW_TYPE_COMBO", F(atom.net_wm_window_type_combo) },
1874                 { "_NET_WM_WINDOW_TYPE_DND", F(atom.net_wm_window_type_dnd) },
1875                 { "_NET_WM_WINDOW_TYPE_NORMAL", F(atom.net_wm_window_type_normal) },
1876
1877                 { "_NET_WM_MOVERESIZE", F(atom.net_wm_moveresize) },
1878                 { "_NET_SUPPORTING_WM_CHECK",
1879                                         F(atom.net_supporting_wm_check) },
1880                 { "_NET_SUPPORTED",     F(atom.net_supported) },
1881                 { "_MOTIF_WM_HINTS",    F(atom.motif_wm_hints) },
1882                 { "CLIPBOARD",          F(atom.clipboard) },
1883                 { "CLIPBOARD_MANAGER",  F(atom.clipboard_manager) },
1884                 { "TARGETS",            F(atom.targets) },
1885                 { "UTF8_STRING",        F(atom.utf8_string) },
1886                 { "_WL_SELECTION",      F(atom.wl_selection) },
1887                 { "INCR",               F(atom.incr) },
1888                 { "TIMESTAMP",          F(atom.timestamp) },
1889                 { "MULTIPLE",           F(atom.multiple) },
1890                 { "UTF8_STRING" ,       F(atom.utf8_string) },
1891                 { "COMPOUND_TEXT",      F(atom.compound_text) },
1892                 { "TEXT",               F(atom.text) },
1893                 { "STRING",             F(atom.string) },
1894                 { "text/plain;charset=utf-8",   F(atom.text_plain_utf8) },
1895                 { "text/plain",         F(atom.text_plain) },
1896                 { "XdndSelection",      F(atom.xdnd_selection) },
1897                 { "XdndAware",          F(atom.xdnd_aware) },
1898                 { "XdndEnter",          F(atom.xdnd_enter) },
1899                 { "XdndLeave",          F(atom.xdnd_leave) },
1900                 { "XdndDrop",           F(atom.xdnd_drop) },
1901                 { "XdndStatus",         F(atom.xdnd_status) },
1902                 { "XdndFinished",       F(atom.xdnd_finished) },
1903                 { "XdndTypeList",       F(atom.xdnd_type_list) },
1904                 { "XdndActionCopy",     F(atom.xdnd_action_copy) },
1905                 { "WL_SURFACE_ID",      F(atom.wl_surface_id) }
1906         };
1907 #undef F
1908
1909         xcb_xfixes_query_version_cookie_t xfixes_cookie;
1910         xcb_xfixes_query_version_reply_t *xfixes_reply;
1911         xcb_intern_atom_cookie_t cookies[ARRAY_LENGTH(atoms)];
1912         xcb_intern_atom_reply_t *reply;
1913         xcb_render_query_pict_formats_reply_t *formats_reply;
1914         xcb_render_query_pict_formats_cookie_t formats_cookie;
1915         xcb_render_pictforminfo_t *formats;
1916         uint32_t i;
1917
1918         xcb_prefetch_extension_data (wm->conn, &xcb_xfixes_id);
1919         xcb_prefetch_extension_data (wm->conn, &xcb_composite_id);
1920
1921         formats_cookie = xcb_render_query_pict_formats(wm->conn);
1922
1923         for (i = 0; i < ARRAY_LENGTH(atoms); i++)
1924                 cookies[i] = xcb_intern_atom (wm->conn, 0,
1925                                               strlen(atoms[i].name),
1926                                               atoms[i].name);
1927
1928         for (i = 0; i < ARRAY_LENGTH(atoms); i++) {
1929                 reply = xcb_intern_atom_reply (wm->conn, cookies[i], NULL);
1930                 *(xcb_atom_t *) ((char *) wm + atoms[i].offset) = reply->atom;
1931                 free(reply);
1932         }
1933
1934         wm->xfixes = xcb_get_extension_data(wm->conn, &xcb_xfixes_id);
1935         if (!wm->xfixes || !wm->xfixes->present)
1936                 weston_log("xfixes not available\n");
1937
1938         xfixes_cookie = xcb_xfixes_query_version(wm->conn,
1939                                                  XCB_XFIXES_MAJOR_VERSION,
1940                                                  XCB_XFIXES_MINOR_VERSION);
1941         xfixes_reply = xcb_xfixes_query_version_reply(wm->conn,
1942                                                       xfixes_cookie, NULL);
1943
1944         weston_log("xfixes version: %d.%d\n",
1945                xfixes_reply->major_version, xfixes_reply->minor_version);
1946
1947         free(xfixes_reply);
1948
1949         formats_reply = xcb_render_query_pict_formats_reply(wm->conn,
1950                                                             formats_cookie, 0);
1951         if (formats_reply == NULL)
1952                 return;
1953
1954         formats = xcb_render_query_pict_formats_formats(formats_reply);
1955         for (i = 0; i < formats_reply->num_formats; i++) {
1956                 if (formats[i].direct.red_mask != 0xff &&
1957                     formats[i].direct.red_shift != 16)
1958                         continue;
1959                 if (formats[i].type == XCB_RENDER_PICT_TYPE_DIRECT &&
1960                     formats[i].depth == 24)
1961                         wm->format_rgb = formats[i];
1962                 if (formats[i].type == XCB_RENDER_PICT_TYPE_DIRECT &&
1963                     formats[i].depth == 32 &&
1964                     formats[i].direct.alpha_mask == 0xff &&
1965                     formats[i].direct.alpha_shift == 24)
1966                         wm->format_rgba = formats[i];
1967         }
1968
1969         free(formats_reply);
1970 }
1971
1972 static void
1973 weston_wm_create_wm_window(struct weston_wm *wm)
1974 {
1975         static const char name[] = "Weston WM";
1976
1977         wm->wm_window = xcb_generate_id(wm->conn);
1978         xcb_create_window(wm->conn,
1979                           XCB_COPY_FROM_PARENT,
1980                           wm->wm_window,
1981                           wm->screen->root,
1982                           0, 0,
1983                           10, 10,
1984                           0,
1985                           XCB_WINDOW_CLASS_INPUT_OUTPUT,
1986                           wm->screen->root_visual,
1987                           0, NULL);
1988
1989         xcb_change_property(wm->conn,
1990                             XCB_PROP_MODE_REPLACE,
1991                             wm->wm_window,
1992                             wm->atom.net_supporting_wm_check,
1993                             XCB_ATOM_WINDOW,
1994                             32, /* format */
1995                             1, &wm->wm_window);
1996
1997         xcb_change_property(wm->conn,
1998                             XCB_PROP_MODE_REPLACE,
1999                             wm->wm_window,
2000                             wm->atom.net_wm_name,
2001                             wm->atom.utf8_string,
2002                             8, /* format */
2003                             strlen(name), name);
2004
2005         xcb_change_property(wm->conn,
2006                             XCB_PROP_MODE_REPLACE,
2007                             wm->screen->root,
2008                             wm->atom.net_supporting_wm_check,
2009                             XCB_ATOM_WINDOW,
2010                             32, /* format */
2011                             1, &wm->wm_window);
2012
2013         /* Claim the WM_S0 selection even though we don't suport
2014          * the --replace functionality. */
2015         xcb_set_selection_owner(wm->conn,
2016                                 wm->wm_window,
2017                                 wm->atom.wm_s0,
2018                                 XCB_TIME_CURRENT_TIME);
2019
2020         xcb_set_selection_owner(wm->conn,
2021                                 wm->wm_window,
2022                                 wm->atom.net_wm_cm_s0,
2023                                 XCB_TIME_CURRENT_TIME);
2024 }
2025
2026 struct weston_wm *
2027 weston_wm_create(struct weston_xserver *wxs, int fd)
2028 {
2029         struct weston_wm *wm;
2030         struct wl_event_loop *loop;
2031         xcb_screen_iterator_t s;
2032         uint32_t values[1];
2033         xcb_atom_t supported[3];
2034
2035         wm = zalloc(sizeof *wm);
2036         if (wm == NULL)
2037                 return NULL;
2038
2039         wm->server = wxs;
2040         wm->window_hash = hash_table_create();
2041         if (wm->window_hash == NULL) {
2042                 free(wm);
2043                 return NULL;
2044         }
2045
2046         /* xcb_connect_to_fd takes ownership of the fd. */
2047         wm->conn = xcb_connect_to_fd(fd, NULL);
2048         if (xcb_connection_has_error(wm->conn)) {
2049                 weston_log("xcb_connect_to_fd failed\n");
2050                 close(fd);
2051                 hash_table_destroy(wm->window_hash);
2052                 free(wm);
2053                 return NULL;
2054         }
2055
2056         s = xcb_setup_roots_iterator(xcb_get_setup(wm->conn));
2057         wm->screen = s.data;
2058
2059         loop = wl_display_get_event_loop(wxs->wl_display);
2060         wm->source =
2061                 wl_event_loop_add_fd(loop, fd,
2062                                      WL_EVENT_READABLE,
2063                                      weston_wm_handle_event, wm);
2064         wl_event_source_check(wm->source);
2065
2066         weston_wm_get_resources(wm);
2067         weston_wm_get_visual_and_colormap(wm);
2068
2069         values[0] =
2070                 XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY |
2071                 XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT |
2072                 XCB_EVENT_MASK_PROPERTY_CHANGE;
2073         xcb_change_window_attributes(wm->conn, wm->screen->root,
2074                                      XCB_CW_EVENT_MASK, values);
2075
2076         xcb_composite_redirect_subwindows(wm->conn, wm->screen->root,
2077                                           XCB_COMPOSITE_REDIRECT_MANUAL);
2078
2079         wm->theme = theme_create();
2080
2081         supported[0] = wm->atom.net_wm_moveresize;
2082         supported[1] = wm->atom.net_wm_state;
2083         supported[2] = wm->atom.net_wm_state_fullscreen;
2084         xcb_change_property(wm->conn,
2085                             XCB_PROP_MODE_REPLACE,
2086                             wm->screen->root,
2087                             wm->atom.net_supported,
2088                             XCB_ATOM_ATOM,
2089                             32, /* format */
2090                             ARRAY_LENGTH(supported), supported);
2091
2092         weston_wm_selection_init(wm);
2093
2094         weston_wm_dnd_init(wm);
2095
2096         xcb_flush(wm->conn);
2097
2098         wm->create_surface_listener.notify = weston_wm_create_surface;
2099         wl_signal_add(&wxs->compositor->create_surface_signal,
2100                       &wm->create_surface_listener);
2101         wm->activate_listener.notify = weston_wm_window_activate;
2102         wl_signal_add(&wxs->compositor->activate_signal,
2103                       &wm->activate_listener);
2104         wm->transform_listener.notify = weston_wm_window_transform;
2105         wl_signal_add(&wxs->compositor->transform_signal,
2106                       &wm->transform_listener);
2107         wm->kill_listener.notify = weston_wm_kill_client;
2108         wl_signal_add(&wxs->compositor->kill_signal,
2109                       &wm->kill_listener);
2110         wl_list_init(&wm->unpaired_window_list);
2111
2112         weston_wm_create_cursors(wm);
2113         weston_wm_window_set_cursor(wm, wm->screen->root, XWM_CURSOR_LEFT_PTR);
2114
2115         /* Create wm window and take WM_S0 selection last, which
2116          * signals to Xwayland that we're done with setup. */
2117         weston_wm_create_wm_window(wm);
2118
2119         weston_log("created wm, root %d\n", wm->screen->root);
2120
2121         return wm;
2122 }
2123
2124 void
2125 weston_wm_destroy(struct weston_wm *wm)
2126 {
2127         /* FIXME: Free windows in hash. */
2128         hash_table_destroy(wm->window_hash);
2129         weston_wm_destroy_cursors(wm);
2130         xcb_disconnect(wm->conn);
2131         wl_event_source_remove(wm->source);
2132         wl_list_remove(&wm->selection_listener.link);
2133         wl_list_remove(&wm->activate_listener.link);
2134         wl_list_remove(&wm->kill_listener.link);
2135         wl_list_remove(&wm->transform_listener.link);
2136
2137         free(wm);
2138 }
2139
2140 static struct weston_wm_window *
2141 get_wm_window(struct weston_surface *surface)
2142 {
2143         struct wl_listener *listener;
2144
2145         listener = wl_signal_get(&surface->destroy_signal, surface_destroy);
2146         if (listener)
2147                 return container_of(listener, struct weston_wm_window,
2148                                     surface_destroy_listener);
2149
2150         return NULL;
2151 }
2152
2153 static void
2154 weston_wm_window_configure(void *data)
2155 {
2156         struct weston_wm_window *window = data;
2157         struct weston_wm *wm = window->wm;
2158         uint32_t values[4];
2159         int x, y, width, height;
2160
2161         weston_wm_window_get_child_position(window, &x, &y);
2162         values[0] = x;
2163         values[1] = y;
2164         values[2] = window->width;
2165         values[3] = window->height;
2166         xcb_configure_window(wm->conn,
2167                              window->id,
2168                              XCB_CONFIG_WINDOW_X |
2169                              XCB_CONFIG_WINDOW_Y |
2170                              XCB_CONFIG_WINDOW_WIDTH |
2171                              XCB_CONFIG_WINDOW_HEIGHT,
2172                              values);
2173
2174         weston_wm_window_get_frame_size(window, &width, &height);
2175         values[0] = width;
2176         values[1] = height;
2177         xcb_configure_window(wm->conn,
2178                              window->frame_id,
2179                              XCB_CONFIG_WINDOW_WIDTH |
2180                              XCB_CONFIG_WINDOW_HEIGHT,
2181                              values);
2182
2183         window->configure_source = NULL;
2184
2185         weston_wm_window_schedule_repaint(window);
2186 }
2187
2188 static void
2189 send_configure(struct weston_surface *surface, int32_t width, int32_t height)
2190 {
2191         struct weston_wm_window *window = get_wm_window(surface);
2192         struct weston_wm *wm = window->wm;
2193         struct theme *t = window->wm->theme;
2194         int vborder, hborder;
2195
2196         if (window->decorate) {
2197                 hborder = 2 * t->width;
2198                 vborder = t->titlebar_height + t->width;
2199         } else {
2200                 hborder = 0;
2201                 vborder = 0;
2202         }
2203
2204         if (width > hborder)
2205                 window->width = width - hborder;
2206         else
2207                 window->width = 1;
2208
2209         if (height > vborder)
2210                 window->height = height - vborder;
2211         else
2212                 window->height = 1;
2213
2214         if (window->frame)
2215                 frame_resize_inside(window->frame, window->width, window->height);
2216
2217         if (window->configure_source)
2218                 return;
2219
2220         window->configure_source =
2221                 wl_event_loop_add_idle(wm->server->loop,
2222                                        weston_wm_window_configure, window);
2223 }
2224
2225 static const struct weston_shell_client shell_client = {
2226         send_configure
2227 };
2228
2229 static int
2230 legacy_fullscreen(struct weston_wm *wm,
2231                   struct weston_wm_window *window,
2232                   struct weston_output **output_ret)
2233 {
2234         struct weston_compositor *compositor = wm->server->compositor;
2235         struct weston_output *output;
2236         uint32_t minmax = PMinSize | PMaxSize;
2237         int matching_size;
2238
2239         /* Heuristics for detecting legacy fullscreen windows... */
2240
2241         wl_list_for_each(output, &compositor->output_list, link) {
2242                 if (output->x == window->x &&
2243                     output->y == window->y &&
2244                     output->width == window->width &&
2245                     output->height == window->height &&
2246                     window->override_redirect) {
2247                         *output_ret = output;
2248                         return 1;
2249                 }
2250
2251                 matching_size = 0;
2252                 if ((window->size_hints.flags & (USSize |PSize)) &&
2253                     window->size_hints.width == output->width &&
2254                     window->size_hints.height == output->height)
2255                         matching_size = 1;
2256                 if ((window->size_hints.flags & minmax) == minmax &&
2257                     window->size_hints.min_width == output->width &&
2258                     window->size_hints.min_height == output->height &&
2259                     window->size_hints.max_width == output->width &&
2260                     window->size_hints.max_height == output->height)
2261                         matching_size = 1;
2262
2263                 if (matching_size && !window->decorate &&
2264                     (window->size_hints.flags & (USPosition | PPosition)) &&
2265                     window->size_hints.x == output->x &&
2266                     window->size_hints.y == output->y) {
2267                         *output_ret = output;
2268                         return 1;
2269                 }
2270         }
2271
2272         return 0;
2273 }
2274
2275 static void
2276 xserver_map_shell_surface(struct weston_wm_window *window,
2277                           struct weston_surface *surface)
2278 {
2279         struct weston_wm *wm = window->wm;
2280         struct weston_shell_interface *shell_interface =
2281                 &wm->server->compositor->shell_interface;
2282         struct weston_output *output;
2283         struct weston_wm_window *parent;
2284
2285         weston_wm_window_read_properties(window);
2286
2287         /* A weston_wm_window may have many different surfaces assigned
2288          * throughout its life, so we must make sure to remove the listener
2289          * from the old surface signal list. */
2290         if (window->surface)
2291                 wl_list_remove(&window->surface_destroy_listener.link);
2292
2293         window->surface = surface;
2294         window->surface_destroy_listener.notify = surface_destroy;
2295         wl_signal_add(&window->surface->destroy_signal,
2296                       &window->surface_destroy_listener);
2297
2298         weston_wm_window_schedule_repaint(window);
2299
2300         if (!shell_interface->create_shell_surface)
2301                 return;
2302
2303         if (!shell_interface->get_primary_view)
2304                 return;
2305
2306         window->shsurf =
2307                 shell_interface->create_shell_surface(shell_interface->shell,
2308                                                       window->surface,
2309                                                       &shell_client);
2310         window->view = shell_interface->get_primary_view(shell_interface->shell,
2311                                                          window->shsurf);
2312
2313         if (window->name)
2314                 shell_interface->set_title(window->shsurf, window->name);
2315
2316         if (window->fullscreen) {
2317                 window->saved_width = window->width;
2318                 window->saved_height = window->height;
2319                 shell_interface->set_fullscreen(window->shsurf,
2320                                                 WL_SHELL_SURFACE_FULLSCREEN_METHOD_DEFAULT,
2321                                                 0, NULL);
2322                 return;
2323         } else if (legacy_fullscreen(wm, window, &output)) {
2324                 window->fullscreen = 1;
2325                 shell_interface->set_fullscreen(window->shsurf,
2326                                                 WL_SHELL_SURFACE_FULLSCREEN_METHOD_DEFAULT,
2327                                                 0, output);
2328         } else if (window->override_redirect) {
2329                 shell_interface->set_xwayland(window->shsurf,
2330                                               window->x,
2331                                               window->y,
2332                                               WL_SHELL_SURFACE_TRANSIENT_INACTIVE);
2333         } else if (window->transient_for && window->transient_for->surface) {
2334                 parent = window->transient_for;
2335                 shell_interface->set_transient(window->shsurf,
2336                                                parent->surface,
2337                                                window->x - parent->x,
2338                                                window->y - parent->y, 0);
2339         } else {
2340                 shell_interface->set_toplevel(window->shsurf);
2341         }
2342 }