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