src/glx/dri2_glx.c

   1 /*
   2  * Copyright © 2008 Red Hat, Inc.
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Soft-
   6  * ware"), to deal in the Software without restriction, including without
   7  * limitation the rights to use, copy, modify, merge, publish, distribute,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, provided that the above copyright
  10  * notice(s) and this permission notice appear in all copies of the Soft-
  11  * ware and that both the above copyright notice(s) and this permission
  12  * notice appear in supporting documentation.
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  15  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABIL-
  16  * ITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY
  17  * RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS INCLUDED IN
  18  * THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT OR CONSE-
  19  * QUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
  20  * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
  21  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFOR-
  22  * MANCE OF THIS SOFTWARE.
  23  *
  24  * Except as contained in this notice, the name of a copyright holder shall
  25  * not be used in advertising or otherwise to promote the sale, use or
  26  * other dealings in this Software without prior written authorization of
  27  * the copyright holder.
  28  *
  29  * Authors:
  30  *   Kristian Høgsberg (krh@redhat.com)
  31  */
  32
  33 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
  34
  35 #include <X11/Xlib.h>
  36 #include <X11/extensions/Xfixes.h>
  37 #include <X11/extensions/Xdamage.h>
  38 #include "glapi.h"
  39 #include "glxclient.h"
  40 #include <X11/extensions/dri2proto.h>
  41 #include "xf86dri.h"
  42 #include <dlfcn.h>
  43 #include <fcntl.h>
  44 #include <unistd.h>
  45 #include <sys/types.h>
  46 #include <sys/mman.h>
  47 #include "xf86drm.h"
  48 #include "dri2.h"
  49 #include "dri_common.h"
  50
  51 /* From xmlpool/options.h, user exposed so should be stable */
  52 #define DRI_CONF_VBLANK_NEVER 0
  53 #define DRI_CONF_VBLANK_DEF_INTERVAL_0 1
  54 #define DRI_CONF_VBLANK_DEF_INTERVAL_1 2
  55 #define DRI_CONF_VBLANK_ALWAYS_SYNC 3
  56
  57 #undef DRI2_MINOR
  58 #define DRI2_MINOR 1
  59
  60 struct dri2_display
  61 {
  62    __GLXDRIdisplay base;
  63
  64    /*
  65     ** XFree86-DRI version information
  66     */
  67    int driMajor;
  68    int driMinor;
  69    int driPatch;
  70    int swapAvailable;
  71    int invalidateAvailable;
  72
  73    __glxHashTable *dri2Hash;
  74
  75    const __DRIextension *loader_extensions[4];
  76 };
  77
  78 struct dri2_screen {
  79    struct glx_screen base;
  80
  81    __DRIscreen *driScreen;
  82    __GLXDRIscreen vtable;
  83    const __DRIdri2Extension *dri2;
  84    const __DRIcoreExtension *core;
  85
  86    const __DRI2flushExtension *f;
  87    const __DRI2configQueryExtension *config;
  88    const __DRItexBufferExtension *texBuffer;
  89    const __DRIconfig **driver_configs;
  90
  91    void *driver;
  92    int fd;
  93 };
  94
  95 struct dri2_context
  96 {
  97    struct glx_context base;
  98    __DRIcontext *driContext;
  99 };
 100
 101 struct dri2_drawable
 102 {
 103    __GLXDRIdrawable base;
 104    __DRIdrawable *driDrawable;
 105    __DRIbuffer buffers[5];
 106    int bufferCount;
 107    int width, height;
 108    int have_back;
 109    int have_fake_front;
 110    int swap_interval;
 111 };
 112
 113 static const struct glx_context_vtable dri2_context_vtable;
 114
 115 static void
 116 dri2_destroy_context(struct glx_context *context)
 117 {
 118    struct dri2_context *pcp = (struct dri2_context *) context;
 119    struct dri2_screen *psc = (struct dri2_screen *) context->psc;
 120
 121    driReleaseDrawables(&pcp->base);
 122
 123    if (context->xid)
 124       glx_send_destroy_context(psc->base.dpy, context->xid);
 125
 126    if (context->extensions)
 127       XFree((char *) context->extensions);
 128
 129    (*psc->core->destroyContext) (pcp->driContext);
 130
 131    Xfree(pcp);
 132 }
 133
 134 static Bool
 135 dri2_bind_context(struct glx_context *context, struct glx_context *old,
 136                   GLXDrawable draw, GLXDrawable read)
 137 {
 138    struct dri2_context *pcp = (struct dri2_context *) context;
 139    struct dri2_screen *psc = (struct dri2_screen *) pcp->base.psc;
 140    struct dri2_drawable *pdraw, *pread;
 141    struct dri2_display *pdp;
 142
 143    pdraw = (struct dri2_drawable *) driFetchDrawable(context, draw);
 144    pread = (struct dri2_drawable *) driFetchDrawable(context, read);
 145
 146    if (pdraw == NULL || pread == NULL)
 147       return GLXBadDrawable;
 148
 149    if (!(*psc->core->bindContext) (pcp->driContext,
 150                                    pdraw->driDrawable, pread->driDrawable))
 151       return GLXBadContext;
 152
 153    /* If the server doesn't send invalidate events, we may miss a
 154     * resize before the rendering starts.  Invalidate the buffers now
 155     * so the driver will recheck before rendering starts. */
 156    pdp = (struct dri2_display *) psc->base.display;
 157    if (!pdp->invalidateAvailable) {
 158       dri2InvalidateBuffers(psc->base.dpy, pdraw->base.xDrawable);
 159       if (pread != pdraw)
 160          dri2InvalidateBuffers(psc->base.dpy, pread->base.xDrawable);
 161    }
 162
 163    return Success;
 164 }
 165
 166 static void
 167 dri2_unbind_context(struct glx_context *context, struct glx_context *new)
 168 {
 169    struct dri2_context *pcp = (struct dri2_context *) context;
 170    struct dri2_screen *psc = (struct dri2_screen *) pcp->base.psc;
 171
 172    (*psc->core->unbindContext) (pcp->driContext);
 173
 174    if (context == new)
 175       driReleaseDrawables(&pcp->base);
 176 }
 177
 178 static struct glx_context *
 179 dri2_create_context(struct glx_screen *base,
 180                     struct glx_config *config_base,
 181                     struct glx_context *shareList, int renderType)
 182 {
 183    struct dri2_context *pcp, *pcp_shared;
 184    struct dri2_screen *psc = (struct dri2_screen *) base;
 185    __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
 186    __DRIcontext *shared = NULL;
 187
 188    if (shareList) {
 189       pcp_shared = (struct dri2_context *) shareList;
 190       shared = pcp_shared->driContext;
 191    }
 192
 193    pcp = Xmalloc(sizeof *pcp);
 194    if (pcp == NULL)
 195       return NULL;
 196
 197    memset(pcp, 0, sizeof *pcp);
 198    if (!glx_context_init(&pcp->base, &psc->base, &config->base)) {
 199       Xfree(pcp);
 200       return NULL;
 201    }
 202
 203    pcp->driContext =
 204       (*psc->dri2->createNewContext) (psc->driScreen,
 205                                       config->driConfig, shared, pcp);
 206
 207    if (pcp->driContext == NULL) {
 208       Xfree(pcp);
 209       return NULL;
 210    }
 211
 212    pcp->base.vtable = &dri2_context_vtable;
 213
 214    return &pcp->base;
 215 }
 216
 217 static void
 218 dri2DestroyDrawable(__GLXDRIdrawable *base)
 219 {
 220    struct dri2_screen *psc = (struct dri2_screen *) base->psc;
 221    struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
 222    struct glx_display *dpyPriv = psc->base.display;
 223    struct dri2_display *pdp = (struct dri2_display *)dpyPriv->dri2Display;
 224
 225    __glxHashDelete(pdp->dri2Hash, pdraw->base.xDrawable);
 226    (*psc->core->destroyDrawable) (pdraw->driDrawable);
 227
 228    /* If it's a GLX 1.3 drawables, we can destroy the DRI2 drawable
 229     * now, as the application explicitly asked to destroy the GLX
 230     * drawable.  Otherwise, for legacy drawables, we let the DRI2
 231     * drawable linger on the server, since there's no good way of
 232     * knowing when the application is done with it.  The server will
 233     * destroy the DRI2 drawable when it destroys the X drawable or the
 234     * client exits anyway. */
 235    if (pdraw->base.xDrawable != pdraw->base.drawable)
 236       DRI2DestroyDrawable(psc->base.dpy, pdraw->base.xDrawable);
 237
 238    Xfree(pdraw);
 239 }
 240
 241 static __GLXDRIdrawable *
 242 dri2CreateDrawable(struct glx_screen *base, XID xDrawable,
 243                    GLXDrawable drawable, struct glx_config *config_base)
 244 {
 245    struct dri2_drawable *pdraw;
 246    struct dri2_screen *psc = (struct dri2_screen *) base;
 247    __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
 248    struct glx_display *dpyPriv;
 249    struct dri2_display *pdp;
 250    GLint vblank_mode = DRI_CONF_VBLANK_DEF_INTERVAL_1;
 251
 252    pdraw = Xmalloc(sizeof(*pdraw));
 253    if (!pdraw)
 254       return NULL;
 255
 256    memset(pdraw, 0, sizeof *pdraw);
 257    pdraw->base.destroyDrawable = dri2DestroyDrawable;
 258    pdraw->base.xDrawable = xDrawable;
 259    pdraw->base.drawable = drawable;
 260    pdraw->base.psc = &psc->base;
 261    pdraw->bufferCount = 0;
 262    pdraw->swap_interval = 1; /* default may be overridden below */
 263    pdraw->have_back = 0;
 264
 265    if (psc->config)
 266       psc->config->configQueryi(psc->driScreen,
 267                                 "vblank_mode", &vblank_mode);
 268
 269    switch (vblank_mode) {
 270    case DRI_CONF_VBLANK_NEVER:
 271    case DRI_CONF_VBLANK_DEF_INTERVAL_0:
 272       pdraw->swap_interval = 0;
 273       break;
 274    case DRI_CONF_VBLANK_DEF_INTERVAL_1:
 275    case DRI_CONF_VBLANK_ALWAYS_SYNC:
 276    default:
 277       pdraw->swap_interval = 1;
 278       break;
 279    }
 280
 281    DRI2CreateDrawable(psc->base.dpy, xDrawable);
 282
 283    dpyPriv = __glXInitialize(psc->base.dpy);
 284    pdp = (struct dri2_display *)dpyPriv->dri2Display;;
 285    /* Create a new drawable */
 286    pdraw->driDrawable =
 287       (*psc->dri2->createNewDrawable) (psc->driScreen,
 288                                        config->driConfig, pdraw);
 289
 290    if (!pdraw->driDrawable) {
 291       DRI2DestroyDrawable(psc->base.dpy, xDrawable);
 292       Xfree(pdraw);
 293       return NULL;
 294    }
 295
 296    if (__glxHashInsert(pdp->dri2Hash, xDrawable, pdraw)) {
 297       (*psc->core->destroyDrawable) (pdraw->driDrawable);
 298       DRI2DestroyDrawable(psc->base.dpy, xDrawable);
 299       Xfree(pdraw);
 300       return None;
 301    }
 302
 303
 304 #ifdef X_DRI2SwapInterval
 305    /*
 306     * Make sure server has the same swap interval we do for the new
 307     * drawable.
 308     */
 309    if (pdp->swapAvailable)
 310       DRI2SwapInterval(psc->base.dpy, xDrawable, pdraw->swap_interval);
 311 #endif
 312
 313    return &pdraw->base;
 314 }
 315
 316 #ifdef X_DRI2GetMSC
 317
 318 static int
 319 dri2DrawableGetMSC(struct glx_screen *psc, __GLXDRIdrawable *pdraw,
 320                    int64_t *ust, int64_t *msc, int64_t *sbc)
 321 {
 322    CARD64 dri2_ust, dri2_msc, dri2_sbc;
 323    int ret;
 324
 325    ret = DRI2GetMSC(psc->dpy, pdraw->xDrawable,
 326                     &dri2_ust, &dri2_msc, &dri2_sbc);
 327    *ust = dri2_ust;
 328    *msc = dri2_msc;
 329    *sbc = dri2_sbc;
 330
 331    return ret;
 332 }
 333
 334 #endif
 335
 336
 337 #ifdef X_DRI2WaitMSC
 338
 339 static int
 340 dri2WaitForMSC(__GLXDRIdrawable *pdraw, int64_t target_msc, int64_t divisor,
 341                int64_t remainder, int64_t *ust, int64_t *msc, int64_t *sbc)
 342 {
 343    CARD64 dri2_ust, dri2_msc, dri2_sbc;
 344    int ret;
 345
 346    ret = DRI2WaitMSC(pdraw->psc->dpy, pdraw->xDrawable, target_msc, divisor,
 347                      remainder, &dri2_ust, &dri2_msc, &dri2_sbc);
 348    *ust = dri2_ust;
 349    *msc = dri2_msc;
 350    *sbc = dri2_sbc;
 351
 352    return ret;
 353 }
 354
 355 static int
 356 dri2WaitForSBC(__GLXDRIdrawable *pdraw, int64_t target_sbc, int64_t *ust,
 357                int64_t *msc, int64_t *sbc)
 358 {
 359    CARD64 dri2_ust, dri2_msc, dri2_sbc;
 360    int ret;
 361
 362    ret = DRI2WaitSBC(pdraw->psc->dpy, pdraw->xDrawable,
 363                      target_sbc, &dri2_ust, &dri2_msc, &dri2_sbc);
 364    *ust = dri2_ust;
 365    *msc = dri2_msc;
 366    *sbc = dri2_sbc;
 367
 368    return ret;
 369 }
 370
 371 #endif /* X_DRI2WaitMSC */
 372
 373 static void
 374 dri2CopySubBuffer(__GLXDRIdrawable *pdraw, int x, int y, int width, int height)
 375 {
 376    struct dri2_drawable *priv = (struct dri2_drawable *) pdraw;
 377    struct dri2_screen *psc = (struct dri2_screen *) pdraw->psc;
 378    XRectangle xrect;
 379    XserverRegion region;
 380
 381    /* Check we have the right attachments */
 382    if (!priv->have_back)
 383       return;
 384
 385    xrect.x = x;
 386    xrect.y = priv->height - y - height;
 387    xrect.width = width;
 388    xrect.height = height;
 389
 390 #ifdef __DRI2_FLUSH
 391    if (psc->f)
 392       (*psc->f->flush) (priv->driDrawable);
 393 #endif
 394
 395    region = XFixesCreateRegion(psc->base.dpy, &xrect, 1);
 396    DRI2CopyRegion(psc->base.dpy, pdraw->xDrawable, region,
 397                   DRI2BufferFrontLeft, DRI2BufferBackLeft);
 398
 399    /* Refresh the fake front (if present) after we just damaged the real
 400     * front.
 401     */
 402    if (priv->have_fake_front)
 403       DRI2CopyRegion(psc->base.dpy, pdraw->xDrawable, region,
 404                      DRI2BufferFakeFrontLeft, DRI2BufferFrontLeft);
 405
 406    XFixesDestroyRegion(psc->base.dpy, region);
 407 }
 408
 409 static void
 410 dri2_copy_drawable(struct dri2_drawable *priv, int dest, int src)
 411 {
 412    XRectangle xrect;
 413    XserverRegion region;
 414    struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
 415
 416    xrect.x = 0;
 417    xrect.y = 0;
 418    xrect.width = priv->width;
 419    xrect.height = priv->height;
 420
 421 #ifdef __DRI2_FLUSH
 422    if (psc->f)
 423       (*psc->f->flush) (priv->driDrawable);
 424 #endif
 425
 426    region = XFixesCreateRegion(psc->base.dpy, &xrect, 1);
 427    DRI2CopyRegion(psc->base.dpy, priv->base.xDrawable, region, dest, src);
 428    XFixesDestroyRegion(psc->base.dpy, region);
 429
 430 }
 431
 432 static void
 433 dri2_wait_x(struct glx_context *gc)
 434 {
 435    struct dri2_drawable *priv = (struct dri2_drawable *)
 436       GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
 437
 438    if (priv == NULL || !priv->have_fake_front)
 439       return;
 440
 441    dri2_copy_drawable(priv, DRI2BufferFakeFrontLeft, DRI2BufferFrontLeft);
 442 }
 443
 444 static void
 445 dri2_wait_gl(struct glx_context *gc)
 446 {
 447    struct dri2_drawable *priv = (struct dri2_drawable *)
 448       GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
 449
 450    if (priv == NULL || !priv->have_fake_front)
 451       return;
 452
 453    dri2_copy_drawable(priv, DRI2BufferFrontLeft, DRI2BufferFakeFrontLeft);
 454 }
 455
 456 static void
 457 dri2FlushFrontBuffer(__DRIdrawable *driDrawable, void *loaderPrivate)
 458 {
 459    struct dri2_drawable *pdraw = loaderPrivate;
 460    struct glx_display *priv = __glXInitialize(pdraw->base.psc->dpy);
 461    struct dri2_display *pdp = (struct dri2_display *)priv->dri2Display;
 462    struct glx_context *gc = __glXGetCurrentContext();
 463
 464    /* Old servers don't send invalidate events */
 465    if (!pdp->invalidateAvailable)
 466        dri2InvalidateBuffers(priv->dpy, pdraw->base.xDrawable);
 467
 468    dri2_wait_gl(gc);
 469 }
 470
 471
 472 static void
 473 dri2DestroyScreen(struct glx_screen *base)
 474 {
 475    struct dri2_screen *psc = (struct dri2_screen *) base;
 476
 477    /* Free the direct rendering per screen data */
 478    (*psc->core->destroyScreen) (psc->driScreen);
 479    driDestroyConfigs(psc->driver_configs);
 480    close(psc->fd);
 481    Xfree(psc);
 482 }
 483
 484 /**
 485  * Process list of buffer received from the server
 486  *
 487  * Processes the list of buffers received in a reply from the server to either
 488  * \c DRI2GetBuffers or \c DRI2GetBuffersWithFormat.
 489  */
 490 static void
 491 process_buffers(struct dri2_drawable * pdraw, DRI2Buffer * buffers,
 492                 unsigned count)
 493 {
 494    int i;
 495
 496    pdraw->bufferCount = count;
 497    pdraw->have_fake_front = 0;
 498    pdraw->have_back = 0;
 499
 500    /* This assumes the DRI2 buffer attachment tokens matches the
 501     * __DRIbuffer tokens. */
 502    for (i = 0; i < count; i++) {
 503       pdraw->buffers[i].attachment = buffers[i].attachment;
 504       pdraw->buffers[i].name = buffers[i].name;
 505       pdraw->buffers[i].pitch = buffers[i].pitch;
 506       pdraw->buffers[i].cpp = buffers[i].cpp;
 507       pdraw->buffers[i].flags = buffers[i].flags;
 508       if (pdraw->buffers[i].attachment == __DRI_BUFFER_FAKE_FRONT_LEFT)
 509          pdraw->have_fake_front = 1;
 510       if (pdraw->buffers[i].attachment == __DRI_BUFFER_BACK_LEFT)
 511          pdraw->have_back = 1;
 512    }
 513
 514 }
 515
 516 unsigned dri2GetSwapEventType(Display* dpy, XID drawable)
 517 {
 518       struct glx_display *glx_dpy = __glXInitialize(dpy);
 519       __GLXDRIdrawable *pdraw;
 520       pdraw = dri2GetGlxDrawableFromXDrawableId(dpy, drawable);
 521       if (!pdraw || !(pdraw->eventMask & GLX_BUFFER_SWAP_COMPLETE_INTEL_MASK))
 522          return 0;
 523       return glx_dpy->codes->first_event + GLX_BufferSwapComplete;
 524 }
 525
 526 static int64_t
 527 dri2SwapBuffers(__GLXDRIdrawable *pdraw, int64_t target_msc, int64_t divisor,
 528                 int64_t remainder)
 529 {
 530     struct dri2_drawable *priv = (struct dri2_drawable *) pdraw;
 531     struct glx_display *dpyPriv = __glXInitialize(priv->base.psc->dpy);
 532     struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
 533     struct dri2_display *pdp =
 534         (struct dri2_display *)dpyPriv->dri2Display;
 535     CARD64 ret = 0;
 536
 537 #ifdef __DRI2_FLUSH
 538     if (psc->f) {
 539        struct glx_context *gc = __glXGetCurrentContext();
 540
 541        if (gc) {
 542           (*psc->f->flush)(priv->driDrawable);
 543        }
 544     }
 545 #endif
 546
 547     /* Old servers don't send invalidate events */
 548     if (!pdp->invalidateAvailable)
 549        dri2InvalidateBuffers(dpyPriv->dpy, pdraw->xDrawable);
 550
 551     /* Old servers can't handle swapbuffers */
 552     if (!pdp->swapAvailable) {
 553        dri2CopySubBuffer(pdraw, 0, 0, priv->width, priv->height);
 554        return 0;
 555     }
 556
 557 #ifdef X_DRI2SwapBuffers
 558     DRI2SwapBuffers(psc->base.dpy, pdraw->xDrawable, target_msc, divisor,
 559                     remainder, &ret);
 560 #endif
 561
 562     return ret;
 563 }
 564
 565 static __DRIbuffer *
 566 dri2GetBuffers(__DRIdrawable * driDrawable,
 567                int *width, int *height,
 568                unsigned int *attachments, int count,
 569                int *out_count, void *loaderPrivate)
 570 {
 571    struct dri2_drawable *pdraw = loaderPrivate;
 572    DRI2Buffer *buffers;
 573
 574    buffers = DRI2GetBuffers(pdraw->base.psc->dpy, pdraw->base.xDrawable,
 575                             width, height, attachments, count, out_count);
 576    if (buffers == NULL)
 577       return NULL;
 578
 579    pdraw->width = *width;
 580    pdraw->height = *height;
 581    process_buffers(pdraw, buffers, *out_count);
 582
 583    Xfree(buffers);
 584
 585    return pdraw->buffers;
 586 }
 587
 588 static __DRIbuffer *
 589 dri2GetBuffersWithFormat(__DRIdrawable * driDrawable,
 590                          int *width, int *height,
 591                          unsigned int *attachments, int count,
 592                          int *out_count, void *loaderPrivate)
 593 {
 594    struct dri2_drawable *pdraw = loaderPrivate;
 595    DRI2Buffer *buffers;
 596
 597    buffers = DRI2GetBuffersWithFormat(pdraw->base.psc->dpy,
 598                                       pdraw->base.xDrawable,
 599                                       width, height, attachments,
 600                                       count, out_count);
 601    if (buffers == NULL)
 602       return NULL;
 603
 604    pdraw->width = *width;
 605    pdraw->height = *height;
 606    process_buffers(pdraw, buffers, *out_count);
 607
 608    Xfree(buffers);
 609
 610    return pdraw->buffers;
 611 }
 612
 613 #ifdef X_DRI2SwapInterval
 614
 615 static int
 616 dri2SetSwapInterval(__GLXDRIdrawable *pdraw, int interval)
 617 {
 618    struct dri2_drawable *priv =  (struct dri2_drawable *) pdraw;
 619    GLint vblank_mode = DRI_CONF_VBLANK_DEF_INTERVAL_1;
 620    struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
 621
 622    if (psc->config)
 623       psc->config->configQueryi(psc->driScreen,
 624                                 "vblank_mode", &vblank_mode);
 625
 626    switch (vblank_mode) {
 627    case DRI_CONF_VBLANK_NEVER:
 628       return GLX_BAD_VALUE;
 629    case DRI_CONF_VBLANK_ALWAYS_SYNC:
 630       if (interval <= 0)
 631          return GLX_BAD_VALUE;
 632       break;
 633    default:
 634       break;
 635    }
 636
 637    DRI2SwapInterval(priv->base.psc->dpy, priv->base.xDrawable, interval);
 638    priv->swap_interval = interval;
 639
 640    return 0;
 641 }
 642
 643 static int
 644 dri2GetSwapInterval(__GLXDRIdrawable *pdraw)
 645 {
 646    struct dri2_drawable *priv =  (struct dri2_drawable *) pdraw;
 647
 648   return priv->swap_interval;
 649 }
 650
 651 #endif /* X_DRI2SwapInterval */
 652
 653 static const __DRIdri2LoaderExtension dri2LoaderExtension = {
 654    {__DRI_DRI2_LOADER, __DRI_DRI2_LOADER_VERSION},
 655    dri2GetBuffers,
 656    dri2FlushFrontBuffer,
 657    dri2GetBuffersWithFormat,
 658 };
 659
 660 static const __DRIdri2LoaderExtension dri2LoaderExtension_old = {
 661    {__DRI_DRI2_LOADER, __DRI_DRI2_LOADER_VERSION},
 662    dri2GetBuffers,
 663    dri2FlushFrontBuffer,
 664    NULL,
 665 };
 666
 667 #ifdef __DRI_USE_INVALIDATE
 668 static const __DRIuseInvalidateExtension dri2UseInvalidate = {
 669    { __DRI_USE_INVALIDATE, __DRI_USE_INVALIDATE_VERSION }
 670 };
 671 #endif
 672
 673 _X_HIDDEN void
 674 dri2InvalidateBuffers(Display *dpy, XID drawable)
 675 {
 676    __GLXDRIdrawable *pdraw =
 677       dri2GetGlxDrawableFromXDrawableId(dpy, drawable);
 678    struct dri2_screen *psc = (struct dri2_screen *) pdraw->psc;
 679    struct dri2_drawable *pdp = (struct dri2_drawable *) pdraw;
 680
 681 #if __DRI2_FLUSH_VERSION >= 3
 682    if (pdraw && psc->f && psc->f->base.version >= 3 && psc->f->invalidate)
 683        psc->f->invalidate(pdp->driDrawable);
 684 #endif
 685 }
 686
 687 static void
 688 dri2_bind_tex_image(Display * dpy,
 689                     GLXDrawable drawable,
 690                     int buffer, const int *attrib_list)
 691 {
 692    struct glx_context *gc = __glXGetCurrentContext();
 693    struct dri2_context *pcp = (struct dri2_context *) gc;
 694    __GLXDRIdrawable *base = GetGLXDRIDrawable(dpy, drawable);
 695    struct glx_display *dpyPriv = __glXInitialize(dpy);
 696    struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
 697    struct dri2_display *pdp =
 698       (struct dri2_display *) dpyPriv->dri2Display;
 699    struct dri2_screen *psc;
 700
 701    if (pdraw != NULL) {
 702       psc = (struct dri2_screen *) base->psc;
 703
 704 #if __DRI2_FLUSH_VERSION >= 3
 705       if (!pdp->invalidateAvailable && psc->f &&
 706            psc->f->base.version >= 3 && psc->f->invalidate)
 707          psc->f->invalidate(pdraw->driDrawable);
 708 #endif
 709
 710       if (psc->texBuffer->base.version >= 2 &&
 711           psc->texBuffer->setTexBuffer2 != NULL) {
 712          (*psc->texBuffer->setTexBuffer2) (pcp->driContext,
 713                                            pdraw->base.textureTarget,
 714                                            pdraw->base.textureFormat,
 715                                            pdraw->driDrawable);
 716       }
 717       else {
 718          (*psc->texBuffer->setTexBuffer) (pcp->driContext,
 719                                           pdraw->base.textureTarget,
 720                                           pdraw->driDrawable);
 721       }
 722    }
 723 }
 724
 725 static void
 726 dri2_release_tex_image(Display * dpy, GLXDrawable drawable, int buffer)
 727 {
 728 #if __DRI_TEX_BUFFER_VERSION >= 3
 729    struct glx_context *gc = __glXGetCurrentContext();
 730    struct dri2_context *pcp = (struct dri2_context *) gc;
 731    __GLXDRIdrawable *base = GetGLXDRIDrawable(dpy, drawable);
 732    struct glx_display *dpyPriv = __glXInitialize(dpy);
 733    struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
 734    struct dri2_display *pdp =
 735       (struct dri2_display *) dpyPriv->dri2Display;
 736    struct dri2_screen *psc;
 737
 738    if (pdraw != NULL) {
 739       psc = (struct dri2_screen *) base->psc;
 740
 741       if (psc->texBuffer->base.version >= 3 &&
 742           psc->texBuffer->releaseTexBuffer != NULL) {
 743          (*psc->texBuffer->releaseTexBuffer) (pcp->driContext,
 744                                            pdraw->base.textureTarget,
 745                                            pdraw->driDrawable);
 746       }
 747    }
 748 #endif
 749 }
 750
 751 static const struct glx_context_vtable dri2_context_vtable = {
 752    dri2_destroy_context,
 753    dri2_bind_context,
 754    dri2_unbind_context,
 755    dri2_wait_gl,
 756    dri2_wait_x,
 757    DRI_glXUseXFont,
 758    dri2_bind_tex_image,
 759    dri2_release_tex_image,
 760 };
 761
 762 static void
 763 dri2BindExtensions(struct dri2_screen *psc, const __DRIextension **extensions)
 764 {
 765    int i;
 766
 767    __glXEnableDirectExtension(&psc->base, "GLX_SGI_video_sync");
 768    __glXEnableDirectExtension(&psc->base, "GLX_SGI_swap_control");
 769    __glXEnableDirectExtension(&psc->base, "GLX_MESA_swap_control");
 770    __glXEnableDirectExtension(&psc->base, "GLX_SGI_make_current_read");
 771
 772    /* FIXME: if DRI2 version supports it... */
 773    __glXEnableDirectExtension(&psc->base, "INTEL_swap_event");
 774
 775    for (i = 0; extensions[i]; i++) {
 776       if ((strcmp(extensions[i]->name, __DRI_TEX_BUFFER) == 0)) {
 777          psc->texBuffer = (__DRItexBufferExtension *) extensions[i];
 778          __glXEnableDirectExtension(&psc->base, "GLX_EXT_texture_from_pixmap");
 779       }
 780
 781       if ((strcmp(extensions[i]->name, __DRI2_FLUSH) == 0)) {
 782          psc->f = (__DRI2flushExtension *) extensions[i];
 783          /* internal driver extension, no GL extension exposed */
 784       }
 785
 786       if ((strcmp(extensions[i]->name, __DRI2_CONFIG_QUERY) == 0))
 787          psc->config = (__DRI2configQueryExtension *) extensions[i];
 788    }
 789 }
 790
 791 static const struct glx_screen_vtable dri2_screen_vtable = {
 792    dri2_create_context
 793 };
 794
 795 static struct glx_screen *
 796 dri2CreateScreen(int screen, struct glx_display * priv)
 797 {
 798    const __DRIconfig **driver_configs;
 799    const __DRIextension **extensions;
 800    const struct dri2_display *const pdp = (struct dri2_display *)
 801       priv->dri2Display;
 802    struct dri2_screen *psc;
 803    __GLXDRIscreen *psp;
 804    char *driverName, *deviceName;
 805    drm_magic_t magic;
 806    int i;
 807
 808    psc = Xmalloc(sizeof *psc);
 809    if (psc == NULL)
 810       return NULL;
 811
 812    memset(psc, 0, sizeof *psc);
 813    psc->fd = -1;
 814
 815    if (!glx_screen_init(&psc->base, screen, priv)) {
 816       Xfree(psc);
 817       return NULL;
 818    }
 819
 820    if (!DRI2Connect(priv->dpy, RootWindow(priv->dpy, screen),
 821                     &driverName, &deviceName)) {
 822       glx_screen_cleanup(&psc->base);
 823       XFree(psc);
 824       return NULL;
 825    }
 826
 827    psc->driver = driOpenDriver(driverName);
 828    if (psc->driver == NULL) {
 829       ErrorMessageF("driver pointer missing\n");
 830       goto handle_error;
 831    }
 832
 833    extensions = dlsym(psc->driver, __DRI_DRIVER_EXTENSIONS);
 834    if (extensions == NULL) {
 835       ErrorMessageF("driver exports no extensions (%s)\n", dlerror());
 836       goto handle_error;
 837    }
 838
 839    for (i = 0; extensions[i]; i++) {
 840       if (strcmp(extensions[i]->name, __DRI_CORE) == 0)
 841          psc->core = (__DRIcoreExtension *) extensions[i];
 842       if (strcmp(extensions[i]->name, __DRI_DRI2) == 0)
 843          psc->dri2 = (__DRIdri2Extension *) extensions[i];
 844    }
 845
 846    if (psc->core == NULL || psc->dri2 == NULL) {
 847       ErrorMessageF("core dri or dri2 extension not found\n");
 848       goto handle_error;
 849    }
 850
 851    psc->fd = open(deviceName, O_RDWR);
 852    if (psc->fd < 0) {
 853       ErrorMessageF("failed to open drm device: %s\n", strerror(errno));
 854       goto handle_error;
 855    }
 856
 857    if (drmGetMagic(psc->fd, &magic)) {
 858       ErrorMessageF("failed to get magic\n");
 859       goto handle_error;
 860    }
 861
 862    if (!DRI2Authenticate(priv->dpy, RootWindow(priv->dpy, screen), magic)) {
 863       ErrorMessageF("failed to authenticate magic %d\n", magic);
 864       goto handle_error;
 865    }
 866
 867
 868    /* If the server does not support the protocol for
 869     * DRI2GetBuffersWithFormat, don't supply that interface to the driver.
 870     */
 871    psc->driScreen =
 872       psc->dri2->createNewScreen(screen, psc->fd,
 873                                  (const __DRIextension **)
 874                                  &pdp->loader_extensions[0],
 875                                  &driver_configs, psc);
 876
 877    if (psc->driScreen == NULL) {
 878       ErrorMessageF("failed to create dri screen\n");
 879       goto handle_error;
 880    }
 881
 882    extensions = psc->core->getExtensions(psc->driScreen);
 883    dri2BindExtensions(psc, extensions);
 884
 885    psc->base.configs =
 886       driConvertConfigs(psc->core, psc->base.configs, driver_configs);
 887    psc->base.visuals =
 888       driConvertConfigs(psc->core, psc->base.visuals, driver_configs);
 889
 890    psc->driver_configs = driver_configs;
 891
 892    psc->base.vtable = &dri2_screen_vtable;
 893    psp = &psc->vtable;
 894    psc->base.driScreen = psp;
 895    psp->destroyScreen = dri2DestroyScreen;
 896    psp->createDrawable = dri2CreateDrawable;
 897    psp->swapBuffers = dri2SwapBuffers;
 898    psp->getDrawableMSC = NULL;
 899    psp->waitForMSC = NULL;
 900    psp->waitForSBC = NULL;
 901    psp->setSwapInterval = NULL;
 902    psp->getSwapInterval = NULL;
 903
 904    if (pdp->driMinor >= 2) {
 905 #ifdef X_DRI2GetMSC
 906       psp->getDrawableMSC = dri2DrawableGetMSC;
 907 #endif
 908 #ifdef X_DRI2WaitMSC
 909       psp->waitForMSC = dri2WaitForMSC;
 910       psp->waitForSBC = dri2WaitForSBC;
 911 #endif
 912 #ifdef X_DRI2SwapInterval
 913       psp->setSwapInterval = dri2SetSwapInterval;
 914       psp->getSwapInterval = dri2GetSwapInterval;
 915 #endif
 916 #if defined(X_DRI2GetMSC) && defined(X_DRI2WaitMSC) && defined(X_DRI2SwapInterval)
 917       __glXEnableDirectExtension(&psc->base, "GLX_OML_sync_control");
 918 #endif
 919    }
 920
 921    /* DRI2 suports SubBuffer through DRI2CopyRegion, so it's always
 922     * available.*/
 923    psp->copySubBuffer = dri2CopySubBuffer;
 924    __glXEnableDirectExtension(&psc->base, "GLX_MESA_copy_sub_buffer");
 925
 926    Xfree(driverName);
 927    Xfree(deviceName);
 928
 929    return &psc->base;
 930
 931 handle_error:
 932    if (psc->fd >= 0)
 933       close(psc->fd);
 934    if (psc->driver)
 935       dlclose(psc->driver);
 936    Xfree(driverName);
 937    Xfree(deviceName);
 938    glx_screen_cleanup(&psc->base);
 939    XFree(psc);
 940
 941    return NULL;
 942 }
 943
 944 /* Called from __glXFreeDisplayPrivate.
 945  */
 946 static void
 947 dri2DestroyDisplay(__GLXDRIdisplay * dpy)
 948 {
 949    struct dri2_display *pdp = (struct dri2_display *) dpy;
 950
 951    __glxHashDestroy(pdp->dri2Hash);
 952    Xfree(dpy);
 953 }
 954
 955 _X_HIDDEN __GLXDRIdrawable *
 956 dri2GetGlxDrawableFromXDrawableId(Display *dpy, XID id)
 957 {
 958    struct glx_display *d = __glXInitialize(dpy);
 959    struct dri2_display *pdp = (struct dri2_display *) d->dri2Display;
 960    __GLXDRIdrawable *pdraw;
 961
 962    if (__glxHashLookup(pdp->dri2Hash, id, (void *) &pdraw) == 0)
 963       return pdraw;
 964
 965    return NULL;
 966 }
 967
 968 /*
 969  * Allocate, initialize and return a __DRIdisplayPrivate object.
 970  * This is called from __glXInitialize() when we are given a new
 971  * display pointer.
 972  */
 973 _X_HIDDEN __GLXDRIdisplay *
 974 dri2CreateDisplay(Display * dpy)
 975 {
 976    struct dri2_display *pdp;
 977    int eventBase, errorBase, i;
 978
 979    if (!DRI2QueryExtension(dpy, &eventBase, &errorBase))
 980       return NULL;
 981
 982    pdp = Xmalloc(sizeof *pdp);
 983    if (pdp == NULL)
 984       return NULL;
 985
 986    if (!DRI2QueryVersion(dpy, &pdp->driMajor, &pdp->driMinor)) {
 987       Xfree(pdp);
 988       return NULL;
 989    }
 990
 991    pdp->driPatch = 0;
 992    pdp->swapAvailable = (pdp->driMinor >= 2);
 993    pdp->invalidateAvailable = (pdp->driMinor >= 3);
 994
 995    pdp->base.destroyDisplay = dri2DestroyDisplay;
 996    pdp->base.createScreen = dri2CreateScreen;
 997
 998    i = 0;
 999    if (pdp->driMinor < 1)
1000       pdp->loader_extensions[i++] = &dri2LoaderExtension_old.base;
1001    else
1002       pdp->loader_extensions[i++] = &dri2LoaderExtension.base;
1003
1004    pdp->loader_extensions[i++] = &systemTimeExtension.base;
1005
1006 #ifdef __DRI_USE_INVALIDATE
1007    pdp->loader_extensions[i++] = &dri2UseInvalidate.base;
1008 #endif
1009    pdp->loader_extensions[i++] = NULL;
1010
1011    pdp->dri2Hash = __glxHashCreate();
1012    if (pdp->dri2Hash == NULL) {
1013       Xfree(pdp);
1014       return NULL;
1015    }
1016
1017    return &pdp->base;
1018 }
1019
1020 #endif /* GLX_DIRECT_RENDERING */