src/glx/glxcmds.c

   1 /*
   2  * SGI FREE SOFTWARE LICENSE B (Version 2.0, Sept. 18, 2008)
   3  * Copyright (C) 1991-2000 Silicon Graphics, Inc. All Rights Reserved.
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a
   6  * copy of this software and associated documentation files (the "Software"),
   7  * to deal in the Software without restriction, including without limitation
   8  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   9  * and/or sell copies of the Software, and to permit persons to whom the
  10  * Software is furnished to do so, subject to the following conditions:
  11  *
  12  * The above copyright notice including the dates of first publication and
  13  * either this permission notice or a reference to
  14  * http://oss.sgi.com/projects/FreeB/
  15  * shall be included in all copies or substantial portions of the Software.
  16  *
  17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  18  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  20  * SILICON GRAPHICS, INC. BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
  21  * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
  22  * OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  23  * SOFTWARE.
  24  *
  25  * Except as contained in this notice, the name of Silicon Graphics, Inc.
  26  * shall not be used in advertising or otherwise to promote the sale, use or
  27  * other dealings in this Software without prior written authorization from
  28  * Silicon Graphics, Inc.
  29  */
  30
  31 /**
  32  * \file glxcmds.c
  33  * Client-side GLX interface.
  34  */
  35
  36 #include "glxclient.h"
  37 #include "glapi.h"
  38 #include "glxextensions.h"
  39 #include "indirect.h"
  40 #include "glx_error.h"
  41
  42 #ifdef GLX_DIRECT_RENDERING
  43 #ifdef GLX_USE_APPLEGL
  44 #include "apple/apple_glx_context.h"
  45 #include "apple/apple_glx.h"
  46 #else
  47 #include <sys/time.h>
  48 #ifdef XF86VIDMODE
  49 #include <X11/extensions/xf86vmode.h>
  50 #endif
  51 #endif
  52 #endif
  53
  54 #include <X11/Xlib-xcb.h>
  55 #include <xcb/xcb.h>
  56 #include <xcb/glx.h>
  57 #include "GL/mesa_glinterop.h"
  58
  59 static const char __glXGLXClientVendorName[] = "Mesa Project and SGI";
  60 static const char __glXGLXClientVersion[] = "1.4";
  61
  62 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
  63
  64 /**
  65  * Get the __DRIdrawable for the drawable associated with a GLXContext
  66  *
  67  * \param dpy       The display associated with \c drawable.
  68  * \param drawable  GLXDrawable whose __DRIdrawable part is to be retrieved.
  69  * \param scrn_num  If non-NULL, the drawables screen is stored there
  70  * \returns  A pointer to the context's __DRIdrawable on success, or NULL if
  71  *           the drawable is not associated with a direct-rendering context.
  72  */
  73 _X_HIDDEN __GLXDRIdrawable *
  74 GetGLXDRIDrawable(Display * dpy, GLXDrawable drawable)
  75 {
  76    struct glx_display *priv = __glXInitialize(dpy);
  77    __GLXDRIdrawable *pdraw;
  78
  79    if (priv == NULL)
  80       return NULL;
  81
  82    if (__glxHashLookup(priv->drawHash, drawable, (void *) &pdraw) == 0)
  83       return pdraw;
  84
  85    return NULL;
  86 }
  87
  88 #endif
  89
  90 _X_HIDDEN struct glx_drawable *
  91 GetGLXDrawable(Display *dpy, GLXDrawable drawable)
  92 {
  93    struct glx_display *priv = __glXInitialize(dpy);
  94    struct glx_drawable *glxDraw;
  95
  96    if (priv == NULL)
  97       return NULL;
  98
  99    if (__glxHashLookup(priv->glXDrawHash, drawable, (void *) &glxDraw) == 0)
 100       return glxDraw;
 101
 102    return NULL;
 103 }
 104
 105 _X_HIDDEN int
 106 InitGLXDrawable(Display *dpy, struct glx_drawable *glxDraw, XID xDrawable,
 107                 GLXDrawable drawable)
 108 {
 109    struct glx_display *priv = __glXInitialize(dpy);
 110
 111    if (!priv)
 112       return -1;
 113
 114    glxDraw->xDrawable = xDrawable;
 115    glxDraw->drawable = drawable;
 116    glxDraw->lastEventSbc = 0;
 117    glxDraw->eventSbcWrap = 0;
 118
 119    return __glxHashInsert(priv->glXDrawHash, drawable, glxDraw);
 120 }
 121
 122 _X_HIDDEN void
 123 DestroyGLXDrawable(Display *dpy, GLXDrawable drawable)
 124 {
 125    struct glx_display *priv = __glXInitialize(dpy);
 126    struct glx_drawable *glxDraw;
 127
 128    if (!priv)
 129       return;
 130
 131    glxDraw = GetGLXDrawable(dpy, drawable);
 132    __glxHashDelete(priv->glXDrawHash, drawable);
 133    free(glxDraw);
 134 }
 135
 136 /**
 137  * Get the GLX per-screen data structure associated with a GLX context.
 138  *
 139  * \param dpy   Display for which the GLX per-screen information is to be
 140  *              retrieved.
 141  * \param scrn  Screen on \c dpy for which the GLX per-screen information is
 142  *              to be retrieved.
 143  * \returns A pointer to the GLX per-screen data if \c dpy and \c scrn
 144  *          specify a valid GLX screen, or NULL otherwise.
 145  *
 146  * \todo Should this function validate that \c scrn is within the screen
 147  *       number range for \c dpy?
 148  */
 149
 150 _X_HIDDEN struct glx_screen *
 151 GetGLXScreenConfigs(Display * dpy, int scrn)
 152 {
 153    struct glx_display *const priv = __glXInitialize(dpy);
 154
 155    return (priv
 156            && priv->screens !=
 157            NULL) ? priv->screens[scrn] : NULL;
 158 }
 159
 160
 161 static int
 162 GetGLXPrivScreenConfig(Display * dpy, int scrn, struct glx_display ** ppriv,
 163                        struct glx_screen ** ppsc)
 164 {
 165    /* Initialize the extension, if needed .  This has the added value
 166     * of initializing/allocating the display private
 167     */
 168
 169    if (dpy == NULL) {
 170       return GLX_NO_EXTENSION;
 171    }
 172
 173    *ppriv = __glXInitialize(dpy);
 174    if (*ppriv == NULL) {
 175       return GLX_NO_EXTENSION;
 176    }
 177
 178    /* Check screen number to see if its valid */
 179    if ((scrn < 0) || (scrn >= ScreenCount(dpy))) {
 180       return GLX_BAD_SCREEN;
 181    }
 182
 183    /* Check to see if the GL is supported on this screen */
 184    *ppsc = (*ppriv)->screens[scrn];
 185    if ((*ppsc)->configs == NULL && (*ppsc)->visuals == NULL) {
 186       /* No support for GL on this screen regardless of visual */
 187       return GLX_BAD_VISUAL;
 188    }
 189
 190    return Success;
 191 }
 192
 193
 194 /**
 195  * Determine if a \c GLXFBConfig supplied by the application is valid.
 196  *
 197  * \param dpy     Application supplied \c Display pointer.
 198  * \param config  Application supplied \c GLXFBConfig.
 199  *
 200  * \returns If the \c GLXFBConfig is valid, the a pointer to the matching
 201  *          \c struct glx_config structure is returned.  Otherwise, \c NULL
 202  *          is returned.
 203  */
 204 static struct glx_config *
 205 ValidateGLXFBConfig(Display * dpy, GLXFBConfig fbconfig)
 206 {
 207    struct glx_display *const priv = __glXInitialize(dpy);
 208    int num_screens = ScreenCount(dpy);
 209    unsigned i;
 210    struct glx_config *config;
 211
 212    if (priv != NULL) {
 213       for (i = 0; i < num_screens; i++) {
 214          for (config = priv->screens[i]->configs; config != NULL;
 215               config = config->next) {
 216             if (config == (struct glx_config *) fbconfig) {
 217                return config;
 218             }
 219          }
 220       }
 221    }
 222
 223    return NULL;
 224 }
 225
 226 /**
 227  * Verifies context's GLX_RENDER_TYPE value with config.
 228  *
 229  * \param config GLX FBConfig which will support the returned renderType.
 230  * \param renderType The context render type to be verified.
 231  * \return True if the value of context renderType was approved, or 0 if no
 232  * valid value was found.
 233  */
 234 Bool
 235 validate_renderType_against_config(const struct glx_config *config,
 236                                    int renderType)
 237 {
 238     switch (renderType) {
 239     case GLX_RGBA_TYPE:
 240         return (config->renderType & GLX_RGBA_BIT) != 0;
 241     case GLX_COLOR_INDEX_TYPE:
 242         return (config->renderType & GLX_COLOR_INDEX_BIT) != 0;
 243     case GLX_RGBA_FLOAT_TYPE_ARB:
 244         return (config->renderType & GLX_RGBA_FLOAT_BIT_ARB) != 0;
 245     case GLX_RGBA_UNSIGNED_FLOAT_TYPE_EXT:
 246         return (config->renderType & GLX_RGBA_UNSIGNED_FLOAT_BIT_EXT) != 0;
 247     default:
 248         break;
 249     }
 250     return 0;
 251 }
 252
 253 _X_HIDDEN Bool
 254 glx_context_init(struct glx_context *gc,
 255                  struct glx_screen *psc, struct glx_config *config)
 256 {
 257    gc->majorOpcode = __glXSetupForCommand(psc->display->dpy);
 258    if (!gc->majorOpcode)
 259       return False;
 260
 261    gc->screen = psc->scr;
 262    gc->psc = psc;
 263    gc->config = config;
 264    gc->isDirect = GL_TRUE;
 265    gc->currentContextTag = -1;
 266
 267    return True;
 268 }
 269
 270
 271 /**
 272  * Create a new context.
 273  *
 274  * \param renderType   For FBConfigs, what is the rendering type?
 275  */
 276
 277 static GLXContext
 278 CreateContext(Display *dpy, int generic_id, struct glx_config *config,
 279               GLXContext shareList_user, Bool allowDirect,
 280               unsigned code, int renderType, int screen)
 281 {
 282    struct glx_context *gc;
 283    struct glx_screen *psc;
 284    struct glx_context *shareList = (struct glx_context *) shareList_user;
 285    if (dpy == NULL)
 286       return NULL;
 287
 288    psc = GetGLXScreenConfigs(dpy, screen);
 289    if (psc == NULL)
 290       return NULL;
 291
 292    if (generic_id == None)
 293       return NULL;
 294
 295    gc = NULL;
 296 #ifdef GLX_USE_APPLEGL
 297    gc = applegl_create_context(psc, config, shareList, renderType);
 298 #else
 299    if (allowDirect && psc->vtable->create_context)
 300       gc = psc->vtable->create_context(psc, config, shareList, renderType);
 301    if (!gc)
 302       gc = indirect_create_context(psc, config, shareList, renderType);
 303 #endif
 304    if (!gc)
 305       return NULL;
 306
 307    LockDisplay(dpy);
 308    switch (code) {
 309    case X_GLXCreateContext: {
 310       xGLXCreateContextReq *req;
 311
 312       /* Send the glXCreateContext request */
 313       GetReq(GLXCreateContext, req);
 314       req->reqType = gc->majorOpcode;
 315       req->glxCode = X_GLXCreateContext;
 316       req->context = gc->xid = XAllocID(dpy);
 317       req->visual = generic_id;
 318       req->screen = screen;
 319       req->shareList = shareList ? shareList->xid : None;
 320       req->isDirect = gc->isDirect;
 321       break;
 322    }
 323
 324    case X_GLXCreateNewContext: {
 325       xGLXCreateNewContextReq *req;
 326
 327       /* Send the glXCreateNewContext request */
 328       GetReq(GLXCreateNewContext, req);
 329       req->reqType = gc->majorOpcode;
 330       req->glxCode = X_GLXCreateNewContext;
 331       req->context = gc->xid = XAllocID(dpy);
 332       req->fbconfig = generic_id;
 333       req->screen = screen;
 334       req->renderType = renderType;
 335       req->shareList = shareList ? shareList->xid : None;
 336       req->isDirect = gc->isDirect;
 337       break;
 338    }
 339
 340    case X_GLXvop_CreateContextWithConfigSGIX: {
 341       xGLXVendorPrivateWithReplyReq *vpreq;
 342       xGLXCreateContextWithConfigSGIXReq *req;
 343
 344       /* Send the glXCreateNewContext request */
 345       GetReqExtra(GLXVendorPrivateWithReply,
 346                   sz_xGLXCreateContextWithConfigSGIXReq -
 347                   sz_xGLXVendorPrivateWithReplyReq, vpreq);
 348       req = (xGLXCreateContextWithConfigSGIXReq *) vpreq;
 349       req->reqType = gc->majorOpcode;
 350       req->glxCode = X_GLXVendorPrivateWithReply;
 351       req->vendorCode = X_GLXvop_CreateContextWithConfigSGIX;
 352       req->context = gc->xid = XAllocID(dpy);
 353       req->fbconfig = generic_id;
 354       req->screen = screen;
 355       req->renderType = renderType;
 356       req->shareList = shareList ? shareList->xid : None;
 357       req->isDirect = gc->isDirect;
 358       break;
 359    }
 360
 361    default:
 362       /* What to do here?  This case is the sign of an internal error.  It
 363        * should never be reachable.
 364        */
 365       break;
 366    }
 367
 368    UnlockDisplay(dpy);
 369    SyncHandle();
 370
 371    gc->share_xid = shareList ? shareList->xid : None;
 372    gc->imported = GL_FALSE;
 373
 374    return (GLXContext) gc;
 375 }
 376
 377 _GLX_PUBLIC GLXContext
 378 glXCreateContext(Display * dpy, XVisualInfo * vis,
 379                  GLXContext shareList, Bool allowDirect)
 380 {
 381    struct glx_config *config = NULL;
 382    int renderType = GLX_RGBA_TYPE;
 383
 384 #if defined(GLX_DIRECT_RENDERING) || defined(GLX_USE_APPLEGL)
 385    struct glx_screen *const psc = GetGLXScreenConfigs(dpy, vis->screen);
 386
 387    if (psc)
 388       config = glx_config_find_visual(psc->visuals, vis->visualid);
 389
 390    if (config == NULL) {
 391       xError error;
 392
 393       error.errorCode = BadValue;
 394       error.resourceID = vis->visualid;
 395       error.sequenceNumber = dpy->request;
 396       error.type = X_Error;
 397       error.majorCode = __glXSetupForCommand(dpy);
 398       error.minorCode = X_GLXCreateContext;
 399       _XError(dpy, &error);
 400       return None;
 401    }
 402
 403    /* Choose the context render type based on DRI config values.  It is
 404     * unusual to set this type from config, but we have no other choice, as
 405     * this old API does not provide renderType parameter.
 406     */
 407    if (config->renderType & GLX_RGBA_FLOAT_BIT_ARB) {
 408        renderType = GLX_RGBA_FLOAT_TYPE_ARB;
 409    } else if (config->renderType & GLX_RGBA_UNSIGNED_FLOAT_BIT_EXT) {
 410        renderType = GLX_RGBA_UNSIGNED_FLOAT_TYPE_EXT;
 411    } else if (config->renderType & GLX_RGBA_BIT) {
 412        renderType = GLX_RGBA_TYPE;
 413    } else if (config->renderType & GLX_COLOR_INDEX_BIT) {
 414        renderType = GLX_COLOR_INDEX_TYPE;
 415    } else if (config->rgbMode) {
 416        /* If we're here, then renderType is not set correctly.  Let's use a
 417         * safeguard - any TrueColor or DirectColor mode is RGB mode.  Such
 418         * default value is needed by old DRI drivers, which didn't set
 419         * renderType correctly as the value was just ignored.
 420         */
 421        renderType = GLX_RGBA_TYPE;
 422    } else {
 423        /* Safeguard - only one option left, all non-RGB modes are indexed
 424         * modes.  Again, this allows drivers with invalid renderType to work
 425         * properly.
 426         */
 427        renderType = GLX_COLOR_INDEX_TYPE;
 428    }
 429 #endif
 430
 431    return CreateContext(dpy, vis->visualid, config, shareList, allowDirect,
 432                         X_GLXCreateContext, renderType, vis->screen);
 433 }
 434
 435 static void
 436 glx_send_destroy_context(Display *dpy, XID xid)
 437 {
 438    CARD8 opcode = __glXSetupForCommand(dpy);
 439    xGLXDestroyContextReq *req;
 440
 441    LockDisplay(dpy);
 442    GetReq(GLXDestroyContext, req);
 443    req->reqType = opcode;
 444    req->glxCode = X_GLXDestroyContext;
 445    req->context = xid;
 446    UnlockDisplay(dpy);
 447    SyncHandle();
 448 }
 449
 450 /*
 451 ** Destroy the named context
 452 */
 453
 454 _GLX_PUBLIC void
 455 glXDestroyContext(Display * dpy, GLXContext ctx)
 456 {
 457    struct glx_context *gc = (struct glx_context *) ctx;
 458
 459    if (gc == NULL || gc->xid == None)
 460       return;
 461
 462    __glXLock();
 463    if (!gc->imported)
 464       glx_send_destroy_context(dpy, gc->xid);
 465
 466    if (gc->currentDpy) {
 467       /* This context is bound to some thread.  According to the man page,
 468        * we should not actually delete the context until it's unbound.
 469        * Note that we set gc->xid = None above.  In MakeContextCurrent()
 470        * we check for that and delete the context there.
 471        */
 472       gc->xid = None;
 473    } else {
 474       gc->vtable->destroy(gc);
 475    }
 476    __glXUnlock();
 477 }
 478
 479 /*
 480 ** Return the major and minor version #s for the GLX extension
 481 */
 482 _GLX_PUBLIC Bool
 483 glXQueryVersion(Display * dpy, int *major, int *minor)
 484 {
 485    struct glx_display *priv;
 486
 487    /* Init the extension.  This fetches the major and minor version. */
 488    priv = __glXInitialize(dpy);
 489    if (!priv)
 490       return False;
 491
 492    if (major)
 493       *major = priv->majorVersion;
 494    if (minor)
 495       *minor = priv->minorVersion;
 496    return True;
 497 }
 498
 499 /*
 500 ** Query the existence of the GLX extension
 501 */
 502 _GLX_PUBLIC Bool
 503 glXQueryExtension(Display * dpy, int *errorBase, int *eventBase)
 504 {
 505    int major_op, erb, evb;
 506    Bool rv;
 507
 508    rv = XQueryExtension(dpy, GLX_EXTENSION_NAME, &major_op, &evb, &erb);
 509    if (rv) {
 510       if (errorBase)
 511          *errorBase = erb;
 512       if (eventBase)
 513          *eventBase = evb;
 514    }
 515    return rv;
 516 }
 517
 518 /*
 519 ** Put a barrier in the token stream that forces the GL to finish its
 520 ** work before X can proceed.
 521 */
 522 _GLX_PUBLIC void
 523 glXWaitGL(void)
 524 {
 525    struct glx_context *gc = __glXGetCurrentContext();
 526
 527    if (gc != &dummyContext && gc->vtable->wait_gl)
 528       gc->vtable->wait_gl(gc);
 529 }
 530
 531 /*
 532 ** Put a barrier in the token stream that forces X to finish its
 533 ** work before GL can proceed.
 534 */
 535 _GLX_PUBLIC void
 536 glXWaitX(void)
 537 {
 538    struct glx_context *gc = __glXGetCurrentContext();
 539
 540    if (gc != &dummyContext && gc->vtable->wait_x)
 541       gc->vtable->wait_x(gc);
 542 }
 543
 544 _GLX_PUBLIC void
 545 glXUseXFont(Font font, int first, int count, int listBase)
 546 {
 547    struct glx_context *gc = __glXGetCurrentContext();
 548
 549    if (gc != &dummyContext && gc->vtable->use_x_font)
 550       gc->vtable->use_x_font(gc, font, first, count, listBase);
 551 }
 552
 553 /************************************************************************/
 554
 555 /*
 556 ** Copy the source context to the destination context using the
 557 ** attribute "mask".
 558 */
 559 _GLX_PUBLIC void
 560 glXCopyContext(Display * dpy, GLXContext source_user,
 561                GLXContext dest_user, unsigned long mask)
 562 {
 563    struct glx_context *source = (struct glx_context *) source_user;
 564    struct glx_context *dest = (struct glx_context *) dest_user;
 565 #ifdef GLX_USE_APPLEGL
 566    struct glx_context *gc = __glXGetCurrentContext();
 567    int errorcode;
 568    bool x11error;
 569
 570    if(apple_glx_copy_context(gc->driContext, source->driContext, dest->driContext,
 571                              mask, &errorcode, &x11error)) {
 572       __glXSendError(dpy, errorcode, 0, X_GLXCopyContext, x11error);
 573    }
 574
 575 #else
 576    xGLXCopyContextReq *req;
 577    struct glx_context *gc = __glXGetCurrentContext();
 578    GLXContextTag tag;
 579    CARD8 opcode;
 580
 581    opcode = __glXSetupForCommand(dpy);
 582    if (!opcode) {
 583       return;
 584    }
 585
 586 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
 587    if (gc->isDirect) {
 588       /* NOT_DONE: This does not work yet */
 589    }
 590 #endif
 591
 592    /*
 593     ** If the source is the current context, send its tag so that the context
 594     ** can be flushed before the copy.
 595     */
 596    if (source == gc && dpy == gc->currentDpy) {
 597       tag = gc->currentContextTag;
 598    }
 599    else {
 600       tag = 0;
 601    }
 602
 603    /* Send the glXCopyContext request */
 604    LockDisplay(dpy);
 605    GetReq(GLXCopyContext, req);
 606    req->reqType = opcode;
 607    req->glxCode = X_GLXCopyContext;
 608    req->source = source ? source->xid : None;
 609    req->dest = dest ? dest->xid : None;
 610    req->mask = mask;
 611    req->contextTag = tag;
 612    UnlockDisplay(dpy);
 613    SyncHandle();
 614 #endif /* GLX_USE_APPLEGL */
 615 }
 616
 617
 618 /**
 619  * Determine if a context uses direct rendering.
 620  *
 621  * \param dpy        Display where the context was created.
 622  * \param contextID  ID of the context to be tested.
 623  *
 624  * \returns \c True if the context is direct rendering or not.
 625  */
 626 static Bool
 627 __glXIsDirect(Display * dpy, GLXContextID contextID)
 628 {
 629    CARD8 opcode;
 630    xcb_connection_t *c;
 631    xcb_generic_error_t *err;
 632    xcb_glx_is_direct_reply_t *reply;
 633    Bool is_direct;
 634
 635    opcode = __glXSetupForCommand(dpy);
 636    if (!opcode) {
 637       return False;
 638    }
 639
 640    c = XGetXCBConnection(dpy);
 641    reply = xcb_glx_is_direct_reply(c, xcb_glx_is_direct(c, contextID), &err);
 642    is_direct = (reply != NULL && reply->is_direct) ? True : False;
 643
 644    if (err != NULL) {
 645       __glXSendErrorForXcb(dpy, err);
 646       free(err);
 647    }
 648
 649    free(reply);
 650
 651    return is_direct;
 652 }
 653
 654 /**
 655  * \todo
 656  * Shouldn't this function \b always return \c False when
 657  * \c GLX_DIRECT_RENDERING is not defined?  Do we really need to bother with
 658  * the GLX protocol here at all?
 659  */
 660 _GLX_PUBLIC Bool
 661 glXIsDirect(Display * dpy, GLXContext gc_user)
 662 {
 663    struct glx_context *gc = (struct glx_context *) gc_user;
 664
 665    if (!gc) {
 666       return False;
 667    }
 668    else if (gc->isDirect) {
 669       return True;
 670    }
 671 #ifdef GLX_USE_APPLEGL  /* TODO: indirect on darwin */
 672    return False;
 673 #else
 674    return __glXIsDirect(dpy, gc->xid);
 675 #endif
 676 }
 677
 678 _GLX_PUBLIC GLXPixmap
 679 glXCreateGLXPixmap(Display * dpy, XVisualInfo * vis, Pixmap pixmap)
 680 {
 681 #ifdef GLX_USE_APPLEGL
 682    int screen = vis->screen;
 683    struct glx_screen *const psc = GetGLXScreenConfigs(dpy, screen);
 684    const struct glx_config *config;
 685
 686    config = glx_config_find_visual(psc->visuals, vis->visualid);
 687
 688    if(apple_glx_pixmap_create(dpy, vis->screen, pixmap, config))
 689       return None;
 690
 691    return pixmap;
 692 #else
 693    xGLXCreateGLXPixmapReq *req;
 694    struct glx_drawable *glxDraw;
 695    GLXPixmap xid;
 696    CARD8 opcode;
 697
 698 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
 699    struct glx_display *const priv = __glXInitialize(dpy);
 700
 701    if (priv == NULL)
 702       return None;
 703 #endif
 704
 705    opcode = __glXSetupForCommand(dpy);
 706    if (!opcode) {
 707       return None;
 708    }
 709
 710    glxDraw = malloc(sizeof(*glxDraw));
 711    if (!glxDraw)
 712       return None;
 713
 714    /* Send the glXCreateGLXPixmap request */
 715    LockDisplay(dpy);
 716    GetReq(GLXCreateGLXPixmap, req);
 717    req->reqType = opcode;
 718    req->glxCode = X_GLXCreateGLXPixmap;
 719    req->screen = vis->screen;
 720    req->visual = vis->visualid;
 721    req->pixmap = pixmap;
 722    req->glxpixmap = xid = XAllocID(dpy);
 723    UnlockDisplay(dpy);
 724    SyncHandle();
 725
 726    if (InitGLXDrawable(dpy, glxDraw, pixmap, req->glxpixmap)) {
 727       free(glxDraw);
 728       return None;
 729    }
 730
 731 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
 732    do {
 733       /* FIXME: Maybe delay __DRIdrawable creation until the drawable
 734        * is actually bound to a context... */
 735
 736       __GLXDRIdrawable *pdraw;
 737       struct glx_screen *psc;
 738       struct glx_config *config;
 739
 740       psc = priv->screens[vis->screen];
 741       if (psc->driScreen == NULL)
 742          return xid;
 743
 744       config = glx_config_find_visual(psc->visuals, vis->visualid);
 745       pdraw = psc->driScreen->createDrawable(psc, pixmap, xid, config);
 746       if (pdraw == NULL) {
 747          fprintf(stderr, "failed to create pixmap\n");
 748          xid = None;
 749          break;
 750       }
 751
 752       if (__glxHashInsert(priv->drawHash, xid, pdraw)) {
 753          (*pdraw->destroyDrawable) (pdraw);
 754          xid = None;
 755          break;
 756       }
 757    } while (0);
 758
 759    if (xid == None) {
 760       xGLXDestroyGLXPixmapReq *dreq;
 761       LockDisplay(dpy);
 762       GetReq(GLXDestroyGLXPixmap, dreq);
 763       dreq->reqType = opcode;
 764       dreq->glxCode = X_GLXDestroyGLXPixmap;
 765       dreq->glxpixmap = xid;
 766       UnlockDisplay(dpy);
 767       SyncHandle();
 768    }
 769 #endif
 770
 771    return xid;
 772 #endif
 773 }
 774
 775 /*
 776 ** Destroy the named pixmap
 777 */
 778 _GLX_PUBLIC void
 779 glXDestroyGLXPixmap(Display * dpy, GLXPixmap glxpixmap)
 780 {
 781 #ifdef GLX_USE_APPLEGL
 782    if(apple_glx_pixmap_destroy(dpy, glxpixmap))
 783       __glXSendError(dpy, GLXBadPixmap, glxpixmap, X_GLXDestroyPixmap, false);
 784 #else
 785    xGLXDestroyGLXPixmapReq *req;
 786    CARD8 opcode;
 787
 788    opcode = __glXSetupForCommand(dpy);
 789    if (!opcode) {
 790       return;
 791    }
 792
 793    /* Send the glXDestroyGLXPixmap request */
 794    LockDisplay(dpy);
 795    GetReq(GLXDestroyGLXPixmap, req);
 796    req->reqType = opcode;
 797    req->glxCode = X_GLXDestroyGLXPixmap;
 798    req->glxpixmap = glxpixmap;
 799    UnlockDisplay(dpy);
 800    SyncHandle();
 801
 802    DestroyGLXDrawable(dpy, glxpixmap);
 803
 804 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
 805    {
 806       struct glx_display *const priv = __glXInitialize(dpy);
 807       __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, glxpixmap);
 808
 809       if (priv != NULL && pdraw != NULL) {
 810          (*pdraw->destroyDrawable) (pdraw);
 811          __glxHashDelete(priv->drawHash, glxpixmap);
 812       }
 813    }
 814 #endif
 815 #endif /* GLX_USE_APPLEGL */
 816 }
 817
 818 _GLX_PUBLIC void
 819 glXSwapBuffers(Display * dpy, GLXDrawable drawable)
 820 {
 821 #ifdef GLX_USE_APPLEGL
 822    struct glx_context * gc = __glXGetCurrentContext();
 823    if(gc && apple_glx_is_current_drawable(dpy, gc->driContext, drawable)) {
 824       apple_glx_swap_buffers(gc->driContext);
 825    } else {
 826       __glXSendError(dpy, GLXBadCurrentWindow, 0, X_GLXSwapBuffers, false);
 827    }
 828 #else
 829    struct glx_context *gc;
 830    GLXContextTag tag;
 831    CARD8 opcode;
 832    xcb_connection_t *c;
 833
 834    gc = __glXGetCurrentContext();
 835
 836 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
 837    {
 838       __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, drawable);
 839
 840       if (pdraw != NULL) {
 841          Bool flush = gc != &dummyContext && drawable == gc->currentDrawable;
 842
 843          (*pdraw->psc->driScreen->swapBuffers)(pdraw, 0, 0, 0, flush);
 844          return;
 845       }
 846    }
 847 #endif
 848
 849    opcode = __glXSetupForCommand(dpy);
 850    if (!opcode) {
 851       return;
 852    }
 853
 854    /*
 855     ** The calling thread may or may not have a current context.  If it
 856     ** does, send the context tag so the server can do a flush.
 857     */
 858    if ((gc != &dummyContext) && (dpy == gc->currentDpy) &&
 859        ((drawable == gc->currentDrawable)
 860         || (drawable == gc->currentReadable))) {
 861       tag = gc->currentContextTag;
 862    }
 863    else {
 864       tag = 0;
 865    }
 866
 867    c = XGetXCBConnection(dpy);
 868    xcb_glx_swap_buffers(c, tag, drawable);
 869    xcb_flush(c);
 870 #endif /* GLX_USE_APPLEGL */
 871 }
 872
 873
 874 /*
 875 ** Return configuration information for the given display, screen and
 876 ** visual combination.
 877 */
 878 _GLX_PUBLIC int
 879 glXGetConfig(Display * dpy, XVisualInfo * vis, int attribute,
 880              int *value_return)
 881 {
 882    struct glx_display *priv;
 883    struct glx_screen *psc;
 884    struct glx_config *config;
 885    int status;
 886
 887    status = GetGLXPrivScreenConfig(dpy, vis->screen, &priv, &psc);
 888    if (status == Success) {
 889       config = glx_config_find_visual(psc->visuals, vis->visualid);
 890
 891       /* Lookup attribute after first finding a match on the visual */
 892       if (config != NULL) {
 893          return glx_config_get(config, attribute, value_return);
 894       }
 895
 896       status = GLX_BAD_VISUAL;
 897    }
 898
 899    /*
 900     ** If we can't find the config for this visual, this visual is not
 901     ** supported by the OpenGL implementation on the server.
 902     */
 903    if ((status == GLX_BAD_VISUAL) && (attribute == GLX_USE_GL)) {
 904       *value_return = False;
 905       status = Success;
 906    }
 907
 908    return status;
 909 }
 910
 911 /************************************************************************/
 912
 913 static void
 914 init_fbconfig_for_chooser(struct glx_config * config,
 915                           GLboolean fbconfig_style_tags)
 916 {
 917    memset(config, 0, sizeof(struct glx_config));
 918    config->visualID = (XID) GLX_DONT_CARE;
 919    config->visualType = GLX_DONT_CARE;
 920
 921    /* glXChooseFBConfig specifies different defaults for these properties than
 922     * glXChooseVisual.
 923     */
 924    if (fbconfig_style_tags) {
 925       config->rgbMode = GL_TRUE;
 926       config->doubleBufferMode = GLX_DONT_CARE;
 927       config->renderType = GLX_RGBA_BIT;
 928    }
 929
 930    config->drawableType = GLX_WINDOW_BIT;
 931    config->visualRating = GLX_DONT_CARE;
 932    config->transparentPixel = GLX_NONE;
 933    config->transparentRed = GLX_DONT_CARE;
 934    config->transparentGreen = GLX_DONT_CARE;
 935    config->transparentBlue = GLX_DONT_CARE;
 936    config->transparentAlpha = GLX_DONT_CARE;
 937    config->transparentIndex = GLX_DONT_CARE;
 938
 939    config->xRenderable = GLX_DONT_CARE;
 940    config->fbconfigID = (GLXFBConfigID) (GLX_DONT_CARE);
 941
 942    config->swapMethod = GLX_DONT_CARE;
 943 }
 944
 945 #define MATCH_DONT_CARE( param )        \
 946   do {                                  \
 947     if ( ((int) a-> param != (int) GLX_DONT_CARE)   \
 948          && (a-> param != b-> param) ) {        \
 949       return False;                             \
 950     }                                           \
 951   } while ( 0 )
 952
 953 #define MATCH_MINIMUM( param )                  \
 954   do {                                          \
 955     if ( ((int) a-> param != (int) GLX_DONT_CARE)       \
 956          && (a-> param > b-> param) ) {         \
 957       return False;                             \
 958     }                                           \
 959   } while ( 0 )
 960
 961 #define MATCH_EXACT( param )                    \
 962   do {                                          \
 963     if ( a-> param != b-> param) {              \
 964       return False;                             \
 965     }                                           \
 966   } while ( 0 )
 967
 968 /* Test that all bits from a are contained in b */
 969 #define MATCH_MASK(param)                       \
 970   do {                                          \
 971     if ( ((int) a-> param != (int) GLX_DONT_CARE)       \
 972          && ((a->param & ~b->param) != 0) ) {   \
 973       return False;                             \
 974     }                                           \
 975   } while (0);
 976
 977 /**
 978  * Determine if two GLXFBConfigs are compatible.
 979  *
 980  * \param a  Application specified config to test.
 981  * \param b  Server specified config to test against \c a.
 982  */
 983 static Bool
 984 fbconfigs_compatible(const struct glx_config * const a,
 985                      const struct glx_config * const b)
 986 {
 987    MATCH_DONT_CARE(doubleBufferMode);
 988    MATCH_DONT_CARE(visualType);
 989    MATCH_DONT_CARE(visualRating);
 990    MATCH_DONT_CARE(xRenderable);
 991    MATCH_DONT_CARE(fbconfigID);
 992    MATCH_DONT_CARE(swapMethod);
 993
 994    MATCH_MINIMUM(rgbBits);
 995    MATCH_MINIMUM(numAuxBuffers);
 996    MATCH_MINIMUM(redBits);
 997    MATCH_MINIMUM(greenBits);
 998    MATCH_MINIMUM(blueBits);
 999    MATCH_MINIMUM(alphaBits);
1000    MATCH_MINIMUM(depthBits);
1001    MATCH_MINIMUM(stencilBits);
1002    MATCH_MINIMUM(accumRedBits);
1003    MATCH_MINIMUM(accumGreenBits);
1004    MATCH_MINIMUM(accumBlueBits);
1005    MATCH_MINIMUM(accumAlphaBits);
1006    MATCH_MINIMUM(sampleBuffers);
1007    MATCH_MINIMUM(maxPbufferWidth);
1008    MATCH_MINIMUM(maxPbufferHeight);
1009    MATCH_MINIMUM(maxPbufferPixels);
1010    MATCH_MINIMUM(samples);
1011
1012    MATCH_DONT_CARE(stereoMode);
1013    MATCH_EXACT(level);
1014
1015    MATCH_MASK(drawableType);
1016    MATCH_MASK(renderType);
1017
1018    /* There is a bug in a few of the XFree86 DDX drivers.  They contain
1019     * visuals with a "transparent type" of 0 when they really mean GLX_NONE.
1020     * Technically speaking, it is a bug in the DDX driver, but there is
1021     * enough of an installed base to work around the problem here.  In any
1022     * case, 0 is not a valid value of the transparent type, so we'll treat 0
1023     * from the app as GLX_DONT_CARE. We'll consider GLX_NONE from the app and
1024     * 0 from the server to be a match to maintain backward compatibility with
1025     * the (broken) drivers.
1026     */
1027
1028    if (a->transparentPixel != (int) GLX_DONT_CARE && a->transparentPixel != 0) {
1029       if (a->transparentPixel == GLX_NONE) {
1030          if (b->transparentPixel != GLX_NONE && b->transparentPixel != 0)
1031             return False;
1032       }
1033       else {
1034          MATCH_EXACT(transparentPixel);
1035       }
1036
1037       switch (a->transparentPixel) {
1038       case GLX_TRANSPARENT_RGB:
1039          MATCH_DONT_CARE(transparentRed);
1040          MATCH_DONT_CARE(transparentGreen);
1041          MATCH_DONT_CARE(transparentBlue);
1042          MATCH_DONT_CARE(transparentAlpha);
1043          break;
1044
1045       case GLX_TRANSPARENT_INDEX:
1046          MATCH_DONT_CARE(transparentIndex);
1047          break;
1048
1049       default:
1050          break;
1051       }
1052    }
1053
1054    return True;
1055 }
1056
1057
1058 /* There's some trickly language in the GLX spec about how this is supposed
1059  * to work.  Basically, if a given component size is either not specified
1060  * or the requested size is zero, it is supposed to act like PERFER_SMALLER.
1061  * Well, that's really hard to do with the code as-is.  This behavior is
1062  * closer to correct, but still not technically right.
1063  */
1064 #define PREFER_LARGER_OR_ZERO(comp)             \
1065   do {                                          \
1066     if ( ((*a)-> comp) != ((*b)-> comp) ) {     \
1067       if ( ((*a)-> comp) == 0 ) {               \
1068         return -1;                              \
1069       }                                         \
1070       else if ( ((*b)-> comp) == 0 ) {          \
1071         return 1;                               \
1072       }                                         \
1073       else {                                    \
1074         return ((*b)-> comp) - ((*a)-> comp) ;  \
1075       }                                         \
1076     }                                           \
1077   } while( 0 )
1078
1079 #define PREFER_LARGER(comp)                     \
1080   do {                                          \
1081     if ( ((*a)-> comp) != ((*b)-> comp) ) {     \
1082       return ((*b)-> comp) - ((*a)-> comp) ;    \
1083     }                                           \
1084   } while( 0 )
1085
1086 #define PREFER_SMALLER(comp)                    \
1087   do {                                          \
1088     if ( ((*a)-> comp) != ((*b)-> comp) ) {     \
1089       return ((*a)-> comp) - ((*b)-> comp) ;    \
1090     }                                           \
1091   } while( 0 )
1092
1093 /**
1094  * Compare two GLXFBConfigs.  This function is intended to be used as the
1095  * compare function passed in to qsort.
1096  *
1097  * \returns If \c a is a "better" config, according to the specification of
1098  *          SGIX_fbconfig, a number less than zero is returned.  If \c b is
1099  *          better, then a number greater than zero is return.  If both are
1100  *          equal, zero is returned.
1101  * \sa qsort, glXChooseVisual, glXChooseFBConfig, glXChooseFBConfigSGIX
1102  */
1103 static int
1104 fbconfig_compare(struct glx_config **a, struct glx_config **b)
1105 {
1106    /* The order of these comparisons must NOT change.  It is defined by
1107     * the GLX 1.4 specification.
1108     */
1109
1110    PREFER_SMALLER(visualSelectGroup);
1111
1112    /* The sort order for the visualRating is GLX_NONE, GLX_SLOW, and
1113     * GLX_NON_CONFORMANT_CONFIG.  It just so happens that this is the
1114     * numerical sort order of the enums (0x8000, 0x8001, and 0x800D).
1115     */
1116    PREFER_SMALLER(visualRating);
1117
1118    /* This isn't quite right.  It is supposed to compare the sum of the
1119     * components the user specifically set minimums for.
1120     */
1121    PREFER_LARGER_OR_ZERO(redBits);
1122    PREFER_LARGER_OR_ZERO(greenBits);
1123    PREFER_LARGER_OR_ZERO(blueBits);
1124    PREFER_LARGER_OR_ZERO(alphaBits);
1125
1126    PREFER_SMALLER(rgbBits);
1127
1128    if (((*a)->doubleBufferMode != (*b)->doubleBufferMode)) {
1129       /* Prefer single-buffer.
1130        */
1131       return (!(*a)->doubleBufferMode) ? -1 : 1;
1132    }
1133
1134    PREFER_SMALLER(numAuxBuffers);
1135
1136    PREFER_SMALLER(sampleBuffers);
1137    PREFER_SMALLER(samples);
1138
1139    PREFER_LARGER_OR_ZERO(depthBits);
1140    PREFER_SMALLER(stencilBits);
1141
1142    /* This isn't quite right.  It is supposed to compare the sum of the
1143     * components the user specifically set minimums for.
1144     */
1145    PREFER_LARGER_OR_ZERO(accumRedBits);
1146    PREFER_LARGER_OR_ZERO(accumGreenBits);
1147    PREFER_LARGER_OR_ZERO(accumBlueBits);
1148    PREFER_LARGER_OR_ZERO(accumAlphaBits);
1149
1150    PREFER_SMALLER(visualType);
1151
1152    /* None of the pbuffer or fbconfig specs say that this comparison needs
1153     * to happen at all, but it seems like it should.
1154     */
1155    PREFER_LARGER(maxPbufferWidth);
1156    PREFER_LARGER(maxPbufferHeight);
1157    PREFER_LARGER(maxPbufferPixels);
1158
1159    return 0;
1160 }
1161
1162
1163 /**
1164  * Selects and sorts a subset of the supplied configs based on the attributes.
1165  * This function forms to basis of \c glXChooseVisual, \c glXChooseFBConfig,
1166  * and \c glXChooseFBConfigSGIX.
1167  *
1168  * \param configs   Array of pointers to possible configs.  The elements of
1169  *                  this array that do not meet the criteria will be set to
1170  *                  NULL.  The remaining elements will be sorted according to
1171  *                  the various visual / FBConfig selection rules.
1172  * \param num_configs  Number of elements in the \c configs array.
1173  * \param attribList   Attributes used select from \c configs.  This array is
1174  *                     terminated by a \c None tag.  The array can either take
1175  *                     the form expected by \c glXChooseVisual (where boolean
1176  *                     tags do not have a value) or by \c glXChooseFBConfig
1177  *                     (where every tag has a value).
1178  * \param fbconfig_style_tags  Selects whether \c attribList is in
1179  *                             \c glXChooseVisual style or
1180  *                             \c glXChooseFBConfig style.
1181  * \returns The number of valid elements left in \c configs.
1182  *
1183  * \sa glXChooseVisual, glXChooseFBConfig, glXChooseFBConfigSGIX
1184  */
1185 static int
1186 choose_visual(struct glx_config ** configs, int num_configs,
1187               const int *attribList, GLboolean fbconfig_style_tags)
1188 {
1189    struct glx_config test_config;
1190    int base;
1191    int i;
1192
1193    /* This is a fairly direct implementation of the selection method
1194     * described by GLX_SGIX_fbconfig.  Start by culling out all the
1195     * configs that are not compatible with the selected parameter
1196     * list.
1197     */
1198
1199    init_fbconfig_for_chooser(&test_config, fbconfig_style_tags);
1200    __glXInitializeVisualConfigFromTags(&test_config, 512,
1201                                        (const INT32 *) attribList,
1202                                        GL_TRUE, fbconfig_style_tags);
1203
1204    base = 0;
1205    for (i = 0; i < num_configs; i++) {
1206       if (fbconfigs_compatible(&test_config, configs[i])) {
1207          configs[base] = configs[i];
1208          base++;
1209       }
1210    }
1211
1212    if (base == 0) {
1213       return 0;
1214    }
1215
1216    if (base < num_configs) {
1217       (void) memset(&configs[base], 0, sizeof(void *) * (num_configs - base));
1218    }
1219
1220    /* After the incompatible configs are removed, the resulting
1221     * list is sorted according to the rules set out in the various
1222     * specifications.
1223     */
1224
1225    qsort(configs, base, sizeof(struct glx_config *),
1226          (int (*)(const void *, const void *)) fbconfig_compare);
1227    return base;
1228 }
1229
1230
1231
1232
1233 /*
1234 ** Return the visual that best matches the template.  Return None if no
1235 ** visual matches the template.
1236 */
1237 _GLX_PUBLIC XVisualInfo *
1238 glXChooseVisual(Display * dpy, int screen, int *attribList)
1239 {
1240    XVisualInfo *visualList = NULL;
1241    struct glx_display *priv;
1242    struct glx_screen *psc;
1243    struct glx_config test_config;
1244    struct glx_config *config;
1245    struct glx_config *best_config = NULL;
1246
1247    /*
1248     ** Get a list of all visuals, return if list is empty
1249     */
1250    if (GetGLXPrivScreenConfig(dpy, screen, &priv, &psc) != Success) {
1251       return None;
1252    }
1253
1254
1255    /*
1256     ** Build a template from the defaults and the attribute list
1257     ** Free visual list and return if an unexpected token is encountered
1258     */
1259    init_fbconfig_for_chooser(&test_config, GL_FALSE);
1260    __glXInitializeVisualConfigFromTags(&test_config, 512,
1261                                        (const INT32 *) attribList,
1262                                        GL_TRUE, GL_FALSE);
1263
1264    /*
1265     ** Eliminate visuals that don't meet minimum requirements
1266     ** Compute a score for those that do
1267     ** Remember which visual, if any, got the highest score
1268     ** If no visual is acceptable, return None
1269     ** Otherwise, create an XVisualInfo list with just the selected X visual
1270     ** and return this.
1271     */
1272    for (config = psc->visuals; config != NULL; config = config->next) {
1273       if (fbconfigs_compatible(&test_config, config)
1274           && ((best_config == NULL) ||
1275               (fbconfig_compare (&config, &best_config) < 0))) {
1276          XVisualInfo visualTemplate;
1277          XVisualInfo *newList;
1278          int i;
1279
1280          visualTemplate.screen = screen;
1281          visualTemplate.visualid = config->visualID;
1282          newList = XGetVisualInfo(dpy, VisualScreenMask | VisualIDMask,
1283                                   &visualTemplate, &i);
1284
1285          if (newList) {
1286             free(visualList);
1287             visualList = newList;
1288             best_config = config;
1289          }
1290       }
1291    }
1292
1293 #ifdef GLX_USE_APPLEGL
1294    if(visualList && getenv("LIBGL_DUMP_VISUALID")) {
1295       printf("visualid 0x%lx\n", visualList[0].visualid);
1296    }
1297 #endif
1298
1299    return visualList;
1300 }
1301
1302
1303 _GLX_PUBLIC const char *
1304 glXQueryExtensionsString(Display * dpy, int screen)
1305 {
1306    struct glx_screen *psc;
1307    struct glx_display *priv;
1308
1309    if (GetGLXPrivScreenConfig(dpy, screen, &priv, &psc) != Success) {
1310       return NULL;
1311    }
1312
1313    if (!psc->effectiveGLXexts) {
1314       if (!psc->serverGLXexts) {
1315          psc->serverGLXexts =
1316             __glXQueryServerString(dpy, priv->majorOpcode, screen,
1317                                    GLX_EXTENSIONS);
1318       }
1319
1320       __glXCalculateUsableExtensions(psc,
1321 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
1322                                      (psc->driScreen != NULL),
1323 #else
1324                                      GL_FALSE,
1325 #endif
1326                                      priv->minorVersion);
1327    }
1328
1329    return psc->effectiveGLXexts;
1330 }
1331
1332 _GLX_PUBLIC const char *
1333 glXGetClientString(Display * dpy, int name)
1334 {
1335    (void) dpy;
1336
1337    switch (name) {
1338    case GLX_VENDOR:
1339       return (__glXGLXClientVendorName);
1340    case GLX_VERSION:
1341       return (__glXGLXClientVersion);
1342    case GLX_EXTENSIONS:
1343       return (__glXGetClientExtensions());
1344    default:
1345       return NULL;
1346    }
1347 }
1348
1349 _GLX_PUBLIC const char *
1350 glXQueryServerString(Display * dpy, int screen, int name)
1351 {
1352    struct glx_screen *psc;
1353    struct glx_display *priv;
1354    const char **str;
1355
1356
1357    if (GetGLXPrivScreenConfig(dpy, screen, &priv, &psc) != Success) {
1358       return NULL;
1359    }
1360
1361    switch (name) {
1362    case GLX_VENDOR:
1363       str = &priv->serverGLXvendor;
1364       break;
1365    case GLX_VERSION:
1366       str = &priv->serverGLXversion;
1367       break;
1368    case GLX_EXTENSIONS:
1369       str = &psc->serverGLXexts;
1370       break;
1371    default:
1372       return NULL;
1373    }
1374
1375    if (*str == NULL) {
1376       *str = __glXQueryServerString(dpy, priv->majorOpcode, screen, name);
1377    }
1378
1379    return *str;
1380 }
1381
1382
1383 /*
1384 ** EXT_import_context
1385 */
1386
1387 _GLX_PUBLIC Display *
1388 glXGetCurrentDisplay(void)
1389 {
1390    struct glx_context *gc = __glXGetCurrentContext();
1391    if (gc == &dummyContext)
1392       return NULL;
1393    return gc->currentDpy;
1394 }
1395
1396 _GLX_PUBLIC
1397 GLX_ALIAS(Display *, glXGetCurrentDisplayEXT, (void), (),
1398           glXGetCurrentDisplay)
1399
1400 #ifndef GLX_USE_APPLEGL
1401 _GLX_PUBLIC GLXContext
1402 glXImportContextEXT(Display *dpy, GLXContextID contextID)
1403 {
1404    struct glx_display *priv = __glXInitialize(dpy);
1405    struct glx_screen *psc = NULL;
1406    xGLXQueryContextReply reply;
1407    CARD8 opcode;
1408    struct glx_context *ctx;
1409
1410    /* This GLX implementation knows about 5 different properties, so
1411     * allow the server to send us one of each.
1412     */
1413    int propList[5 * 2], *pProp, nPropListBytes;
1414    int numProps;
1415    int i, renderType;
1416    XID share;
1417    struct glx_config *mode;
1418    uint32_t fbconfigID = 0;
1419    uint32_t visualID = 0;
1420    uint32_t screen = 0;
1421    Bool got_screen = False;
1422
1423    if (priv == NULL)
1424       return NULL;
1425
1426    /* The GLX_EXT_import_context spec says:
1427     *
1428     *     "If <contextID> does not refer to a valid context, then a BadContext
1429     *     error is generated; if <contextID> refers to direct rendering
1430     *     context then no error is generated but glXImportContextEXT returns
1431     *     NULL."
1432     *
1433     * If contextID is None, generate BadContext on the client-side.  Other
1434     * sorts of invalid contexts will be detected by the server in the
1435     * __glXIsDirect call.
1436     */
1437    if (contextID == None) {
1438       __glXSendError(dpy, GLXBadContext, contextID, X_GLXIsDirect, false);
1439       return NULL;
1440    }
1441
1442    if (__glXIsDirect(dpy, contextID))
1443       return NULL;
1444
1445    opcode = __glXSetupForCommand(dpy);
1446    if (!opcode)
1447       return 0;
1448
1449    /* Send the glXQueryContextInfoEXT request */
1450    LockDisplay(dpy);
1451
1452    if (priv->majorVersion > 1 || priv->minorVersion >= 3) {
1453       xGLXQueryContextReq *req;
1454
1455       GetReq(GLXQueryContext, req);
1456
1457       req->reqType = opcode;
1458       req->glxCode = X_GLXQueryContext;
1459       req->context = contextID;
1460    }
1461    else {
1462       xGLXVendorPrivateReq *vpreq;
1463       xGLXQueryContextInfoEXTReq *req;
1464
1465       GetReqExtra(GLXVendorPrivate,
1466                   sz_xGLXQueryContextInfoEXTReq - sz_xGLXVendorPrivateReq,
1467                   vpreq);
1468       req = (xGLXQueryContextInfoEXTReq *) vpreq;
1469       req->reqType = opcode;
1470       req->glxCode = X_GLXVendorPrivateWithReply;
1471       req->vendorCode = X_GLXvop_QueryContextInfoEXT;
1472       req->context = contextID;
1473    }
1474
1475    _XReply(dpy, (xReply *) & reply, 0, False);
1476
1477    if (reply.n <= __GLX_MAX_CONTEXT_PROPS)
1478       nPropListBytes = reply.n * 2 * sizeof propList[0];
1479    else
1480       nPropListBytes = 0;
1481    _XRead(dpy, (char *) propList, nPropListBytes);
1482    UnlockDisplay(dpy);
1483    SyncHandle();
1484
1485    numProps = nPropListBytes / (2 * sizeof(propList[0]));
1486    share = None;
1487    mode = NULL;
1488    renderType = GLX_RGBA_TYPE; /* By default, assume RGBA context */
1489    pProp = propList;
1490
1491    for (i = 0, pProp = propList; i < numProps; i++, pProp += 2)
1492       switch (pProp[0]) {
1493       case GLX_SCREEN:
1494          screen = pProp[1];
1495          got_screen = True;
1496          break;
1497       case GLX_SHARE_CONTEXT_EXT:
1498          share = pProp[1];
1499          break;
1500       case GLX_VISUAL_ID_EXT:
1501          visualID = pProp[1];
1502          break;
1503       case GLX_FBCONFIG_ID:
1504          fbconfigID = pProp[1];
1505          break;
1506       case GLX_RENDER_TYPE:
1507          renderType = pProp[1];
1508          break;
1509       }
1510
1511    if (!got_screen)
1512       return NULL;
1513
1514    psc = GetGLXScreenConfigs(dpy, screen);
1515    if (psc == NULL)
1516       return NULL;
1517
1518    if (fbconfigID != 0) {
1519       mode = glx_config_find_fbconfig(psc->configs, fbconfigID);
1520    } else if (visualID != 0) {
1521       mode = glx_config_find_visual(psc->visuals, visualID);
1522    }
1523
1524    if (mode == NULL)
1525       return NULL;
1526
1527    ctx = indirect_create_context(psc, mode, NULL, renderType);
1528    if (ctx == NULL)
1529       return NULL;
1530
1531    ctx->xid = contextID;
1532    ctx->imported = GL_TRUE;
1533    ctx->share_xid = share;
1534
1535    return (GLXContext) ctx;
1536 }
1537
1538 #endif
1539
1540 _GLX_PUBLIC int
1541 glXQueryContext(Display * dpy, GLXContext ctx_user, int attribute, int *value)
1542 {
1543    struct glx_context *ctx = (struct glx_context *) ctx_user;
1544
1545    switch (attribute) {
1546       case GLX_SHARE_CONTEXT_EXT:
1547       *value = ctx->share_xid;
1548       break;
1549    case GLX_VISUAL_ID_EXT:
1550       *value = ctx->config ? ctx->config->visualID : None;
1551       break;
1552    case GLX_SCREEN:
1553       *value = ctx->screen;
1554       break;
1555    case GLX_FBCONFIG_ID:
1556       *value = ctx->config ? ctx->config->fbconfigID : None;
1557       break;
1558    case GLX_RENDER_TYPE:
1559       *value = ctx->renderType;
1560       break;
1561    default:
1562       return GLX_BAD_ATTRIBUTE;
1563    }
1564    return Success;
1565 }
1566
1567 _GLX_PUBLIC
1568 GLX_ALIAS(int, glXQueryContextInfoEXT,
1569           (Display * dpy, GLXContext ctx, int attribute, int *value),
1570           (dpy, ctx, attribute, value), glXQueryContext)
1571
1572 _GLX_PUBLIC GLXContextID glXGetContextIDEXT(const GLXContext ctx_user)
1573 {
1574    struct glx_context *ctx = (struct glx_context *) ctx_user;
1575
1576    return (ctx == NULL) ? None : ctx->xid;
1577 }
1578
1579 _GLX_PUBLIC void
1580 glXFreeContextEXT(Display *dpy, GLXContext ctx)
1581 {
1582    struct glx_context *gc = (struct glx_context *) ctx;
1583
1584    if (gc == NULL || gc->xid == None)
1585       return;
1586
1587    /* The GLX_EXT_import_context spec says:
1588     *
1589     *     "glXFreeContext does not free the server-side context information or
1590     *     the XID associated with the server-side context."
1591     *
1592     * Don't send any protocol.  Just destroy the client-side tracking of the
1593     * context.  Also, only release the context structure if it's not current.
1594     */
1595    __glXLock();
1596    if (gc->currentDpy) {
1597       gc->xid = None;
1598    } else {
1599       gc->vtable->destroy(gc);
1600    }
1601    __glXUnlock();
1602 }
1603
1604 _GLX_PUBLIC GLXFBConfig *
1605 glXChooseFBConfig(Display * dpy, int screen,
1606                   const int *attribList, int *nitems)
1607 {
1608    struct glx_config **config_list;
1609    int list_size;
1610
1611
1612    config_list = (struct glx_config **)
1613       glXGetFBConfigs(dpy, screen, &list_size);
1614
1615    if ((config_list != NULL) && (list_size > 0) && (attribList != NULL)) {
1616       list_size = choose_visual(config_list, list_size, attribList, GL_TRUE);
1617       if (list_size == 0) {
1618          free(config_list);
1619          config_list = NULL;
1620       }
1621    }
1622
1623    *nitems = list_size;
1624    return (GLXFBConfig *) config_list;
1625 }
1626
1627
1628 _GLX_PUBLIC GLXContext
1629 glXCreateNewContext(Display * dpy, GLXFBConfig fbconfig,
1630                     int renderType, GLXContext shareList, Bool allowDirect)
1631 {
1632    struct glx_config *config = (struct glx_config *) fbconfig;
1633    int screen = DefaultScreen(dpy);
1634    struct glx_config **config_list;
1635    int list_size;
1636    unsigned i;
1637
1638    if (!config) {
1639        __glXSendError(dpy, GLXBadFBConfig, 0, X_GLXCreateNewContext, false);
1640        return NULL;
1641    }
1642
1643    config_list = (struct glx_config **)
1644       glXGetFBConfigs(dpy, screen, &list_size);
1645
1646    for (i = 0; i < list_size; i++) {
1647        if (config_list[i] == config)
1648            break;
1649    }
1650    free(config_list);
1651
1652    if (i == list_size) {
1653        __glXSendError(dpy, GLXBadFBConfig, 0, X_GLXCreateNewContext, false);
1654        return NULL;
1655    }
1656
1657    return CreateContext(dpy, config->fbconfigID, config, shareList,
1658                         allowDirect, X_GLXCreateNewContext, renderType,
1659                         config->screen);
1660 }
1661
1662
1663 _GLX_PUBLIC GLXDrawable
1664 glXGetCurrentReadDrawable(void)
1665 {
1666    struct glx_context *gc = __glXGetCurrentContext();
1667
1668    return gc->currentReadable;
1669 }
1670
1671
1672 _GLX_PUBLIC GLXFBConfig *
1673 glXGetFBConfigs(Display * dpy, int screen, int *nelements)
1674 {
1675    struct glx_display *priv = __glXInitialize(dpy);
1676    struct glx_config **config_list = NULL;
1677    struct glx_config *config;
1678    unsigned num_configs = 0;
1679    int i;
1680
1681    *nelements = 0;
1682    if (priv && (priv->screens != NULL)
1683        && (screen >= 0) && (screen < ScreenCount(dpy))
1684        && (priv->screens[screen]->configs != NULL)
1685        && (priv->screens[screen]->configs->fbconfigID
1686            != (int) GLX_DONT_CARE)) {
1687
1688       for (config = priv->screens[screen]->configs; config != NULL;
1689            config = config->next) {
1690          if (config->fbconfigID != (int) GLX_DONT_CARE) {
1691             num_configs++;
1692          }
1693       }
1694
1695       config_list = malloc(num_configs * sizeof *config_list);
1696       if (config_list != NULL) {
1697          *nelements = num_configs;
1698          i = 0;
1699          for (config = priv->screens[screen]->configs; config != NULL;
1700               config = config->next) {
1701             if (config->fbconfigID != (int) GLX_DONT_CARE) {
1702                config_list[i] = config;
1703                i++;
1704             }
1705          }
1706       }
1707    }
1708
1709    return (GLXFBConfig *) config_list;
1710 }
1711
1712
1713 _GLX_PUBLIC int
1714 glXGetFBConfigAttrib(Display * dpy, GLXFBConfig fbconfig,
1715                      int attribute, int *value)
1716 {
1717    struct glx_config *config = ValidateGLXFBConfig(dpy, fbconfig);
1718
1719    if (config == NULL)
1720       return GLXBadFBConfig;
1721
1722    return glx_config_get(config, attribute, value);
1723 }
1724
1725
1726 _GLX_PUBLIC XVisualInfo *
1727 glXGetVisualFromFBConfig(Display * dpy, GLXFBConfig fbconfig)
1728 {
1729    XVisualInfo visualTemplate;
1730    struct glx_config *config = (struct glx_config *) fbconfig;
1731    int count;
1732
1733    /*
1734     ** Get a list of all visuals, return if list is empty
1735     */
1736    visualTemplate.visualid = config->visualID;
1737    return XGetVisualInfo(dpy, VisualIDMask, &visualTemplate, &count);
1738 }
1739
1740 #ifndef GLX_USE_APPLEGL
1741 /*
1742 ** GLX_SGI_swap_control
1743 */
1744 static int
1745 __glXSwapIntervalSGI(int interval)
1746 {
1747    xGLXVendorPrivateReq *req;
1748    struct glx_context *gc = __glXGetCurrentContext();
1749    struct glx_screen *psc;
1750    Display *dpy;
1751    CARD32 *interval_ptr;
1752    CARD8 opcode;
1753
1754    if (gc == &dummyContext) {
1755       return GLX_BAD_CONTEXT;
1756    }
1757
1758    if (interval <= 0) {
1759       return GLX_BAD_VALUE;
1760    }
1761
1762    psc = GetGLXScreenConfigs( gc->currentDpy, gc->screen);
1763
1764 #ifdef GLX_DIRECT_RENDERING
1765    if (gc->isDirect && psc && psc->driScreen &&
1766           psc->driScreen->setSwapInterval) {
1767       __GLXDRIdrawable *pdraw =
1768          GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
1769       psc->driScreen->setSwapInterval(pdraw, interval);
1770       return 0;
1771    }
1772 #endif
1773
1774    dpy = gc->currentDpy;
1775    opcode = __glXSetupForCommand(dpy);
1776    if (!opcode) {
1777       return 0;
1778    }
1779
1780    /* Send the glXSwapIntervalSGI request */
1781    LockDisplay(dpy);
1782    GetReqExtra(GLXVendorPrivate, sizeof(CARD32), req);
1783    req->reqType = opcode;
1784    req->glxCode = X_GLXVendorPrivate;
1785    req->vendorCode = X_GLXvop_SwapIntervalSGI;
1786    req->contextTag = gc->currentContextTag;
1787
1788    interval_ptr = (CARD32 *) (req + 1);
1789    *interval_ptr = interval;
1790
1791    UnlockDisplay(dpy);
1792    SyncHandle();
1793    XFlush(dpy);
1794
1795    return 0;
1796 }
1797
1798
1799 /*
1800 ** GLX_MESA_swap_control
1801 */
1802 static int
1803 __glXSwapIntervalMESA(unsigned int interval)
1804 {
1805 #ifdef GLX_DIRECT_RENDERING
1806    struct glx_context *gc = __glXGetCurrentContext();
1807
1808    if (gc != &dummyContext && gc->isDirect) {
1809       struct glx_screen *psc;
1810
1811       psc = GetGLXScreenConfigs( gc->currentDpy, gc->screen);
1812       if (psc && psc->driScreen && psc->driScreen->setSwapInterval) {
1813          __GLXDRIdrawable *pdraw =
1814             GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
1815          return psc->driScreen->setSwapInterval(pdraw, interval);
1816       }
1817    }
1818 #endif
1819
1820    return GLX_BAD_CONTEXT;
1821 }
1822
1823
1824 static int
1825 __glXGetSwapIntervalMESA(void)
1826 {
1827 #ifdef GLX_DIRECT_RENDERING
1828    struct glx_context *gc = __glXGetCurrentContext();
1829
1830    if (gc != &dummyContext && gc->isDirect) {
1831       struct glx_screen *psc;
1832
1833       psc = GetGLXScreenConfigs( gc->currentDpy, gc->screen);
1834       if (psc && psc->driScreen && psc->driScreen->getSwapInterval) {
1835          __GLXDRIdrawable *pdraw =
1836             GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
1837          return psc->driScreen->getSwapInterval(pdraw);
1838       }
1839    }
1840 #endif
1841
1842    return 0;
1843 }
1844
1845
1846 /*
1847 ** GLX_SGI_video_sync
1848 */
1849 static int
1850 __glXGetVideoSyncSGI(unsigned int *count)
1851 {
1852    int64_t ust, msc, sbc;
1853    int ret;
1854    struct glx_context *gc = __glXGetCurrentContext();
1855    struct glx_screen *psc;
1856 #ifdef GLX_DIRECT_RENDERING
1857    __GLXDRIdrawable *pdraw;
1858 #endif
1859
1860    if (gc == &dummyContext)
1861       return GLX_BAD_CONTEXT;
1862
1863 #ifdef GLX_DIRECT_RENDERING
1864    if (!gc->isDirect)
1865       return GLX_BAD_CONTEXT;
1866 #endif
1867
1868    psc = GetGLXScreenConfigs(gc->currentDpy, gc->screen);
1869 #ifdef GLX_DIRECT_RENDERING
1870    pdraw = GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
1871 #endif
1872
1873    /* FIXME: Looking at the GLX_SGI_video_sync spec in the extension registry,
1874     * FIXME: there should be a GLX encoding for this call.  I can find no
1875     * FIXME: documentation for the GLX encoding.
1876     */
1877 #ifdef GLX_DIRECT_RENDERING
1878    if (psc && psc->driScreen && psc->driScreen->getDrawableMSC) {
1879       ret = psc->driScreen->getDrawableMSC(psc, pdraw, &ust, &msc, &sbc);
1880       *count = (unsigned) msc;
1881       return (ret == True) ? 0 : GLX_BAD_CONTEXT;
1882    }
1883 #endif
1884
1885    return GLX_BAD_CONTEXT;
1886 }
1887
1888 static int
1889 __glXWaitVideoSyncSGI(int divisor, int remainder, unsigned int *count)
1890 {
1891    struct glx_context *gc = __glXGetCurrentContext();
1892    struct glx_screen *psc;
1893 #ifdef GLX_DIRECT_RENDERING
1894    __GLXDRIdrawable *pdraw;
1895 #endif
1896    int64_t ust, msc, sbc;
1897    int ret;
1898
1899    if (divisor <= 0 || remainder < 0)
1900       return GLX_BAD_VALUE;
1901
1902    if (gc == &dummyContext)
1903       return GLX_BAD_CONTEXT;
1904
1905 #ifdef GLX_DIRECT_RENDERING
1906    if (!gc->isDirect)
1907       return GLX_BAD_CONTEXT;
1908 #endif
1909
1910    psc = GetGLXScreenConfigs( gc->currentDpy, gc->screen);
1911 #ifdef GLX_DIRECT_RENDERING
1912    pdraw = GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
1913 #endif
1914
1915 #ifdef GLX_DIRECT_RENDERING
1916    if (psc && psc->driScreen && psc->driScreen->waitForMSC) {
1917       ret = psc->driScreen->waitForMSC(pdraw, 0, divisor, remainder, &ust, &msc,
1918                                        &sbc);
1919       *count = (unsigned) msc;
1920       return (ret == True) ? 0 : GLX_BAD_CONTEXT;
1921    }
1922 #endif
1923
1924    return GLX_BAD_CONTEXT;
1925 }
1926
1927 #endif /* GLX_USE_APPLEGL */
1928
1929 /*
1930 ** GLX_SGIX_fbconfig
1931 ** Many of these functions are aliased to GLX 1.3 entry points in the
1932 ** GLX_functions table.
1933 */
1934
1935 _GLX_PUBLIC
1936 GLX_ALIAS(int, glXGetFBConfigAttribSGIX,
1937           (Display * dpy, GLXFBConfigSGIX config, int attribute, int *value),
1938           (dpy, config, attribute, value), glXGetFBConfigAttrib)
1939
1940 _GLX_PUBLIC GLX_ALIAS(GLXFBConfigSGIX *, glXChooseFBConfigSGIX,
1941                  (Display * dpy, int screen, int *attrib_list,
1942                   int *nelements), (dpy, screen, attrib_list, nelements),
1943                  glXChooseFBConfig)
1944
1945 _GLX_PUBLIC GLX_ALIAS(XVisualInfo *, glXGetVisualFromFBConfigSGIX,
1946                  (Display * dpy, GLXFBConfigSGIX config),
1947                  (dpy, config), glXGetVisualFromFBConfig)
1948
1949 _GLX_PUBLIC GLXPixmap
1950 glXCreateGLXPixmapWithConfigSGIX(Display * dpy,
1951                                  GLXFBConfigSGIX fbconfig,
1952                                  Pixmap pixmap)
1953 {
1954 #ifndef GLX_USE_APPLEGL
1955    xGLXVendorPrivateWithReplyReq *vpreq;
1956    xGLXCreateGLXPixmapWithConfigSGIXReq *req;
1957    GLXPixmap xid = None;
1958    CARD8 opcode;
1959    struct glx_screen *psc;
1960 #endif
1961    struct glx_config *config = (struct glx_config *) fbconfig;
1962
1963
1964    if ((dpy == NULL) || (config == NULL)) {
1965       return None;
1966    }
1967 #ifdef GLX_USE_APPLEGL
1968    if(apple_glx_pixmap_create(dpy, config->screen, pixmap, config))
1969       return None;
1970    return pixmap;
1971 #else
1972
1973    psc = GetGLXScreenConfigs(dpy, config->screen);
1974    if ((psc != NULL)
1975        && __glXExtensionBitIsEnabled(psc, SGIX_fbconfig_bit)) {
1976       opcode = __glXSetupForCommand(dpy);
1977       if (!opcode) {
1978          return None;
1979       }
1980
1981       /* Send the glXCreateGLXPixmapWithConfigSGIX request */
1982       LockDisplay(dpy);
1983       GetReqExtra(GLXVendorPrivateWithReply,
1984                   sz_xGLXCreateGLXPixmapWithConfigSGIXReq -
1985                   sz_xGLXVendorPrivateWithReplyReq, vpreq);
1986       req = (xGLXCreateGLXPixmapWithConfigSGIXReq *) vpreq;
1987       req->reqType = opcode;
1988       req->glxCode = X_GLXVendorPrivateWithReply;
1989       req->vendorCode = X_GLXvop_CreateGLXPixmapWithConfigSGIX;
1990       req->screen = config->screen;
1991       req->fbconfig = config->fbconfigID;
1992       req->pixmap = pixmap;
1993       req->glxpixmap = xid = XAllocID(dpy);
1994       UnlockDisplay(dpy);
1995       SyncHandle();
1996    }
1997
1998    return xid;
1999 #endif
2000 }
2001
2002 _GLX_PUBLIC GLXContext
2003 glXCreateContextWithConfigSGIX(Display * dpy,
2004                                GLXFBConfigSGIX fbconfig, int renderType,
2005                                GLXContext shareList, Bool allowDirect)
2006 {
2007    GLXContext gc = NULL;
2008    struct glx_config *config = (struct glx_config *) fbconfig;
2009    struct glx_screen *psc;
2010
2011
2012    if ((dpy == NULL) || (config == NULL)) {
2013       return None;
2014    }
2015
2016    psc = GetGLXScreenConfigs(dpy, config->screen);
2017    if ((psc != NULL)
2018        && __glXExtensionBitIsEnabled(psc, SGIX_fbconfig_bit)) {
2019       gc = CreateContext(dpy, config->fbconfigID, config, shareList,
2020                          allowDirect,
2021                          X_GLXvop_CreateContextWithConfigSGIX, renderType,
2022                          config->screen);
2023    }
2024
2025    return gc;
2026 }
2027
2028
2029 _GLX_PUBLIC GLXFBConfigSGIX
2030 glXGetFBConfigFromVisualSGIX(Display * dpy, XVisualInfo * vis)
2031 {
2032    struct glx_display *priv;
2033    struct glx_screen *psc = NULL;
2034
2035    if ((GetGLXPrivScreenConfig(dpy, vis->screen, &priv, &psc) == Success)
2036        && __glXExtensionBitIsEnabled(psc, SGIX_fbconfig_bit)
2037        && (psc->configs->fbconfigID != (int) GLX_DONT_CARE)) {
2038       return (GLXFBConfigSGIX) glx_config_find_visual(psc->configs,
2039                                                       vis->visualid);
2040    }
2041
2042    return NULL;
2043 }
2044
2045 #ifndef GLX_USE_APPLEGL
2046 /*
2047 ** GLX_SGIX_swap_group
2048 */
2049 static void
2050 __glXJoinSwapGroupSGIX(Display * dpy, GLXDrawable drawable,
2051                        GLXDrawable member)
2052 {
2053    (void) dpy;
2054    (void) drawable;
2055    (void) member;
2056 }
2057
2058
2059 /*
2060 ** GLX_SGIX_swap_barrier
2061 */
2062 static void
2063 __glXBindSwapBarrierSGIX(Display * dpy, GLXDrawable drawable, int barrier)
2064 {
2065    (void) dpy;
2066    (void) drawable;
2067    (void) barrier;
2068 }
2069
2070 static Bool
2071 __glXQueryMaxSwapBarriersSGIX(Display * dpy, int screen, int *max)
2072 {
2073    (void) dpy;
2074    (void) screen;
2075    (void) max;
2076    return False;
2077 }
2078
2079
2080 /*
2081 ** GLX_OML_sync_control
2082 */
2083 static Bool
2084 __glXGetSyncValuesOML(Display * dpy, GLXDrawable drawable,
2085                       int64_t * ust, int64_t * msc, int64_t * sbc)
2086 {
2087    struct glx_display * const priv = __glXInitialize(dpy);
2088    int ret;
2089 #ifdef GLX_DIRECT_RENDERING
2090    __GLXDRIdrawable *pdraw;
2091 #endif
2092    struct glx_screen *psc;
2093
2094    if (!priv)
2095       return False;
2096
2097 #ifdef GLX_DIRECT_RENDERING
2098    pdraw = GetGLXDRIDrawable(dpy, drawable);
2099    psc = pdraw ? pdraw->psc : NULL;
2100    if (pdraw && psc->driScreen->getDrawableMSC) {
2101       ret = psc->driScreen->getDrawableMSC(psc, pdraw, ust, msc, sbc);
2102       return ret;
2103    }
2104 #endif
2105
2106    return False;
2107 }
2108
2109 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
2110 _X_HIDDEN GLboolean
2111 __glxGetMscRate(struct glx_screen *psc,
2112                 int32_t * numerator, int32_t * denominator)
2113 {
2114 #ifdef XF86VIDMODE
2115    XF86VidModeModeLine mode_line;
2116    int dot_clock;
2117    int i;
2118
2119    if (XF86VidModeQueryVersion(psc->dpy, &i, &i) &&
2120        XF86VidModeGetModeLine(psc->dpy, psc->scr, &dot_clock, &mode_line)) {
2121       unsigned n = dot_clock * 1000;
2122       unsigned d = mode_line.vtotal * mode_line.htotal;
2123
2124 # define V_INTERLACE 0x010
2125 # define V_DBLSCAN   0x020
2126
2127       if (mode_line.flags & V_INTERLACE)
2128          n *= 2;
2129       else if (mode_line.flags & V_DBLSCAN)
2130          d *= 2;
2131
2132       /* The OML_sync_control spec requires that if the refresh rate is a
2133        * whole number, that the returned numerator be equal to the refresh
2134        * rate and the denominator be 1.
2135        */
2136
2137       if (n % d == 0) {
2138          n /= d;
2139          d = 1;
2140       }
2141       else {
2142          static const unsigned f[] = { 13, 11, 7, 5, 3, 2, 0 };
2143
2144          /* This is a poor man's way to reduce a fraction.  It's far from
2145           * perfect, but it will work well enough for this situation.
2146           */
2147
2148          for (i = 0; f[i] != 0; i++) {
2149             while (n % f[i] == 0 && d % f[i] == 0) {
2150                d /= f[i];
2151                n /= f[i];
2152             }
2153          }
2154       }
2155
2156       *numerator = n;
2157       *denominator = d;
2158
2159       return True;
2160    }
2161    else
2162 #endif
2163
2164    return False;
2165 }
2166 #endif
2167
2168 /**
2169  * Determine the refresh rate of the specified drawable and display.
2170  *
2171  * \param dpy          Display whose refresh rate is to be determined.
2172  * \param drawable     Drawable whose refresh rate is to be determined.
2173  * \param numerator    Numerator of the refresh rate.
2174  * \param demoninator  Denominator of the refresh rate.
2175  * \return  If the refresh rate for the specified display and drawable could
2176  *          be calculated, True is returned.  Otherwise False is returned.
2177  *
2178  * \note This function is implemented entirely client-side.  A lot of other
2179  *       functionality is required to export GLX_OML_sync_control, so on
2180  *       XFree86 this function can be called for direct-rendering contexts
2181  *       when GLX_OML_sync_control appears in the client extension string.
2182  */
2183
2184 _X_HIDDEN GLboolean
2185 __glXGetMscRateOML(Display * dpy, GLXDrawable drawable,
2186                    int32_t * numerator, int32_t * denominator)
2187 {
2188 #if defined( GLX_DIRECT_RENDERING ) && defined( XF86VIDMODE )
2189    __GLXDRIdrawable *draw = GetGLXDRIDrawable(dpy, drawable);
2190
2191    if (draw == NULL)
2192       return False;
2193
2194    return __glxGetMscRate(draw->psc, numerator, denominator);
2195 #else
2196    (void) dpy;
2197    (void) drawable;
2198    (void) numerator;
2199    (void) denominator;
2200 #endif
2201    return False;
2202 }
2203
2204
2205 static int64_t
2206 __glXSwapBuffersMscOML(Display * dpy, GLXDrawable drawable,
2207                        int64_t target_msc, int64_t divisor, int64_t remainder)
2208 {
2209    struct glx_context *gc = __glXGetCurrentContext();
2210 #ifdef GLX_DIRECT_RENDERING
2211    __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, drawable);
2212    struct glx_screen *psc = pdraw ? pdraw->psc : NULL;
2213 #endif
2214
2215    if (gc == &dummyContext) /* no GLX for this */
2216       return -1;
2217
2218 #ifdef GLX_DIRECT_RENDERING
2219    if (!pdraw || !gc->isDirect)
2220       return -1;
2221 #endif
2222
2223    /* The OML_sync_control spec says these should "generate a GLX_BAD_VALUE
2224     * error", but it also says "It [glXSwapBuffersMscOML] will return a value
2225     * of -1 if the function failed because of errors detected in the input
2226     * parameters"
2227     */
2228    if (divisor < 0 || remainder < 0 || target_msc < 0)
2229       return -1;
2230    if (divisor > 0 && remainder >= divisor)
2231       return -1;
2232
2233    if (target_msc == 0 && divisor == 0 && remainder == 0)
2234       remainder = 1;
2235
2236 #ifdef GLX_DIRECT_RENDERING
2237    if (psc->driScreen && psc->driScreen->swapBuffers)
2238       return (*psc->driScreen->swapBuffers)(pdraw, target_msc, divisor,
2239                                             remainder, False);
2240 #endif
2241
2242    return -1;
2243 }
2244
2245
2246 static Bool
2247 __glXWaitForMscOML(Display * dpy, GLXDrawable drawable,
2248                    int64_t target_msc, int64_t divisor,
2249                    int64_t remainder, int64_t * ust,
2250                    int64_t * msc, int64_t * sbc)
2251 {
2252 #ifdef GLX_DIRECT_RENDERING
2253    __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, drawable);
2254    struct glx_screen *psc = pdraw ? pdraw->psc : NULL;
2255    int ret;
2256 #endif
2257
2258
2259    /* The OML_sync_control spec says these should "generate a GLX_BAD_VALUE
2260     * error", but the return type in the spec is Bool.
2261     */
2262    if (divisor < 0 || remainder < 0 || target_msc < 0)
2263       return False;
2264    if (divisor > 0 && remainder >= divisor)
2265       return False;
2266
2267 #ifdef GLX_DIRECT_RENDERING
2268    if (pdraw && psc->driScreen && psc->driScreen->waitForMSC) {
2269       ret = psc->driScreen->waitForMSC(pdraw, target_msc, divisor, remainder,
2270                                        ust, msc, sbc);
2271       return ret;
2272    }
2273 #endif
2274
2275    return False;
2276 }
2277
2278
2279 static Bool
2280 __glXWaitForSbcOML(Display * dpy, GLXDrawable drawable,
2281                    int64_t target_sbc, int64_t * ust,
2282                    int64_t * msc, int64_t * sbc)
2283 {
2284 #ifdef GLX_DIRECT_RENDERING
2285    __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, drawable);
2286    struct glx_screen *psc = pdraw ? pdraw->psc : NULL;
2287    int ret;
2288 #endif
2289
2290    /* The OML_sync_control spec says this should "generate a GLX_BAD_VALUE
2291     * error", but the return type in the spec is Bool.
2292     */
2293    if (target_sbc < 0)
2294       return False;
2295
2296 #ifdef GLX_DIRECT_RENDERING
2297    if (pdraw && psc->driScreen && psc->driScreen->waitForSBC) {
2298       ret = psc->driScreen->waitForSBC(pdraw, target_sbc, ust, msc, sbc);
2299       return ret;
2300    }
2301 #endif
2302
2303    return False;
2304 }
2305
2306 /*@}*/
2307
2308
2309 /**
2310  * Mesa extension stubs.  These will help reduce portability problems.
2311  */
2312 /*@{*/
2313
2314 /**
2315  * Release all buffers associated with the specified GLX drawable.
2316  *
2317  * \todo
2318  * This function was intended for stand-alone Mesa.  The issue there is that
2319  * the library doesn't get any notification when a window is closed.  In
2320  * DRI there is a similar but slightly different issue.  When GLX 1.3 is
2321  * supported, there are 3 different functions to destroy a drawable.  It
2322  * should be possible to create GLX protocol (or have it determine which
2323  * protocol to use based on the type of the drawable) to have one function
2324  * do the work of 3.  For the direct-rendering case, this function could
2325  * just call the driver's \c __DRIdrawableRec::destroyDrawable function.
2326  * This would reduce the frequency with which \c __driGarbageCollectDrawables
2327  * would need to be used.  This really should be done as part of the new DRI
2328  * interface work.
2329  *
2330  * \sa http://oss.sgi.com/projects/ogl-sample/registry/MESA/release_buffers.txt
2331  *     __driGarbageCollectDrawables
2332  *     glXDestroyGLXPixmap
2333  *     glXDestroyPbuffer glXDestroyPixmap glXDestroyWindow
2334  *     glXDestroyGLXPbufferSGIX glXDestroyGLXVideoSourceSGIX
2335  */
2336 static Bool
2337 __glXReleaseBuffersMESA(Display * dpy, GLXDrawable d)
2338 {
2339    (void) dpy;
2340    (void) d;
2341    return False;
2342 }
2343
2344
2345 _GLX_PUBLIC GLXPixmap
2346 glXCreateGLXPixmapMESA(Display * dpy, XVisualInfo * visual,
2347                        Pixmap pixmap, Colormap cmap)
2348 {
2349    (void) dpy;
2350    (void) visual;
2351    (void) pixmap;
2352    (void) cmap;
2353    return 0;
2354 }
2355
2356 /*@}*/
2357
2358
2359 /**
2360  * GLX_MESA_copy_sub_buffer
2361  */
2362 #define X_GLXvop_CopySubBufferMESA 5154 /* temporary */
2363 static void
2364 __glXCopySubBufferMESA(Display * dpy, GLXDrawable drawable,
2365                        int x, int y, int width, int height)
2366 {
2367    xGLXVendorPrivateReq *req;
2368    struct glx_context *gc;
2369    GLXContextTag tag;
2370    CARD32 *drawable_ptr;
2371    INT32 *x_ptr, *y_ptr, *w_ptr, *h_ptr;
2372    CARD8 opcode;
2373
2374 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
2375    __GLXDRIdrawable *pdraw = GetGLXDRIDrawable(dpy, drawable);
2376    if (pdraw != NULL) {
2377       struct glx_screen *psc = pdraw->psc;
2378       if (psc->driScreen->copySubBuffer != NULL) {
2379          (*psc->driScreen->copySubBuffer) (pdraw, x, y, width, height, True);
2380       }
2381
2382       return;
2383    }
2384 #endif
2385
2386    opcode = __glXSetupForCommand(dpy);
2387    if (!opcode)
2388       return;
2389
2390    /*
2391     ** The calling thread may or may not have a current context.  If it
2392     ** does, send the context tag so the server can do a flush.
2393     */
2394    gc = __glXGetCurrentContext();
2395    if ((gc != &dummyContext) && (dpy == gc->currentDpy) &&
2396        ((drawable == gc->currentDrawable) ||
2397         (drawable == gc->currentReadable))) {
2398       tag = gc->currentContextTag;
2399    }
2400    else {
2401       tag = 0;
2402    }
2403
2404    LockDisplay(dpy);
2405    GetReqExtra(GLXVendorPrivate, sizeof(CARD32) + sizeof(INT32) * 4, req);
2406    req->reqType = opcode;
2407    req->glxCode = X_GLXVendorPrivate;
2408    req->vendorCode = X_GLXvop_CopySubBufferMESA;
2409    req->contextTag = tag;
2410
2411    drawable_ptr = (CARD32 *) (req + 1);
2412    x_ptr = (INT32 *) (drawable_ptr + 1);
2413    y_ptr = (INT32 *) (drawable_ptr + 2);
2414    w_ptr = (INT32 *) (drawable_ptr + 3);
2415    h_ptr = (INT32 *) (drawable_ptr + 4);
2416
2417    *drawable_ptr = drawable;
2418    *x_ptr = x;
2419    *y_ptr = y;
2420    *w_ptr = width;
2421    *h_ptr = height;
2422
2423    UnlockDisplay(dpy);
2424    SyncHandle();
2425 }
2426
2427 /*@{*/
2428 static void
2429 __glXBindTexImageEXT(Display * dpy,
2430                      GLXDrawable drawable, int buffer, const int *attrib_list)
2431 {
2432    struct glx_context *gc = __glXGetCurrentContext();
2433
2434    if (gc == &dummyContext || gc->vtable->bind_tex_image == NULL)
2435       return;
2436
2437    gc->vtable->bind_tex_image(dpy, drawable, buffer, attrib_list);
2438 }
2439
2440 static void
2441 __glXReleaseTexImageEXT(Display * dpy, GLXDrawable drawable, int buffer)
2442 {
2443    struct glx_context *gc = __glXGetCurrentContext();
2444
2445    if (gc == &dummyContext || gc->vtable->release_tex_image == NULL)
2446       return;
2447
2448    gc->vtable->release_tex_image(dpy, drawable, buffer);
2449 }
2450
2451 /*@}*/
2452
2453 #endif /* GLX_USE_APPLEGL */
2454
2455 /*
2456 ** glXGetProcAddress support
2457 */
2458
2459 struct name_address_pair
2460 {
2461    const char *Name;
2462    GLvoid *Address;
2463 };
2464
2465 #define GLX_FUNCTION(f) { # f, (GLvoid *) f }
2466 #define GLX_FUNCTION2(n,f) { # n, (GLvoid *) f }
2467
2468 static const struct name_address_pair GLX_functions[] = {
2469    /*** GLX_VERSION_1_0 ***/
2470    GLX_FUNCTION(glXChooseVisual),
2471    GLX_FUNCTION(glXCopyContext),
2472    GLX_FUNCTION(glXCreateContext),
2473    GLX_FUNCTION(glXCreateGLXPixmap),
2474    GLX_FUNCTION(glXDestroyContext),
2475    GLX_FUNCTION(glXDestroyGLXPixmap),
2476    GLX_FUNCTION(glXGetConfig),
2477    GLX_FUNCTION(glXGetCurrentContext),
2478    GLX_FUNCTION(glXGetCurrentDrawable),
2479    GLX_FUNCTION(glXIsDirect),
2480    GLX_FUNCTION(glXMakeCurrent),
2481    GLX_FUNCTION(glXQueryExtension),
2482    GLX_FUNCTION(glXQueryVersion),
2483    GLX_FUNCTION(glXSwapBuffers),
2484    GLX_FUNCTION(glXUseXFont),
2485    GLX_FUNCTION(glXWaitGL),
2486    GLX_FUNCTION(glXWaitX),
2487
2488    /*** GLX_VERSION_1_1 ***/
2489    GLX_FUNCTION(glXGetClientString),
2490    GLX_FUNCTION(glXQueryExtensionsString),
2491    GLX_FUNCTION(glXQueryServerString),
2492
2493    /*** GLX_VERSION_1_2 ***/
2494    GLX_FUNCTION(glXGetCurrentDisplay),
2495
2496    /*** GLX_VERSION_1_3 ***/
2497    GLX_FUNCTION(glXChooseFBConfig),
2498    GLX_FUNCTION(glXCreateNewContext),
2499    GLX_FUNCTION(glXCreatePbuffer),
2500    GLX_FUNCTION(glXCreatePixmap),
2501    GLX_FUNCTION(glXCreateWindow),
2502    GLX_FUNCTION(glXDestroyPbuffer),
2503    GLX_FUNCTION(glXDestroyPixmap),
2504    GLX_FUNCTION(glXDestroyWindow),
2505    GLX_FUNCTION(glXGetCurrentReadDrawable),
2506    GLX_FUNCTION(glXGetFBConfigAttrib),
2507    GLX_FUNCTION(glXGetFBConfigs),
2508    GLX_FUNCTION(glXGetSelectedEvent),
2509    GLX_FUNCTION(glXGetVisualFromFBConfig),
2510    GLX_FUNCTION(glXMakeContextCurrent),
2511    GLX_FUNCTION(glXQueryContext),
2512    GLX_FUNCTION(glXQueryDrawable),
2513    GLX_FUNCTION(glXSelectEvent),
2514
2515 #ifndef GLX_USE_APPLEGL
2516    /*** GLX_SGI_swap_control ***/
2517    GLX_FUNCTION2(glXSwapIntervalSGI, __glXSwapIntervalSGI),
2518
2519    /*** GLX_SGI_video_sync ***/
2520    GLX_FUNCTION2(glXGetVideoSyncSGI, __glXGetVideoSyncSGI),
2521    GLX_FUNCTION2(glXWaitVideoSyncSGI, __glXWaitVideoSyncSGI),
2522
2523    /*** GLX_SGI_make_current_read ***/
2524    GLX_FUNCTION2(glXMakeCurrentReadSGI, glXMakeContextCurrent),
2525    GLX_FUNCTION2(glXGetCurrentReadDrawableSGI, glXGetCurrentReadDrawable),
2526
2527    /*** GLX_EXT_import_context ***/
2528    GLX_FUNCTION(glXFreeContextEXT),
2529    GLX_FUNCTION(glXGetContextIDEXT),
2530    GLX_FUNCTION2(glXGetCurrentDisplayEXT, glXGetCurrentDisplay),
2531    GLX_FUNCTION(glXImportContextEXT),
2532    GLX_FUNCTION2(glXQueryContextInfoEXT, glXQueryContext),
2533 #endif
2534
2535    /*** GLX_SGIX_fbconfig ***/
2536    GLX_FUNCTION2(glXGetFBConfigAttribSGIX, glXGetFBConfigAttrib),
2537    GLX_FUNCTION2(glXChooseFBConfigSGIX, glXChooseFBConfig),
2538    GLX_FUNCTION(glXCreateGLXPixmapWithConfigSGIX),
2539    GLX_FUNCTION(glXCreateContextWithConfigSGIX),
2540    GLX_FUNCTION2(glXGetVisualFromFBConfigSGIX, glXGetVisualFromFBConfig),
2541    GLX_FUNCTION(glXGetFBConfigFromVisualSGIX),
2542
2543 #ifndef GLX_USE_APPLEGL
2544    /*** GLX_SGIX_pbuffer ***/
2545    GLX_FUNCTION(glXCreateGLXPbufferSGIX),
2546    GLX_FUNCTION(glXDestroyGLXPbufferSGIX),
2547    GLX_FUNCTION(glXQueryGLXPbufferSGIX),
2548    GLX_FUNCTION(glXSelectEventSGIX),
2549    GLX_FUNCTION(glXGetSelectedEventSGIX),
2550
2551    /*** GLX_SGIX_swap_group ***/
2552    GLX_FUNCTION2(glXJoinSwapGroupSGIX, __glXJoinSwapGroupSGIX),
2553
2554    /*** GLX_SGIX_swap_barrier ***/
2555    GLX_FUNCTION2(glXBindSwapBarrierSGIX, __glXBindSwapBarrierSGIX),
2556    GLX_FUNCTION2(glXQueryMaxSwapBarriersSGIX, __glXQueryMaxSwapBarriersSGIX),
2557
2558    /*** GLX_MESA_copy_sub_buffer ***/
2559    GLX_FUNCTION2(glXCopySubBufferMESA, __glXCopySubBufferMESA),
2560
2561    /*** GLX_MESA_pixmap_colormap ***/
2562    GLX_FUNCTION(glXCreateGLXPixmapMESA),
2563
2564    /*** GLX_MESA_release_buffers ***/
2565    GLX_FUNCTION2(glXReleaseBuffersMESA, __glXReleaseBuffersMESA),
2566
2567    /*** GLX_MESA_swap_control ***/
2568    GLX_FUNCTION2(glXSwapIntervalMESA, __glXSwapIntervalMESA),
2569    GLX_FUNCTION2(glXGetSwapIntervalMESA, __glXGetSwapIntervalMESA),
2570 #endif
2571
2572    /*** GLX_ARB_get_proc_address ***/
2573    GLX_FUNCTION(glXGetProcAddressARB),
2574
2575    /*** GLX 1.4 ***/
2576    GLX_FUNCTION2(glXGetProcAddress, glXGetProcAddressARB),
2577
2578 #ifndef GLX_USE_APPLEGL
2579    /*** GLX_OML_sync_control ***/
2580    GLX_FUNCTION2(glXWaitForSbcOML, __glXWaitForSbcOML),
2581    GLX_FUNCTION2(glXWaitForMscOML, __glXWaitForMscOML),
2582    GLX_FUNCTION2(glXSwapBuffersMscOML, __glXSwapBuffersMscOML),
2583    GLX_FUNCTION2(glXGetMscRateOML, __glXGetMscRateOML),
2584    GLX_FUNCTION2(glXGetSyncValuesOML, __glXGetSyncValuesOML),
2585
2586    /*** GLX_EXT_texture_from_pixmap ***/
2587    GLX_FUNCTION2(glXBindTexImageEXT, __glXBindTexImageEXT),
2588    GLX_FUNCTION2(glXReleaseTexImageEXT, __glXReleaseTexImageEXT),
2589 #endif
2590
2591 #if defined(GLX_DIRECT_RENDERING) && defined(GLX_USE_DRM)
2592    /*** DRI configuration ***/
2593    GLX_FUNCTION(glXGetScreenDriver),
2594    GLX_FUNCTION(glXGetDriverConfig),
2595 #endif
2596
2597    /*** GLX_ARB_create_context and GLX_ARB_create_context_profile ***/
2598    GLX_FUNCTION(glXCreateContextAttribsARB),
2599
2600    /*** GLX_MESA_query_renderer ***/
2601    GLX_FUNCTION(glXQueryRendererIntegerMESA),
2602    GLX_FUNCTION(glXQueryRendererStringMESA),
2603    GLX_FUNCTION(glXQueryCurrentRendererIntegerMESA),
2604    GLX_FUNCTION(glXQueryCurrentRendererStringMESA),
2605
2606    {NULL, NULL}                 /* end of list */
2607 };
2608
2609 static const GLvoid *
2610 get_glx_proc_address(const char *funcName)
2611 {
2612    GLuint i;
2613
2614    /* try static functions */
2615    for (i = 0; GLX_functions[i].Name; i++) {
2616       if (strcmp(GLX_functions[i].Name, funcName) == 0)
2617          return GLX_functions[i].Address;
2618    }
2619
2620    return NULL;
2621 }
2622
2623 /**
2624  * Get the address of a named GL function.  This is the pre-GLX 1.4 name for
2625  * \c glXGetProcAddress.
2626  *
2627  * \param procName  Name of a GL or GLX function.
2628  * \returns         A pointer to the named function
2629  *
2630  * \sa glXGetProcAddress
2631  */
2632 _GLX_PUBLIC void (*glXGetProcAddressARB(const GLubyte * procName)) (void)
2633 {
2634    typedef void (*gl_function) (void);
2635    gl_function f;
2636
2637
2638    /* Search the table of GLX and internal functions first.  If that
2639     * fails and the supplied name could be a valid core GL name, try
2640     * searching the core GL function table.  This check is done to prevent
2641     * DRI based drivers from searching the core GL function table for
2642     * internal API functions.
2643     */
2644    f = (gl_function) get_glx_proc_address((const char *) procName);
2645    if ((f == NULL) && (procName[0] == 'g') && (procName[1] == 'l')
2646        && (procName[2] != 'X')) {
2647 #ifdef GLX_SHARED_GLAPI
2648       f = (gl_function) __indirect_get_proc_address((const char *) procName);
2649 #endif
2650       if (!f)
2651          f = (gl_function) _glapi_get_proc_address((const char *) procName);
2652       if (!f) {
2653          struct glx_context *gc = __glXGetCurrentContext();
2654
2655          if (gc != NULL && gc->vtable->get_proc_address != NULL)
2656             f = gc->vtable->get_proc_address((const char *) procName);
2657       }
2658    }
2659    return f;
2660 }
2661
2662 /**
2663  * Get the address of a named GL function.  This is the GLX 1.4 name for
2664  * \c glXGetProcAddressARB.
2665  *
2666  * \param procName  Name of a GL or GLX function.
2667  * \returns         A pointer to the named function
2668  *
2669  * \sa glXGetProcAddressARB
2670  */
2671 _GLX_PUBLIC void (*glXGetProcAddress(const GLubyte * procName)) (void)
2672 #if defined(__GNUC__) && !defined(GLX_ALIAS_UNSUPPORTED)
2673 # if defined(USE_MGL_NAMESPACE)
2674    __attribute__ ((alias("mglXGetProcAddressARB")));
2675 # else
2676    __attribute__ ((alias("glXGetProcAddressARB")));
2677 # endif
2678 #else
2679 {
2680    return glXGetProcAddressARB(procName);
2681 }
2682 #endif /* __GNUC__ */
2683
2684
2685 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
2686 /**
2687  * Get the unadjusted system time (UST).  Currently, the UST is measured in
2688  * microseconds since Epoc.  The actual resolution of the UST may vary from
2689  * system to system, and the units may vary from release to release.
2690  * Drivers should not call this function directly.  They should instead use
2691  * \c glXGetProcAddress to obtain a pointer to the function.
2692  *
2693  * \param ust Location to store the 64-bit UST
2694  * \returns Zero on success or a negative errno value on failure.
2695  *
2696  * \sa glXGetProcAddress, PFNGLXGETUSTPROC
2697  *
2698  * \since Internal API version 20030317.
2699  */
2700 _X_HIDDEN int
2701 __glXGetUST(int64_t * ust)
2702 {
2703    struct timeval tv;
2704
2705    if (ust == NULL) {
2706       return -EFAULT;
2707    }
2708
2709    if (gettimeofday(&tv, NULL) == 0) {
2710       ust[0] = (tv.tv_sec * 1000000) + tv.tv_usec;
2711       return 0;
2712    }
2713    else {
2714       return -errno;
2715    }
2716 }
2717 #endif /* GLX_DIRECT_RENDERING */
2718
2719 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
2720
2721 int
2722 MesaGLInteropGLXQueryDeviceInfo(Display *dpy, GLXContext context,
2723                                 struct mesa_glinterop_device_info *out)
2724 {
2725    struct glx_context *gc = (struct glx_context*)context;
2726    int ret;
2727
2728    __glXLock();
2729
2730    if (!gc || gc->xid == None || !gc->isDirect) {
2731       __glXUnlock();
2732       return MESA_GLINTEROP_INVALID_CONTEXT;
2733    }
2734
2735    if (!gc->vtable->interop_query_device_info) {
2736       __glXUnlock();
2737       return MESA_GLINTEROP_UNSUPPORTED;
2738    }
2739
2740    ret = gc->vtable->interop_query_device_info(gc, out);
2741    __glXUnlock();
2742    return ret;
2743 }
2744
2745 int
2746 MesaGLInteropGLXExportObject(Display *dpy, GLXContext context,
2747                              struct mesa_glinterop_export_in *in,
2748                              struct mesa_glinterop_export_out *out)
2749 {
2750    struct glx_context *gc = (struct glx_context*)context;
2751    int ret;
2752
2753    __glXLock();
2754
2755    if (!gc || gc->xid == None || !gc->isDirect) {
2756       __glXUnlock();
2757       return MESA_GLINTEROP_INVALID_CONTEXT;
2758    }
2759
2760    if (!gc->vtable->interop_export_object) {
2761       __glXUnlock();
2762       return MESA_GLINTEROP_UNSUPPORTED;
2763    }
2764
2765    ret = gc->vtable->interop_export_object(gc, in, out);
2766    __glXUnlock();
2767    return ret;
2768 }
2769
2770 #endif /* defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL) */