1 /* $XFree86: xc/lib/GL/glx/glxext.c,v 1.22 2003/12/08 17:35:28 dawes Exp $ */
4 ** License Applicability. Except to the extent portions of this file are
5 ** made subject to an alternative license as permitted in the SGI Free
6 ** Software License B, Version 1.1 (the "License"), the contents of this
7 ** file are subject only to the provisions of the License. You may not use
8 ** this file except in compliance with the License. You may obtain a copy
9 ** of the License at Silicon Graphics, Inc., attn: Legal Services, 1600
10 ** Amphitheatre Parkway, Mountain View, CA 94043-1351, or at:
12 ** http://oss.sgi.com/projects/FreeB
14 ** Note that, as provided in the License, the Software is distributed on an
15 ** "AS IS" basis, with ALL EXPRESS AND IMPLIED WARRANTIES AND CONDITIONS
16 ** DISCLAIMED, INCLUDING, WITHOUT LIMITATION, ANY IMPLIED WARRANTIES AND
17 ** CONDITIONS OF MERCHANTABILITY, SATISFACTORY QUALITY, FITNESS FOR A
18 ** PARTICULAR PURPOSE, AND NON-INFRINGEMENT.
20 ** Original Code. The Original Code is: OpenGL Sample Implementation,
21 ** Version 1.2.1, released January 26, 2000, developed by Silicon Graphics,
22 ** Inc. The Original Code is Copyright (c) 1991-2000 Silicon Graphics, Inc.
23 ** Copyright in any portions created by third parties is as indicated
24 ** elsewhere herein. All Rights Reserved.
26 ** Additional Notice Provisions: The application programming interfaces
27 ** established by SGI in conjunction with the Original Code are The
28 ** OpenGL(R) Graphics System: A Specification (Version 1.2.1), released
29 ** April 1, 1999; The OpenGL(R) Graphics System Utility Library (Version
30 ** 1.3), released November 4, 1998; and OpenGL(R) Graphics with the X
31 ** Window System(R) (Version 1.3), released October 19, 1998. This software
32 ** was created using the OpenGL(R) version 1.2.1 Sample Implementation
33 ** published by SGI, but has not been independently verified as being
34 ** compliant with the OpenGL(R) version 1.2.1 Specification.
40 * GLX protocol interface boot-strap code.
42 * Direct rendering support added by Precision Insight, Inc.
44 * \author Kevin E. Martin <kevin@precisioninsight.com>
47 #include "glxclient.h"
49 #include <X11/extensions/Xext.h>
50 #include <X11/extensions/extutil.h>
52 #include "indirect_init.h"
54 #include "glxextensions.h"
55 #include "glcontextmodes.h"
58 #ifdef GLX_DIRECT_RENDERING
68 #include <X11/XCB/xcb.h>
69 #include <X11/XCB/glx.h>
75 void __glXDumpDrawBuffer(__GLXcontext
*ctx
);
80 * This is where our dispatch table's bounds are.
81 * And the static mesa_init is taken directly from
82 * Mesa's 'sparc.c' initializer.
84 * We need something like this here, because this version
85 * of openGL/glx never initializes a Mesa context, and so
86 * the address of the dispatch table pointer never gets stuffed
87 * into the dispatch jump table otherwise.
89 * It matters only on SPARC, and only if you are using assembler
90 * code instead of C-code indirect dispatch.
94 extern unsigned int _mesa_sparc_glapi_begin
;
95 extern unsigned int _mesa_sparc_glapi_end
;
96 extern void __glapi_sparc_icache_flush(unsigned int *);
97 static void _glx_mesa_init_sparc_glapi_relocs(void);
98 static int _mesa_sparc_needs_init
= 1;
99 #define INIT_MESA_SPARC { \
100 if(_mesa_sparc_needs_init) { \
101 _glx_mesa_init_sparc_glapi_relocs(); \
102 _mesa_sparc_needs_init = 0; \
106 #define INIT_MESA_SPARC
109 #ifdef GLX_DIRECT_RENDERING
110 static __DRIscreen
*__glXFindDRIScreen(__DRInativeDisplay
*dpy
, int scrn
);
111 #endif /* GLX_DIRECT_RENDERING */
113 static Bool
MakeContextCurrent(Display
*dpy
, GLXDrawable draw
,
114 GLXDrawable read
, GLXContext gc
);
117 ** We setup some dummy structures here so that the API can be used
118 ** even if no context is current.
121 static GLubyte dummyBuffer
[__GLX_BUFFER_LIMIT_SIZE
];
124 ** Dummy context used by small commands when there is no current context.
126 ** gl and glx entry points are designed to operate as nop's when using
127 ** the dummy context structure.
129 static __GLXcontext dummyContext
= {
133 &dummyBuffer
[__GLX_BUFFER_LIMIT_SIZE
],
139 ** All indirect rendering contexts will share the same indirect dispatch table.
141 static __GLapi
*IndirectAPI
= NULL
;
145 * Current context management and locking
148 #if defined( USE_XTHREADS )
151 static GLboolean TSDinitialized
= GL_FALSE
;
152 static xthread_key_t ContextTSD
;
154 __GLXcontext
*__glXGetCurrentContext(void)
156 if (!TSDinitialized
) {
157 xthread_key_create(&ContextTSD
, NULL
);
158 TSDinitialized
= GL_TRUE
;
159 return &dummyContext
;
163 xthread_get_specific(ContextTSD
, &p
);
165 return &dummyContext
;
167 return (__GLXcontext
*) p
;
171 void __glXSetCurrentContext(__GLXcontext
*c
)
173 if (!TSDinitialized
) {
174 xthread_key_create(&ContextTSD
, NULL
);
175 TSDinitialized
= GL_TRUE
;
177 xthread_set_specific(ContextTSD
, c
);
181 /* Used by the __glXLock() and __glXUnlock() macros */
182 xmutex_rec __glXmutex
;
184 #elif defined( PTHREADS )
186 pthread_mutex_t __glXmutex
= PTHREAD_MUTEX_INITIALIZER
;
188 # if defined( GLX_USE_TLS )
191 * Per-thread GLX context pointer.
193 * \c __glXSetCurrentContext is written is such a way that this pointer can
194 * \b never be \c NULL. This is important! Because of this
195 * \c __glXGetCurrentContext can be implemented as trivial macro.
197 __thread
void * __glX_tls_Context
__attribute__((tls_model("initial-exec")))
200 void __glXSetCurrentContext( __GLXcontext
* c
)
202 __glX_tls_Context
= (c
!= NULL
) ? c
: &dummyContext
;
207 static pthread_once_t once_control
= PTHREAD_ONCE_INIT
;
210 * Per-thread data key.
212 * Once \c init_thread_data has been called, the per-thread data key will
213 * take a value of \c NULL. As each new thread is created the default
214 * value, in that thread, will be \c NULL.
216 static pthread_key_t ContextTSD
;
219 * Initialize the per-thread data key.
221 * This function is called \b exactly once per-process (not per-thread!) to
222 * initialize the per-thread data key. This is ideally done using the
223 * \c pthread_once mechanism.
225 static void init_thread_data( void )
227 if ( pthread_key_create( & ContextTSD
, NULL
) != 0 ) {
228 perror( "pthread_key_create" );
233 void __glXSetCurrentContext( __GLXcontext
* c
)
235 pthread_once( & once_control
, init_thread_data
);
236 pthread_setspecific( ContextTSD
, c
);
239 __GLXcontext
* __glXGetCurrentContext( void )
243 pthread_once( & once_control
, init_thread_data
);
245 v
= pthread_getspecific( ContextTSD
);
246 return (v
== NULL
) ? & dummyContext
: (__GLXcontext
*) v
;
249 # endif /* defined( GLX_USE_TLS ) */
251 #elif defined( THREADS )
253 #error Unknown threading method specified.
257 /* not thread safe */
258 __GLXcontext
*__glXcurrentContext
= &dummyContext
;
264 ** You can set this cell to 1 to force the gl drawing stuff to be
265 ** one command per packet
270 ** forward prototype declarations
272 int __glXCloseDisplay(Display
*dpy
, XExtCodes
*codes
);
275 /************************************************************************/
277 /* Extension required boiler plate */
279 static char *__glXExtensionName
= GLX_EXTENSION_NAME
;
280 XExtensionInfo
*__glXExtensionInfo
= NULL
;
282 static /* const */ char *error_list
[] = {
284 "GLXBadContextState",
288 "GLXBadCurrentWindow",
289 "GLXBadRenderRequest",
290 "GLXBadLargeRequest",
291 "GLXUnsupportedPrivateRequest",
294 int __glXCloseDisplay(Display
*dpy
, XExtCodes
*codes
)
298 gc
= __glXGetCurrentContext();
299 if (dpy
== gc
->currentDpy
) {
300 __glXSetCurrentContext(&dummyContext
);
301 #ifdef GLX_DIRECT_RENDERING
302 _glapi_set_dispatch(NULL
); /* no-op functions */
304 __glXFreeContext(gc
);
307 return XextRemoveDisplay(__glXExtensionInfo
, dpy
);
311 static XEXT_GENERATE_ERROR_STRING(__glXErrorString
, __glXExtensionName
,
312 __GLX_NUMBER_ERRORS
, error_list
)
314 static /* const */ XExtensionHooks __glXExtensionHooks
= {
315 NULL
, /* create_gc */
319 NULL
, /* create_font */
320 NULL
, /* free_font */
321 __glXCloseDisplay
, /* close_display */
322 NULL
, /* wire_to_event */
323 NULL
, /* event_to_wire */
325 __glXErrorString
, /* error_string */
329 XEXT_GENERATE_FIND_DISPLAY(__glXFindDisplay
, __glXExtensionInfo
,
330 __glXExtensionName
, &__glXExtensionHooks
,
331 __GLX_NUMBER_EVENTS
, NULL
)
333 /************************************************************************/
336 ** Free the per screen configs data as well as the array of
337 ** __glXScreenConfigs.
339 static void FreeScreenConfigs(__GLXdisplayPrivate
*priv
)
341 __GLXscreenConfigs
*psc
;
344 /* Free screen configuration information */
345 psc
= priv
->screenConfigs
;
346 screens
= ScreenCount(priv
->dpy
);
347 for (i
= 0; i
< screens
; i
++, psc
++) {
349 _gl_context_modes_destroy( psc
->configs
);
350 if(psc
->effectiveGLXexts
)
351 Xfree(psc
->effectiveGLXexts
);
353 psc
->configs
= NULL
; /* NOTE: just for paranoia */
356 #ifdef GLX_DIRECT_RENDERING
357 /* Free the direct rendering per screen data */
358 if (psc
->driScreen
.private)
359 (*psc
->driScreen
.destroyScreen
)(priv
->dpy
, i
,
360 psc
->driScreen
.private);
361 psc
->driScreen
.private = NULL
;
364 XFree((char*) priv
->screenConfigs
);
368 ** Release the private memory referred to in a display private
369 ** structure. The caller will free the extension structure.
371 static int __glXFreeDisplayPrivate(XExtData
*extension
)
373 __GLXdisplayPrivate
*priv
;
375 priv
= (__GLXdisplayPrivate
*) extension
->private_data
;
376 FreeScreenConfigs(priv
);
377 if(priv
->serverGLXvendor
) {
378 Xfree((char*)priv
->serverGLXvendor
);
379 priv
->serverGLXvendor
= 0x0; /* to protect against double free's */
381 if(priv
->serverGLXversion
) {
382 Xfree((char*)priv
->serverGLXversion
);
383 priv
->serverGLXversion
= 0x0; /* to protect against double free's */
386 #if 0 /* GLX_DIRECT_RENDERING */
387 /* Free the direct rendering per display data */
388 if (priv
->driDisplay
.private)
389 (*priv
->driDisplay
.destroyDisplay
)(priv
->dpy
,
390 priv
->driDisplay
.private);
391 priv
->driDisplay
.private = NULL
;
398 /************************************************************************/
401 ** Query the version of the GLX extension. This procedure works even if
402 ** the client extension is not completely set up.
404 static Bool
QueryVersion(Display
*dpy
, int opcode
, int *major
, int *minor
)
406 xGLXQueryVersionReq
*req
;
407 xGLXQueryVersionReply reply
;
409 /* Send the glXQueryVersion request */
411 GetReq(GLXQueryVersion
,req
);
412 req
->reqType
= opcode
;
413 req
->glxCode
= X_GLXQueryVersion
;
414 req
->majorVersion
= GLX_MAJOR_VERSION
;
415 req
->minorVersion
= GLX_MINOR_VERSION
;
416 _XReply(dpy
, (xReply
*) &reply
, 0, False
);
420 if (reply
.majorVersion
!= GLX_MAJOR_VERSION
) {
422 ** The server does not support the same major release as this
427 *major
= reply
.majorVersion
;
428 *minor
= min(reply
.minorVersion
, GLX_MINOR_VERSION
);
434 __glXInitializeVisualConfigFromTags( __GLcontextModes
*config
, int count
,
435 const INT32
*bp
, Bool tagged_only
,
436 Bool fbconfig_style_tags
)
441 /* Copy in the first set of properties */
442 config
->visualID
= *bp
++;
444 config
->visualType
= _gl_convert_from_x_visual_type( *bp
++ );
446 config
->rgbMode
= *bp
++;
448 config
->redBits
= *bp
++;
449 config
->greenBits
= *bp
++;
450 config
->blueBits
= *bp
++;
451 config
->alphaBits
= *bp
++;
452 config
->accumRedBits
= *bp
++;
453 config
->accumGreenBits
= *bp
++;
454 config
->accumBlueBits
= *bp
++;
455 config
->accumAlphaBits
= *bp
++;
457 config
->doubleBufferMode
= *bp
++;
458 config
->stereoMode
= *bp
++;
460 config
->rgbBits
= *bp
++;
461 config
->depthBits
= *bp
++;
462 config
->stencilBits
= *bp
++;
463 config
->numAuxBuffers
= *bp
++;
464 config
->level
= *bp
++;
466 count
-= __GLX_MIN_CONFIG_PROPS
;
470 ** Additional properties may be in a list at the end
471 ** of the reply. They are in pairs of property type
472 ** and property value.
475 #define FETCH_OR_SET(tag) \
476 config-> tag = ( fbconfig_style_tags ) ? *bp++ : 1
478 for (i
= 0; i
< count
; i
+= 2 ) {
481 FETCH_OR_SET( rgbMode
);
483 case GLX_BUFFER_SIZE
:
484 config
->rgbBits
= *bp
++;
487 config
->level
= *bp
++;
489 case GLX_DOUBLEBUFFER
:
490 FETCH_OR_SET( doubleBufferMode
);
493 FETCH_OR_SET( stereoMode
);
495 case GLX_AUX_BUFFERS
:
496 config
->numAuxBuffers
= *bp
++;
499 config
->redBits
= *bp
++;
502 config
->greenBits
= *bp
++;
505 config
->blueBits
= *bp
++;
508 config
->alphaBits
= *bp
++;
511 config
->depthBits
= *bp
++;
513 case GLX_STENCIL_SIZE
:
514 config
->stencilBits
= *bp
++;
516 case GLX_ACCUM_RED_SIZE
:
517 config
->accumRedBits
= *bp
++;
519 case GLX_ACCUM_GREEN_SIZE
:
520 config
->accumGreenBits
= *bp
++;
522 case GLX_ACCUM_BLUE_SIZE
:
523 config
->accumBlueBits
= *bp
++;
525 case GLX_ACCUM_ALPHA_SIZE
:
526 config
->accumAlphaBits
= *bp
++;
528 case GLX_VISUAL_CAVEAT_EXT
:
529 config
->visualRating
= *bp
++;
531 case GLX_X_VISUAL_TYPE
:
532 config
->visualType
= *bp
++;
534 case GLX_TRANSPARENT_TYPE
:
535 config
->transparentPixel
= *bp
++;
537 case GLX_TRANSPARENT_INDEX_VALUE
:
538 config
->transparentIndex
= *bp
++;
540 case GLX_TRANSPARENT_RED_VALUE
:
541 config
->transparentRed
= *bp
++;
543 case GLX_TRANSPARENT_GREEN_VALUE
:
544 config
->transparentGreen
= *bp
++;
546 case GLX_TRANSPARENT_BLUE_VALUE
:
547 config
->transparentBlue
= *bp
++;
549 case GLX_TRANSPARENT_ALPHA_VALUE
:
550 config
->transparentAlpha
= *bp
++;
553 config
->visualID
= *bp
++;
555 case GLX_DRAWABLE_TYPE
:
556 config
->drawableType
= *bp
++;
558 case GLX_RENDER_TYPE
:
559 config
->renderType
= *bp
++;
561 case GLX_X_RENDERABLE
:
562 config
->xRenderable
= *bp
++;
564 case GLX_FBCONFIG_ID
:
565 config
->fbconfigID
= *bp
++;
567 case GLX_MAX_PBUFFER_WIDTH
:
568 config
->maxPbufferWidth
= *bp
++;
570 case GLX_MAX_PBUFFER_HEIGHT
:
571 config
->maxPbufferHeight
= *bp
++;
573 case GLX_MAX_PBUFFER_PIXELS
:
574 config
->maxPbufferPixels
= *bp
++;
576 case GLX_OPTIMAL_PBUFFER_WIDTH_SGIX
:
577 config
->optimalPbufferWidth
= *bp
++;
579 case GLX_OPTIMAL_PBUFFER_HEIGHT_SGIX
:
580 config
->optimalPbufferHeight
= *bp
++;
582 case GLX_VISUAL_SELECT_GROUP_SGIX
:
583 config
->visualSelectGroup
= *bp
++;
585 case GLX_SWAP_METHOD_OML
:
586 config
->swapMethod
= *bp
++;
588 case GLX_SAMPLE_BUFFERS_SGIS
:
589 config
->sampleBuffers
= *bp
++;
591 case GLX_SAMPLES_SGIS
:
592 config
->samples
= *bp
++;
602 config
->renderType
= (config
->rgbMode
) ? GLX_RGBA_BIT
: GLX_COLOR_INDEX_BIT
;
604 config
->haveAccumBuffer
= ((config
->accumRedBits
+
605 config
->accumGreenBits
+
606 config
->accumBlueBits
+
607 config
->accumAlphaBits
) > 0);
608 config
->haveDepthBuffer
= (config
->depthBits
> 0);
609 config
->haveStencilBuffer
= (config
->stencilBits
> 0);
613 #ifdef GLX_DIRECT_RENDERING
615 filter_modes( __GLcontextModes
** server_modes
,
616 const __GLcontextModes
* driver_modes
)
618 __GLcontextModes
* m
;
619 __GLcontextModes
** prev_next
;
620 const __GLcontextModes
* check
;
621 unsigned modes_count
= 0;
623 if ( driver_modes
== NULL
) {
624 fprintf(stderr
, "libGL warning: 3D driver returned no fbconfigs.\n");
628 /* For each mode in server_modes, check to see if a matching mode exists
629 * in driver_modes. If not, then the mode is not available.
632 prev_next
= server_modes
;
633 for ( m
= *prev_next
; m
!= NULL
; m
= *prev_next
) {
634 GLboolean do_delete
= GL_TRUE
;
636 for ( check
= driver_modes
; check
!= NULL
; check
= check
->next
) {
637 if ( _gl_context_modes_are_same( m
, check
) ) {
638 do_delete
= GL_FALSE
;
643 /* The 3D has to support all the modes that match the GLX visuals
644 * sent from the X server.
646 if ( do_delete
&& (m
->visualID
!= 0) ) {
647 do_delete
= GL_FALSE
;
649 fprintf(stderr
, "libGL warning: 3D driver claims to not support "
650 "visual 0x%02x\n", m
->visualID
);
654 *prev_next
= m
->next
;
657 _gl_context_modes_destroy( m
);
661 prev_next
= & m
->next
;
670 * Implement \c __DRIinterfaceMethods::getProcAddress.
672 static __DRIfuncPtr
get_proc_address( const char * proc_name
)
674 if (strcmp( proc_name
, "glxEnableExtension" ) == 0) {
675 return (__DRIfuncPtr
) __glXScrEnableExtension
;
683 * Table of functions exported by the loader to the driver.
685 static const __DRIinterfaceMethods interface_methods
= {
688 _gl_context_modes_create
,
689 _gl_context_modes_destroy
,
694 XF86DRICreateContextWithConfig
,
695 XF86DRIDestroyContext
,
697 XF86DRICreateDrawable
,
698 XF86DRIDestroyDrawable
,
699 XF86DRIGetDrawableInfo
,
707 * Perform the required libGL-side initialization and call the client-side
708 * driver's \c __driCreateNewScreen function.
710 * \param dpy Display pointer.
711 * \param scrn Screen number on the display.
712 * \param psc DRI screen information.
713 * \param driDpy DRI display information.
714 * \param createNewScreen Pointer to the client-side driver's
715 * \c __driCreateNewScreen function.
716 * \returns A pointer to the \c __DRIscreenPrivate structure returned by
717 * the client-side driver on success, or \c NULL on failure.
719 * \todo This function needs to be modified to remove context-modes from the
720 * list stored in the \c __GLXscreenConfigsRec to match the list
721 * returned by the client-side driver.
724 CallCreateNewScreen(Display
*dpy
, int scrn
, __DRIscreen
*psc
,
725 __DRIdisplay
* driDpy
,
726 PFNCREATENEWSCREENFUNC createNewScreen
)
728 __DRIscreenPrivate
*psp
= NULL
;
729 #ifndef GLX_USE_APPLEGL
731 drmAddress pSAREA
= MAP_FAILED
;
733 __DRIversion ddx_version
;
734 __DRIversion dri_version
;
735 __DRIversion drm_version
;
736 __DRIframebuffer framebuffer
;
739 const char * err_msg
;
740 const char * err_extra
;
741 int api_ver
= __glXGetInternalVersion();
744 dri_version
.major
= driDpy
->private->driMajor
;
745 dri_version
.minor
= driDpy
->private->driMinor
;
746 dri_version
.patch
= driDpy
->private->driPatch
;
749 err_msg
= "XF86DRIOpenConnection";
752 framebuffer
.base
= MAP_FAILED
;
753 framebuffer
.dev_priv
= NULL
;
755 if (XF86DRIOpenConnection(dpy
, scrn
, &hSAREA
, &BusID
)) {
756 fd
= drmOpen(NULL
,BusID
);
757 Xfree(BusID
); /* No longer needed */
759 err_msg
= "open DRM";
760 err_extra
= strerror( -fd
);
765 err_msg
= "drmGetMagic";
768 if (!drmGetMagic(fd
, &magic
)) {
769 drmVersionPtr version
= drmGetVersion(fd
);
771 drm_version
.major
= version
->version_major
;
772 drm_version
.minor
= version
->version_minor
;
773 drm_version
.patch
= version
->version_patchlevel
;
774 drmFreeVersion(version
);
777 drm_version
.major
= -1;
778 drm_version
.minor
= -1;
779 drm_version
.patch
= -1;
782 err_msg
= "XF86DRIAuthConnection";
783 if (XF86DRIAuthConnection(dpy
, scrn
, magic
)) {
787 * Get device name (like "tdfx") and the ddx version
788 * numbers. We'll check the version in each DRI driver's
789 * "createNewScreen" function.
791 err_msg
= "XF86DRIGetClientDriverName";
792 if (XF86DRIGetClientDriverName(dpy
, scrn
,
800 /* No longer needed. */
805 * Get device-specific info. pDevPriv will point to a struct
806 * (such as DRIRADEONRec in xfree86/driver/ati/radeon_dri.h)
807 * that has information about the screen size, depth, pitch,
808 * ancilliary buffers, DRM mmap handles, etc.
810 err_msg
= "XF86DRIGetDeviceInfo";
811 if (XF86DRIGetDeviceInfo(dpy
, scrn
,
816 &framebuffer
.dev_priv_size
,
817 &framebuffer
.dev_priv
)) {
818 framebuffer
.width
= DisplayWidth(dpy
, scrn
);
819 framebuffer
.height
= DisplayHeight(dpy
, scrn
);
822 * Map the framebuffer region.
824 status
= drmMap(fd
, hFB
, framebuffer
.size
,
825 (drmAddressPtr
)&framebuffer
.base
);
827 err_msg
= "drmMap of framebuffer";
828 err_extra
= strerror( -status
);
832 * Map the SAREA region. Further mmap regions
833 * may be setup in each DRI driver's
834 * "createNewScreen" function.
836 status
= drmMap(fd
, hSAREA
, SAREA_MAX
,
839 err_msg
= "drmMap of sarea";
840 err_extra
= strerror( -status
);
843 __GLcontextModes
* driver_modes
= NULL
;
844 __GLXscreenConfigs
*configs
= psc
->screenConfigs
;
846 err_msg
= "InitDriver";
848 psp
= (*createNewScreen
)(dpy
, scrn
,
861 filter_modes( & configs
->configs
,
863 _gl_context_modes_destroy( driver_modes
);
874 if ( pSAREA
!= MAP_FAILED
) {
875 (void)drmUnmap(pSAREA
, SAREA_MAX
);
878 if ( framebuffer
.base
!= MAP_FAILED
) {
879 (void)drmUnmap((drmAddress
)framebuffer
.base
, framebuffer
.size
);
882 if ( framebuffer
.dev_priv
!= NULL
) {
883 Xfree(framebuffer
.dev_priv
);
890 (void)XF86DRICloseConnection(dpy
, scrn
);
892 if ( err_extra
!= NULL
) {
893 fprintf(stderr
, "libGL error: %s failed (%s)\n", err_msg
,
897 fprintf(stderr
, "libGL error: %s failed\n", err_msg
);
900 fprintf(stderr
, "libGL error: reverting to (slow) indirect rendering\n");
902 #endif /* !GLX_USE_APPLEGL */
906 #endif /* GLX_DIRECT_RENDERING */
910 ** Allocate the memory for the per screen configs for each screen.
911 ** If that works then fetch the per screen configs data.
913 static Bool
AllocAndFetchScreenConfigs(Display
*dpy
, __GLXdisplayPrivate
*priv
)
915 xGLXGetVisualConfigsReq
*req
;
916 xGLXGetFBConfigsReq
*fb_req
;
917 xGLXVendorPrivateWithReplyReq
*vpreq
;
918 xGLXGetFBConfigsSGIXReq
*sgi_req
;
919 xGLXGetVisualConfigsReply reply
;
920 __GLXscreenConfigs
*psc
;
921 __GLcontextModes
*config
;
922 GLint i
, j
, nprops
, screens
;
923 INT32 buf
[__GLX_TOTAL_CONFIG
], *props
;
924 unsigned supported_request
= 0;
928 ** First allocate memory for the array of per screen configs.
930 screens
= ScreenCount(dpy
);
931 psc
= (__GLXscreenConfigs
*) Xmalloc(screens
* sizeof(__GLXscreenConfigs
));
935 memset(psc
, 0, screens
* sizeof(__GLXscreenConfigs
));
936 priv
->screenConfigs
= psc
;
938 priv
->serverGLXversion
= __glXGetStringFromServer(dpy
, priv
->majorOpcode
,
939 X_GLXQueryServerString
,
941 if ( priv
->serverGLXversion
== NULL
) {
942 FreeScreenConfigs(priv
);
946 if ( atof( priv
->serverGLXversion
) >= 1.3 ) {
947 supported_request
= 1;
951 ** Now fetch each screens configs structures. If a screen supports
952 ** GL (by returning a numVisuals > 0) then allocate memory for our
953 ** config structure and then fill it in.
955 for (i
= 0; i
< screens
; i
++, psc
++) {
956 if ( supported_request
!= 1 ) {
957 psc
->serverGLXexts
= __glXGetStringFromServer(dpy
, priv
->majorOpcode
,
958 X_GLXQueryServerString
,
960 if ( strstr( psc
->serverGLXexts
, "GLX_SGIX_fbconfig" ) != NULL
) {
961 supported_request
= 2;
964 supported_request
= 3;
970 switch( supported_request
) {
972 GetReq(GLXGetFBConfigs
,fb_req
);
973 fb_req
->reqType
= priv
->majorOpcode
;
974 fb_req
->glxCode
= X_GLXGetFBConfigs
;
979 GetReqExtra(GLXVendorPrivateWithReply
,
980 sz_xGLXGetFBConfigsSGIXReq
-sz_xGLXVendorPrivateWithReplyReq
,vpreq
);
981 sgi_req
= (xGLXGetFBConfigsSGIXReq
*) vpreq
;
982 sgi_req
->reqType
= priv
->majorOpcode
;
983 sgi_req
->glxCode
= X_GLXVendorPrivateWithReply
;
984 sgi_req
->vendorCode
= X_GLXvop_GetFBConfigsSGIX
;
989 GetReq(GLXGetVisualConfigs
,req
);
990 req
->reqType
= priv
->majorOpcode
;
991 req
->glxCode
= X_GLXGetVisualConfigs
;
996 if (!_XReply(dpy
, (xReply
*) &reply
, 0, False
)) {
997 /* Something is busted. Punt. */
999 FreeScreenConfigs(priv
);
1004 if (!reply
.numVisuals
) {
1005 /* This screen does not support GL rendering */
1010 /* FIXME: Is the __GLX_MIN_CONFIG_PROPS test correct for
1013 /* Check number of properties */
1014 nprops
= reply
.numProps
;
1015 if ((nprops
< __GLX_MIN_CONFIG_PROPS
) ||
1016 (nprops
> __GLX_MAX_CONFIG_PROPS
)) {
1017 /* Huh? Not in protocol defined limits. Punt */
1020 FreeScreenConfigs(priv
);
1024 /* Allocate memory for our config structure */
1025 psc
->configs
= _gl_context_modes_create(reply
.numVisuals
,
1026 sizeof(__GLcontextModes
));
1027 if (!psc
->configs
) {
1030 FreeScreenConfigs(priv
);
1034 /* Allocate memory for the properties, if needed */
1035 if ( supported_request
!= 3 ) {
1039 prop_size
= nprops
* __GLX_SIZE_INT32
;
1041 if (prop_size
<= sizeof(buf
)) {
1044 props
= (INT32
*) Xmalloc(prop_size
);
1047 /* Read each config structure and convert it into our format */
1048 config
= psc
->configs
;
1049 for (j
= 0; j
< reply
.numVisuals
; j
++) {
1050 assert( config
!= NULL
);
1051 _XRead(dpy
, (char *)props
, prop_size
);
1053 if ( supported_request
!= 3 ) {
1054 config
->rgbMode
= GL_TRUE
;
1055 config
->drawableType
= GLX_WINDOW_BIT
;
1058 config
->drawableType
= GLX_WINDOW_BIT
| GLX_PIXMAP_BIT
;
1061 __glXInitializeVisualConfigFromTags( config
, nprops
, props
,
1062 (supported_request
!= 3),
1064 if ( config
->fbconfigID
== GLX_DONT_CARE
) {
1065 config
->fbconfigID
= config
->visualID
;
1068 config
= config
->next
;
1071 Xfree((char *)props
);
1075 #ifdef GLX_DIRECT_RENDERING
1076 /* Initialize per screen dynamic client GLX extensions */
1077 psc
->ext_list_first_time
= GL_TRUE
;
1078 /* Initialize the direct rendering per screen data and functions */
1079 if (priv
->driDisplay
.private != NULL
) {
1080 /* FIXME: Should it be some sort of an error if createNewScreen[i]
1083 if (priv
->driDisplay
.createNewScreen
&&
1084 priv
->driDisplay
.createNewScreen
[i
]) {
1086 psc
->driScreen
.screenConfigs
= (void *)psc
;
1087 psc
->driScreen
.private =
1088 CallCreateNewScreen(dpy
, i
, & psc
->driScreen
,
1090 priv
->driDisplay
.createNewScreen
[i
] );
1100 ** Initialize the client side extension code.
1102 __GLXdisplayPrivate
*__glXInitialize(Display
* dpy
)
1104 XExtDisplayInfo
*info
= __glXFindDisplay(dpy
);
1105 XExtData
**privList
, *private, *found
;
1106 __GLXdisplayPrivate
*dpyPriv
;
1107 XEDataObject dataObj
;
1110 #if defined(USE_XTHREADS)
1112 static int firstCall
= 1;
1114 /* initialize the GLX mutexes */
1115 xmutex_init(&__glXmutex
);
1122 /* The one and only long long lock */
1125 if (!XextHasExtension(info
)) {
1126 /* No GLX extension supported by this server. Oh well. */
1128 XMissingExtension(dpy
, __glXExtensionName
);
1132 /* See if a display private already exists. If so, return it */
1133 dataObj
.display
= dpy
;
1134 privList
= XEHeadOfExtensionList(dataObj
);
1135 found
= XFindOnExtensionList(privList
, info
->codes
->extension
);
1138 return (__GLXdisplayPrivate
*) found
->private_data
;
1141 /* See if the versions are compatible */
1142 if (!QueryVersion(dpy
, info
->codes
->major_opcode
, &major
, &minor
)) {
1143 /* The client and server do not agree on versions. Punt. */
1149 ** Allocate memory for all the pieces needed for this buffer.
1151 private = (XExtData
*) Xmalloc(sizeof(XExtData
));
1156 dpyPriv
= (__GLXdisplayPrivate
*) Xmalloc(sizeof(__GLXdisplayPrivate
));
1159 Xfree((char*) private);
1164 ** Init the display private and then read in the screen config
1165 ** structures from the server.
1167 dpyPriv
->majorOpcode
= info
->codes
->major_opcode
;
1168 dpyPriv
->majorVersion
= major
;
1169 dpyPriv
->minorVersion
= minor
;
1172 dpyPriv
->serverGLXvendor
= 0x0;
1173 dpyPriv
->serverGLXversion
= 0x0;
1175 #ifdef GLX_DIRECT_RENDERING
1177 ** Initialize the direct rendering per display data and functions.
1178 ** Note: This _must_ be done before calling any other DRI routines
1179 ** (e.g., those called in AllocAndFetchScreenConfigs).
1181 if (getenv("LIBGL_ALWAYS_INDIRECT")) {
1182 /* Assinging zero here assures we'll never go direct */
1183 dpyPriv
->driDisplay
.private = 0;
1184 dpyPriv
->driDisplay
.destroyDisplay
= 0;
1187 dpyPriv
->driDisplay
.private =
1188 driCreateDisplay(dpy
, &dpyPriv
->driDisplay
);
1192 if (!AllocAndFetchScreenConfigs(dpy
, dpyPriv
)) {
1194 Xfree((char*) dpyPriv
);
1195 Xfree((char*) private);
1200 ** Fill in the private structure. This is the actual structure that
1201 ** hangs off of the Display structure. Our private structure is
1202 ** referred to by this structure. Got that?
1204 private->number
= info
->codes
->extension
;
1206 private->free_private
= __glXFreeDisplayPrivate
;
1207 private->private_data
= (char *) dpyPriv
;
1208 XAddToExtensionList(privList
, private);
1210 if (dpyPriv
->majorVersion
== 1 && dpyPriv
->minorVersion
>= 1) {
1211 __glXClientInfo(dpy
, dpyPriv
->majorOpcode
);
1219 ** Setup for sending a GLX command on dpy. Make sure the extension is
1220 ** initialized. Try to avoid calling __glXInitialize as its kinda slow.
1222 CARD8
__glXSetupForCommand(Display
*dpy
)
1225 __GLXdisplayPrivate
*priv
;
1227 /* If this thread has a current context, flush its rendering commands */
1228 gc
= __glXGetCurrentContext();
1229 if (gc
->currentDpy
) {
1230 /* Flush rendering buffer of the current context, if any */
1231 (void) __glXFlushRenderBuffer(gc
, gc
->pc
);
1233 if (gc
->currentDpy
== dpy
) {
1234 /* Use opcode from gc because its right */
1236 return gc
->majorOpcode
;
1239 ** Have to get info about argument dpy because it might be to
1240 ** a different server
1245 /* Forced to lookup extension via the slow initialize route */
1246 priv
= __glXInitialize(dpy
);
1250 return priv
->majorOpcode
;
1254 * Flush the drawing command transport buffer.
1256 * \param ctx Context whose transport buffer is to be flushed.
1257 * \param pc Pointer to first unused buffer location.
1260 * Modify this function to use \c ctx->pc instead of the explicit
1263 GLubyte
*__glXFlushRenderBuffer(__GLXcontext
*ctx
, GLubyte
*pc
)
1265 Display
* const dpy
= ctx
->currentDpy
;
1267 XCBConnection
*c
= XCBConnectionOfDisplay(dpy
);
1270 #endif /* USE_XCB */
1271 const GLint size
= pc
- ctx
->buf
;
1273 if ( (dpy
!= NULL
) && (size
> 0) ) {
1275 XCBGlxRender(c
, ctx
->currentContextTag
, size
, (char *)ctx
->buf
);
1277 /* Send the entire buffer as an X request */
1279 GetReq(GLXRender
,req
);
1280 req
->reqType
= ctx
->majorOpcode
;
1281 req
->glxCode
= X_GLXRender
;
1282 req
->contextTag
= ctx
->currentContextTag
;
1283 req
->length
+= (size
+ 3) >> 2;
1284 _XSend(dpy
, (char *)ctx
->buf
, size
);
1290 /* Reset pointer and return it */
1297 * Send a portion of a GLXRenderLarge command to the server. The advantage of
1298 * this function over \c __glXSendLargeCommand is that callers can use the
1299 * data buffer in the GLX context and may be able to avoid allocating an
1300 * extra buffer. The disadvantage is the clients will have to do more
1301 * GLX protocol work (i.e., calculating \c totalRequests, etc.).
1303 * \sa __glXSendLargeCommand
1305 * \param gc GLX context
1306 * \param requestNumber Which part of the whole command is this? The first
1308 * \param totalRequests How many requests will there be?
1309 * \param data Command data.
1310 * \param dataLen Size, in bytes, of the command data.
1312 void __glXSendLargeChunk(__GLXcontext
*gc
, GLint requestNumber
,
1313 GLint totalRequests
,
1314 const GLvoid
* data
, GLint dataLen
)
1316 Display
*dpy
= gc
->currentDpy
;
1318 XCBConnection
*c
= XCBConnectionOfDisplay(dpy
);
1319 XCBGlxRenderLarge(c
, gc
->currentContextTag
, requestNumber
, totalRequests
, dataLen
, data
);
1321 xGLXRenderLargeReq
*req
;
1323 if ( requestNumber
== 1 ) {
1327 GetReq(GLXRenderLarge
,req
);
1328 req
->reqType
= gc
->majorOpcode
;
1329 req
->glxCode
= X_GLXRenderLarge
;
1330 req
->contextTag
= gc
->currentContextTag
;
1331 req
->length
+= (dataLen
+ 3) >> 2;
1332 req
->requestNumber
= requestNumber
;
1333 req
->requestTotal
= totalRequests
;
1334 req
->dataBytes
= dataLen
;
1335 Data(dpy
, data
, dataLen
);
1337 if ( requestNumber
== totalRequests
) {
1341 #endif /* USE_XCB */
1346 * Send a command that is too large for the GLXRender protocol request.
1348 * Send a large command, one that is too large for some reason to
1349 * send using the GLXRender protocol request. One reason to send
1350 * a large command is to avoid copying the data.
1352 * \param ctx GLX context
1353 * \param header Header data.
1354 * \param headerLen Size, in bytes, of the header data. It is assumed that
1355 * the header data will always be small enough to fit in
1356 * a single X protocol packet.
1357 * \param data Command data.
1358 * \param dataLen Size, in bytes, of the command data.
1360 void __glXSendLargeCommand(__GLXcontext
*ctx
,
1361 const GLvoid
*header
, GLint headerLen
,
1362 const GLvoid
*data
, GLint dataLen
)
1365 GLint totalRequests
, requestNumber
;
1368 ** Calculate the maximum amount of data can be stuffed into a single
1369 ** packet. sz_xGLXRenderReq is added because bufSize is the maximum
1370 ** packet size minus sz_xGLXRenderReq.
1372 maxSize
= (ctx
->bufSize
+ sz_xGLXRenderReq
) - sz_xGLXRenderLargeReq
;
1373 totalRequests
= 1 + (dataLen
/ maxSize
);
1374 if (dataLen
% maxSize
) totalRequests
++;
1377 ** Send all of the command, except the large array, as one request.
1379 assert( headerLen
<= maxSize
);
1380 __glXSendLargeChunk(ctx
, 1, totalRequests
, header
, headerLen
);
1383 ** Send enough requests until the whole array is sent.
1385 for ( requestNumber
= 2 ; requestNumber
<= (totalRequests
- 1) ; requestNumber
++ ) {
1386 __glXSendLargeChunk(ctx
, requestNumber
, totalRequests
, data
, maxSize
);
1387 data
= (const GLvoid
*) (((const GLubyte
*) data
) + maxSize
);
1389 assert( dataLen
> 0 );
1392 assert( dataLen
<= maxSize
);
1393 __glXSendLargeChunk(ctx
, requestNumber
, totalRequests
, data
, dataLen
);
1396 /************************************************************************/
1398 GLXContext
glXGetCurrentContext(void)
1400 GLXContext cx
= __glXGetCurrentContext();
1402 if (cx
== &dummyContext
) {
1409 GLXDrawable
glXGetCurrentDrawable(void)
1411 GLXContext gc
= __glXGetCurrentContext();
1412 return gc
->currentDrawable
;
1416 /************************************************************************/
1418 #ifdef GLX_DIRECT_RENDERING
1419 /* Return the DRI per screen structure */
1420 __DRIscreen
*__glXFindDRIScreen(__DRInativeDisplay
*dpy
, int scrn
)
1422 __DRIscreen
*pDRIScreen
= NULL
;
1423 XExtDisplayInfo
*info
= __glXFindDisplay(dpy
);
1424 XExtData
**privList
, *found
;
1425 __GLXdisplayPrivate
*dpyPriv
;
1426 XEDataObject dataObj
;
1429 dataObj
.display
= dpy
;
1430 privList
= XEHeadOfExtensionList(dataObj
);
1431 found
= XFindOnExtensionList(privList
, info
->codes
->extension
);
1435 dpyPriv
= (__GLXdisplayPrivate
*)found
->private_data
;
1436 pDRIScreen
= &dpyPriv
->screenConfigs
[scrn
].driScreen
;
1443 /************************************************************************/
1445 static Bool
SendMakeCurrentRequest( Display
*dpy
, CARD8 opcode
,
1446 GLXContextID gc
, GLXContextTag old_gc
, GLXDrawable draw
, GLXDrawable read
,
1447 xGLXMakeCurrentReply
* reply
);
1450 * Sends a GLX protocol message to the specified display to make the context
1451 * and the drawables current.
1453 * \param dpy Display to send the message to.
1454 * \param opcode Major opcode value for the display.
1455 * \param gc_id Context tag for the context to be made current.
1456 * \param draw Drawable ID for the "draw" drawable.
1457 * \param read Drawable ID for the "read" drawable.
1458 * \param reply Space to store the X-server's reply.
1461 * This function assumes that \c dpy is locked with \c LockDisplay on entry.
1463 static Bool
SendMakeCurrentRequest( Display
*dpy
, CARD8 opcode
,
1464 GLXContextID gc_id
, GLXContextTag gc_tag
,
1465 GLXDrawable draw
, GLXDrawable read
,
1466 xGLXMakeCurrentReply
* reply
)
1468 if ( draw
== read
) {
1469 xGLXMakeCurrentReq
*req
;
1471 GetReq(GLXMakeCurrent
,req
);
1472 req
->reqType
= opcode
;
1473 req
->glxCode
= X_GLXMakeCurrent
;
1474 req
->drawable
= draw
;
1475 req
->context
= gc_id
;
1476 req
->oldContextTag
= gc_tag
;
1479 __GLXdisplayPrivate
*priv
= __glXInitialize(dpy
);
1481 /* If the server can support the GLX 1.3 version, we should
1482 * perfer that. Not only that, some servers support GLX 1.3 but
1483 * not the SGI extension.
1486 if ( (priv
->majorVersion
> 1) || (priv
->minorVersion
>= 3) ) {
1487 xGLXMakeContextCurrentReq
*req
;
1489 GetReq(GLXMakeContextCurrent
,req
);
1490 req
->reqType
= opcode
;
1491 req
->glxCode
= X_GLXMakeContextCurrent
;
1492 req
->drawable
= draw
;
1493 req
->readdrawable
= read
;
1494 req
->context
= gc_id
;
1495 req
->oldContextTag
= gc_tag
;
1498 xGLXVendorPrivateWithReplyReq
*vpreq
;
1499 xGLXMakeCurrentReadSGIReq
*req
;
1501 GetReqExtra(GLXVendorPrivateWithReply
,
1502 sz_xGLXMakeCurrentReadSGIReq
-sz_xGLXVendorPrivateWithReplyReq
,vpreq
);
1503 req
= (xGLXMakeCurrentReadSGIReq
*)vpreq
;
1504 req
->reqType
= opcode
;
1505 req
->glxCode
= X_GLXVendorPrivateWithReply
;
1506 req
->vendorCode
= X_GLXvop_MakeCurrentReadSGI
;
1507 req
->drawable
= draw
;
1508 req
->readable
= read
;
1509 req
->context
= gc_id
;
1510 req
->oldContextTag
= gc_tag
;
1514 return _XReply(dpy
, (xReply
*) reply
, 0, False
);
1518 #ifdef GLX_DIRECT_RENDERING
1519 static Bool
BindContextWrapper( Display
*dpy
, GLXContext gc
,
1520 GLXDrawable draw
, GLXDrawable read
)
1522 return (*gc
->driContext
.bindContext
)(dpy
, gc
->screen
, draw
, read
,
1527 static Bool
UnbindContextWrapper( GLXContext gc
)
1529 return (*gc
->driContext
.unbindContext
)(gc
->currentDpy
, gc
->screen
,
1530 gc
->currentDrawable
,
1531 gc
->currentReadable
,
1534 #endif /* GLX_DIRECT_RENDERING */
1538 ** Make a particular context current.
1539 ** NOTE: this is in this file so that it can access dummyContext.
1541 USED
static Bool
MakeContextCurrent(Display
*dpy
, GLXDrawable draw
,
1542 GLXDrawable read
, GLXContext gc
)
1544 xGLXMakeCurrentReply reply
;
1546 CARD8 opcode
, oldOpcode
;
1547 Bool sentRequestToOldDpy
= False
;
1548 Bool bindReturnValue
= True
;
1550 opcode
= __glXSetupForCommand(dpy
);
1556 ** Make sure that the new context has a nonzero ID. In the request,
1557 ** a zero context ID is used only to mean that we bind to no current
1560 if ((gc
!= NULL
) && (gc
->xid
== None
)) {
1564 oldGC
= __glXGetCurrentContext();
1565 oldOpcode
= (gc
== oldGC
) ? opcode
: __glXSetupForCommand(dpy
);
1570 if ((dpy
!= oldGC
->currentDpy
|| (gc
&& gc
->isDirect
)) &&
1571 !oldGC
->isDirect
&& oldGC
!= &dummyContext
) {
1573 ** We are either switching from one dpy to another and have to
1574 ** send a request to the previous dpy to unbind the previous
1575 ** context, or we are switching away from a indirect context to
1576 ** a direct context and have to send a request to the dpy to
1577 ** unbind the previous context.
1579 sentRequestToOldDpy
= True
;
1580 LockDisplay(oldGC
->currentDpy
);
1581 if ( ! SendMakeCurrentRequest( oldGC
->currentDpy
, oldOpcode
, None
,
1582 oldGC
->currentContextTag
, None
, None
,
1584 /* The make current failed. Just return GL_FALSE. */
1585 UnlockDisplay(oldGC
->currentDpy
);
1590 oldGC
->currentContextTag
= 0;
1593 _glapi_check_multithread();
1595 #ifdef GLX_DIRECT_RENDERING
1596 /* Unbind the old direct rendering context */
1597 if (oldGC
->isDirect
) {
1598 if (oldGC
->driContext
.private) {
1599 if (! UnbindContextWrapper( oldGC
)) {
1600 /* The make current failed. Just return GL_FALSE. */
1604 oldGC
->currentContextTag
= 0;
1607 /* Bind the direct rendering context to the drawable */
1608 if (gc
&& gc
->isDirect
) {
1609 if (gc
->driContext
.private) {
1610 bindReturnValue
= BindContextWrapper( dpy
, gc
, draw
, read
);
1614 /* Send a glXMakeCurrent request to bind the new context. */
1617 bindReturnValue
= SendMakeCurrentRequest( dpy
, opcode
,
1618 gc
? gc
->xid
: None
,
1619 oldGC
->currentContextTag
,
1620 draw
, read
, &reply
);
1622 #ifdef GLX_DIRECT_RENDERING
1627 if (!bindReturnValue
) {
1628 /* The make current failed. */
1629 if (gc
&& !gc
->isDirect
) {
1633 #ifdef GLX_DIRECT_RENDERING
1634 /* If the old context was direct rendering, then re-bind to it. */
1635 if (oldGC
->isDirect
) {
1636 if (oldGC
->driContext
.private) {
1637 if (! BindContextWrapper( oldGC
->currentDpy
, oldGC
,
1638 oldGC
->currentDrawable
,
1639 oldGC
->currentReadable
)) {
1641 ** The request failed; this cannot happen with the
1642 ** current API. If in the future the API is
1643 ** extended to allow context sharing between
1644 ** clients, then this may fail (because another
1645 ** client may have grabbed the context); in that
1646 ** case, we cannot undo the previous request, and
1647 ** cannot adhere to the "no-op" behavior.
1654 ** If we had just sent a request to a previous dpy, we have to
1655 ** undo that request (because if a command fails, it should act
1656 ** like a no-op) by making current to the previous context and
1659 if (sentRequestToOldDpy
) {
1660 if ( !SendMakeCurrentRequest( oldGC
->currentDpy
, oldOpcode
,
1662 oldGC
->currentDrawable
,
1663 oldGC
->currentReadable
, &reply
) ) {
1664 UnlockDisplay(oldGC
->currentDpy
);
1667 ** The request failed; this cannot happen with the
1668 ** current API. If in the future the API is extended to
1669 ** allow context sharing between clients, then this may
1670 ** fail (because another client may have grabbed the
1671 ** context); in that case, we cannot undo the previous
1672 ** request, and cannot adhere to the "no-op" behavior.
1676 UnlockDisplay(oldGC
->currentDpy
);
1678 oldGC
->currentContextTag
= reply
.contextTag
;
1683 /* Update our notion of what is current */
1687 ** Even though the contexts are the same the drawable might have
1688 ** changed. Note that gc cannot be the dummy, and that oldGC
1689 ** cannot be NULL, therefore if they are the same, gc is not
1690 ** NULL and not the dummy.
1692 gc
->currentDrawable
= draw
;
1693 gc
->currentReadable
= read
;
1695 if (oldGC
!= &dummyContext
) {
1696 /* Old current context is no longer current to anybody */
1697 oldGC
->currentDpy
= 0;
1698 oldGC
->currentDrawable
= None
;
1699 oldGC
->currentReadable
= None
;
1700 oldGC
->currentContextTag
= 0;
1702 if (oldGC
->xid
== None
) {
1704 ** We are switching away from a context that was
1705 ** previously destroyed, so we need to free the memory
1706 ** for the old handle.
1708 #ifdef GLX_DIRECT_RENDERING
1709 /* Destroy the old direct rendering context */
1710 if (oldGC
->isDirect
) {
1711 if (oldGC
->driContext
.private) {
1712 (*oldGC
->driContext
.destroyContext
)
1713 (dpy
, oldGC
->screen
, oldGC
->driContext
.private);
1714 oldGC
->driContext
.private = NULL
;
1718 __glXFreeContext(oldGC
);
1722 __glXSetCurrentContext(gc
);
1723 #ifdef GLX_DIRECT_RENDERING
1724 if (!gc
->isDirect
) {
1726 IndirectAPI
= __glXNewIndirectAPI();
1727 _glapi_set_dispatch(IndirectAPI
);
1728 # ifdef GLX_USE_APPLEGL
1730 extern void XAppleDRIUseIndirectDispatch(void);
1731 XAppleDRIUseIndirectDispatch();
1736 /* if not direct rendering, always need indirect dispatch */
1738 IndirectAPI
= __glXNewIndirectAPI();
1739 _glapi_set_dispatch(IndirectAPI
);
1741 gc
->currentDpy
= dpy
;
1742 gc
->currentDrawable
= draw
;
1743 gc
->currentReadable
= read
;
1745 if ( ! gc
->isDirect
) {
1746 __GLXattribute
* state
= (__GLXattribute
*)(gc
->client_state_private
);
1748 gc
->currentContextTag
= reply
.contextTag
;
1749 if ( state
->array_state
== NULL
) {
1750 (void) glGetString( GL_EXTENSIONS
);
1751 (void) glGetString( GL_VERSION
);
1752 __glXInitVertexArrayState(gc
);
1756 gc
->currentContextTag
= -1;
1759 __glXSetCurrentContext(&dummyContext
);
1760 #ifdef GLX_DIRECT_RENDERING
1761 _glapi_set_dispatch(NULL
); /* no-op functions */
1770 PUBLIC Bool
glXMakeCurrent(Display
*dpy
, GLXDrawable draw
, GLXContext gc
)
1772 return MakeContextCurrent( dpy
, draw
, draw
, gc
);
1775 PUBLIC
GLX_ALIAS(Bool
, glXMakeCurrentReadSGI
,
1776 (Display
*dpy
, GLXDrawable d
, GLXDrawable r
, GLXContext ctx
),
1777 (dpy
, d
, r
, ctx
), MakeContextCurrent
)
1779 PUBLIC
GLX_ALIAS(Bool
, glXMakeContextCurrent
,
1780 (Display
*dpy
, GLXDrawable d
, GLXDrawable r
, GLXContext ctx
),
1781 (dpy
, d
, r
, ctx
), MakeContextCurrent
)
1785 void __glXDumpDrawBuffer(__GLXcontext
*ctx
)
1787 GLubyte
*p
= ctx
->buf
;
1788 GLubyte
*end
= ctx
->pc
;
1789 GLushort opcode
, length
;
1793 opcode
= *((GLushort
*) p
);
1794 length
= *((GLushort
*) (p
+ 2));
1795 printf("%2x: %5d: ", opcode
, length
);
1798 while (length
> 0) {
1799 printf("%08x ", *((unsigned *) p
));
1808 #ifdef USE_SPARC_ASM
1810 * Used only when we are sparc, using sparc assembler.
1815 _glx_mesa_init_sparc_glapi_relocs(void)
1817 unsigned int *insn_ptr
, *end_ptr
;
1818 unsigned long disp_addr
;
1820 insn_ptr
= &_mesa_sparc_glapi_begin
;
1821 end_ptr
= &_mesa_sparc_glapi_end
;
1822 disp_addr
= (unsigned long) &_glapi_Dispatch
;
1825 * Verbatim from Mesa sparc.c. It's needed because there doesn't
1826 * seem to be a better way to do this:
1828 * UNCONDITIONAL_JUMP ( (*_glapi_Dispatch) + entry_offset )
1830 * This code is patching in the ADDRESS of the pointer to the
1831 * dispatch table. Hence, it must be called exactly once, because
1832 * that address is not going to change.
1834 * What it points to can change, but Mesa (and hence, we) assume
1835 * that there is only one pointer.
1838 while (insn_ptr
< end_ptr
) {
1839 #if ( defined(__sparc_v9__) && ( !defined(__linux__) || defined(__linux_64__) ) )
1841 This code patches for 64-bit addresses. This had better
1842 not happen for Sparc/Linux, no matter what architecture we
1843 are building for. So, don't do this.
1845 The 'defined(__linux_64__)' is used here as a placeholder for
1846 when we do do 64-bit usermode on sparc linux.
1848 insn_ptr
[0] |= (disp_addr
>> (32 + 10));
1849 insn_ptr
[1] |= ((disp_addr
& 0xffffffff) >> 10);
1850 __glapi_sparc_icache_flush(&insn_ptr
[0]);
1851 insn_ptr
[2] |= ((disp_addr
>> 32) & ((1 << 10) - 1));
1852 insn_ptr
[3] |= (disp_addr
& ((1 << 10) - 1));
1853 __glapi_sparc_icache_flush(&insn_ptr
[2]);
1856 insn_ptr
[0] |= (disp_addr
>> 10);
1857 insn_ptr
[1] |= (disp_addr
& ((1 << 10) - 1));
1858 __glapi_sparc_icache_flush(&insn_ptr
[0]);
1863 #endif /* sparc ASM in use */