hw/display/qxl-render.c

   1 /*
   2  * qxl local rendering (aka display on sdl/vnc)
   3  *
   4  * Copyright (C) 2010 Red Hat, Inc.
   5  *
   6  * maintained by Gerd Hoffmann <kraxel@redhat.com>
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 or
  11  * (at your option) version 3 of the License.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22 #include "qemu/osdep.h"
  23 #include "qxl.h"
  24 #include "trace.h"
  25
  26 static void qxl_blit(PCIQXLDevice *qxl, QXLRect *rect)
  27 {
  28     DisplaySurface *surface = qemu_console_surface(qxl->vga.con);
  29     uint8_t *dst = surface_data(surface);
  30     uint8_t *src;
  31     int len, i;
  32
  33     if (is_buffer_shared(surface)) {
  34         return;
  35     }
  36     trace_qxl_render_blit(qxl->guest_primary.qxl_stride,
  37             rect->left, rect->right, rect->top, rect->bottom);
  38     src = qxl->guest_primary.data;
  39     if (qxl->guest_primary.qxl_stride < 0) {
  40         /* qxl surface is upside down, walk src scanlines
  41          * in reverse order to flip it */
  42         src += (qxl->guest_primary.surface.height - rect->top - 1) *
  43             qxl->guest_primary.abs_stride;
  44     } else {
  45         src += rect->top * qxl->guest_primary.abs_stride;
  46     }
  47     dst += rect->top  * qxl->guest_primary.abs_stride;
  48     src += rect->left * qxl->guest_primary.bytes_pp;
  49     dst += rect->left * qxl->guest_primary.bytes_pp;
  50     len  = (rect->right - rect->left) * qxl->guest_primary.bytes_pp;
  51
  52     for (i = rect->top; i < rect->bottom; i++) {
  53         memcpy(dst, src, len);
  54         dst += qxl->guest_primary.abs_stride;
  55         src += qxl->guest_primary.qxl_stride;
  56     }
  57 }
  58
  59 void qxl_render_resize(PCIQXLDevice *qxl)
  60 {
  61     QXLSurfaceCreate *sc = &qxl->guest_primary.surface;
  62
  63     qxl->guest_primary.qxl_stride = sc->stride;
  64     qxl->guest_primary.abs_stride = abs(sc->stride);
  65     qxl->guest_primary.resized++;
  66     switch (sc->format) {
  67     case SPICE_SURFACE_FMT_16_555:
  68         qxl->guest_primary.bytes_pp = 2;
  69         qxl->guest_primary.bits_pp = 15;
  70         break;
  71     case SPICE_SURFACE_FMT_16_565:
  72         qxl->guest_primary.bytes_pp = 2;
  73         qxl->guest_primary.bits_pp = 16;
  74         break;
  75     case SPICE_SURFACE_FMT_32_xRGB:
  76     case SPICE_SURFACE_FMT_32_ARGB:
  77         qxl->guest_primary.bytes_pp = 4;
  78         qxl->guest_primary.bits_pp = 32;
  79         break;
  80     default:
  81         fprintf(stderr, "%s: unhandled format: %x\n", __func__,
  82                 qxl->guest_primary.surface.format);
  83         qxl->guest_primary.bytes_pp = 4;
  84         qxl->guest_primary.bits_pp = 32;
  85         break;
  86     }
  87 }
  88
  89 static void qxl_set_rect_to_surface(PCIQXLDevice *qxl, QXLRect *area)
  90 {
  91     area->left   = 0;
  92     area->right  = qxl->guest_primary.surface.width;
  93     area->top    = 0;
  94     area->bottom = qxl->guest_primary.surface.height;
  95 }
  96
  97 static void qxl_render_update_area_unlocked(PCIQXLDevice *qxl)
  98 {
  99     VGACommonState *vga = &qxl->vga;
 100     DisplaySurface *surface;
 101     int width = qxl->guest_head0_width ?: qxl->guest_primary.surface.width;
 102     int height = qxl->guest_head0_height ?: qxl->guest_primary.surface.height;
 103     int i;
 104
 105     if (qxl->guest_primary.resized) {
 106         qxl->guest_primary.resized = 0;
 107         qxl->guest_primary.data = qxl_phys2virt(qxl,
 108                                                 qxl->guest_primary.surface.mem,
 109                                                 MEMSLOT_GROUP_GUEST);
 110         if (!qxl->guest_primary.data) {
 111             return;
 112         }
 113         qxl_set_rect_to_surface(qxl, &qxl->dirty[0]);
 114         qxl->num_dirty_rects = 1;
 115         trace_qxl_render_guest_primary_resized(
 116                width,
 117                height,
 118                qxl->guest_primary.qxl_stride,
 119                qxl->guest_primary.bytes_pp,
 120                qxl->guest_primary.bits_pp);
 121         if (qxl->guest_primary.qxl_stride > 0) {
 122             pixman_format_code_t format =
 123                 qemu_default_pixman_format(qxl->guest_primary.bits_pp, true);
 124             surface = qemu_create_displaysurface_from
 125                 (width,
 126                  height,
 127                  format,
 128                  qxl->guest_primary.abs_stride,
 129                  qxl->guest_primary.data);
 130         } else {
 131             surface = qemu_create_displaysurface
 132                 (width,
 133                  height);
 134         }
 135         dpy_gfx_replace_surface(vga->con, surface);
 136     }
 137
 138     if (!qxl->guest_primary.data) {
 139         return;
 140     }
 141     for (i = 0; i < qxl->num_dirty_rects; i++) {
 142         if (qemu_spice_rect_is_empty(qxl->dirty+i)) {
 143             break;
 144         }
 145         if (qxl->dirty[i].left < 0 ||
 146             qxl->dirty[i].top < 0 ||
 147             qxl->dirty[i].left > qxl->dirty[i].right ||
 148             qxl->dirty[i].top > qxl->dirty[i].bottom ||
 149             qxl->dirty[i].right > width ||
 150             qxl->dirty[i].bottom > height) {
 151             continue;
 152         }
 153         qxl_blit(qxl, qxl->dirty+i);
 154         dpy_gfx_update(vga->con,
 155                        qxl->dirty[i].left, qxl->dirty[i].top,
 156                        qxl->dirty[i].right - qxl->dirty[i].left,
 157                        qxl->dirty[i].bottom - qxl->dirty[i].top);
 158     }
 159     qxl->num_dirty_rects = 0;
 160 }
 161
 162 /*
 163  * use ssd.lock to protect render_update_cookie_num.
 164  * qxl_render_update is called by io thread or vcpu thread, and the completion
 165  * callbacks are called by spice_server thread, deferring to bh called from the
 166  * io thread.
 167  */
 168 void qxl_render_update(PCIQXLDevice *qxl)
 169 {
 170     QXLCookie *cookie;
 171
 172     qemu_mutex_lock(&qxl->ssd.lock);
 173
 174     if (!runstate_is_running() || !qxl->guest_primary.commands ||
 175         qxl->mode == QXL_MODE_UNDEFINED) {
 176         qxl_render_update_area_unlocked(qxl);
 177         qemu_mutex_unlock(&qxl->ssd.lock);
 178         return;
 179     }
 180
 181     qxl->guest_primary.commands = 0;
 182     qxl->render_update_cookie_num++;
 183     qemu_mutex_unlock(&qxl->ssd.lock);
 184     cookie = qxl_cookie_new(QXL_COOKIE_TYPE_RENDER_UPDATE_AREA,
 185                             0);
 186     qxl_set_rect_to_surface(qxl, &cookie->u.render.area);
 187     qxl_spice_update_area(qxl, 0, &cookie->u.render.area, NULL,
 188                           0, 1 /* clear_dirty_region */, QXL_ASYNC, cookie);
 189 }
 190
 191 void qxl_render_update_area_bh(void *opaque)
 192 {
 193     PCIQXLDevice *qxl = opaque;
 194
 195     qemu_mutex_lock(&qxl->ssd.lock);
 196     qxl_render_update_area_unlocked(qxl);
 197     qemu_mutex_unlock(&qxl->ssd.lock);
 198 }
 199
 200 void qxl_render_update_area_done(PCIQXLDevice *qxl, QXLCookie *cookie)
 201 {
 202     qemu_mutex_lock(&qxl->ssd.lock);
 203     trace_qxl_render_update_area_done(cookie);
 204     qemu_bh_schedule(qxl->update_area_bh);
 205     qxl->render_update_cookie_num--;
 206     qemu_mutex_unlock(&qxl->ssd.lock);
 207     g_free(cookie);
 208 }
 209
 210 static void qxl_unpack_chunks(void *dest, size_t size, PCIQXLDevice *qxl,
 211                               QXLDataChunk *chunk, uint32_t group_id)
 212 {
 213     uint32_t max_chunks = 32;
 214     size_t offset = 0;
 215     size_t bytes;
 216
 217     for (;;) {
 218         bytes = MIN(size - offset, chunk->data_size);
 219         memcpy(dest + offset, chunk->data, bytes);
 220         offset += bytes;
 221         if (offset == size) {
 222             return;
 223         }
 224         chunk = qxl_phys2virt(qxl, chunk->next_chunk, group_id);
 225         if (!chunk) {
 226             return;
 227         }
 228         max_chunks--;
 229         if (max_chunks == 0) {
 230             return;
 231         }
 232     }
 233 }
 234
 235 static QEMUCursor *qxl_cursor(PCIQXLDevice *qxl, QXLCursor *cursor,
 236                               uint32_t group_id)
 237 {
 238     QEMUCursor *c;
 239     uint8_t *and_mask, *xor_mask;
 240     size_t size;
 241
 242     c = cursor_alloc(cursor->header.width, cursor->header.height);
 243     c->hot_x = cursor->header.hot_spot_x;
 244     c->hot_y = cursor->header.hot_spot_y;
 245     switch (cursor->header.type) {
 246     case SPICE_CURSOR_TYPE_MONO:
 247         /* Assume that the full cursor is available in a single chunk. */
 248         size = 2 * cursor_get_mono_bpl(c) * c->height;
 249         if (size != cursor->data_size) {
 250             fprintf(stderr, "%s: bad monochrome cursor %ux%u with size %u\n",
 251                     __func__, c->width, c->height, cursor->data_size);
 252             goto fail;
 253         }
 254         and_mask = cursor->chunk.data;
 255         xor_mask = and_mask + cursor_get_mono_bpl(c) * c->height;
 256         cursor_set_mono(c, 0xffffff, 0x000000, xor_mask, 1, and_mask);
 257         if (qxl->debug > 2) {
 258             cursor_print_ascii_art(c, "qxl/mono");
 259         }
 260         break;
 261     case SPICE_CURSOR_TYPE_ALPHA:
 262         size = sizeof(uint32_t) * cursor->header.width * cursor->header.height;
 263         qxl_unpack_chunks(c->data, size, qxl, &cursor->chunk, group_id);
 264         if (qxl->debug > 2) {
 265             cursor_print_ascii_art(c, "qxl/alpha");
 266         }
 267         break;
 268     default:
 269         fprintf(stderr, "%s: not implemented: type %d\n",
 270                 __func__, cursor->header.type);
 271         goto fail;
 272     }
 273     return c;
 274
 275 fail:
 276     cursor_put(c);
 277     return NULL;
 278 }
 279
 280
 281 /* called from spice server thread context only */
 282 int qxl_render_cursor(PCIQXLDevice *qxl, QXLCommandExt *ext)
 283 {
 284     QXLCursorCmd *cmd = qxl_phys2virt(qxl, ext->cmd.data, ext->group_id);
 285     QXLCursor *cursor;
 286     QEMUCursor *c;
 287
 288     if (!cmd) {
 289         return 1;
 290     }
 291
 292     if (!dpy_cursor_define_supported(qxl->vga.con)) {
 293         return 0;
 294     }
 295
 296     if (qxl->debug > 1 && cmd->type != QXL_CURSOR_MOVE) {
 297         fprintf(stderr, "%s", __func__);
 298         qxl_log_cmd_cursor(qxl, cmd, ext->group_id);
 299         fprintf(stderr, "\n");
 300     }
 301     switch (cmd->type) {
 302     case QXL_CURSOR_SET:
 303         cursor = qxl_phys2virt(qxl, cmd->u.set.shape, ext->group_id);
 304         if (!cursor) {
 305             return 1;
 306         }
 307         c = qxl_cursor(qxl, cursor, ext->group_id);
 308         if (c == NULL) {
 309             c = cursor_builtin_left_ptr();
 310         }
 311         qemu_mutex_lock(&qxl->ssd.lock);
 312         if (qxl->ssd.cursor) {
 313             cursor_put(qxl->ssd.cursor);
 314         }
 315         qxl->ssd.cursor = c;
 316         qxl->ssd.mouse_x = cmd->u.set.position.x;
 317         qxl->ssd.mouse_y = cmd->u.set.position.y;
 318         qemu_mutex_unlock(&qxl->ssd.lock);
 319         qemu_bh_schedule(qxl->ssd.cursor_bh);
 320         break;
 321     case QXL_CURSOR_MOVE:
 322         qemu_mutex_lock(&qxl->ssd.lock);
 323         qxl->ssd.mouse_x = cmd->u.position.x;
 324         qxl->ssd.mouse_y = cmd->u.position.y;
 325         qemu_mutex_unlock(&qxl->ssd.lock);
 326         qemu_bh_schedule(qxl->ssd.cursor_bh);
 327         break;
 328     }
 329     return 0;
 330 }