drivers/gpu/drm/vboxvideo/vbox_mode.c

   1 // SPDX-License-Identifier: MIT
   2 /*
   3  * Copyright (C) 2013-2017 Oracle Corporation
   4  * This file is based on ast_mode.c
   5  * Copyright 2012 Red Hat Inc.
   6  * Parts based on xf86-video-ast
   7  * Copyright (c) 2005 ASPEED Technology Inc.
   8  * Authors: Dave Airlie <airlied@redhat.com>
   9  *          Michael Thayer <michael.thayer@oracle.com,
  10  *          Hans de Goede <hdegoede@redhat.com>
  11  */
  12
  13 #include <linux/iosys-map.h>
  14 #include <linux/export.h>
  15
  16 #include <drm/drm_atomic.h>
  17 #include <drm/drm_atomic_helper.h>
  18 #include <drm/drm_edid.h>
  19 #include <drm/drm_fb_helper.h>
  20 #include <drm/drm_fourcc.h>
  21 #include <drm/drm_framebuffer.h>
  22 #include <drm/drm_gem_atomic_helper.h>
  23 #include <drm/drm_gem_framebuffer_helper.h>
  24 #include <drm/drm_plane_helper.h>
  25 #include <drm/drm_probe_helper.h>
  26
  27 #include "hgsmi_channels.h"
  28 #include "vbox_drv.h"
  29 #include "vboxvideo.h"
  30
  31 /*
  32  * Set a graphics mode.  Poke any required values into registers, do an HGSMI
  33  * mode set and tell the host we support advanced graphics functions.
  34  */
  35 static void vbox_do_modeset(struct drm_crtc *crtc)
  36 {
  37         struct drm_framebuffer *fb = crtc->primary->state->fb;
  38         struct vbox_crtc *vbox_crtc = to_vbox_crtc(crtc);
  39         struct vbox_private *vbox;
  40         int width, height, bpp, pitch;
  41         u16 flags;
  42         s32 x_offset, y_offset;
  43
  44         vbox = to_vbox_dev(crtc->dev);
  45         width = vbox_crtc->width ? vbox_crtc->width : 640;
  46         height = vbox_crtc->height ? vbox_crtc->height : 480;
  47         bpp = fb ? fb->format->cpp[0] * 8 : 32;
  48         pitch = fb ? fb->pitches[0] : width * bpp / 8;
  49         x_offset = vbox->single_framebuffer ? vbox_crtc->x : vbox_crtc->x_hint;
  50         y_offset = vbox->single_framebuffer ? vbox_crtc->y : vbox_crtc->y_hint;
  51
  52         /*
  53          * This is the old way of setting graphics modes.  It assumed one screen
  54          * and a frame-buffer at the start of video RAM.  On older versions of
  55          * VirtualBox, certain parts of the code still assume that the first
  56          * screen is programmed this way, so try to fake it.
  57          */
  58         if (vbox_crtc->crtc_id == 0 && fb &&
  59             vbox_crtc->fb_offset / pitch < 0xffff - crtc->y &&
  60             vbox_crtc->fb_offset % (bpp / 8) == 0) {
  61                 vbox_write_ioport(VBE_DISPI_INDEX_XRES, width);
  62                 vbox_write_ioport(VBE_DISPI_INDEX_YRES, height);
  63                 vbox_write_ioport(VBE_DISPI_INDEX_VIRT_WIDTH, pitch * 8 / bpp);
  64                 vbox_write_ioport(VBE_DISPI_INDEX_BPP, bpp);
  65                 vbox_write_ioport(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED);
  66                 vbox_write_ioport(VBE_DISPI_INDEX_X_OFFSET,
  67                         vbox_crtc->fb_offset % pitch / bpp * 8 + vbox_crtc->x);
  68                 vbox_write_ioport(VBE_DISPI_INDEX_Y_OFFSET,
  69                                   vbox_crtc->fb_offset / pitch + vbox_crtc->y);
  70         }
  71
  72         flags = VBVA_SCREEN_F_ACTIVE;
  73         flags |= (fb && crtc->state->enable) ? 0 : VBVA_SCREEN_F_BLANK;
  74         flags |= vbox_crtc->disconnected ? VBVA_SCREEN_F_DISABLED : 0;
  75         hgsmi_process_display_info(vbox->guest_pool, vbox_crtc->crtc_id,
  76                                    x_offset, y_offset,
  77                                    vbox_crtc->x * bpp / 8 +
  78                                                         vbox_crtc->y * pitch,
  79                                    pitch, width, height, bpp, flags);
  80 }
  81
  82 static int vbox_set_view(struct drm_crtc *crtc)
  83 {
  84         struct vbox_crtc *vbox_crtc = to_vbox_crtc(crtc);
  85         struct vbox_private *vbox = to_vbox_dev(crtc->dev);
  86         struct vbva_infoview *p;
  87
  88         /*
  89          * Tell the host about the view.  This design originally targeted the
  90          * Windows XP driver architecture and assumed that each screen would
  91          * have a dedicated frame buffer with the command buffer following it,
  92          * the whole being a "view".  The host works out which screen a command
  93          * buffer belongs to by checking whether it is in the first view, then
  94          * whether it is in the second and so on.  The first match wins.  We
  95          * cheat around this by making the first view be the managed memory
  96          * plus the first command buffer, the second the same plus the second
  97          * buffer and so on.
  98          */
  99         p = hgsmi_buffer_alloc(vbox->guest_pool, sizeof(*p),
 100                                HGSMI_CH_VBVA, VBVA_INFO_VIEW);
 101         if (!p)
 102                 return -ENOMEM;
 103
 104         p->view_index = vbox_crtc->crtc_id;
 105         p->view_offset = vbox_crtc->fb_offset;
 106         p->view_size = vbox->available_vram_size - vbox_crtc->fb_offset +
 107                        vbox_crtc->crtc_id * VBVA_MIN_BUFFER_SIZE;
 108         p->max_screen_size = vbox->available_vram_size - vbox_crtc->fb_offset;
 109
 110         hgsmi_buffer_submit(vbox->guest_pool, p);
 111         hgsmi_buffer_free(vbox->guest_pool, p);
 112
 113         return 0;
 114 }
 115
 116 /*
 117  * Try to map the layout of virtual screens to the range of the input device.
 118  * Return true if we need to re-set the crtc modes due to screen offset
 119  * changes.
 120  */
 121 static bool vbox_set_up_input_mapping(struct vbox_private *vbox)
 122 {
 123         struct drm_crtc *crtci;
 124         struct drm_connector *connectori;
 125         struct drm_framebuffer *fb, *fb1 = NULL;
 126         bool single_framebuffer = true;
 127         bool old_single_framebuffer = vbox->single_framebuffer;
 128         u16 width = 0, height = 0;
 129
 130         /*
 131          * Are we using an X.Org-style single large frame-buffer for all crtcs?
 132          * If so then screen layout can be deduced from the crtc offsets.
 133          * Same fall-back if this is the fbdev frame-buffer.
 134          */
 135         list_for_each_entry(crtci, &vbox->ddev.mode_config.crtc_list, head) {
 136                 fb = crtci->primary->state->fb;
 137                 if (!fb)
 138                         continue;
 139
 140                 if (!fb1) {
 141                         fb1 = fb;
 142                         if (fb1 == vbox->ddev.fb_helper->fb)
 143                                 break;
 144                 } else if (fb != fb1) {
 145                         single_framebuffer = false;
 146                 }
 147         }
 148         if (!fb1)
 149                 return false;
 150
 151         if (single_framebuffer) {
 152                 vbox->single_framebuffer = true;
 153                 vbox->input_mapping_width = fb1->width;
 154                 vbox->input_mapping_height = fb1->height;
 155                 return old_single_framebuffer != vbox->single_framebuffer;
 156         }
 157         /* Otherwise calculate the total span of all screens. */
 158         list_for_each_entry(connectori, &vbox->ddev.mode_config.connector_list,
 159                             head) {
 160                 struct vbox_connector *vbox_connector =
 161                     to_vbox_connector(connectori);
 162                 struct vbox_crtc *vbox_crtc = vbox_connector->vbox_crtc;
 163
 164                 width = max_t(u16, width, vbox_crtc->x_hint +
 165                                           vbox_connector->mode_hint.width);
 166                 height = max_t(u16, height, vbox_crtc->y_hint +
 167                                             vbox_connector->mode_hint.height);
 168         }
 169
 170         vbox->single_framebuffer = false;
 171         vbox->input_mapping_width = width;
 172         vbox->input_mapping_height = height;
 173
 174         return old_single_framebuffer != vbox->single_framebuffer;
 175 }
 176
 177 static void vbox_crtc_set_base_and_mode(struct drm_crtc *crtc,
 178                                         struct drm_framebuffer *fb,
 179                                         int x, int y)
 180 {
 181         struct drm_gem_vram_object *gbo = drm_gem_vram_of_gem(fb->obj[0]);
 182         struct vbox_private *vbox = to_vbox_dev(crtc->dev);
 183         struct vbox_crtc *vbox_crtc = to_vbox_crtc(crtc);
 184         bool needs_modeset = drm_atomic_crtc_needs_modeset(crtc->state);
 185
 186         mutex_lock(&vbox->hw_mutex);
 187
 188         if (crtc->state->enable) {
 189                 vbox_crtc->width = crtc->state->mode.hdisplay;
 190                 vbox_crtc->height = crtc->state->mode.vdisplay;
 191         }
 192
 193         vbox_crtc->x = x;
 194         vbox_crtc->y = y;
 195         vbox_crtc->fb_offset = drm_gem_vram_offset(gbo);
 196
 197         /* vbox_do_modeset() checks vbox->single_framebuffer so update it now */
 198         if (needs_modeset && vbox_set_up_input_mapping(vbox)) {
 199                 struct drm_crtc *crtci;
 200
 201                 list_for_each_entry(crtci, &vbox->ddev.mode_config.crtc_list,
 202                                     head) {
 203                         if (crtci == crtc)
 204                                 continue;
 205                         vbox_do_modeset(crtci);
 206                 }
 207         }
 208
 209         vbox_set_view(crtc);
 210         vbox_do_modeset(crtc);
 211
 212         if (needs_modeset)
 213                 hgsmi_update_input_mapping(vbox->guest_pool, 0, 0,
 214                                            vbox->input_mapping_width,
 215                                            vbox->input_mapping_height);
 216
 217         mutex_unlock(&vbox->hw_mutex);
 218 }
 219
 220 static void vbox_crtc_atomic_enable(struct drm_crtc *crtc,
 221                                     struct drm_atomic_state *state)
 222 {
 223 }
 224
 225 static void vbox_crtc_atomic_disable(struct drm_crtc *crtc,
 226                                      struct drm_atomic_state *state)
 227 {
 228 }
 229
 230 static void vbox_crtc_atomic_flush(struct drm_crtc *crtc,
 231                                    struct drm_atomic_state *state)
 232 {
 233 }
 234
 235 static const struct drm_crtc_helper_funcs vbox_crtc_helper_funcs = {
 236         .atomic_enable = vbox_crtc_atomic_enable,
 237         .atomic_disable = vbox_crtc_atomic_disable,
 238         .atomic_flush = vbox_crtc_atomic_flush,
 239 };
 240
 241 static void vbox_crtc_destroy(struct drm_crtc *crtc)
 242 {
 243         drm_crtc_cleanup(crtc);
 244         kfree(crtc);
 245 }
 246
 247 static const struct drm_crtc_funcs vbox_crtc_funcs = {
 248         .set_config = drm_atomic_helper_set_config,
 249         .page_flip = drm_atomic_helper_page_flip,
 250         /* .gamma_set = vbox_crtc_gamma_set, */
 251         .destroy = vbox_crtc_destroy,
 252         .reset = drm_atomic_helper_crtc_reset,
 253         .atomic_duplicate_state = drm_atomic_helper_crtc_duplicate_state,
 254         .atomic_destroy_state = drm_atomic_helper_crtc_destroy_state,
 255 };
 256
 257 static int vbox_primary_atomic_check(struct drm_plane *plane,
 258                                      struct drm_atomic_state *state)
 259 {
 260         struct drm_plane_state *new_state = drm_atomic_get_new_plane_state(state,
 261                                                                            plane);
 262         struct drm_crtc_state *crtc_state = NULL;
 263
 264         if (new_state->crtc) {
 265                 crtc_state = drm_atomic_get_existing_crtc_state(state,
 266                                                                 new_state->crtc);
 267                 if (WARN_ON(!crtc_state))
 268                         return -EINVAL;
 269         }
 270
 271         return drm_atomic_helper_check_plane_state(new_state, crtc_state,
 272                                                    DRM_PLANE_NO_SCALING,
 273                                                    DRM_PLANE_NO_SCALING,
 274                                                    false, true);
 275 }
 276
 277 static void vbox_primary_atomic_update(struct drm_plane *plane,
 278                                        struct drm_atomic_state *state)
 279 {
 280         struct drm_plane_state *new_state = drm_atomic_get_new_plane_state(state,
 281                                                                            plane);
 282         struct drm_crtc *crtc = new_state->crtc;
 283         struct drm_framebuffer *fb = new_state->fb;
 284         struct vbox_private *vbox = to_vbox_dev(fb->dev);
 285         struct drm_mode_rect *clips;
 286         uint32_t num_clips, i;
 287
 288         vbox_crtc_set_base_and_mode(crtc, fb,
 289                                     new_state->src_x >> 16,
 290                                     new_state->src_y >> 16);
 291
 292         /* Send information about dirty rectangles to VBVA. */
 293
 294         clips = drm_plane_get_damage_clips(new_state);
 295         num_clips = drm_plane_get_damage_clips_count(new_state);
 296
 297         if (!num_clips)
 298                 return;
 299
 300         mutex_lock(&vbox->hw_mutex);
 301
 302         for (i = 0; i < num_clips; ++i, ++clips) {
 303                 struct vbva_cmd_hdr cmd_hdr;
 304                 unsigned int crtc_id = to_vbox_crtc(crtc)->crtc_id;
 305
 306                 cmd_hdr.x = (s16)clips->x1;
 307                 cmd_hdr.y = (s16)clips->y1;
 308                 cmd_hdr.w = (u16)clips->x2 - clips->x1;
 309                 cmd_hdr.h = (u16)clips->y2 - clips->y1;
 310
 311                 if (!vbva_buffer_begin_update(&vbox->vbva_info[crtc_id],
 312                                               vbox->guest_pool))
 313                         continue;
 314
 315                 vbva_write(&vbox->vbva_info[crtc_id], vbox->guest_pool,
 316                            &cmd_hdr, sizeof(cmd_hdr));
 317                 vbva_buffer_end_update(&vbox->vbva_info[crtc_id]);
 318         }
 319
 320         mutex_unlock(&vbox->hw_mutex);
 321 }
 322
 323 static void vbox_primary_atomic_disable(struct drm_plane *plane,
 324                                         struct drm_atomic_state *state)
 325 {
 326         struct drm_plane_state *old_state = drm_atomic_get_old_plane_state(state,
 327                                                                            plane);
 328         struct drm_crtc *crtc = old_state->crtc;
 329
 330         /* vbox_do_modeset checks plane->state->fb and will disable if NULL */
 331         vbox_crtc_set_base_and_mode(crtc, old_state->fb,
 332                                     old_state->src_x >> 16,
 333                                     old_state->src_y >> 16);
 334 }
 335
 336 static int vbox_cursor_atomic_check(struct drm_plane *plane,
 337                                     struct drm_atomic_state *state)
 338 {
 339         struct drm_plane_state *new_state = drm_atomic_get_new_plane_state(state,
 340                                                                            plane);
 341         struct drm_crtc_state *crtc_state = NULL;
 342         u32 width = new_state->crtc_w;
 343         u32 height = new_state->crtc_h;
 344         int ret;
 345
 346         if (new_state->crtc) {
 347                 crtc_state = drm_atomic_get_existing_crtc_state(state,
 348                                                                 new_state->crtc);
 349                 if (WARN_ON(!crtc_state))
 350                         return -EINVAL;
 351         }
 352
 353         ret = drm_atomic_helper_check_plane_state(new_state, crtc_state,
 354                                                   DRM_PLANE_NO_SCALING,
 355                                                   DRM_PLANE_NO_SCALING,
 356                                                   true, true);
 357         if (ret)
 358                 return ret;
 359
 360         if (!new_state->fb)
 361                 return 0;
 362
 363         if (width > VBOX_MAX_CURSOR_WIDTH || height > VBOX_MAX_CURSOR_HEIGHT ||
 364             width == 0 || height == 0)
 365                 return -EINVAL;
 366
 367         return 0;
 368 }
 369
 370 /*
 371  * Copy the ARGB image and generate the mask, which is needed in case the host
 372  * does not support ARGB cursors.  The mask is a 1BPP bitmap with the bit set
 373  * if the corresponding alpha value in the ARGB image is greater than 0xF0.
 374  */
 375 static void copy_cursor_image(u8 *src, u8 *dst, u32 width, u32 height,
 376                               size_t mask_size)
 377 {
 378         size_t line_size = (width + 7) / 8;
 379         u32 i, j;
 380
 381         memcpy(dst + mask_size, src, width * height * 4);
 382         for (i = 0; i < height; ++i)
 383                 for (j = 0; j < width; ++j)
 384                         if (((u32 *)src)[i * width + j] > 0xf0000000)
 385                                 dst[i * line_size + j / 8] |= (0x80 >> (j % 8));
 386 }
 387
 388 static void vbox_cursor_atomic_update(struct drm_plane *plane,
 389                                       struct drm_atomic_state *state)
 390 {
 391         struct drm_plane_state *old_state = drm_atomic_get_old_plane_state(state,
 392                                                                            plane);
 393         struct drm_plane_state *new_state = drm_atomic_get_new_plane_state(state,
 394                                                                            plane);
 395         struct vbox_private *vbox =
 396                 container_of(plane->dev, struct vbox_private, ddev);
 397         struct vbox_crtc *vbox_crtc = to_vbox_crtc(new_state->crtc);
 398         struct drm_framebuffer *fb = new_state->fb;
 399         u32 width = new_state->crtc_w;
 400         u32 height = new_state->crtc_h;
 401         struct drm_shadow_plane_state *shadow_plane_state =
 402                 to_drm_shadow_plane_state(new_state);
 403         struct iosys_map map = shadow_plane_state->data[0];
 404         u8 *src = map.vaddr; /* TODO: Use mapping abstraction properly */
 405         size_t data_size, mask_size;
 406         u32 flags;
 407
 408         /*
 409          * VirtualBox uses the host windowing system to draw the cursor so
 410          * moves are a no-op, we only need to upload new cursor sprites.
 411          */
 412         if (fb == old_state->fb)
 413                 return;
 414
 415         mutex_lock(&vbox->hw_mutex);
 416
 417         vbox_crtc->cursor_enabled = true;
 418
 419         /*
 420          * The mask must be calculated based on the alpha
 421          * channel, one bit per ARGB word, and must be 32-bit
 422          * padded.
 423          */
 424         mask_size = ((width + 7) / 8 * height + 3) & ~3;
 425         data_size = width * height * 4 + mask_size;
 426
 427         copy_cursor_image(src, vbox->cursor_data, width, height, mask_size);
 428
 429         flags = VBOX_MOUSE_POINTER_VISIBLE | VBOX_MOUSE_POINTER_SHAPE |
 430                 VBOX_MOUSE_POINTER_ALPHA;
 431         hgsmi_update_pointer_shape(vbox->guest_pool, flags,
 432                                    min_t(u32, max(new_state->hotspot_x, 0), width),
 433                                    min_t(u32, max(new_state->hotspot_y, 0), height),
 434                                    width, height, vbox->cursor_data, data_size);
 435
 436         mutex_unlock(&vbox->hw_mutex);
 437 }
 438
 439 static void vbox_cursor_atomic_disable(struct drm_plane *plane,
 440                                        struct drm_atomic_state *state)
 441 {
 442         struct drm_plane_state *old_state = drm_atomic_get_old_plane_state(state,
 443                                                                            plane);
 444         struct vbox_private *vbox =
 445                 container_of(plane->dev, struct vbox_private, ddev);
 446         struct vbox_crtc *vbox_crtc = to_vbox_crtc(old_state->crtc);
 447         bool cursor_enabled = false;
 448         struct drm_crtc *crtci;
 449
 450         mutex_lock(&vbox->hw_mutex);
 451
 452         vbox_crtc->cursor_enabled = false;
 453
 454         list_for_each_entry(crtci, &vbox->ddev.mode_config.crtc_list, head) {
 455                 if (to_vbox_crtc(crtci)->cursor_enabled)
 456                         cursor_enabled = true;
 457         }
 458
 459         if (!cursor_enabled)
 460                 hgsmi_update_pointer_shape(vbox->guest_pool, 0, 0, 0,
 461                                            0, 0, NULL, 0);
 462
 463         mutex_unlock(&vbox->hw_mutex);
 464 }
 465
 466 static const u32 vbox_cursor_plane_formats[] = {
 467         DRM_FORMAT_ARGB8888,
 468 };
 469
 470 static const struct drm_plane_helper_funcs vbox_cursor_helper_funcs = {
 471         .atomic_check   = vbox_cursor_atomic_check,
 472         .atomic_update  = vbox_cursor_atomic_update,
 473         .atomic_disable = vbox_cursor_atomic_disable,
 474         DRM_GEM_SHADOW_PLANE_HELPER_FUNCS,
 475 };
 476
 477 static const struct drm_plane_funcs vbox_cursor_plane_funcs = {
 478         .update_plane   = drm_atomic_helper_update_plane,
 479         .disable_plane  = drm_atomic_helper_disable_plane,
 480         .destroy        = drm_plane_helper_destroy,
 481         DRM_GEM_SHADOW_PLANE_FUNCS,
 482 };
 483
 484 static const u32 vbox_primary_plane_formats[] = {
 485         DRM_FORMAT_XRGB8888,
 486         DRM_FORMAT_ARGB8888,
 487 };
 488
 489 static const struct drm_plane_helper_funcs vbox_primary_helper_funcs = {
 490         .atomic_check = vbox_primary_atomic_check,
 491         .atomic_update = vbox_primary_atomic_update,
 492         .atomic_disable = vbox_primary_atomic_disable,
 493         DRM_GEM_VRAM_PLANE_HELPER_FUNCS,
 494 };
 495
 496 static const struct drm_plane_funcs vbox_primary_plane_funcs = {
 497         .update_plane   = drm_atomic_helper_update_plane,
 498         .disable_plane  = drm_atomic_helper_disable_plane,
 499         .destroy        = drm_plane_helper_destroy,
 500         .reset          = drm_atomic_helper_plane_reset,
 501         .atomic_duplicate_state = drm_atomic_helper_plane_duplicate_state,
 502         .atomic_destroy_state = drm_atomic_helper_plane_destroy_state,
 503 };
 504
 505 static struct drm_plane *vbox_create_plane(struct vbox_private *vbox,
 506                                            unsigned int possible_crtcs,
 507                                            enum drm_plane_type type)
 508 {
 509         const struct drm_plane_helper_funcs *helper_funcs = NULL;
 510         const struct drm_plane_funcs *funcs;
 511         struct drm_plane *plane;
 512         const u32 *formats;
 513         int num_formats;
 514         int err;
 515
 516         if (type == DRM_PLANE_TYPE_PRIMARY) {
 517                 funcs = &vbox_primary_plane_funcs;
 518                 formats = vbox_primary_plane_formats;
 519                 helper_funcs = &vbox_primary_helper_funcs;
 520                 num_formats = ARRAY_SIZE(vbox_primary_plane_formats);
 521         } else if (type == DRM_PLANE_TYPE_CURSOR) {
 522                 funcs = &vbox_cursor_plane_funcs;
 523                 formats = vbox_cursor_plane_formats;
 524                 helper_funcs = &vbox_cursor_helper_funcs;
 525                 num_formats = ARRAY_SIZE(vbox_cursor_plane_formats);
 526         } else {
 527                 return ERR_PTR(-EINVAL);
 528         }
 529
 530         plane = kzalloc(sizeof(*plane), GFP_KERNEL);
 531         if (!plane)
 532                 return ERR_PTR(-ENOMEM);
 533
 534         err = drm_universal_plane_init(&vbox->ddev, plane, possible_crtcs,
 535                                        funcs, formats, num_formats,
 536                                        NULL, type, NULL);
 537         if (err)
 538                 goto free_plane;
 539
 540         drm_plane_helper_add(plane, helper_funcs);
 541
 542         return plane;
 543
 544 free_plane:
 545         kfree(plane);
 546         return ERR_PTR(-EINVAL);
 547 }
 548
 549 static struct vbox_crtc *vbox_crtc_init(struct drm_device *dev, unsigned int i)
 550 {
 551         struct vbox_private *vbox =
 552                 container_of(dev, struct vbox_private, ddev);
 553         struct drm_plane *cursor = NULL;
 554         struct vbox_crtc *vbox_crtc;
 555         struct drm_plane *primary;
 556         u32 caps = 0;
 557         int ret;
 558
 559         ret = hgsmi_query_conf(vbox->guest_pool,
 560                                VBOX_VBVA_CONF32_CURSOR_CAPABILITIES, &caps);
 561         if (ret)
 562                 return ERR_PTR(ret);
 563
 564         vbox_crtc = kzalloc(sizeof(*vbox_crtc), GFP_KERNEL);
 565         if (!vbox_crtc)
 566                 return ERR_PTR(-ENOMEM);
 567
 568         primary = vbox_create_plane(vbox, 1 << i, DRM_PLANE_TYPE_PRIMARY);
 569         if (IS_ERR(primary)) {
 570                 ret = PTR_ERR(primary);
 571                 goto free_mem;
 572         }
 573
 574         if ((caps & VBOX_VBVA_CURSOR_CAPABILITY_HARDWARE)) {
 575                 cursor = vbox_create_plane(vbox, 1 << i, DRM_PLANE_TYPE_CURSOR);
 576                 if (IS_ERR(cursor)) {
 577                         ret = PTR_ERR(cursor);
 578                         goto clean_primary;
 579                 }
 580         } else {
 581                 DRM_WARN("VirtualBox host is too old, no cursor support\n");
 582         }
 583
 584         vbox_crtc->crtc_id = i;
 585
 586         ret = drm_crtc_init_with_planes(dev, &vbox_crtc->base, primary, cursor,
 587                                         &vbox_crtc_funcs, NULL);
 588         if (ret)
 589                 goto clean_cursor;
 590
 591         drm_mode_crtc_set_gamma_size(&vbox_crtc->base, 256);
 592         drm_crtc_helper_add(&vbox_crtc->base, &vbox_crtc_helper_funcs);
 593
 594         return vbox_crtc;
 595
 596 clean_cursor:
 597         if (cursor) {
 598                 drm_plane_cleanup(cursor);
 599                 kfree(cursor);
 600         }
 601 clean_primary:
 602         drm_plane_cleanup(primary);
 603         kfree(primary);
 604 free_mem:
 605         kfree(vbox_crtc);
 606         return ERR_PTR(ret);
 607 }
 608
 609 static void vbox_encoder_destroy(struct drm_encoder *encoder)
 610 {
 611         drm_encoder_cleanup(encoder);
 612         kfree(encoder);
 613 }
 614
 615 static const struct drm_encoder_funcs vbox_enc_funcs = {
 616         .destroy = vbox_encoder_destroy,
 617 };
 618
 619 static struct drm_encoder *vbox_encoder_init(struct drm_device *dev,
 620                                              unsigned int i)
 621 {
 622         struct vbox_encoder *vbox_encoder;
 623
 624         vbox_encoder = kzalloc(sizeof(*vbox_encoder), GFP_KERNEL);
 625         if (!vbox_encoder)
 626                 return NULL;
 627
 628         drm_encoder_init(dev, &vbox_encoder->base, &vbox_enc_funcs,
 629                          DRM_MODE_ENCODER_DAC, NULL);
 630
 631         vbox_encoder->base.possible_crtcs = 1 << i;
 632         return &vbox_encoder->base;
 633 }
 634
 635 /*
 636  * Generate EDID data with a mode-unique serial number for the virtual
 637  * monitor to try to persuade Unity that different modes correspond to
 638  * different monitors and it should not try to force the same resolution on
 639  * them.
 640  */
 641 static void vbox_set_edid(struct drm_connector *connector, int width,
 642                           int height)
 643 {
 644         enum { EDID_SIZE = 128 };
 645         unsigned char edid[EDID_SIZE] = {
 646                 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x00, /* header */
 647                 0x58, 0x58,     /* manufacturer (VBX) */
 648                 0x00, 0x00,     /* product code */
 649                 0x00, 0x00, 0x00, 0x00, /* serial number goes here */
 650                 0x01,           /* week of manufacture */
 651                 0x00,           /* year of manufacture */
 652                 0x01, 0x03,     /* EDID version */
 653                 0x80,           /* capabilities - digital */
 654                 0x00,           /* horiz. res in cm, zero for projectors */
 655                 0x00,           /* vert. res in cm */
 656                 0x78,           /* display gamma (120 == 2.2). */
 657                 0xEE,           /* features (standby, suspend, off, RGB, std */
 658                                 /* colour space, preferred timing mode) */
 659                 0xEE, 0x91, 0xA3, 0x54, 0x4C, 0x99, 0x26, 0x0F, 0x50, 0x54,
 660                 /* chromaticity for standard colour space. */
 661                 0x00, 0x00, 0x00,       /* no default timings */
 662                 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
 663                     0x01, 0x01,
 664                 0x01, 0x01, 0x01, 0x01, /* no standard timings */
 665                 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x06, 0x00, 0x02, 0x02,
 666                     0x02, 0x02,
 667                 /* descriptor block 1 goes below */
 668                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
 669                 /* descriptor block 2, monitor ranges */
 670                 0x00, 0x00, 0x00, 0xFD, 0x00,
 671                 0x00, 0xC8, 0x00, 0xC8, 0x64, 0x00, 0x0A, 0x20, 0x20, 0x20,
 672                     0x20, 0x20,
 673                 /* 0-200Hz vertical, 0-200KHz horizontal, 1000MHz pixel clock */
 674                 0x20,
 675                 /* descriptor block 3, monitor name */
 676                 0x00, 0x00, 0x00, 0xFC, 0x00,
 677                 'V', 'B', 'O', 'X', ' ', 'm', 'o', 'n', 'i', 't', 'o', 'r',
 678                 '\n',
 679                 /* descriptor block 4: dummy data */
 680                 0x00, 0x00, 0x00, 0x10, 0x00,
 681                 0x0A, 0x20, 0x20, 0x20, 0x20, 0x20,
 682                 0x20, 0x20, 0x20, 0x20, 0x20, 0x20,
 683                 0x20,
 684                 0x00,           /* number of extensions */
 685                 0x00            /* checksum goes here */
 686         };
 687         int clock = (width + 6) * (height + 6) * 60 / 10000;
 688         unsigned int i, sum = 0;
 689
 690         edid[12] = width & 0xff;
 691         edid[13] = width >> 8;
 692         edid[14] = height & 0xff;
 693         edid[15] = height >> 8;
 694         edid[54] = clock & 0xff;
 695         edid[55] = clock >> 8;
 696         edid[56] = width & 0xff;
 697         edid[58] = (width >> 4) & 0xf0;
 698         edid[59] = height & 0xff;
 699         edid[61] = (height >> 4) & 0xf0;
 700         for (i = 0; i < EDID_SIZE - 1; ++i)
 701                 sum += edid[i];
 702         edid[EDID_SIZE - 1] = (0x100 - (sum & 0xFF)) & 0xFF;
 703         drm_connector_update_edid_property(connector, (struct edid *)edid);
 704 }
 705
 706 static int vbox_get_modes(struct drm_connector *connector)
 707 {
 708         struct vbox_connector *vbox_connector = NULL;
 709         struct drm_display_mode *mode = NULL;
 710         struct vbox_private *vbox = NULL;
 711         unsigned int num_modes = 0;
 712         int preferred_width, preferred_height;
 713
 714         vbox_connector = to_vbox_connector(connector);
 715         vbox = to_vbox_dev(connector->dev);
 716
 717         hgsmi_report_flags_location(vbox->guest_pool, GUEST_HEAP_OFFSET(vbox) +
 718                                     HOST_FLAGS_OFFSET);
 719         if (vbox_connector->vbox_crtc->crtc_id == 0)
 720                 vbox_report_caps(vbox);
 721
 722         num_modes = drm_add_modes_noedid(connector, 2560, 1600);
 723         preferred_width = vbox_connector->mode_hint.width ?
 724                           vbox_connector->mode_hint.width : 1024;
 725         preferred_height = vbox_connector->mode_hint.height ?
 726                            vbox_connector->mode_hint.height : 768;
 727         mode = drm_cvt_mode(connector->dev, preferred_width, preferred_height,
 728                             60, false, false, false);
 729         if (mode) {
 730                 mode->type |= DRM_MODE_TYPE_PREFERRED;
 731                 drm_mode_probed_add(connector, mode);
 732                 ++num_modes;
 733         }
 734         vbox_set_edid(connector, preferred_width, preferred_height);
 735
 736         if (vbox_connector->vbox_crtc->x_hint != -1)
 737                 drm_object_property_set_value(&connector->base,
 738                         vbox->ddev.mode_config.suggested_x_property,
 739                         vbox_connector->vbox_crtc->x_hint);
 740         else
 741                 drm_object_property_set_value(&connector->base,
 742                         vbox->ddev.mode_config.suggested_x_property, 0);
 743
 744         if (vbox_connector->vbox_crtc->y_hint != -1)
 745                 drm_object_property_set_value(&connector->base,
 746                         vbox->ddev.mode_config.suggested_y_property,
 747                         vbox_connector->vbox_crtc->y_hint);
 748         else
 749                 drm_object_property_set_value(&connector->base,
 750                         vbox->ddev.mode_config.suggested_y_property, 0);
 751
 752         return num_modes;
 753 }
 754
 755 static void vbox_connector_destroy(struct drm_connector *connector)
 756 {
 757         drm_connector_unregister(connector);
 758         drm_connector_cleanup(connector);
 759         kfree(connector);
 760 }
 761
 762 static enum drm_connector_status
 763 vbox_connector_detect(struct drm_connector *connector, bool force)
 764 {
 765         struct vbox_connector *vbox_connector;
 766
 767         vbox_connector = to_vbox_connector(connector);
 768
 769         return vbox_connector->mode_hint.disconnected ?
 770             connector_status_disconnected : connector_status_connected;
 771 }
 772
 773 static int vbox_fill_modes(struct drm_connector *connector, u32 max_x,
 774                            u32 max_y)
 775 {
 776         struct vbox_connector *vbox_connector;
 777         struct drm_device *dev;
 778         struct drm_display_mode *mode, *iterator;
 779
 780         vbox_connector = to_vbox_connector(connector);
 781         dev = vbox_connector->base.dev;
 782         list_for_each_entry_safe(mode, iterator, &connector->modes, head) {
 783                 list_del(&mode->head);
 784                 drm_mode_destroy(dev, mode);
 785         }
 786
 787         return drm_helper_probe_single_connector_modes(connector, max_x, max_y);
 788 }
 789
 790 static const struct drm_connector_helper_funcs vbox_connector_helper_funcs = {
 791         .get_modes = vbox_get_modes,
 792 };
 793
 794 static const struct drm_connector_funcs vbox_connector_funcs = {
 795         .detect = vbox_connector_detect,
 796         .fill_modes = vbox_fill_modes,
 797         .destroy = vbox_connector_destroy,
 798         .reset = drm_atomic_helper_connector_reset,
 799         .atomic_duplicate_state = drm_atomic_helper_connector_duplicate_state,
 800         .atomic_destroy_state = drm_atomic_helper_connector_destroy_state,
 801 };
 802
 803 static int vbox_connector_init(struct drm_device *dev,
 804                                struct vbox_crtc *vbox_crtc,
 805                                struct drm_encoder *encoder)
 806 {
 807         struct vbox_connector *vbox_connector;
 808         struct drm_connector *connector;
 809
 810         vbox_connector = kzalloc(sizeof(*vbox_connector), GFP_KERNEL);
 811         if (!vbox_connector)
 812                 return -ENOMEM;
 813
 814         connector = &vbox_connector->base;
 815         vbox_connector->vbox_crtc = vbox_crtc;
 816
 817         drm_connector_init(dev, connector, &vbox_connector_funcs,
 818                            DRM_MODE_CONNECTOR_VGA);
 819         drm_connector_helper_add(connector, &vbox_connector_helper_funcs);
 820
 821         connector->interlace_allowed = 0;
 822         connector->doublescan_allowed = 0;
 823
 824         drm_mode_create_suggested_offset_properties(dev);
 825         drm_object_attach_property(&connector->base,
 826                                    dev->mode_config.suggested_x_property, 0);
 827         drm_object_attach_property(&connector->base,
 828                                    dev->mode_config.suggested_y_property, 0);
 829
 830         drm_connector_attach_encoder(connector, encoder);
 831
 832         return 0;
 833 }
 834
 835 static const struct drm_mode_config_funcs vbox_mode_funcs = {
 836         .fb_create = drm_gem_fb_create_with_dirty,
 837         .mode_valid = drm_vram_helper_mode_valid,
 838         .atomic_check = drm_atomic_helper_check,
 839         .atomic_commit = drm_atomic_helper_commit,
 840 };
 841
 842 int vbox_mode_init(struct vbox_private *vbox)
 843 {
 844         struct drm_device *dev = &vbox->ddev;
 845         struct drm_encoder *encoder;
 846         struct vbox_crtc *vbox_crtc;
 847         unsigned int i;
 848         int ret;
 849
 850         drm_mode_config_init(dev);
 851
 852         dev->mode_config.funcs = (void *)&vbox_mode_funcs;
 853         dev->mode_config.min_width = 0;
 854         dev->mode_config.min_height = 0;
 855         dev->mode_config.preferred_depth = 24;
 856         dev->mode_config.max_width = VBE_DISPI_MAX_XRES;
 857         dev->mode_config.max_height = VBE_DISPI_MAX_YRES;
 858
 859         for (i = 0; i < vbox->num_crtcs; ++i) {
 860                 vbox_crtc = vbox_crtc_init(dev, i);
 861                 if (IS_ERR(vbox_crtc)) {
 862                         ret = PTR_ERR(vbox_crtc);
 863                         goto err_drm_mode_cleanup;
 864                 }
 865                 encoder = vbox_encoder_init(dev, i);
 866                 if (!encoder) {
 867                         ret = -ENOMEM;
 868                         goto err_drm_mode_cleanup;
 869                 }
 870                 ret = vbox_connector_init(dev, vbox_crtc, encoder);
 871                 if (ret)
 872                         goto err_drm_mode_cleanup;
 873         }
 874
 875         drm_mode_config_reset(dev);
 876         return 0;
 877
 878 err_drm_mode_cleanup:
 879         drm_mode_config_cleanup(dev);
 880         return ret;
 881 }
 882
 883 void vbox_mode_fini(struct vbox_private *vbox)
 884 {
 885         drm_mode_config_cleanup(&vbox->ddev);
 886 }