src/compositor-drm.c

   1 /*
   2  * Copyright © 2008-2011 Kristian Høgsberg
   3  * Copyright © 2011 Intel Corporation
   4  *
   5  * Permission to use, copy, modify, distribute, and sell this software and
   6  * its documentation for any purpose is hereby granted without fee, provided
   7  * that the above copyright notice appear in all copies and that both that
   8  * copyright notice and this permission notice appear in supporting
   9  * documentation, and that the name of the copyright holders not be used in
  10  * advertising or publicity pertaining to distribution of the software
  11  * without specific, written prior permission.  The copyright holders make
  12  * no representations about the suitability of this software for any
  13  * purpose.  It is provided "as is" without express or implied warranty.
  14  *
  15  * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  16  * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
  17  * FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
  18  * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
  19  * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
  20  * CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  21  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  22  */
  23
  24 #include "config.h"
  25
  26 #include <errno.h>
  27 #include <stdlib.h>
  28 #include <ctype.h>
  29 #include <string.h>
  30 #include <fcntl.h>
  31 #include <unistd.h>
  32 #include <linux/input.h>
  33 #include <linux/vt.h>
  34 #include <assert.h>
  35 #include <sys/mman.h>
  36 #include <dlfcn.h>
  37 #include <time.h>
  38
  39 #include <xf86drm.h>
  40 #include <xf86drmMode.h>
  41 #include <drm_fourcc.h>
  42
  43 #include <gbm.h>
  44 #include <libbacklight.h>
  45 #include <libudev.h>
  46
  47 #include "compositor.h"
  48 #include "gl-renderer.h"
  49 #include "pixman-renderer.h"
  50 #include "udev-seat.h"
  51 #include "launcher-util.h"
  52 #include "vaapi-recorder.h"
  53
  54 #ifndef DRM_CAP_TIMESTAMP_MONOTONIC
  55 #define DRM_CAP_TIMESTAMP_MONOTONIC 0x6
  56 #endif
  57
  58 static int option_current_mode = 0;
  59
  60 enum output_config {
  61         OUTPUT_CONFIG_INVALID = 0,
  62         OUTPUT_CONFIG_OFF,
  63         OUTPUT_CONFIG_PREFERRED,
  64         OUTPUT_CONFIG_CURRENT,
  65         OUTPUT_CONFIG_MODE,
  66         OUTPUT_CONFIG_MODELINE
  67 };
  68
  69 struct drm_compositor {
  70         struct weston_compositor base;
  71
  72         struct udev *udev;
  73         struct wl_event_source *drm_source;
  74
  75         struct udev_monitor *udev_monitor;
  76         struct wl_event_source *udev_drm_source;
  77
  78         struct {
  79                 int id;
  80                 int fd;
  81                 char *filename;
  82         } drm;
  83         struct gbm_device *gbm;
  84         uint32_t *crtcs;
  85         int num_crtcs;
  86         uint32_t crtc_allocator;
  87         uint32_t connector_allocator;
  88         struct wl_listener session_listener;
  89         uint32_t format;
  90
  91         /* we need these parameters in order to not fail drmModeAddFB2()
  92          * due to out of bounds dimensions, and then mistakenly set
  93          * sprites_are_broken:
  94          */
  95         uint32_t min_width, max_width;
  96         uint32_t min_height, max_height;
  97         int no_addfb2;
  98
  99         struct wl_list sprite_list;
 100         int sprites_are_broken;
 101         int sprites_hidden;
 102
 103         int cursors_are_broken;
 104
 105         int use_pixman;
 106
 107         uint32_t prev_state;
 108
 109         clockid_t clock;
 110         struct udev_input input;
 111 };
 112
 113 struct drm_mode {
 114         struct weston_mode base;
 115         drmModeModeInfo mode_info;
 116 };
 117
 118 struct drm_output;
 119
 120 struct drm_fb {
 121         struct drm_output *output;
 122         uint32_t fb_id, stride, handle, size;
 123         int fd;
 124         int is_client_buffer;
 125         struct weston_buffer_reference buffer_ref;
 126
 127         /* Used by gbm fbs */
 128         struct gbm_bo *bo;
 129
 130         /* Used by dumb fbs */
 131         void *map;
 132 };
 133
 134 struct drm_edid {
 135         char eisa_id[13];
 136         char monitor_name[13];
 137         char pnp_id[5];
 138         char serial_number[13];
 139 };
 140
 141 struct drm_output {
 142         struct weston_output   base;
 143
 144         uint32_t crtc_id;
 145         int pipe;
 146         uint32_t connector_id;
 147         drmModeCrtcPtr original_crtc;
 148         struct drm_edid edid;
 149         drmModePropertyPtr dpms_prop;
 150
 151         int vblank_pending;
 152         int page_flip_pending;
 153         int destroy_pending;
 154
 155         struct gbm_surface *surface;
 156         struct gbm_bo *cursor_bo[2];
 157         struct weston_plane cursor_plane;
 158         struct weston_plane fb_plane;
 159         struct weston_view *cursor_view;
 160         int current_cursor;
 161         struct drm_fb *current, *next;
 162         struct backlight *backlight;
 163
 164         struct drm_fb *dumb[2];
 165         pixman_image_t *image[2];
 166         int current_image;
 167         pixman_region32_t previous_damage;
 168
 169         struct vaapi_recorder *recorder;
 170         struct wl_listener recorder_frame_listener;
 171 };
 172
 173 /*
 174  * An output has a primary display plane plus zero or more sprites for
 175  * blending display contents.
 176  */
 177 struct drm_sprite {
 178         struct wl_list link;
 179
 180         struct weston_plane plane;
 181
 182         struct drm_fb *current, *next;
 183         struct drm_output *output;
 184         struct drm_compositor *compositor;
 185
 186         uint32_t possible_crtcs;
 187         uint32_t plane_id;
 188         uint32_t count_formats;
 189
 190         int32_t src_x, src_y;
 191         uint32_t src_w, src_h;
 192         uint32_t dest_x, dest_y;
 193         uint32_t dest_w, dest_h;
 194
 195         uint32_t formats[];
 196 };
 197
 198 struct drm_parameters {
 199         int connector;
 200         int tty;
 201         int use_pixman;
 202         const char *seat_id;
 203 };
 204
 205 static struct gl_renderer_interface *gl_renderer;
 206
 207 static const char default_seat[] = "seat0";
 208
 209 static void
 210 drm_output_set_cursor(struct drm_output *output);
 211
 212 static int
 213 drm_sprite_crtc_supported(struct weston_output *output_base, uint32_t supported)
 214 {
 215         struct weston_compositor *ec = output_base->compositor;
 216         struct drm_compositor *c =(struct drm_compositor *) ec;
 217         struct drm_output *output = (struct drm_output *) output_base;
 218         int crtc;
 219
 220         for (crtc = 0; crtc < c->num_crtcs; crtc++) {
 221                 if (c->crtcs[crtc] != output->crtc_id)
 222                         continue;
 223
 224                 if (supported & (1 << crtc))
 225                         return -1;
 226         }
 227
 228         return 0;
 229 }
 230
 231 static void
 232 drm_fb_destroy_callback(struct gbm_bo *bo, void *data)
 233 {
 234         struct drm_fb *fb = data;
 235         struct gbm_device *gbm = gbm_bo_get_device(bo);
 236
 237         if (fb->fb_id)
 238                 drmModeRmFB(gbm_device_get_fd(gbm), fb->fb_id);
 239
 240         weston_buffer_reference(&fb->buffer_ref, NULL);
 241
 242         free(data);
 243 }
 244
 245 static struct drm_fb *
 246 drm_fb_create_dumb(struct drm_compositor *ec, unsigned width, unsigned height)
 247 {
 248         struct drm_fb *fb;
 249         int ret;
 250
 251         struct drm_mode_create_dumb create_arg;
 252         struct drm_mode_destroy_dumb destroy_arg;
 253         struct drm_mode_map_dumb map_arg;
 254
 255         fb = zalloc(sizeof *fb);
 256         if (!fb)
 257                 return NULL;
 258
 259         memset(&create_arg, 0, sizeof create_arg);
 260         create_arg.bpp = 32;
 261         create_arg.width = width;
 262         create_arg.height = height;
 263
 264         ret = drmIoctl(ec->drm.fd, DRM_IOCTL_MODE_CREATE_DUMB, &create_arg);
 265         if (ret)
 266                 goto err_fb;
 267
 268         fb->handle = create_arg.handle;
 269         fb->stride = create_arg.pitch;
 270         fb->size = create_arg.size;
 271         fb->fd = ec->drm.fd;
 272
 273         ret = drmModeAddFB(ec->drm.fd, width, height, 24, 32,
 274                            fb->stride, fb->handle, &fb->fb_id);
 275         if (ret)
 276                 goto err_bo;
 277
 278         memset(&map_arg, 0, sizeof map_arg);
 279         map_arg.handle = fb->handle;
 280         ret = drmIoctl(fb->fd, DRM_IOCTL_MODE_MAP_DUMB, &map_arg);
 281         if (ret)
 282                 goto err_add_fb;
 283
 284         fb->map = mmap(0, fb->size, PROT_WRITE,
 285                        MAP_SHARED, ec->drm.fd, map_arg.offset);
 286         if (fb->map == MAP_FAILED)
 287                 goto err_add_fb;
 288
 289         return fb;
 290
 291 err_add_fb:
 292         drmModeRmFB(ec->drm.fd, fb->fb_id);
 293 err_bo:
 294         memset(&destroy_arg, 0, sizeof(destroy_arg));
 295         destroy_arg.handle = create_arg.handle;
 296         drmIoctl(ec->drm.fd, DRM_IOCTL_MODE_DESTROY_DUMB, &destroy_arg);
 297 err_fb:
 298         free(fb);
 299         return NULL;
 300 }
 301
 302 static void
 303 drm_fb_destroy_dumb(struct drm_fb *fb)
 304 {
 305         struct drm_mode_destroy_dumb destroy_arg;
 306
 307         if (!fb->map)
 308                 return;
 309
 310         if (fb->fb_id)
 311                 drmModeRmFB(fb->fd, fb->fb_id);
 312
 313         weston_buffer_reference(&fb->buffer_ref, NULL);
 314
 315         munmap(fb->map, fb->size);
 316
 317         memset(&destroy_arg, 0, sizeof(destroy_arg));
 318         destroy_arg.handle = fb->handle;
 319         drmIoctl(fb->fd, DRM_IOCTL_MODE_DESTROY_DUMB, &destroy_arg);
 320
 321         free(fb);
 322 }
 323
 324 static struct drm_fb *
 325 drm_fb_get_from_bo(struct gbm_bo *bo,
 326                    struct drm_compositor *compositor, uint32_t format)
 327 {
 328         struct drm_fb *fb = gbm_bo_get_user_data(bo);
 329         uint32_t width, height;
 330         uint32_t handles[4], pitches[4], offsets[4];
 331         int ret;
 332
 333         if (fb)
 334                 return fb;
 335
 336         fb = calloc(1, sizeof *fb);
 337         if (!fb)
 338                 return NULL;
 339
 340         fb->bo = bo;
 341
 342         width = gbm_bo_get_width(bo);
 343         height = gbm_bo_get_height(bo);
 344         fb->stride = gbm_bo_get_stride(bo);
 345         fb->handle = gbm_bo_get_handle(bo).u32;
 346         fb->size = fb->stride * height;
 347         fb->fd = compositor->drm.fd;
 348
 349         if (compositor->min_width > width || width > compositor->max_width ||
 350             compositor->min_height > height ||
 351             height > compositor->max_height) {
 352                 weston_log("bo geometry out of bounds\n");
 353                 goto err_free;
 354         }
 355
 356         ret = -1;
 357
 358         if (format && !compositor->no_addfb2) {
 359                 handles[0] = fb->handle;
 360                 pitches[0] = fb->stride;
 361                 offsets[0] = 0;
 362
 363                 ret = drmModeAddFB2(compositor->drm.fd, width, height,
 364                                     format, handles, pitches, offsets,
 365                                     &fb->fb_id, 0);
 366                 if (ret) {
 367                         weston_log("addfb2 failed: %m\n");
 368                         compositor->no_addfb2 = 1;
 369                         compositor->sprites_are_broken = 1;
 370                 }
 371         }
 372
 373         if (ret)
 374                 ret = drmModeAddFB(compositor->drm.fd, width, height, 24, 32,
 375                                    fb->stride, fb->handle, &fb->fb_id);
 376
 377         if (ret) {
 378                 weston_log("failed to create kms fb: %m\n");
 379                 goto err_free;
 380         }
 381
 382         gbm_bo_set_user_data(bo, fb, drm_fb_destroy_callback);
 383
 384         return fb;
 385
 386 err_free:
 387         free(fb);
 388         return NULL;
 389 }
 390
 391 static void
 392 drm_fb_set_buffer(struct drm_fb *fb, struct weston_buffer *buffer)
 393 {
 394         assert(fb->buffer_ref.buffer == NULL);
 395
 396         fb->is_client_buffer = 1;
 397
 398         weston_buffer_reference(&fb->buffer_ref, buffer);
 399 }
 400
 401 static void
 402 drm_output_release_fb(struct drm_output *output, struct drm_fb *fb)
 403 {
 404         if (!fb)
 405                 return;
 406
 407         if (fb->map &&
 408             (fb != output->dumb[0] && fb != output->dumb[1])) {
 409                 drm_fb_destroy_dumb(fb);
 410         } else if (fb->bo) {
 411                 if (fb->is_client_buffer)
 412                         gbm_bo_destroy(fb->bo);
 413                 else
 414                         gbm_surface_release_buffer(output->surface,
 415                                                    fb->bo);
 416         }
 417 }
 418
 419 static uint32_t
 420 drm_output_check_scanout_format(struct drm_output *output,
 421                                 struct weston_surface *es, struct gbm_bo *bo)
 422 {
 423         struct drm_compositor *c =
 424                 (struct drm_compositor *) output->base.compositor;
 425         uint32_t format;
 426         pixman_region32_t r;
 427
 428         format = gbm_bo_get_format(bo);
 429
 430         if (format == GBM_FORMAT_ARGB8888) {
 431                 /* We can scanout an ARGB buffer if the surface's
 432                  * opaque region covers the whole output, but we have
 433                  * to use XRGB as the KMS format code. */
 434                 pixman_region32_init(&r);
 435                 pixman_region32_subtract(&r, &output->base.region,
 436                                          &es->opaque);
 437
 438                 if (!pixman_region32_not_empty(&r))
 439                         format = GBM_FORMAT_XRGB8888;
 440
 441                 pixman_region32_fini(&r);
 442         }
 443
 444         if (c->format == format)
 445                 return format;
 446
 447         return 0;
 448 }
 449
 450 static struct weston_plane *
 451 drm_output_prepare_scanout_view(struct weston_output *_output,
 452                                 struct weston_view *ev)
 453 {
 454         struct drm_output *output = (struct drm_output *) _output;
 455         struct drm_compositor *c =
 456                 (struct drm_compositor *) output->base.compositor;
 457         struct weston_buffer *buffer = ev->surface->buffer_ref.buffer;
 458         struct gbm_bo *bo;
 459         uint32_t format;
 460
 461         if (ev->geometry.x != output->base.x ||
 462             ev->geometry.y != output->base.y ||
 463             buffer == NULL || c->gbm == NULL ||
 464             buffer->width != output->base.current_mode->width ||
 465             buffer->height != output->base.current_mode->height ||
 466             output->base.transform != ev->surface->buffer_viewport.transform ||
 467             ev->transform.enabled)
 468                 return NULL;
 469
 470         bo = gbm_bo_import(c->gbm, GBM_BO_IMPORT_WL_BUFFER,
 471                            buffer->resource, GBM_BO_USE_SCANOUT);
 472
 473         /* Unable to use the buffer for scanout */
 474         if (!bo)
 475                 return NULL;
 476
 477         format = drm_output_check_scanout_format(output, ev->surface, bo);
 478         if (format == 0) {
 479                 gbm_bo_destroy(bo);
 480                 return NULL;
 481         }
 482
 483         output->next = drm_fb_get_from_bo(bo, c, format);
 484         if (!output->next) {
 485                 gbm_bo_destroy(bo);
 486                 return NULL;
 487         }
 488
 489         drm_fb_set_buffer(output->next, buffer);
 490
 491         return &output->fb_plane;
 492 }
 493
 494 static void
 495 drm_output_render_gl(struct drm_output *output, pixman_region32_t *damage)
 496 {
 497         struct drm_compositor *c =
 498                 (struct drm_compositor *) output->base.compositor;
 499         struct gbm_bo *bo;
 500
 501         c->base.renderer->repaint_output(&output->base, damage);
 502
 503         bo = gbm_surface_lock_front_buffer(output->surface);
 504         if (!bo) {
 505                 weston_log("failed to lock front buffer: %m\n");
 506                 return;
 507         }
 508
 509         output->next = drm_fb_get_from_bo(bo, c, c->format);
 510         if (!output->next) {
 511                 weston_log("failed to get drm_fb for bo\n");
 512                 gbm_surface_release_buffer(output->surface, bo);
 513                 return;
 514         }
 515 }
 516
 517 static void
 518 drm_output_render_pixman(struct drm_output *output, pixman_region32_t *damage)
 519 {
 520         struct weston_compositor *ec = output->base.compositor;
 521         pixman_region32_t total_damage, previous_damage;
 522
 523         pixman_region32_init(&total_damage);
 524         pixman_region32_init(&previous_damage);
 525
 526         pixman_region32_copy(&previous_damage, damage);
 527
 528         pixman_region32_union(&total_damage, damage, &output->previous_damage);
 529         pixman_region32_copy(&output->previous_damage, &previous_damage);
 530
 531         output->current_image ^= 1;
 532
 533         output->next = output->dumb[output->current_image];
 534         pixman_renderer_output_set_buffer(&output->base,
 535                                           output->image[output->current_image]);
 536
 537         ec->renderer->repaint_output(&output->base, &total_damage);
 538
 539         pixman_region32_fini(&total_damage);
 540         pixman_region32_fini(&previous_damage);
 541 }
 542
 543 static void
 544 drm_output_render(struct drm_output *output, pixman_region32_t *damage)
 545 {
 546         struct drm_compositor *c =
 547                 (struct drm_compositor *) output->base.compositor;
 548
 549         if (c->use_pixman)
 550                 drm_output_render_pixman(output, damage);
 551         else
 552                 drm_output_render_gl(output, damage);
 553
 554         pixman_region32_subtract(&c->base.primary_plane.damage,
 555                                  &c->base.primary_plane.damage, damage);
 556 }
 557
 558 static void
 559 drm_output_set_gamma(struct weston_output *output_base,
 560                      uint16_t size, uint16_t *r, uint16_t *g, uint16_t *b)
 561 {
 562         int rc;
 563         struct drm_output *output = (struct drm_output *) output_base;
 564         struct drm_compositor *compositor = (struct drm_compositor *) output->base.compositor;
 565
 566         /* check */
 567         if (output_base->gamma_size != size)
 568                 return;
 569         if (!output->original_crtc)
 570                 return;
 571
 572         rc = drmModeCrtcSetGamma(compositor->drm.fd,
 573                                  output->crtc_id,
 574                                  size, r, g, b);
 575         if (rc)
 576                 weston_log("set gamma failed: %m\n");
 577 }
 578
 579 static int
 580 drm_output_repaint(struct weston_output *output_base,
 581                    pixman_region32_t *damage)
 582 {
 583         struct drm_output *output = (struct drm_output *) output_base;
 584         struct drm_compositor *compositor =
 585                 (struct drm_compositor *) output->base.compositor;
 586         struct drm_sprite *s;
 587         struct drm_mode *mode;
 588         int ret = 0;
 589
 590         if (output->destroy_pending)
 591                 return -1;
 592
 593         if (!output->next)
 594                 drm_output_render(output, damage);
 595         if (!output->next)
 596                 return -1;
 597
 598         mode = container_of(output->base.current_mode, struct drm_mode, base);
 599         if (!output->current ||
 600             output->current->stride != output->next->stride) {
 601                 ret = drmModeSetCrtc(compositor->drm.fd, output->crtc_id,
 602                                      output->next->fb_id, 0, 0,
 603                                      &output->connector_id, 1,
 604                                      &mode->mode_info);
 605                 if (ret) {
 606                         weston_log("set mode failed: %m\n");
 607                         goto err_pageflip;
 608                 }
 609                 output_base->set_dpms(output_base, WESTON_DPMS_ON);
 610         }
 611
 612         if (drmModePageFlip(compositor->drm.fd, output->crtc_id,
 613                             output->next->fb_id,
 614                             DRM_MODE_PAGE_FLIP_EVENT, output) < 0) {
 615                 weston_log("queueing pageflip failed: %m\n");
 616                 goto err_pageflip;
 617         }
 618
 619         output->page_flip_pending = 1;
 620
 621         drm_output_set_cursor(output);
 622
 623         /*
 624          * Now, update all the sprite surfaces
 625          */
 626         wl_list_for_each(s, &compositor->sprite_list, link) {
 627                 uint32_t flags = 0, fb_id = 0;
 628                 drmVBlank vbl = {
 629                         .request.type = DRM_VBLANK_RELATIVE | DRM_VBLANK_EVENT,
 630                         .request.sequence = 1,
 631                 };
 632
 633                 if ((!s->current && !s->next) ||
 634                     !drm_sprite_crtc_supported(output_base, s->possible_crtcs))
 635                         continue;
 636
 637                 if (s->next && !compositor->sprites_hidden)
 638                         fb_id = s->next->fb_id;
 639
 640                 ret = drmModeSetPlane(compositor->drm.fd, s->plane_id,
 641                                       output->crtc_id, fb_id, flags,
 642                                       s->dest_x, s->dest_y,
 643                                       s->dest_w, s->dest_h,
 644                                       s->src_x, s->src_y,
 645                                       s->src_w, s->src_h);
 646                 if (ret)
 647                         weston_log("setplane failed: %d: %s\n",
 648                                 ret, strerror(errno));
 649
 650                 if (output->pipe > 0)
 651                         vbl.request.type |= DRM_VBLANK_SECONDARY;
 652
 653                 /*
 654                  * Queue a vblank signal so we know when the surface
 655                  * becomes active on the display or has been replaced.
 656                  */
 657                 vbl.request.signal = (unsigned long)s;
 658                 ret = drmWaitVBlank(compositor->drm.fd, &vbl);
 659                 if (ret) {
 660                         weston_log("vblank event request failed: %d: %s\n",
 661                                 ret, strerror(errno));
 662                 }
 663
 664                 s->output = output;
 665                 output->vblank_pending = 1;
 666         }
 667
 668         return 0;
 669
 670 err_pageflip:
 671         if (output->next) {
 672                 drm_output_release_fb(output, output->next);
 673                 output->next = NULL;
 674         }
 675
 676         return -1;
 677 }
 678
 679 static void
 680 drm_output_start_repaint_loop(struct weston_output *output_base)
 681 {
 682         struct drm_output *output = (struct drm_output *) output_base;
 683         struct drm_compositor *compositor = (struct drm_compositor *)
 684                 output_base->compositor;
 685         uint32_t fb_id;
 686         uint32_t msec;
 687         struct timespec ts;
 688
 689         if (output->destroy_pending)
 690                 return;
 691
 692         if (!output->current) {
 693                 /* We can't page flip if there's no mode set */
 694                 goto finish_frame;
 695         }
 696
 697         fb_id = output->current->fb_id;
 698
 699         if (drmModePageFlip(compositor->drm.fd, output->crtc_id, fb_id,
 700                             DRM_MODE_PAGE_FLIP_EVENT, output) < 0) {
 701                 weston_log("queueing pageflip failed: %m\n");
 702                 goto finish_frame;
 703         }
 704
 705         return;
 706
 707 finish_frame:
 708         /* if we cannot page-flip, immediately finish frame */
 709         clock_gettime(compositor->clock, &ts);
 710         msec = ts.tv_sec * 1000 + ts.tv_nsec / 1000000;
 711         weston_output_finish_frame(output_base, msec);
 712 }
 713
 714 static void
 715 vblank_handler(int fd, unsigned int frame, unsigned int sec, unsigned int usec,
 716                void *data)
 717 {
 718         struct drm_sprite *s = (struct drm_sprite *)data;
 719         struct drm_output *output = s->output;
 720         uint32_t msecs;
 721
 722         output->vblank_pending = 0;
 723
 724         drm_output_release_fb(output, s->current);
 725         s->current = s->next;
 726         s->next = NULL;
 727
 728         if (!output->page_flip_pending) {
 729                 msecs = sec * 1000 + usec / 1000;
 730                 weston_output_finish_frame(&output->base, msecs);
 731         }
 732 }
 733
 734 static void
 735 drm_output_destroy(struct weston_output *output_base);
 736
 737 static void
 738 page_flip_handler(int fd, unsigned int frame,
 739                   unsigned int sec, unsigned int usec, void *data)
 740 {
 741         struct drm_output *output = (struct drm_output *) data;
 742         uint32_t msecs;
 743
 744         /* We don't set page_flip_pending on start_repaint_loop, in that case
 745          * we just want to page flip to the current buffer to get an accurate
 746          * timestamp */
 747         if (output->page_flip_pending) {
 748                 drm_output_release_fb(output, output->current);
 749                 output->current = output->next;
 750                 output->next = NULL;
 751         }
 752
 753         output->page_flip_pending = 0;
 754
 755         if (output->destroy_pending)
 756                 drm_output_destroy(&output->base);
 757         else if (!output->vblank_pending) {
 758                 msecs = sec * 1000 + usec / 1000;
 759                 weston_output_finish_frame(&output->base, msecs);
 760
 761                 /* We can't call this from frame_notify, because the output's
 762                  * repaint needed flag is cleared just after that */
 763                 if (output->recorder)
 764                         weston_output_schedule_repaint(&output->base);
 765         }
 766 }
 767
 768 static uint32_t
 769 drm_output_check_sprite_format(struct drm_sprite *s,
 770                                struct weston_view *ev, struct gbm_bo *bo)
 771 {
 772         uint32_t i, format;
 773
 774         format = gbm_bo_get_format(bo);
 775
 776         if (format == GBM_FORMAT_ARGB8888) {
 777                 pixman_region32_t r;
 778
 779                 pixman_region32_init_rect(&r, 0, 0,
 780                                           ev->surface->width,
 781                                           ev->surface->height);
 782                 pixman_region32_subtract(&r, &r, &ev->surface->opaque);
 783
 784                 if (!pixman_region32_not_empty(&r))
 785                         format = GBM_FORMAT_XRGB8888;
 786
 787                 pixman_region32_fini(&r);
 788         }
 789
 790         for (i = 0; i < s->count_formats; i++)
 791                 if (s->formats[i] == format)
 792                         return format;
 793
 794         return 0;
 795 }
 796
 797 static int
 798 drm_view_transform_supported(struct weston_view *ev)
 799 {
 800         return !ev->transform.enabled ||
 801                 (ev->transform.matrix.type < WESTON_MATRIX_TRANSFORM_ROTATE);
 802 }
 803
 804 static struct weston_plane *
 805 drm_output_prepare_overlay_view(struct weston_output *output_base,
 806                                 struct weston_view *ev)
 807 {
 808         struct weston_compositor *ec = output_base->compositor;
 809         struct drm_compositor *c =(struct drm_compositor *) ec;
 810         struct drm_sprite *s;
 811         int found = 0;
 812         struct gbm_bo *bo;
 813         pixman_region32_t dest_rect, src_rect;
 814         pixman_box32_t *box, tbox;
 815         uint32_t format;
 816         wl_fixed_t sx1, sy1, sx2, sy2;
 817
 818         if (c->gbm == NULL)
 819                 return NULL;
 820
 821         if (ev->surface->buffer_viewport.transform != output_base->transform)
 822                 return NULL;
 823
 824         if (ev->surface->buffer_viewport.scale != output_base->current_scale)
 825                 return NULL;
 826
 827         if (c->sprites_are_broken)
 828                 return NULL;
 829
 830         if (ev->output_mask != (1u << output_base->id))
 831                 return NULL;
 832
 833         if (ev->surface->buffer_ref.buffer == NULL)
 834                 return NULL;
 835
 836         if (ev->alpha != 1.0f)
 837                 return NULL;
 838
 839         if (wl_shm_buffer_get(ev->surface->buffer_ref.buffer->resource))
 840                 return NULL;
 841
 842         if (!drm_view_transform_supported(ev))
 843                 return NULL;
 844
 845         wl_list_for_each(s, &c->sprite_list, link) {
 846                 if (!drm_sprite_crtc_supported(output_base, s->possible_crtcs))
 847                         continue;
 848
 849                 if (!s->next) {
 850                         found = 1;
 851                         break;
 852                 }
 853         }
 854
 855         /* No sprites available */
 856         if (!found)
 857                 return NULL;
 858
 859         bo = gbm_bo_import(c->gbm, GBM_BO_IMPORT_WL_BUFFER,
 860                            ev->surface->buffer_ref.buffer->resource,
 861                            GBM_BO_USE_SCANOUT);
 862         if (!bo)
 863                 return NULL;
 864
 865         format = drm_output_check_sprite_format(s, ev, bo);
 866         if (format == 0) {
 867                 gbm_bo_destroy(bo);
 868                 return NULL;
 869         }
 870
 871         s->next = drm_fb_get_from_bo(bo, c, format);
 872         if (!s->next) {
 873                 gbm_bo_destroy(bo);
 874                 return NULL;
 875         }
 876
 877         drm_fb_set_buffer(s->next, ev->surface->buffer_ref.buffer);
 878
 879         box = pixman_region32_extents(&ev->transform.boundingbox);
 880         s->plane.x = box->x1;
 881         s->plane.y = box->y1;
 882
 883         /*
 884          * Calculate the source & dest rects properly based on actual
 885          * position (note the caller has called weston_surface_update_transform()
 886          * for us already).
 887          */
 888         pixman_region32_init(&dest_rect);
 889         pixman_region32_intersect(&dest_rect, &ev->transform.boundingbox,
 890                                   &output_base->region);
 891         pixman_region32_translate(&dest_rect, -output_base->x, -output_base->y);
 892         box = pixman_region32_extents(&dest_rect);
 893         tbox = weston_transformed_rect(output_base->width,
 894                                        output_base->height,
 895                                        output_base->transform,
 896                                        output_base->current_scale,
 897                                        *box);
 898         s->dest_x = tbox.x1;
 899         s->dest_y = tbox.y1;
 900         s->dest_w = tbox.x2 - tbox.x1;
 901         s->dest_h = tbox.y2 - tbox.y1;
 902         pixman_region32_fini(&dest_rect);
 903
 904         pixman_region32_init(&src_rect);
 905         pixman_region32_intersect(&src_rect, &ev->transform.boundingbox,
 906                                   &output_base->region);
 907         box = pixman_region32_extents(&src_rect);
 908
 909         weston_view_from_global_fixed(ev,
 910                                       wl_fixed_from_int(box->x1),
 911                                       wl_fixed_from_int(box->y1),
 912                                       &sx1, &sy1);
 913         weston_view_from_global_fixed(ev,
 914                                       wl_fixed_from_int(box->x2),
 915                                       wl_fixed_from_int(box->y2),
 916                                       &sx2, &sy2);
 917
 918         if (sx1 < 0)
 919                 sx1 = 0;
 920         if (sy1 < 0)
 921                 sy1 = 0;
 922         if (sx2 > wl_fixed_from_int(ev->surface->width))
 923                 sx2 = wl_fixed_from_int(ev->surface->width);
 924         if (sy2 > wl_fixed_from_int(ev->surface->height))
 925                 sy2 = wl_fixed_from_int(ev->surface->height);
 926
 927         tbox.x1 = sx1;
 928         tbox.y1 = sy1;
 929         tbox.x2 = sx2;
 930         tbox.y2 = sy2;
 931
 932         tbox = weston_transformed_rect(wl_fixed_from_int(ev->surface->width),
 933                                        wl_fixed_from_int(ev->surface->height),
 934                                        ev->surface->buffer_viewport.transform,
 935                                        ev->surface->buffer_viewport.scale,
 936                                        tbox);
 937
 938         s->src_x = tbox.x1 << 8;
 939         s->src_y = tbox.y1 << 8;
 940         s->src_w = (tbox.x2 - tbox.x1) << 8;
 941         s->src_h = (tbox.y2 - tbox.y1) << 8;
 942         pixman_region32_fini(&src_rect);
 943
 944         return &s->plane;
 945 }
 946
 947 static struct weston_plane *
 948 drm_output_prepare_cursor_view(struct weston_output *output_base,
 949                                struct weston_view *ev)
 950 {
 951         struct drm_compositor *c =
 952                 (struct drm_compositor *) output_base->compositor;
 953         struct drm_output *output = (struct drm_output *) output_base;
 954
 955         if (c->gbm == NULL)
 956                 return NULL;
 957         if (output->base.transform != WL_OUTPUT_TRANSFORM_NORMAL)
 958                 return NULL;
 959         if (output->cursor_view)
 960                 return NULL;
 961         if (ev->output_mask != (1u << output_base->id))
 962                 return NULL;
 963         if (c->cursors_are_broken)
 964                 return NULL;
 965         if (ev->surface->buffer_ref.buffer == NULL ||
 966             !wl_shm_buffer_get(ev->surface->buffer_ref.buffer->resource) ||
 967             ev->surface->width > 64 || ev->surface->height > 64)
 968                 return NULL;
 969
 970         output->cursor_view = ev;
 971
 972         return &output->cursor_plane;
 973 }
 974
 975 static void
 976 drm_output_set_cursor(struct drm_output *output)
 977 {
 978         struct weston_view *ev = output->cursor_view;
 979         struct weston_buffer *buffer;
 980         struct drm_compositor *c =
 981                 (struct drm_compositor *) output->base.compositor;
 982         EGLint handle, stride;
 983         struct gbm_bo *bo;
 984         uint32_t buf[64 * 64];
 985         unsigned char *s;
 986         int i, x, y;
 987
 988         output->cursor_view = NULL;
 989         if (ev == NULL) {
 990                 drmModeSetCursor(c->drm.fd, output->crtc_id, 0, 0, 0);
 991                 return;
 992         }
 993
 994         buffer = ev->surface->buffer_ref.buffer;
 995
 996         if (buffer &&
 997             pixman_region32_not_empty(&output->cursor_plane.damage)) {
 998                 pixman_region32_fini(&output->cursor_plane.damage);
 999                 pixman_region32_init(&output->cursor_plane.damage);
1000                 output->current_cursor ^= 1;
1001                 bo = output->cursor_bo[output->current_cursor];
1002                 memset(buf, 0, sizeof buf);
1003                 stride = wl_shm_buffer_get_stride(buffer->shm_buffer);
1004                 s = wl_shm_buffer_get_data(buffer->shm_buffer);
1005                 wl_shm_buffer_begin_access(buffer->shm_buffer);
1006                 for (i = 0; i < ev->surface->height; i++)
1007                         memcpy(buf + i * 64, s + i * stride,
1008                                ev->surface->width * 4);
1009                 wl_shm_buffer_end_access(buffer->shm_buffer);
1010
1011                 if (gbm_bo_write(bo, buf, sizeof buf) < 0)
1012                         weston_log("failed update cursor: %m\n");
1013
1014                 handle = gbm_bo_get_handle(bo).s32;
1015                 if (drmModeSetCursor(c->drm.fd,
1016                                      output->crtc_id, handle, 64, 64)) {
1017                         weston_log("failed to set cursor: %m\n");
1018                         c->cursors_are_broken = 1;
1019                 }
1020         }
1021
1022         x = (ev->geometry.x - output->base.x) * output->base.current_scale;
1023         y = (ev->geometry.y - output->base.y) * output->base.current_scale;
1024         if (output->cursor_plane.x != x || output->cursor_plane.y != y) {
1025                 if (drmModeMoveCursor(c->drm.fd, output->crtc_id, x, y)) {
1026                         weston_log("failed to move cursor: %m\n");
1027                         c->cursors_are_broken = 1;
1028                 }
1029
1030                 output->cursor_plane.x = x;
1031                 output->cursor_plane.y = y;
1032         }
1033 }
1034
1035 static void
1036 drm_assign_planes(struct weston_output *output)
1037 {
1038         struct drm_compositor *c =
1039                 (struct drm_compositor *) output->compositor;
1040         struct weston_view *ev, *next;
1041         pixman_region32_t overlap, surface_overlap;
1042         struct weston_plane *primary, *next_plane;
1043
1044         /*
1045          * Find a surface for each sprite in the output using some heuristics:
1046          * 1) size
1047          * 2) frequency of update
1048          * 3) opacity (though some hw might support alpha blending)
1049          * 4) clipping (this can be fixed with color keys)
1050          *
1051          * The idea is to save on blitting since this should save power.
1052          * If we can get a large video surface on the sprite for example,
1053          * the main display surface may not need to update at all, and
1054          * the client buffer can be used directly for the sprite surface
1055          * as we do for flipping full screen surfaces.
1056          */
1057         pixman_region32_init(&overlap);
1058         primary = &c->base.primary_plane;
1059
1060         wl_list_for_each_safe(ev, next, &c->base.view_list, link) {
1061                 struct weston_surface *es = ev->surface;
1062
1063                 /* Test whether this buffer can ever go into a plane:
1064                  * non-shm, or small enough to be a cursor.
1065                  *
1066                  * Also, keep a reference when using the pixman renderer.
1067                  * That makes it possible to do a seamless switch to the GL
1068                  * renderer and since the pixman renderer keeps a reference
1069                  * to the buffer anyway, there is no side effects.
1070                  */
1071                 if (c->use_pixman ||
1072                     (es->buffer_ref.buffer &&
1073                     (!wl_shm_buffer_get(es->buffer_ref.buffer->resource) ||
1074                      (ev->surface->width <= 64 && ev->surface->height <= 64))))
1075                         es->keep_buffer = 1;
1076                 else
1077                         es->keep_buffer = 0;
1078
1079                 pixman_region32_init(&surface_overlap);
1080                 pixman_region32_intersect(&surface_overlap, &overlap,
1081                                           &ev->transform.boundingbox);
1082
1083                 next_plane = NULL;
1084                 if (pixman_region32_not_empty(&surface_overlap))
1085                         next_plane = primary;
1086                 if (next_plane == NULL)
1087                         next_plane = drm_output_prepare_cursor_view(output, ev);
1088                 if (next_plane == NULL)
1089                         next_plane = drm_output_prepare_scanout_view(output, ev);
1090                 if (next_plane == NULL)
1091                         next_plane = drm_output_prepare_overlay_view(output, ev);
1092                 if (next_plane == NULL)
1093                         next_plane = primary;
1094                 weston_view_move_to_plane(ev, next_plane);
1095                 if (next_plane == primary)
1096                         pixman_region32_union(&overlap, &overlap,
1097                                               &ev->transform.boundingbox);
1098
1099                 pixman_region32_fini(&surface_overlap);
1100         }
1101         pixman_region32_fini(&overlap);
1102 }
1103
1104 static void
1105 drm_output_fini_pixman(struct drm_output *output);
1106
1107 static void
1108 drm_output_destroy(struct weston_output *output_base)
1109 {
1110         struct drm_output *output = (struct drm_output *) output_base;
1111         struct drm_compositor *c =
1112                 (struct drm_compositor *) output->base.compositor;
1113         drmModeCrtcPtr origcrtc = output->original_crtc;
1114
1115         if (output->page_flip_pending) {
1116                 output->destroy_pending = 1;
1117                 weston_log("destroy output while page flip pending\n");
1118                 return;
1119         }
1120
1121         if (output->backlight)
1122                 backlight_destroy(output->backlight);
1123
1124         drmModeFreeProperty(output->dpms_prop);
1125
1126         /* Turn off hardware cursor */
1127         drmModeSetCursor(c->drm.fd, output->crtc_id, 0, 0, 0);
1128
1129         /* Restore original CRTC state */
1130         drmModeSetCrtc(c->drm.fd, origcrtc->crtc_id, origcrtc->buffer_id,
1131                        origcrtc->x, origcrtc->y,
1132                        &output->connector_id, 1, &origcrtc->mode);
1133         drmModeFreeCrtc(origcrtc);
1134
1135         c->crtc_allocator &= ~(1 << output->crtc_id);
1136         c->connector_allocator &= ~(1 << output->connector_id);
1137
1138         if (c->use_pixman) {
1139                 drm_output_fini_pixman(output);
1140         } else {
1141                 gl_renderer->output_destroy(output_base);
1142                 gbm_surface_destroy(output->surface);
1143         }
1144
1145         weston_plane_release(&output->fb_plane);
1146         weston_plane_release(&output->cursor_plane);
1147
1148         weston_output_destroy(&output->base);
1149
1150         free(output);
1151 }
1152
1153 static struct drm_mode *
1154 choose_mode (struct drm_output *output, struct weston_mode *target_mode)
1155 {
1156         struct drm_mode *tmp_mode = NULL, *mode;
1157
1158         if (output->base.current_mode->width == target_mode->width &&
1159             output->base.current_mode->height == target_mode->height &&
1160             (output->base.current_mode->refresh == target_mode->refresh ||
1161              target_mode->refresh == 0))
1162                 return (struct drm_mode *)output->base.current_mode;
1163
1164         wl_list_for_each(mode, &output->base.mode_list, base.link) {
1165                 if (mode->mode_info.hdisplay == target_mode->width &&
1166                     mode->mode_info.vdisplay == target_mode->height) {
1167                         if (mode->mode_info.vrefresh == target_mode->refresh ||
1168                             target_mode->refresh == 0) {
1169                                 return mode;
1170                         } else if (!tmp_mode)
1171                                 tmp_mode = mode;
1172                 }
1173         }
1174
1175         return tmp_mode;
1176 }
1177
1178 static int
1179 drm_output_init_egl(struct drm_output *output, struct drm_compositor *ec);
1180 static int
1181 drm_output_init_pixman(struct drm_output *output, struct drm_compositor *c);
1182
1183 static int
1184 drm_output_switch_mode(struct weston_output *output_base, struct weston_mode *mode)
1185 {
1186         struct drm_output *output;
1187         struct drm_mode *drm_mode;
1188         struct drm_compositor *ec;
1189
1190         if (output_base == NULL) {
1191                 weston_log("output is NULL.\n");
1192                 return -1;
1193         }
1194
1195         if (mode == NULL) {
1196                 weston_log("mode is NULL.\n");
1197                 return -1;
1198         }
1199
1200         ec = (struct drm_compositor *)output_base->compositor;
1201         output = (struct drm_output *)output_base;
1202         drm_mode  = choose_mode (output, mode);
1203
1204         if (!drm_mode) {
1205                 weston_log("%s, invalid resolution:%dx%d\n", __func__, mode->width, mode->height);
1206                 return -1;
1207         }
1208
1209         if (&drm_mode->base == output->base.current_mode)
1210                 return 0;
1211
1212         output->base.current_mode->flags = 0;
1213
1214         output->base.current_mode = &drm_mode->base;
1215         output->base.current_mode->flags =
1216                 WL_OUTPUT_MODE_CURRENT | WL_OUTPUT_MODE_PREFERRED;
1217
1218         /* reset rendering stuff. */
1219         drm_output_release_fb(output, output->current);
1220         drm_output_release_fb(output, output->next);
1221         output->current = output->next = NULL;
1222
1223         if (ec->use_pixman) {
1224                 drm_output_fini_pixman(output);
1225                 if (drm_output_init_pixman(output, ec) < 0) {
1226                         weston_log("failed to init output pixman state with "
1227                                    "new mode\n");
1228                         return -1;
1229                 }
1230         } else {
1231                 gl_renderer->output_destroy(&output->base);
1232                 gbm_surface_destroy(output->surface);
1233
1234                 if (drm_output_init_egl(output, ec) < 0) {
1235                         weston_log("failed to init output egl state with "
1236                                    "new mode");
1237                         return -1;
1238                 }
1239         }
1240
1241         return 0;
1242 }
1243
1244 static int
1245 on_drm_input(int fd, uint32_t mask, void *data)
1246 {
1247         drmEventContext evctx;
1248
1249         memset(&evctx, 0, sizeof evctx);
1250         evctx.version = DRM_EVENT_CONTEXT_VERSION;
1251         evctx.page_flip_handler = page_flip_handler;
1252         evctx.vblank_handler = vblank_handler;
1253         drmHandleEvent(fd, &evctx);
1254
1255         return 1;
1256 }
1257
1258 static int
1259 init_drm(struct drm_compositor *ec, struct udev_device *device)
1260 {
1261         const char *filename, *sysnum;
1262         uint64_t cap;
1263         int fd, ret;
1264
1265         sysnum = udev_device_get_sysnum(device);
1266         if (sysnum)
1267                 ec->drm.id = atoi(sysnum);
1268         if (!sysnum || ec->drm.id < 0) {
1269                 weston_log("cannot get device sysnum\n");
1270                 return -1;
1271         }
1272
1273         filename = udev_device_get_devnode(device);
1274         fd = weston_launcher_open(ec->base.launcher, filename, O_RDWR);
1275         if (fd < 0) {
1276                 /* Probably permissions error */
1277                 weston_log("couldn't open %s, skipping\n",
1278                         udev_device_get_devnode(device));
1279                 return -1;
1280         }
1281
1282         weston_log("using %s\n", filename);
1283
1284         ec->drm.fd = fd;
1285         ec->drm.filename = strdup(filename);
1286
1287         ret = drmGetCap(fd, DRM_CAP_TIMESTAMP_MONOTONIC, &cap);
1288         if (ret == 0 && cap == 1)
1289                 ec->clock = CLOCK_MONOTONIC;
1290         else
1291                 ec->clock = CLOCK_REALTIME;
1292
1293         return 0;
1294 }
1295
1296 static struct gbm_device *
1297 create_gbm_device(int fd)
1298 {
1299         struct gbm_device *gbm;
1300
1301         gl_renderer = weston_load_module("gl-renderer.so",
1302                                          "gl_renderer_interface");
1303         if (!gl_renderer)
1304                 return NULL;
1305
1306         /* GBM will load a dri driver, but even though they need symbols from
1307          * libglapi, in some version of Mesa they are not linked to it. Since
1308          * only the gl-renderer module links to it, the call above won't make
1309          * these symbols globally available, and loading the DRI driver fails.
1310          * Workaround this by dlopen()'ing libglapi with RTLD_GLOBAL. */
1311         dlopen("libglapi.so.0", RTLD_LAZY | RTLD_GLOBAL);
1312
1313         gbm = gbm_create_device(fd);
1314
1315         return gbm;
1316 }
1317
1318 static int
1319 drm_compositor_create_gl_renderer(struct drm_compositor *ec)
1320 {
1321         EGLint format;
1322
1323         format = ec->format;
1324         if (gl_renderer->create(&ec->base, ec->gbm,
1325                                gl_renderer->opaque_attribs, &format) < 0) {
1326                 return -1;
1327         }
1328
1329         return 0;
1330 }
1331
1332 static int
1333 init_egl(struct drm_compositor *ec)
1334 {
1335         ec->gbm = create_gbm_device(ec->drm.fd);
1336
1337         if (!ec->gbm)
1338                 return -1;
1339
1340         if (drm_compositor_create_gl_renderer(ec) < 0) {
1341                 gbm_device_destroy(ec->gbm);
1342                 return -1;
1343         }
1344
1345         return 0;
1346 }
1347
1348 static int
1349 init_pixman(struct drm_compositor *ec)
1350 {
1351         return pixman_renderer_init(&ec->base);
1352 }
1353
1354 static struct drm_mode *
1355 drm_output_add_mode(struct drm_output *output, drmModeModeInfo *info)
1356 {
1357         struct drm_mode *mode;
1358         uint64_t refresh;
1359
1360         mode = malloc(sizeof *mode);
1361         if (mode == NULL)
1362                 return NULL;
1363
1364         mode->base.flags = 0;
1365         mode->base.width = info->hdisplay;
1366         mode->base.height = info->vdisplay;
1367
1368         /* Calculate higher precision (mHz) refresh rate */
1369         refresh = (info->clock * 1000000LL / info->htotal +
1370                    info->vtotal / 2) / info->vtotal;
1371
1372         if (info->flags & DRM_MODE_FLAG_INTERLACE)
1373                 refresh *= 2;
1374         if (info->flags & DRM_MODE_FLAG_DBLSCAN)
1375                 refresh /= 2;
1376         if (info->vscan > 1)
1377             refresh /= info->vscan;
1378
1379         mode->base.refresh = refresh;
1380         mode->mode_info = *info;
1381
1382         if (info->type & DRM_MODE_TYPE_PREFERRED)
1383                 mode->base.flags |= WL_OUTPUT_MODE_PREFERRED;
1384
1385         wl_list_insert(output->base.mode_list.prev, &mode->base.link);
1386
1387         return mode;
1388 }
1389
1390 static int
1391 drm_subpixel_to_wayland(int drm_value)
1392 {
1393         switch (drm_value) {
1394         default:
1395         case DRM_MODE_SUBPIXEL_UNKNOWN:
1396                 return WL_OUTPUT_SUBPIXEL_UNKNOWN;
1397         case DRM_MODE_SUBPIXEL_NONE:
1398                 return WL_OUTPUT_SUBPIXEL_NONE;
1399         case DRM_MODE_SUBPIXEL_HORIZONTAL_RGB:
1400                 return WL_OUTPUT_SUBPIXEL_HORIZONTAL_RGB;
1401         case DRM_MODE_SUBPIXEL_HORIZONTAL_BGR:
1402                 return WL_OUTPUT_SUBPIXEL_HORIZONTAL_BGR;
1403         case DRM_MODE_SUBPIXEL_VERTICAL_RGB:
1404                 return WL_OUTPUT_SUBPIXEL_VERTICAL_RGB;
1405         case DRM_MODE_SUBPIXEL_VERTICAL_BGR:
1406                 return WL_OUTPUT_SUBPIXEL_VERTICAL_BGR;
1407         }
1408 }
1409
1410 /* returns a value between 0-255 range, where higher is brighter */
1411 static uint32_t
1412 drm_get_backlight(struct drm_output *output)
1413 {
1414         long brightness, max_brightness, norm;
1415
1416         brightness = backlight_get_brightness(output->backlight);
1417         max_brightness = backlight_get_max_brightness(output->backlight);
1418
1419         /* convert it on a scale of 0 to 255 */
1420         norm = (brightness * 255)/(max_brightness);
1421
1422         return (uint32_t) norm;
1423 }
1424
1425 /* values accepted are between 0-255 range */
1426 static void
1427 drm_set_backlight(struct weston_output *output_base, uint32_t value)
1428 {
1429         struct drm_output *output = (struct drm_output *) output_base;
1430         long max_brightness, new_brightness;
1431
1432         if (!output->backlight)
1433                 return;
1434
1435         if (value > 255)
1436                 return;
1437
1438         max_brightness = backlight_get_max_brightness(output->backlight);
1439
1440         /* get denormalized value */
1441         new_brightness = (value * max_brightness) / 255;
1442
1443         backlight_set_brightness(output->backlight, new_brightness);
1444 }
1445
1446 static drmModePropertyPtr
1447 drm_get_prop(int fd, drmModeConnectorPtr connector, const char *name)
1448 {
1449         drmModePropertyPtr props;
1450         int i;
1451
1452         for (i = 0; i < connector->count_props; i++) {
1453                 props = drmModeGetProperty(fd, connector->props[i]);
1454                 if (!props)
1455                         continue;
1456
1457                 if (!strcmp(props->name, name))
1458                         return props;
1459
1460                 drmModeFreeProperty(props);
1461         }
1462
1463         return NULL;
1464 }
1465
1466 static void
1467 drm_set_dpms(struct weston_output *output_base, enum dpms_enum level)
1468 {
1469         struct drm_output *output = (struct drm_output *) output_base;
1470         struct weston_compositor *ec = output_base->compositor;
1471         struct drm_compositor *c = (struct drm_compositor *) ec;
1472
1473         if (!output->dpms_prop)
1474                 return;
1475
1476         drmModeConnectorSetProperty(c->drm.fd, output->connector_id,
1477                                     output->dpms_prop->prop_id, level);
1478 }
1479
1480 static const char *connector_type_names[] = {
1481         "None",
1482         "VGA",
1483         "DVI",
1484         "DVI",
1485         "DVI",
1486         "Composite",
1487         "TV",
1488         "LVDS",
1489         "CTV",
1490         "DIN",
1491         "DP",
1492         "HDMI",
1493         "HDMI",
1494         "TV",
1495         "eDP",
1496 };
1497
1498 static int
1499 find_crtc_for_connector(struct drm_compositor *ec,
1500                         drmModeRes *resources, drmModeConnector *connector)
1501 {
1502         drmModeEncoder *encoder;
1503         uint32_t possible_crtcs;
1504         int i, j;
1505
1506         for (j = 0; j < connector->count_encoders; j++) {
1507                 encoder = drmModeGetEncoder(ec->drm.fd, connector->encoders[j]);
1508                 if (encoder == NULL) {
1509                         weston_log("Failed to get encoder.\n");
1510                         return -1;
1511                 }
1512                 possible_crtcs = encoder->possible_crtcs;
1513                 drmModeFreeEncoder(encoder);
1514
1515                 for (i = 0; i < resources->count_crtcs; i++) {
1516                         if (possible_crtcs & (1 << i) &&
1517                             !(ec->crtc_allocator & (1 << resources->crtcs[i])))
1518                                 return i;
1519                 }
1520         }
1521
1522         return -1;
1523 }
1524
1525 /* Init output state that depends on gl or gbm */
1526 static int
1527 drm_output_init_egl(struct drm_output *output, struct drm_compositor *ec)
1528 {
1529         int i, flags;
1530
1531         output->surface = gbm_surface_create(ec->gbm,
1532                                              output->base.current_mode->width,
1533                                              output->base.current_mode->height,
1534                                              ec->format,
1535                                              GBM_BO_USE_SCANOUT |
1536                                              GBM_BO_USE_RENDERING);
1537         if (!output->surface) {
1538                 weston_log("failed to create gbm surface\n");
1539                 return -1;
1540         }
1541
1542         if (gl_renderer->output_create(&output->base, output->surface) < 0) {
1543                 weston_log("failed to create gl renderer output state\n");
1544                 gbm_surface_destroy(output->surface);
1545                 return -1;
1546         }
1547
1548         flags = GBM_BO_USE_CURSOR_64X64 | GBM_BO_USE_WRITE;
1549
1550         for (i = 0; i < 2; i++) {
1551                 if (output->cursor_bo[i])
1552                         continue;
1553
1554                 output->cursor_bo[i] =
1555                         gbm_bo_create(ec->gbm, 64, 64, GBM_FORMAT_ARGB8888,
1556                                       flags);
1557         }
1558
1559         if (output->cursor_bo[0] == NULL || output->cursor_bo[1] == NULL) {
1560                 weston_log("cursor buffers unavailable, using gl cursors\n");
1561                 ec->cursors_are_broken = 1;
1562         }
1563
1564         return 0;
1565 }
1566
1567 static int
1568 drm_output_init_pixman(struct drm_output *output, struct drm_compositor *c)
1569 {
1570         int w = output->base.current_mode->width;
1571         int h = output->base.current_mode->height;
1572         unsigned int i;
1573
1574         /* FIXME error checking */
1575
1576         for (i = 0; i < ARRAY_LENGTH(output->dumb); i++) {
1577                 output->dumb[i] = drm_fb_create_dumb(c, w, h);
1578                 if (!output->dumb[i])
1579                         goto err;
1580
1581                 output->image[i] =
1582                         pixman_image_create_bits(PIXMAN_x8r8g8b8, w, h,
1583                                                  output->dumb[i]->map,
1584                                                  output->dumb[i]->stride);
1585                 if (!output->image[i])
1586                         goto err;
1587         }
1588
1589         if (pixman_renderer_output_create(&output->base) < 0)
1590                 goto err;
1591
1592         pixman_region32_init_rect(&output->previous_damage,
1593                                   output->base.x, output->base.y, output->base.width, output->base.height);
1594
1595         return 0;
1596
1597 err:
1598         for (i = 0; i < ARRAY_LENGTH(output->dumb); i++) {
1599                 if (output->dumb[i])
1600                         drm_fb_destroy_dumb(output->dumb[i]);
1601                 if (output->image[i])
1602                         pixman_image_unref(output->image[i]);
1603
1604                 output->dumb[i] = NULL;
1605                 output->image[i] = NULL;
1606         }
1607
1608         return -1;
1609 }
1610
1611 static void
1612 drm_output_fini_pixman(struct drm_output *output)
1613 {
1614         unsigned int i;
1615
1616         pixman_renderer_output_destroy(&output->base);
1617         pixman_region32_fini(&output->previous_damage);
1618
1619         for (i = 0; i < ARRAY_LENGTH(output->dumb); i++) {
1620                 drm_fb_destroy_dumb(output->dumb[i]);
1621                 pixman_image_unref(output->image[i]);
1622                 output->dumb[i] = NULL;
1623                 output->image[i] = NULL;
1624         }
1625 }
1626
1627 static void
1628 edid_parse_string(const uint8_t *data, char text[])
1629 {
1630         int i;
1631         int replaced = 0;
1632
1633         /* this is always 12 bytes, but we can't guarantee it's null
1634          * terminated or not junk. */
1635         strncpy(text, (const char *) data, 12);
1636
1637         /* remove insane chars */
1638         for (i = 0; text[i] != '\0'; i++) {
1639                 if (text[i] == '\n' ||
1640                     text[i] == '\r') {
1641                         text[i] = '\0';
1642                         break;
1643                 }
1644         }
1645
1646         /* ensure string is printable */
1647         for (i = 0; text[i] != '\0'; i++) {
1648                 if (!isprint(text[i])) {
1649                         text[i] = '-';
1650                         replaced++;
1651                 }
1652         }
1653
1654         /* if the string is random junk, ignore the string */
1655         if (replaced > 4)
1656                 text[0] = '\0';
1657 }
1658
1659 #define EDID_DESCRIPTOR_ALPHANUMERIC_DATA_STRING        0xfe
1660 #define EDID_DESCRIPTOR_DISPLAY_PRODUCT_NAME            0xfc
1661 #define EDID_DESCRIPTOR_DISPLAY_PRODUCT_SERIAL_NUMBER   0xff
1662 #define EDID_OFFSET_DATA_BLOCKS                         0x36
1663 #define EDID_OFFSET_LAST_BLOCK                          0x6c
1664 #define EDID_OFFSET_PNPID                               0x08
1665 #define EDID_OFFSET_SERIAL                              0x0c
1666
1667 static int
1668 edid_parse(struct drm_edid *edid, const uint8_t *data, size_t length)
1669 {
1670         int i;
1671         uint32_t serial_number;
1672
1673         /* check header */
1674         if (length < 128)
1675                 return -1;
1676         if (data[0] != 0x00 || data[1] != 0xff)
1677                 return -1;
1678
1679         /* decode the PNP ID from three 5 bit words packed into 2 bytes
1680          * /--08--\/--09--\
1681          * 7654321076543210
1682          * |\---/\---/\---/
1683          * R  C1   C2   C3 */
1684         edid->pnp_id[0] = 'A' + ((data[EDID_OFFSET_PNPID + 0] & 0x7c) / 4) - 1;
1685         edid->pnp_id[1] = 'A' + ((data[EDID_OFFSET_PNPID + 0] & 0x3) * 8) + ((data[EDID_OFFSET_PNPID + 1] & 0xe0) / 32) - 1;
1686         edid->pnp_id[2] = 'A' + (data[EDID_OFFSET_PNPID + 1] & 0x1f) - 1;
1687         edid->pnp_id[3] = '\0';
1688
1689         /* maybe there isn't a ASCII serial number descriptor, so use this instead */
1690         serial_number = (uint32_t) data[EDID_OFFSET_SERIAL + 0];
1691         serial_number += (uint32_t) data[EDID_OFFSET_SERIAL + 1] * 0x100;
1692         serial_number += (uint32_t) data[EDID_OFFSET_SERIAL + 2] * 0x10000;
1693         serial_number += (uint32_t) data[EDID_OFFSET_SERIAL + 3] * 0x1000000;
1694         if (serial_number > 0)
1695                 sprintf(edid->serial_number, "%lu", (unsigned long) serial_number);
1696
1697         /* parse EDID data */
1698         for (i = EDID_OFFSET_DATA_BLOCKS;
1699              i <= EDID_OFFSET_LAST_BLOCK;
1700              i += 18) {
1701                 /* ignore pixel clock data */
1702                 if (data[i] != 0)
1703                         continue;
1704                 if (data[i+2] != 0)
1705                         continue;
1706
1707                 /* any useful blocks? */
1708                 if (data[i+3] == EDID_DESCRIPTOR_DISPLAY_PRODUCT_NAME) {
1709                         edid_parse_string(&data[i+5],
1710                                           edid->monitor_name);
1711                 } else if (data[i+3] == EDID_DESCRIPTOR_DISPLAY_PRODUCT_SERIAL_NUMBER) {
1712                         edid_parse_string(&data[i+5],
1713                                           edid->serial_number);
1714                 } else if (data[i+3] == EDID_DESCRIPTOR_ALPHANUMERIC_DATA_STRING) {
1715                         edid_parse_string(&data[i+5],
1716                                           edid->eisa_id);
1717                 }
1718         }
1719         return 0;
1720 }
1721
1722 static void
1723 find_and_parse_output_edid(struct drm_compositor *ec,
1724                            struct drm_output *output,
1725                            drmModeConnector *connector)
1726 {
1727         drmModePropertyBlobPtr edid_blob = NULL;
1728         drmModePropertyPtr property;
1729         int i;
1730         int rc;
1731
1732         for (i = 0; i < connector->count_props && !edid_blob; i++) {
1733                 property = drmModeGetProperty(ec->drm.fd, connector->props[i]);
1734                 if (!property)
1735                         continue;
1736                 if ((property->flags & DRM_MODE_PROP_BLOB) &&
1737                     !strcmp(property->name, "EDID")) {
1738                         edid_blob = drmModeGetPropertyBlob(ec->drm.fd,
1739                                                            connector->prop_values[i]);
1740                 }
1741                 drmModeFreeProperty(property);
1742         }
1743         if (!edid_blob)
1744                 return;
1745
1746         rc = edid_parse(&output->edid,
1747                         edid_blob->data,
1748                         edid_blob->length);
1749         if (!rc) {
1750                 weston_log("EDID data '%s', '%s', '%s'\n",
1751                            output->edid.pnp_id,
1752                            output->edid.monitor_name,
1753                            output->edid.serial_number);
1754                 if (output->edid.pnp_id[0] != '\0')
1755                         output->base.make = output->edid.pnp_id;
1756                 if (output->edid.monitor_name[0] != '\0')
1757                         output->base.model = output->edid.monitor_name;
1758                 if (output->edid.serial_number[0] != '\0')
1759                         output->base.serial_number = output->edid.serial_number;
1760         }
1761         drmModeFreePropertyBlob(edid_blob);
1762 }
1763
1764
1765
1766 static int
1767 parse_modeline(const char *s, drmModeModeInfo *mode)
1768 {
1769         char hsync[16];
1770         char vsync[16];
1771         float fclock;
1772
1773         mode->type = DRM_MODE_TYPE_USERDEF;
1774         mode->hskew = 0;
1775         mode->vscan = 0;
1776         mode->vrefresh = 0;
1777         mode->flags = 0;
1778
1779         if (sscanf(s, "%f %hd %hd %hd %hd %hd %hd %hd %hd %15s %15s",
1780                    &fclock,
1781                    &mode->hdisplay,
1782                    &mode->hsync_start,
1783                    &mode->hsync_end,
1784                    &mode->htotal,
1785                    &mode->vdisplay,
1786                    &mode->vsync_start,
1787                    &mode->vsync_end,
1788                    &mode->vtotal, hsync, vsync) != 11)
1789                 return -1;
1790
1791         mode->clock = fclock * 1000;
1792         if (strcmp(hsync, "+hsync") == 0)
1793                 mode->flags |= DRM_MODE_FLAG_PHSYNC;
1794         else if (strcmp(hsync, "-hsync") == 0)
1795                 mode->flags |= DRM_MODE_FLAG_NHSYNC;
1796         else
1797                 return -1;
1798
1799         if (strcmp(vsync, "+vsync") == 0)
1800                 mode->flags |= DRM_MODE_FLAG_PVSYNC;
1801         else if (strcmp(vsync, "-vsync") == 0)
1802                 mode->flags |= DRM_MODE_FLAG_NVSYNC;
1803         else
1804                 return -1;
1805
1806         return 0;
1807 }
1808
1809 static uint32_t
1810 parse_transform(const char *transform, const char *output_name)
1811 {
1812         static const struct { const char *name; uint32_t token; } names[] = {
1813                 { "normal",     WL_OUTPUT_TRANSFORM_NORMAL },
1814                 { "90",         WL_OUTPUT_TRANSFORM_90 },
1815                 { "180",        WL_OUTPUT_TRANSFORM_180 },
1816                 { "270",        WL_OUTPUT_TRANSFORM_270 },
1817                 { "flipped",    WL_OUTPUT_TRANSFORM_FLIPPED },
1818                 { "flipped-90", WL_OUTPUT_TRANSFORM_FLIPPED_90 },
1819                 { "flipped-180", WL_OUTPUT_TRANSFORM_FLIPPED_180 },
1820                 { "flipped-270", WL_OUTPUT_TRANSFORM_FLIPPED_270 },
1821         };
1822         unsigned int i;
1823
1824         for (i = 0; i < ARRAY_LENGTH(names); i++)
1825                 if (strcmp(names[i].name, transform) == 0)
1826                         return names[i].token;
1827
1828         weston_log("Invalid transform \"%s\" for output %s\n",
1829                    transform, output_name);
1830
1831         return WL_OUTPUT_TRANSFORM_NORMAL;
1832 }
1833
1834 static void
1835 setup_output_seat_constraint(struct drm_compositor *ec,
1836                              struct weston_output *output,
1837                              const char *s)
1838 {
1839         if (strcmp(s, "") != 0) {
1840                 struct udev_seat *seat;
1841
1842                 seat = udev_seat_get_named(&ec->base, s);
1843                 if (seat)
1844                         seat->base.output = output;
1845
1846                 if (seat && seat->base.pointer)
1847                         weston_pointer_clamp(seat->base.pointer,
1848                                              &seat->base.pointer->x,
1849                                              &seat->base.pointer->y);
1850         }
1851 }
1852
1853 static int
1854 create_output_for_connector(struct drm_compositor *ec,
1855                             drmModeRes *resources,
1856                             drmModeConnector *connector,
1857                             int x, int y, struct udev_device *drm_device)
1858 {
1859         struct drm_output *output;
1860         struct drm_mode *drm_mode, *next, *preferred, *current, *configured, *best;
1861         struct weston_mode *m;
1862         struct weston_config_section *section;
1863         drmModeEncoder *encoder;
1864         drmModeModeInfo crtc_mode, modeline;
1865         drmModeCrtc *crtc;
1866         int i, width, height, scale;
1867         char name[32], *s;
1868         const char *type_name;
1869         enum output_config config;
1870         uint32_t transform;
1871
1872         i = find_crtc_for_connector(ec, resources, connector);
1873         if (i < 0) {
1874                 weston_log("No usable crtc/encoder pair for connector.\n");
1875                 return -1;
1876         }
1877
1878         output = zalloc(sizeof *output);
1879         if (output == NULL)
1880                 return -1;
1881
1882         output->base.subpixel = drm_subpixel_to_wayland(connector->subpixel);
1883         output->base.make = "unknown";
1884         output->base.model = "unknown";
1885         output->base.serial_number = "unknown";
1886         wl_list_init(&output->base.mode_list);
1887
1888         if (connector->connector_type < ARRAY_LENGTH(connector_type_names))
1889                 type_name = connector_type_names[connector->connector_type];
1890         else
1891                 type_name = "UNKNOWN";
1892         snprintf(name, 32, "%s%d", type_name, connector->connector_type_id);
1893         output->base.name = strdup(name);
1894
1895         section = weston_config_get_section(ec->base.config, "output", "name",
1896                                             output->base.name);
1897         weston_config_section_get_string(section, "mode", &s, "preferred");
1898         if (strcmp(s, "off") == 0)
1899                 config = OUTPUT_CONFIG_OFF;
1900         else if (strcmp(s, "preferred") == 0)
1901                 config = OUTPUT_CONFIG_PREFERRED;
1902         else if (strcmp(s, "current") == 0)
1903                 config = OUTPUT_CONFIG_CURRENT;
1904         else if (sscanf(s, "%dx%d", &width, &height) == 2)
1905                 config = OUTPUT_CONFIG_MODE;
1906         else if (parse_modeline(s, &modeline) == 0)
1907                 config = OUTPUT_CONFIG_MODELINE;
1908         else {
1909                 weston_log("Invalid mode \"%s\" for output %s\n",
1910                            s, output->base.name);
1911                 config = OUTPUT_CONFIG_PREFERRED;
1912         }
1913         free(s);
1914
1915         weston_config_section_get_int(section, "scale", &scale, 1);
1916         weston_config_section_get_string(section, "transform", &s, "normal");
1917         transform = parse_transform(s, output->base.name);
1918         free(s);
1919
1920         weston_config_section_get_string(section, "seat", &s, "");
1921         setup_output_seat_constraint(ec, &output->base, s);
1922         free(s);
1923
1924         output->crtc_id = resources->crtcs[i];
1925         output->pipe = i;
1926         ec->crtc_allocator |= (1 << output->crtc_id);
1927         output->connector_id = connector->connector_id;
1928         ec->connector_allocator |= (1 << output->connector_id);
1929
1930         output->original_crtc = drmModeGetCrtc(ec->drm.fd, output->crtc_id);
1931         output->dpms_prop = drm_get_prop(ec->drm.fd, connector, "DPMS");
1932
1933         /* Get the current mode on the crtc that's currently driving
1934          * this connector. */
1935         encoder = drmModeGetEncoder(ec->drm.fd, connector->encoder_id);
1936         memset(&crtc_mode, 0, sizeof crtc_mode);
1937         if (encoder != NULL) {
1938                 crtc = drmModeGetCrtc(ec->drm.fd, encoder->crtc_id);
1939                 drmModeFreeEncoder(encoder);
1940                 if (crtc == NULL)
1941                         goto err_free;
1942                 if (crtc->mode_valid)
1943                         crtc_mode = crtc->mode;
1944                 drmModeFreeCrtc(crtc);
1945         }
1946
1947         for (i = 0; i < connector->count_modes; i++) {
1948                 drm_mode = drm_output_add_mode(output, &connector->modes[i]);
1949                 if (!drm_mode)
1950                         goto err_free;
1951         }
1952
1953         if (config == OUTPUT_CONFIG_OFF) {
1954                 weston_log("Disabling output %s\n", output->base.name);
1955                 drmModeSetCrtc(ec->drm.fd, output->crtc_id,
1956                                0, 0, 0, 0, 0, NULL);
1957                 goto err_free;
1958         }
1959
1960         preferred = NULL;
1961         current = NULL;
1962         configured = NULL;
1963         best = NULL;
1964
1965         wl_list_for_each_reverse(drm_mode, &output->base.mode_list, base.link) {
1966                 if (config == OUTPUT_CONFIG_MODE &&
1967                     width == drm_mode->base.width &&
1968                     height == drm_mode->base.height)
1969                         configured = drm_mode;
1970                 if (!memcmp(&crtc_mode, &drm_mode->mode_info, sizeof crtc_mode))
1971                         current = drm_mode;
1972                 if (drm_mode->base.flags & WL_OUTPUT_MODE_PREFERRED)
1973                         preferred = drm_mode;
1974                 best = drm_mode;
1975         }
1976
1977         if (config == OUTPUT_CONFIG_MODELINE) {
1978                 configured = drm_output_add_mode(output, &modeline);
1979                 if (!configured)
1980                         goto err_free;
1981         }
1982
1983         if (current == NULL && crtc_mode.clock != 0) {
1984                 current = drm_output_add_mode(output, &crtc_mode);
1985                 if (!current)
1986                         goto err_free;
1987         }
1988
1989         if (config == OUTPUT_CONFIG_CURRENT)
1990                 configured = current;
1991
1992         if (option_current_mode && current)
1993                 output->base.current_mode = &current->base;
1994         else if (configured)
1995                 output->base.current_mode = &configured->base;
1996         else if (preferred)
1997                 output->base.current_mode = &preferred->base;
1998         else if (current)
1999                 output->base.current_mode = &current->base;
2000         else if (best)
2001                 output->base.current_mode = &best->base;
2002
2003         if (output->base.current_mode == NULL) {
2004                 weston_log("no available modes for %s\n", output->base.name);
2005                 goto err_free;
2006         }
2007
2008         output->base.current_mode->flags |= WL_OUTPUT_MODE_CURRENT;
2009
2010         weston_output_init(&output->base, &ec->base, x, y,
2011                            connector->mmWidth, connector->mmHeight,
2012                            transform, scale);
2013
2014         if (ec->use_pixman) {
2015                 if (drm_output_init_pixman(output, ec) < 0) {
2016                         weston_log("Failed to init output pixman state\n");
2017                         goto err_output;
2018                 }
2019         } else if (drm_output_init_egl(output, ec) < 0) {
2020                 weston_log("Failed to init output gl state\n");
2021                 goto err_output;
2022         }
2023
2024         output->backlight = backlight_init(drm_device,
2025                                            connector->connector_type);
2026         if (output->backlight) {
2027                 weston_log("Initialized backlight, device %s\n",
2028                            output->backlight->path);
2029                 output->base.set_backlight = drm_set_backlight;
2030                 output->base.backlight_current = drm_get_backlight(output);
2031         } else {
2032                 weston_log("Failed to initialize backlight\n");
2033         }
2034
2035         wl_list_insert(ec->base.output_list.prev, &output->base.link);
2036
2037         find_and_parse_output_edid(ec, output, connector);
2038         if (connector->connector_type == DRM_MODE_CONNECTOR_LVDS)
2039                 output->base.connection_internal = 1;
2040
2041         output->base.start_repaint_loop = drm_output_start_repaint_loop;
2042         output->base.repaint = drm_output_repaint;
2043         output->base.destroy = drm_output_destroy;
2044         output->base.assign_planes = drm_assign_planes;
2045         output->base.set_dpms = drm_set_dpms;
2046         output->base.switch_mode = drm_output_switch_mode;
2047
2048         output->base.gamma_size = output->original_crtc->gamma_size;
2049         output->base.set_gamma = drm_output_set_gamma;
2050
2051         weston_plane_init(&output->cursor_plane, &ec->base, 0, 0);
2052         weston_plane_init(&output->fb_plane, &ec->base, 0, 0);
2053
2054         weston_compositor_stack_plane(&ec->base, &output->cursor_plane, NULL);
2055         weston_compositor_stack_plane(&ec->base, &output->fb_plane,
2056                                       &ec->base.primary_plane);
2057
2058         weston_log("Output %s, (connector %d, crtc %d)\n",
2059                    output->base.name, output->connector_id, output->crtc_id);
2060         wl_list_for_each(m, &output->base.mode_list, link)
2061                 weston_log_continue("  mode %dx%d@%.1f%s%s%s\n",
2062                                     m->width, m->height, m->refresh / 1000.0,
2063                                     m->flags & WL_OUTPUT_MODE_PREFERRED ?
2064                                     ", preferred" : "",
2065                                     m->flags & WL_OUTPUT_MODE_CURRENT ?
2066                                     ", current" : "",
2067                                     connector->count_modes == 0 ?
2068                                     ", built-in" : "");
2069
2070         return 0;
2071
2072 err_output:
2073         weston_output_destroy(&output->base);
2074 err_free:
2075         wl_list_for_each_safe(drm_mode, next, &output->base.mode_list,
2076                                                         base.link) {
2077                 wl_list_remove(&drm_mode->base.link);
2078                 free(drm_mode);
2079         }
2080
2081         drmModeFreeCrtc(output->original_crtc);
2082         ec->crtc_allocator &= ~(1 << output->crtc_id);
2083         ec->connector_allocator &= ~(1 << output->connector_id);
2084         free(output);
2085
2086         return -1;
2087 }
2088
2089 static void
2090 create_sprites(struct drm_compositor *ec)
2091 {
2092         struct drm_sprite *sprite;
2093         drmModePlaneRes *plane_res;
2094         drmModePlane *plane;
2095         uint32_t i;
2096
2097         plane_res = drmModeGetPlaneResources(ec->drm.fd);
2098         if (!plane_res) {
2099                 weston_log("failed to get plane resources: %s\n",
2100                         strerror(errno));
2101                 return;
2102         }
2103
2104         for (i = 0; i < plane_res->count_planes; i++) {
2105                 plane = drmModeGetPlane(ec->drm.fd, plane_res->planes[i]);
2106                 if (!plane)
2107                         continue;
2108
2109                 sprite = zalloc(sizeof(*sprite) + ((sizeof(uint32_t)) *
2110                                                    plane->count_formats));
2111                 if (!sprite) {
2112                         weston_log("%s: out of memory\n",
2113                                 __func__);
2114                         drmModeFreePlane(plane);
2115                         continue;
2116                 }
2117
2118                 sprite->possible_crtcs = plane->possible_crtcs;
2119                 sprite->plane_id = plane->plane_id;
2120                 sprite->current = NULL;
2121                 sprite->next = NULL;
2122                 sprite->compositor = ec;
2123                 sprite->count_formats = plane->count_formats;
2124                 memcpy(sprite->formats, plane->formats,
2125                        plane->count_formats * sizeof(plane->formats[0]));
2126                 drmModeFreePlane(plane);
2127                 weston_plane_init(&sprite->plane, &ec->base, 0, 0);
2128                 weston_compositor_stack_plane(&ec->base, &sprite->plane,
2129                                               &ec->base.primary_plane);
2130
2131                 wl_list_insert(&ec->sprite_list, &sprite->link);
2132         }
2133
2134         drmModeFreePlaneResources(plane_res);
2135 }
2136
2137 static void
2138 destroy_sprites(struct drm_compositor *compositor)
2139 {
2140         struct drm_sprite *sprite, *next;
2141         struct drm_output *output;
2142
2143         output = container_of(compositor->base.output_list.next,
2144                               struct drm_output, base.link);
2145
2146         wl_list_for_each_safe(sprite, next, &compositor->sprite_list, link) {
2147                 drmModeSetPlane(compositor->drm.fd,
2148                                 sprite->plane_id,
2149                                 output->crtc_id, 0, 0,
2150                                 0, 0, 0, 0, 0, 0, 0, 0);
2151                 drm_output_release_fb(output, sprite->current);
2152                 drm_output_release_fb(output, sprite->next);
2153                 weston_plane_release(&sprite->plane);
2154                 free(sprite);
2155         }
2156 }
2157
2158 static int
2159 create_outputs(struct drm_compositor *ec, uint32_t option_connector,
2160                struct udev_device *drm_device)
2161 {
2162         drmModeConnector *connector;
2163         drmModeRes *resources;
2164         int i;
2165         int x = 0, y = 0;
2166
2167         resources = drmModeGetResources(ec->drm.fd);
2168         if (!resources) {
2169                 weston_log("drmModeGetResources failed\n");
2170                 return -1;
2171         }
2172
2173         ec->crtcs = calloc(resources->count_crtcs, sizeof(uint32_t));
2174         if (!ec->crtcs) {
2175                 drmModeFreeResources(resources);
2176                 return -1;
2177         }
2178
2179         ec->min_width  = resources->min_width;
2180         ec->max_width  = resources->max_width;
2181         ec->min_height = resources->min_height;
2182         ec->max_height = resources->max_height;
2183
2184         ec->num_crtcs = resources->count_crtcs;
2185         memcpy(ec->crtcs, resources->crtcs, sizeof(uint32_t) * ec->num_crtcs);
2186
2187         for (i = 0; i < resources->count_connectors; i++) {
2188                 connector = drmModeGetConnector(ec->drm.fd,
2189                                                 resources->connectors[i]);
2190                 if (connector == NULL)
2191                         continue;
2192
2193                 if (connector->connection == DRM_MODE_CONNECTED &&
2194                     (option_connector == 0 ||
2195                      connector->connector_id == option_connector)) {
2196                         if (create_output_for_connector(ec, resources,
2197                                                         connector, x, y,
2198                                                         drm_device) < 0) {
2199                                 drmModeFreeConnector(connector);
2200                                 continue;
2201                         }
2202
2203                         x += container_of(ec->base.output_list.prev,
2204                                           struct weston_output,
2205                                           link)->width;
2206                 }
2207
2208                 drmModeFreeConnector(connector);
2209         }
2210
2211         if (wl_list_empty(&ec->base.output_list)) {
2212                 weston_log("No currently active connector found.\n");
2213                 drmModeFreeResources(resources);
2214                 return -1;
2215         }
2216
2217         drmModeFreeResources(resources);
2218
2219         return 0;
2220 }
2221
2222 static void
2223 update_outputs(struct drm_compositor *ec, struct udev_device *drm_device)
2224 {
2225         drmModeConnector *connector;
2226         drmModeRes *resources;
2227         struct drm_output *output, *next;
2228         int x = 0, y = 0;
2229         uint32_t connected = 0, disconnects = 0;
2230         int i;
2231
2232         resources = drmModeGetResources(ec->drm.fd);
2233         if (!resources) {
2234                 weston_log("drmModeGetResources failed\n");
2235                 return;
2236         }
2237
2238         /* collect new connects */
2239         for (i = 0; i < resources->count_connectors; i++) {
2240                 int connector_id = resources->connectors[i];
2241
2242                 connector = drmModeGetConnector(ec->drm.fd, connector_id);
2243                 if (connector == NULL)
2244                         continue;
2245
2246                 if (connector->connection != DRM_MODE_CONNECTED) {
2247                         drmModeFreeConnector(connector);
2248                         continue;
2249                 }
2250
2251                 connected |= (1 << connector_id);
2252
2253                 if (!(ec->connector_allocator & (1 << connector_id))) {
2254                         struct weston_output *last =
2255                                 container_of(ec->base.output_list.prev,
2256                                              struct weston_output, link);
2257
2258                         /* XXX: not yet needed, we die with 0 outputs */
2259                         if (!wl_list_empty(&ec->base.output_list))
2260                                 x = last->x + last->width;
2261                         else
2262                                 x = 0;
2263                         y = 0;
2264                         create_output_for_connector(ec, resources,
2265                                                     connector, x, y,
2266                                                     drm_device);
2267                         weston_log("connector %d connected\n", connector_id);
2268
2269                 }
2270                 drmModeFreeConnector(connector);
2271         }
2272         drmModeFreeResources(resources);
2273
2274         disconnects = ec->connector_allocator & ~connected;
2275         if (disconnects) {
2276                 wl_list_for_each_safe(output, next, &ec->base.output_list,
2277                                       base.link) {
2278                         if (disconnects & (1 << output->connector_id)) {
2279                                 disconnects &= ~(1 << output->connector_id);
2280                                 weston_log("connector %d disconnected\n",
2281                                        output->connector_id);
2282                                 drm_output_destroy(&output->base);
2283                         }
2284                 }
2285         }
2286
2287         /* FIXME: handle zero outputs, without terminating */
2288         if (ec->connector_allocator == 0)
2289                 wl_display_terminate(ec->base.wl_display);
2290 }
2291
2292 static int
2293 udev_event_is_hotplug(struct drm_compositor *ec, struct udev_device *device)
2294 {
2295         const char *sysnum;
2296         const char *val;
2297
2298         sysnum = udev_device_get_sysnum(device);
2299         if (!sysnum || atoi(sysnum) != ec->drm.id)
2300                 return 0;
2301
2302         val = udev_device_get_property_value(device, "HOTPLUG");
2303         if (!val)
2304                 return 0;
2305
2306         return strcmp(val, "1") == 0;
2307 }
2308
2309 static int
2310 udev_drm_event(int fd, uint32_t mask, void *data)
2311 {
2312         struct drm_compositor *ec = data;
2313         struct udev_device *event;
2314
2315         event = udev_monitor_receive_device(ec->udev_monitor);
2316
2317         if (udev_event_is_hotplug(ec, event))
2318                 update_outputs(ec, event);
2319
2320         udev_device_unref(event);
2321
2322         return 1;
2323 }
2324
2325 static void
2326 drm_restore(struct weston_compositor *ec)
2327 {
2328         weston_launcher_restore(ec->launcher);
2329 }
2330
2331 static void
2332 drm_destroy(struct weston_compositor *ec)
2333 {
2334         struct drm_compositor *d = (struct drm_compositor *) ec;
2335
2336         udev_input_destroy(&d->input);
2337
2338         wl_event_source_remove(d->udev_drm_source);
2339         wl_event_source_remove(d->drm_source);
2340
2341         destroy_sprites(d);
2342
2343         weston_compositor_shutdown(ec);
2344
2345         if (d->gbm)
2346                 gbm_device_destroy(d->gbm);
2347
2348         weston_launcher_destroy(d->base.launcher);
2349
2350         close(d->drm.fd);
2351
2352         free(d);
2353 }
2354
2355 static void
2356 drm_compositor_set_modes(struct drm_compositor *compositor)
2357 {
2358         struct drm_output *output;
2359         struct drm_mode *drm_mode;
2360         int ret;
2361
2362         wl_list_for_each(output, &compositor->base.output_list, base.link) {
2363                 if (!output->current) {
2364                         /* If something that would cause the output to
2365                          * switch mode happened while in another vt, we
2366                          * might not have a current drm_fb. In that case,
2367                          * schedule a repaint and let drm_output_repaint
2368                          * handle setting the mode. */
2369                         weston_output_schedule_repaint(&output->base);
2370                         continue;
2371                 }
2372
2373                 drm_mode = (struct drm_mode *) output->base.current_mode;
2374                 ret = drmModeSetCrtc(compositor->drm.fd, output->crtc_id,
2375                                      output->current->fb_id, 0, 0,
2376                                      &output->connector_id, 1,
2377                                      &drm_mode->mode_info);
2378                 if (ret < 0) {
2379                         weston_log(
2380                                 "failed to set mode %dx%d for output at %d,%d: %m\n",
2381                                 drm_mode->base.width, drm_mode->base.height,
2382                                 output->base.x, output->base.y);
2383                 }
2384         }
2385 }
2386
2387 static void
2388 session_notify(struct wl_listener *listener, void *data)
2389 {
2390         struct weston_compositor *compositor = data;
2391         struct drm_compositor *ec = data;
2392         struct drm_sprite *sprite;
2393         struct drm_output *output;
2394
2395         if (ec->base.session_active) {
2396                 weston_log("activating session\n");
2397                 compositor->state = ec->prev_state;
2398                 drm_compositor_set_modes(ec);
2399                 weston_compositor_damage_all(compositor);
2400                 udev_input_enable(&ec->input, ec->udev);
2401         } else {
2402                 weston_log("deactivating session\n");
2403                 udev_input_disable(&ec->input);
2404
2405                 ec->prev_state = compositor->state;
2406                 weston_compositor_offscreen(compositor);
2407
2408                 /* If we have a repaint scheduled (either from a
2409                  * pending pageflip or the idle handler), make sure we
2410                  * cancel that so we don't try to pageflip when we're
2411                  * vt switched away.  The OFFSCREEN state will prevent
2412                  * further attemps at repainting.  When we switch
2413                  * back, we schedule a repaint, which will process
2414                  * pending frame callbacks. */
2415
2416                 wl_list_for_each(output, &ec->base.output_list, base.link) {
2417                         output->base.repaint_needed = 0;
2418                         drmModeSetCursor(ec->drm.fd, output->crtc_id, 0, 0, 0);
2419                 }
2420
2421                 output = container_of(ec->base.output_list.next,
2422                                       struct drm_output, base.link);
2423
2424                 wl_list_for_each(sprite, &ec->sprite_list, link)
2425                         drmModeSetPlane(ec->drm.fd,
2426                                         sprite->plane_id,
2427                                         output->crtc_id, 0, 0,
2428                                         0, 0, 0, 0, 0, 0, 0, 0);
2429         };
2430 }
2431
2432 static void
2433 switch_vt_binding(struct weston_seat *seat, uint32_t time, uint32_t key, void *data)
2434 {
2435         struct weston_compositor *compositor = data;
2436
2437         weston_launcher_activate_vt(compositor->launcher, key - KEY_F1 + 1);
2438 }
2439
2440 /*
2441  * Find primary GPU
2442  * Some systems may have multiple DRM devices attached to a single seat. This
2443  * function loops over all devices and tries to find a PCI device with the
2444  * boot_vga sysfs attribute set to 1.
2445  * If no such device is found, the first DRM device reported by udev is used.
2446  */
2447 static struct udev_device*
2448 find_primary_gpu(struct drm_compositor *ec, const char *seat)
2449 {
2450         struct udev_enumerate *e;
2451         struct udev_list_entry *entry;
2452         const char *path, *device_seat, *id;
2453         struct udev_device *device, *drm_device, *pci;
2454
2455         e = udev_enumerate_new(ec->udev);
2456         udev_enumerate_add_match_subsystem(e, "drm");
2457         udev_enumerate_add_match_sysname(e, "card[0-9]*");
2458
2459         udev_enumerate_scan_devices(e);
2460         drm_device = NULL;
2461         udev_list_entry_foreach(entry, udev_enumerate_get_list_entry(e)) {
2462                 path = udev_list_entry_get_name(entry);
2463                 device = udev_device_new_from_syspath(ec->udev, path);
2464                 if (!device)
2465                         continue;
2466                 device_seat = udev_device_get_property_value(device, "ID_SEAT");
2467                 if (!device_seat)
2468                         device_seat = default_seat;
2469                 if (strcmp(device_seat, seat)) {
2470                         udev_device_unref(device);
2471                         continue;
2472                 }
2473
2474                 pci = udev_device_get_parent_with_subsystem_devtype(device,
2475                                                                 "pci", NULL);
2476                 if (pci) {
2477                         id = udev_device_get_sysattr_value(pci, "boot_vga");
2478                         if (id && !strcmp(id, "1")) {
2479                                 if (drm_device)
2480                                         udev_device_unref(drm_device);
2481                                 drm_device = device;
2482                                 break;
2483                         }
2484                 }
2485
2486                 if (!drm_device)
2487                         drm_device = device;
2488                 else
2489                         udev_device_unref(device);
2490         }
2491
2492         udev_enumerate_unref(e);
2493         return drm_device;
2494 }
2495
2496 static void
2497 planes_binding(struct weston_seat *seat, uint32_t time, uint32_t key, void *data)
2498 {
2499         struct drm_compositor *c = data;
2500
2501         switch (key) {
2502         case KEY_C:
2503                 c->cursors_are_broken ^= 1;
2504                 break;
2505         case KEY_V:
2506                 c->sprites_are_broken ^= 1;
2507                 break;
2508         case KEY_O:
2509                 c->sprites_hidden ^= 1;
2510                 break;
2511         default:
2512                 break;
2513         }
2514 }
2515
2516 #ifdef BUILD_VAAPI_RECORDER
2517 static void
2518 recorder_frame_notify(struct wl_listener *listener, void *data)
2519 {
2520         struct drm_output *output;
2521         struct drm_compositor *c;
2522         int fd, ret;
2523
2524         output = container_of(listener, struct drm_output,
2525                               recorder_frame_listener);
2526         c = (struct drm_compositor *) output->base.compositor;
2527
2528         if (!output->recorder)
2529                 return;
2530
2531         ret = drmPrimeHandleToFD(c->drm.fd, output->current->handle,
2532                                  DRM_CLOEXEC, &fd);
2533         if (ret) {
2534                 weston_log("[libva recorder] "
2535                            "failed to create prime fd for front buffer\n");
2536                 return;
2537         }
2538
2539         vaapi_recorder_frame(output->recorder, fd, output->current->stride / 4);
2540 }
2541
2542 static void *
2543 create_recorder(struct drm_compositor *c, int width, int height,
2544                 const char *filename)
2545 {
2546         int fd;
2547         drm_magic_t magic;
2548
2549         fd = open(c->drm.filename, O_RDWR | O_CLOEXEC);
2550         if (fd < 0)
2551                 return NULL;
2552
2553         drmGetMagic(fd, &magic);
2554         drmAuthMagic(c->drm.fd, magic);
2555
2556         return vaapi_recorder_create(fd, width, height, filename);
2557 }
2558
2559 static void
2560 recorder_binding(struct weston_seat *seat, uint32_t time, uint32_t key,
2561                  void *data)
2562 {
2563         struct drm_compositor *c = data;
2564         struct drm_output *output;
2565         int width, height;
2566
2567         output = container_of(c->base.output_list.next,
2568                               struct drm_output, base.link);
2569
2570         if (!output->recorder) {
2571                 width = output->base.current_mode->width;
2572                 height = output->base.current_mode->height;
2573
2574                 output->recorder =
2575                         create_recorder(c, width, height, "capture.h264");
2576                 if (!output->recorder) {
2577                         weston_log("failed to create vaapi recorder\n");
2578                         return;
2579                 }
2580
2581                 output->base.disable_planes++;
2582
2583                 output->recorder_frame_listener.notify = recorder_frame_notify;
2584                 wl_signal_add(&output->base.frame_signal,
2585                               &output->recorder_frame_listener);
2586
2587                 weston_output_schedule_repaint(&output->base);
2588
2589                 weston_log("[libva recorder] initialized\n");
2590         } else {
2591                 vaapi_recorder_destroy(output->recorder);
2592                 output->recorder = NULL;
2593
2594                 output->base.disable_planes--;
2595
2596                 wl_list_remove(&output->recorder_frame_listener.link);
2597                 weston_log("[libva recorder] done\n");
2598         }
2599 }
2600 #else
2601 static void
2602 recorder_binding(struct weston_seat *seat, uint32_t time, uint32_t key,
2603                  void *data)
2604 {
2605         weston_log("Compiled without libva support\n");
2606 }
2607 #endif
2608
2609 static void
2610 switch_to_gl_renderer(struct drm_compositor *c)
2611 {
2612         struct drm_output *output;
2613
2614         if (!c->use_pixman)
2615                 return;
2616
2617         weston_log("Switching to GL renderer\n");
2618
2619         c->gbm = create_gbm_device(c->drm.fd);
2620         if (!c->gbm) {
2621                 weston_log("Failed to create gbm device. "
2622                            "Aborting renderer switch\n");
2623                 return;
2624         }
2625
2626         wl_list_for_each(output, &c->base.output_list, base.link)
2627                 pixman_renderer_output_destroy(&output->base);
2628
2629         c->base.renderer->destroy(&c->base);
2630
2631         if (drm_compositor_create_gl_renderer(c) < 0) {
2632                 gbm_device_destroy(c->gbm);
2633                 weston_log("Failed to create GL renderer. Quitting.\n");
2634                 /* FIXME: we need a function to shutdown cleanly */
2635                 assert(0);
2636         }
2637
2638         wl_list_for_each(output, &c->base.output_list, base.link)
2639                 drm_output_init_egl(output, c);
2640
2641         c->use_pixman = 0;
2642 }
2643
2644 static void
2645 renderer_switch_binding(struct weston_seat *seat, uint32_t time, uint32_t key,
2646                         void *data)
2647 {
2648         struct drm_compositor *c = (struct drm_compositor *) seat->compositor;
2649
2650         switch_to_gl_renderer(c);
2651 }
2652
2653 static struct weston_compositor *
2654 drm_compositor_create(struct wl_display *display,
2655                       struct drm_parameters *param,
2656                       int *argc, char *argv[],
2657                       struct weston_config *config)
2658 {
2659         struct drm_compositor *ec;
2660         struct weston_config_section *section;
2661         struct udev_device *drm_device;
2662         struct wl_event_loop *loop;
2663         const char *path;
2664         char *s;
2665         uint32_t key;
2666
2667         weston_log("initializing drm backend\n");
2668
2669         ec = zalloc(sizeof *ec);
2670         if (ec == NULL)
2671                 return NULL;
2672
2673         /* KMS support for sprites is not complete yet, so disable the
2674          * functionality for now. */
2675         ec->sprites_are_broken = 1;
2676
2677         section = weston_config_get_section(config, "core", NULL, NULL);
2678         weston_config_section_get_string(section,
2679                                          "gbm-format", &s, "xrgb8888");
2680         if (strcmp(s, "xrgb8888") == 0)
2681                 ec->format = GBM_FORMAT_XRGB8888;
2682         else if (strcmp(s, "rgb565") == 0)
2683                 ec->format = GBM_FORMAT_RGB565;
2684         else if (strcmp(s, "xrgb2101010") == 0)
2685                 ec->format = GBM_FORMAT_XRGB2101010;
2686         else {
2687                 weston_log("fatal: unrecognized pixel format: %s\n", s);
2688                 free(s);
2689                 goto err_base;
2690         }
2691         free(s);
2692
2693         ec->use_pixman = param->use_pixman;
2694
2695         if (weston_compositor_init(&ec->base, display, argc, argv,
2696                                    config) < 0) {
2697                 weston_log("%s failed\n", __func__);
2698                 goto err_base;
2699         }
2700
2701         /* Check if we run drm-backend using weston-launch */
2702         ec->base.launcher = weston_launcher_connect(&ec->base, param->tty,
2703                                                     param->seat_id);
2704         if (ec->base.launcher == NULL) {
2705                 weston_log("fatal: drm backend should be run "
2706                            "using weston-launch binary or as root\n");
2707                 goto err_compositor;
2708         }
2709
2710         ec->udev = udev_new();
2711         if (ec->udev == NULL) {
2712                 weston_log("failed to initialize udev context\n");
2713                 goto err_launcher;
2714         }
2715
2716         ec->base.wl_display = display;
2717         ec->session_listener.notify = session_notify;
2718         wl_signal_add(&ec->base.session_signal, &ec->session_listener);
2719
2720         drm_device = find_primary_gpu(ec, param->seat_id);
2721         if (drm_device == NULL) {
2722                 weston_log("no drm device found\n");
2723                 goto err_udev;
2724         }
2725         path = udev_device_get_syspath(drm_device);
2726
2727         if (init_drm(ec, drm_device) < 0) {
2728                 weston_log("failed to initialize kms\n");
2729                 goto err_udev_dev;
2730         }
2731
2732         if (ec->use_pixman) {
2733                 if (init_pixman(ec) < 0) {
2734                         weston_log("failed to initialize pixman renderer\n");
2735                         goto err_udev_dev;
2736                 }
2737         } else {
2738                 if (init_egl(ec) < 0) {
2739                         weston_log("failed to initialize egl\n");
2740                         goto err_udev_dev;
2741                 }
2742         }
2743
2744         ec->base.destroy = drm_destroy;
2745         ec->base.restore = drm_restore;
2746
2747         ec->prev_state = WESTON_COMPOSITOR_ACTIVE;
2748
2749         for (key = KEY_F1; key < KEY_F9; key++)
2750                 weston_compositor_add_key_binding(&ec->base, key,
2751                                                   MODIFIER_CTRL | MODIFIER_ALT,
2752                                                   switch_vt_binding, ec);
2753
2754         wl_list_init(&ec->sprite_list);
2755         create_sprites(ec);
2756
2757         if (create_outputs(ec, param->connector, drm_device) < 0) {
2758                 weston_log("failed to create output for %s\n", path);
2759                 goto err_sprite;
2760         }
2761
2762         path = NULL;
2763
2764         if (udev_input_init(&ec->input,
2765                             &ec->base, ec->udev, param->seat_id) < 0) {
2766                 weston_log("failed to create input devices\n");
2767                 goto err_sprite;
2768         }
2769
2770         loop = wl_display_get_event_loop(ec->base.wl_display);
2771         ec->drm_source =
2772                 wl_event_loop_add_fd(loop, ec->drm.fd,
2773                                      WL_EVENT_READABLE, on_drm_input, ec);
2774
2775         ec->udev_monitor = udev_monitor_new_from_netlink(ec->udev, "udev");
2776         if (ec->udev_monitor == NULL) {
2777                 weston_log("failed to intialize udev monitor\n");
2778                 goto err_drm_source;
2779         }
2780         udev_monitor_filter_add_match_subsystem_devtype(ec->udev_monitor,
2781                                                         "drm", NULL);
2782         ec->udev_drm_source =
2783                 wl_event_loop_add_fd(loop,
2784                                      udev_monitor_get_fd(ec->udev_monitor),
2785                                      WL_EVENT_READABLE, udev_drm_event, ec);
2786
2787         if (udev_monitor_enable_receiving(ec->udev_monitor) < 0) {
2788                 weston_log("failed to enable udev-monitor receiving\n");
2789                 goto err_udev_monitor;
2790         }
2791
2792         udev_device_unref(drm_device);
2793
2794         weston_compositor_add_debug_binding(&ec->base, KEY_O,
2795                                             planes_binding, ec);
2796         weston_compositor_add_debug_binding(&ec->base, KEY_C,
2797                                             planes_binding, ec);
2798         weston_compositor_add_debug_binding(&ec->base, KEY_V,
2799                                             planes_binding, ec);
2800         weston_compositor_add_debug_binding(&ec->base, KEY_Q,
2801                                             recorder_binding, ec);
2802         weston_compositor_add_debug_binding(&ec->base, KEY_W,
2803                                             renderer_switch_binding, ec);
2804
2805         return &ec->base;
2806
2807 err_udev_monitor:
2808         wl_event_source_remove(ec->udev_drm_source);
2809         udev_monitor_unref(ec->udev_monitor);
2810 err_drm_source:
2811         wl_event_source_remove(ec->drm_source);
2812         udev_input_destroy(&ec->input);
2813 err_sprite:
2814         ec->base.renderer->destroy(&ec->base);
2815         gbm_device_destroy(ec->gbm);
2816         destroy_sprites(ec);
2817 err_udev_dev:
2818         udev_device_unref(drm_device);
2819 err_launcher:
2820         weston_launcher_destroy(ec->base.launcher);
2821 err_udev:
2822         udev_unref(ec->udev);
2823 err_compositor:
2824         weston_compositor_shutdown(&ec->base);
2825 err_base:
2826         free(ec);
2827         return NULL;
2828 }
2829
2830 WL_EXPORT struct weston_compositor *
2831 backend_init(struct wl_display *display, int *argc, char *argv[],
2832              struct weston_config *config)
2833 {
2834         struct drm_parameters param = { 0, };
2835
2836         const struct weston_option drm_options[] = {
2837                 { WESTON_OPTION_INTEGER, "connector", 0, &param.connector },
2838                 { WESTON_OPTION_STRING, "seat", 0, &param.seat_id },
2839                 { WESTON_OPTION_INTEGER, "tty", 0, &param.tty },
2840                 { WESTON_OPTION_BOOLEAN, "current-mode", 0, &option_current_mode },
2841                 { WESTON_OPTION_BOOLEAN, "use-pixman", 0, &param.use_pixman },
2842         };
2843
2844         param.seat_id = default_seat;
2845
2846         parse_options(drm_options, ARRAY_LENGTH(drm_options), argc, argv);
2847
2848         return drm_compositor_create(display, &param, argc, argv, config);
2849 }