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