88f6630ed6a713a56939f462954ac9e1b74cc523
[mesa.git] / src / mesa / drivers / x11 / xm_api.c
1 /*
2 * Mesa 3-D graphics library
3 *
4 * Copyright (C) 1999-2007 Brian Paul All Rights Reserved.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the "Software"),
8 * to deal in the Software without restriction, including without limitation
9 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10 * and/or sell copies of the Software, and to permit persons to whom the
11 * Software is furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included
14 * in all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
17 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
20 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
21 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
22 * OTHER DEALINGS IN THE SOFTWARE.
23 */
24
25 /**
26 * \file xm_api.c
27 *
28 * All the XMesa* API functions.
29 *
30 *
31 * NOTES:
32 *
33 * The window coordinate system origin (0,0) is in the lower-left corner
34 * of the window. X11's window coordinate origin is in the upper-left
35 * corner of the window. Therefore, most drawing functions in this
36 * file have to flip Y coordinates.
37 *
38 * Define USE_XSHM in the Makefile with -DUSE_XSHM if you want to compile
39 * in support for the MIT Shared Memory extension. If enabled, when you
40 * use an Ximage for the back buffer in double buffered mode, the "swap"
41 * operation will be faster. You must also link with -lXext.
42 *
43 * Byte swapping: If the Mesa host and the X display use a different
44 * byte order then there's some trickiness to be aware of when using
45 * XImages. The byte ordering used for the XImage is that of the X
46 * display, not the Mesa host.
47 * The color-to-pixel encoding for True/DirectColor must be done
48 * according to the display's visual red_mask, green_mask, and blue_mask.
49 * If XPutPixel is used to put a pixel into an XImage then XPutPixel will
50 * do byte swapping if needed. If one wants to directly "poke" the pixel
51 * into the XImage's buffer then the pixel must be byte swapped first. In
52 * Mesa, when byte swapping is needed we use the PF_TRUECOLOR pixel format
53 * and use XPutPixel everywhere except in the implementation of
54 * glClear(GL_COLOR_BUFFER_BIT). We want this function to be fast so
55 * instead of using XPutPixel we "poke" our values after byte-swapping
56 * the clear pixel value if needed.
57 *
58 */
59
60 #ifdef __CYGWIN__
61 #undef WIN32
62 #undef __WIN32__
63 #endif
64
65 #include <stdio.h>
66 #include "glxheader.h"
67 #include "xmesaP.h"
68 #include "main/api_exec.h"
69 #include "main/context.h"
70 #include "main/extensions.h"
71 #include "main/framebuffer.h"
72 #include "main/imports.h"
73 #include "main/macros.h"
74 #include "main/renderbuffer.h"
75 #include "main/teximage.h"
76 #include "main/version.h"
77 #include "main/vtxfmt.h"
78 #include "swrast/swrast.h"
79 #include "swrast/s_renderbuffer.h"
80 #include "swrast_setup/swrast_setup.h"
81 #include "vbo/vbo.h"
82 #include "tnl/tnl.h"
83 #include "tnl/t_context.h"
84 #include "tnl/t_pipeline.h"
85 #include "drivers/common/driverfuncs.h"
86 #include "drivers/common/meta.h"
87 #include "util/u_math.h"
88
89 /**
90 * Global X driver lock
91 */
92 mtx_t _xmesa_lock;
93
94
95
96 /**********************************************************************/
97 /***** X Utility Functions *****/
98 /**********************************************************************/
99
100
101 /**
102 * Return the host's byte order as LSBFirst or MSBFirst ala X.
103 */
104 static int host_byte_order( void )
105 {
106 int i = 1;
107 char *cptr = (char *) &i;
108 return (*cptr==1) ? LSBFirst : MSBFirst;
109 }
110
111
112 /**
113 * Check if the X Shared Memory extension is available.
114 * Return: 0 = not available
115 * 1 = shared XImage support available
116 * 2 = shared Pixmap support available also
117 */
118 static int check_for_xshm( XMesaDisplay *display )
119 {
120 #if defined(USE_XSHM)
121 int ignore;
122
123 if (XQueryExtension( display, "MIT-SHM", &ignore, &ignore, &ignore )) {
124 /* Note: we're no longer calling XShmQueryVersion() here. It seems
125 * to be flakey (triggers a spurious X protocol error when we close
126 * one display connection and start using a new one. XShm has been
127 * around a long time and hasn't changed so if MIT_SHM is supported
128 * we assume we're good to go.
129 */
130 return 2;
131 }
132 else {
133 return 0;
134 }
135 #else
136 /* No XSHM support */
137 return 0;
138 #endif
139 }
140
141
142 /**
143 * Apply gamma correction to an intensity value in [0..max]. Return the
144 * new intensity value.
145 */
146 static GLint
147 gamma_adjust( GLfloat gamma, GLint value, GLint max )
148 {
149 if (gamma == 1.0) {
150 return value;
151 }
152 else {
153 double x = (double) value / (double) max;
154 return IROUND_POS((GLfloat) max * pow(x, 1.0F/gamma));
155 }
156 }
157
158
159
160 /**
161 * Return the true number of bits per pixel for XImages.
162 * For example, if we request a 24-bit deep visual we may actually need/get
163 * 32bpp XImages. This function returns the appropriate bpp.
164 * Input: dpy - the X display
165 * visinfo - desribes the visual to be used for XImages
166 * Return: true number of bits per pixel for XImages
167 */
168 static int
169 bits_per_pixel( XMesaVisual xmv )
170 {
171 XMesaDisplay *dpy = xmv->display;
172 XMesaVisualInfo visinfo = xmv->visinfo;
173 XMesaImage *img;
174 int bitsPerPixel;
175 /* Create a temporary XImage */
176 img = XCreateImage( dpy, visinfo->visual, visinfo->depth,
177 ZPixmap, 0, /*format, offset*/
178 malloc(8), /*data*/
179 1, 1, /*width, height*/
180 32, /*bitmap_pad*/
181 0 /*bytes_per_line*/
182 );
183 assert(img);
184 /* grab the bits/pixel value */
185 bitsPerPixel = img->bits_per_pixel;
186 /* free the XImage */
187 free( img->data );
188 img->data = NULL;
189 XMesaDestroyImage( img );
190 return bitsPerPixel;
191 }
192
193
194
195 /*
196 * Determine if a given X window ID is valid (window exists).
197 * Do this by calling XGetWindowAttributes() for the window and
198 * checking if we catch an X error.
199 * Input: dpy - the display
200 * win - the window to check for existence
201 * Return: GL_TRUE - window exists
202 * GL_FALSE - window doesn't exist
203 */
204 static GLboolean WindowExistsFlag;
205
206 static int window_exists_err_handler( XMesaDisplay* dpy, XErrorEvent* xerr )
207 {
208 (void) dpy;
209 if (xerr->error_code == BadWindow) {
210 WindowExistsFlag = GL_FALSE;
211 }
212 return 0;
213 }
214
215 static GLboolean window_exists( XMesaDisplay *dpy, Window win )
216 {
217 XWindowAttributes wa;
218 int (*old_handler)( XMesaDisplay*, XErrorEvent* );
219 WindowExistsFlag = GL_TRUE;
220 old_handler = XSetErrorHandler(window_exists_err_handler);
221 XGetWindowAttributes( dpy, win, &wa ); /* dummy request */
222 XSetErrorHandler(old_handler);
223 return WindowExistsFlag;
224 }
225
226 static Status
227 get_drawable_size( XMesaDisplay *dpy, Drawable d, GLuint *width, GLuint *height )
228 {
229 Window root;
230 Status stat;
231 int xpos, ypos;
232 unsigned int w, h, bw, depth;
233 stat = XGetGeometry(dpy, d, &root, &xpos, &ypos, &w, &h, &bw, &depth);
234 *width = w;
235 *height = h;
236 return stat;
237 }
238
239
240 /**
241 * Return the size of the window (or pixmap) that corresponds to the
242 * given XMesaBuffer.
243 * \param width returns width in pixels
244 * \param height returns height in pixels
245 */
246 void
247 xmesa_get_window_size(XMesaDisplay *dpy, XMesaBuffer b,
248 GLuint *width, GLuint *height)
249 {
250 Status stat;
251
252 mtx_lock(&_xmesa_lock);
253 XSync(b->xm_visual->display, 0); /* added for Chromium */
254 stat = get_drawable_size(dpy, b->frontxrb->pixmap, width, height);
255 mtx_unlock(&_xmesa_lock);
256
257 if (!stat) {
258 /* probably querying a window that's recently been destroyed */
259 _mesa_warning(NULL, "XGetGeometry failed!\n");
260 *width = *height = 1;
261 }
262 }
263
264
265
266 /**********************************************************************/
267 /***** Linked list of XMesaBuffers *****/
268 /**********************************************************************/
269
270 XMesaBuffer XMesaBufferList = NULL;
271
272
273 /**
274 * Allocate a new XMesaBuffer object which corresponds to the given drawable.
275 * Note that XMesaBuffer is derived from struct gl_framebuffer.
276 * The new XMesaBuffer will not have any size (Width=Height=0).
277 *
278 * \param d the corresponding X drawable (window or pixmap)
279 * \param type either WINDOW, PIXMAP or PBUFFER, describing d
280 * \param vis the buffer's visual
281 * \param cmap the window's colormap, if known.
282 * \return new XMesaBuffer or NULL if any problem
283 */
284 static XMesaBuffer
285 create_xmesa_buffer(XMesaDrawable d, BufferType type,
286 XMesaVisual vis, XMesaColormap cmap)
287 {
288 XMesaBuffer b;
289
290 assert(type == WINDOW || type == PIXMAP || type == PBUFFER);
291
292 b = (XMesaBuffer) CALLOC_STRUCT(xmesa_buffer);
293 if (!b)
294 return NULL;
295
296 b->display = vis->display;
297 b->xm_visual = vis;
298 b->type = type;
299 b->cmap = cmap;
300
301 _mesa_initialize_window_framebuffer(&b->mesa_buffer, &vis->mesa_visual);
302 b->mesa_buffer.Delete = xmesa_delete_framebuffer;
303
304 /*
305 * Front renderbuffer
306 */
307 b->frontxrb = xmesa_new_renderbuffer(NULL, 0, vis, GL_FALSE);
308 if (!b->frontxrb) {
309 free(b);
310 return NULL;
311 }
312 b->frontxrb->Parent = b;
313 b->frontxrb->drawable = d;
314 b->frontxrb->pixmap = (XMesaPixmap) d;
315 _mesa_attach_and_own_rb(&b->mesa_buffer, BUFFER_FRONT_LEFT,
316 &b->frontxrb->Base.Base);
317
318 /*
319 * Back renderbuffer
320 */
321 if (vis->mesa_visual.doubleBufferMode) {
322 b->backxrb = xmesa_new_renderbuffer(NULL, 0, vis, GL_TRUE);
323 if (!b->backxrb) {
324 /* XXX free front xrb too */
325 free(b);
326 return NULL;
327 }
328 b->backxrb->Parent = b;
329 /* determine back buffer implementation */
330 b->db_mode = vis->ximage_flag ? BACK_XIMAGE : BACK_PIXMAP;
331
332 _mesa_attach_and_own_rb(&b->mesa_buffer, BUFFER_BACK_LEFT,
333 &b->backxrb->Base.Base);
334 }
335
336 /*
337 * Other renderbuffer (depth, stencil, etc)
338 */
339 _swrast_add_soft_renderbuffers(&b->mesa_buffer,
340 GL_FALSE, /* color */
341 vis->mesa_visual.depthBits > 0,
342 vis->mesa_visual.stencilBits > 0,
343 vis->mesa_visual.accumRedBits > 0,
344 GL_FALSE, /* software alpha buffer */
345 vis->mesa_visual.numAuxBuffers > 0 );
346
347 /* GLX_EXT_texture_from_pixmap */
348 b->TextureTarget = 0;
349 b->TextureFormat = GLX_TEXTURE_FORMAT_NONE_EXT;
350 b->TextureMipmap = 0;
351
352 /* insert buffer into linked list */
353 b->Next = XMesaBufferList;
354 XMesaBufferList = b;
355
356 return b;
357 }
358
359
360 /**
361 * Find an XMesaBuffer by matching X display and colormap but NOT matching
362 * the notThis buffer.
363 */
364 XMesaBuffer
365 xmesa_find_buffer(XMesaDisplay *dpy, XMesaColormap cmap, XMesaBuffer notThis)
366 {
367 XMesaBuffer b;
368 for (b=XMesaBufferList; b; b=b->Next) {
369 if (b->display==dpy && b->cmap==cmap && b!=notThis) {
370 return b;
371 }
372 }
373 return NULL;
374 }
375
376
377 /**
378 * Remove buffer from linked list, delete if no longer referenced.
379 */
380 static void
381 xmesa_free_buffer(XMesaBuffer buffer)
382 {
383 XMesaBuffer prev = NULL, b;
384
385 for (b = XMesaBufferList; b; b = b->Next) {
386 if (b == buffer) {
387 struct gl_framebuffer *fb = &buffer->mesa_buffer;
388
389 /* unlink buffer from list */
390 if (prev)
391 prev->Next = buffer->Next;
392 else
393 XMesaBufferList = buffer->Next;
394
395 /* mark as delete pending */
396 fb->DeletePending = GL_TRUE;
397
398 /* Since the X window for the XMesaBuffer is going away, we don't
399 * want to dereference this pointer in the future.
400 */
401 b->frontxrb->drawable = 0;
402
403 /* Unreference. If count = zero we'll really delete the buffer */
404 _mesa_reference_framebuffer(&fb, NULL);
405
406 return;
407 }
408 /* continue search */
409 prev = b;
410 }
411 /* buffer not found in XMesaBufferList */
412 _mesa_problem(NULL,"xmesa_free_buffer() - buffer not found\n");
413 }
414
415
416
417
418 /**********************************************************************/
419 /***** Misc Private Functions *****/
420 /**********************************************************************/
421
422
423 /**
424 * Setup RGB rendering for a window with a True/DirectColor visual.
425 */
426 static void
427 setup_truecolor(XMesaVisual v, XMesaBuffer buffer, XMesaColormap cmap)
428 {
429 unsigned long rmask, gmask, bmask;
430 (void) buffer;
431 (void) cmap;
432
433 /* Compute red multiplier (mask) and bit shift */
434 v->rshift = 0;
435 rmask = GET_REDMASK(v);
436 while ((rmask & 1)==0) {
437 v->rshift++;
438 rmask = rmask >> 1;
439 }
440
441 /* Compute green multiplier (mask) and bit shift */
442 v->gshift = 0;
443 gmask = GET_GREENMASK(v);
444 while ((gmask & 1)==0) {
445 v->gshift++;
446 gmask = gmask >> 1;
447 }
448
449 /* Compute blue multiplier (mask) and bit shift */
450 v->bshift = 0;
451 bmask = GET_BLUEMASK(v);
452 while ((bmask & 1)==0) {
453 v->bshift++;
454 bmask = bmask >> 1;
455 }
456
457 /*
458 * Compute component-to-pixel lookup tables and dithering kernel
459 */
460 {
461 static GLubyte kernel[16] = {
462 0*16, 8*16, 2*16, 10*16,
463 12*16, 4*16, 14*16, 6*16,
464 3*16, 11*16, 1*16, 9*16,
465 15*16, 7*16, 13*16, 5*16,
466 };
467 GLint rBits = util_bitcount(rmask);
468 GLint gBits = util_bitcount(gmask);
469 GLint bBits = util_bitcount(bmask);
470 GLint maxBits;
471 GLuint i;
472
473 /* convert pixel components in [0,_mask] to RGB values in [0,255] */
474 for (i=0; i<=rmask; i++)
475 v->PixelToR[i] = (unsigned char) ((i * 255) / rmask);
476 for (i=0; i<=gmask; i++)
477 v->PixelToG[i] = (unsigned char) ((i * 255) / gmask);
478 for (i=0; i<=bmask; i++)
479 v->PixelToB[i] = (unsigned char) ((i * 255) / bmask);
480
481 /* convert RGB values from [0,255] to pixel components */
482
483 for (i=0;i<256;i++) {
484 GLint r = gamma_adjust(v->RedGamma, i, 255);
485 GLint g = gamma_adjust(v->GreenGamma, i, 255);
486 GLint b = gamma_adjust(v->BlueGamma, i, 255);
487 v->RtoPixel[i] = (r >> (8-rBits)) << v->rshift;
488 v->GtoPixel[i] = (g >> (8-gBits)) << v->gshift;
489 v->BtoPixel[i] = (b >> (8-bBits)) << v->bshift;
490 }
491 /* overflow protection */
492 for (i=256;i<512;i++) {
493 v->RtoPixel[i] = v->RtoPixel[255];
494 v->GtoPixel[i] = v->GtoPixel[255];
495 v->BtoPixel[i] = v->BtoPixel[255];
496 }
497
498 /* setup dithering kernel */
499 maxBits = rBits;
500 if (gBits > maxBits) maxBits = gBits;
501 if (bBits > maxBits) maxBits = bBits;
502 for (i=0;i<16;i++) {
503 v->Kernel[i] = kernel[i] >> maxBits;
504 }
505
506 v->undithered_pf = PF_Truecolor;
507 v->dithered_pf = (GET_VISUAL_DEPTH(v)<24) ? PF_Dither_True : PF_Truecolor;
508 }
509
510 /*
511 * Now check for TrueColor visuals which we can optimize.
512 */
513 if ( GET_REDMASK(v) ==0x0000ff
514 && GET_GREENMASK(v)==0x00ff00
515 && GET_BLUEMASK(v) ==0xff0000
516 && CHECK_BYTE_ORDER(v)
517 && v->BitsPerPixel==32
518 && v->RedGamma==1.0 && v->GreenGamma==1.0 && v->BlueGamma==1.0) {
519 /* common 32 bpp config used on SGI, Sun */
520 v->undithered_pf = v->dithered_pf = PF_8A8B8G8R; /* ABGR */
521 }
522 else if (GET_REDMASK(v) == 0xff0000
523 && GET_GREENMASK(v)== 0x00ff00
524 && GET_BLUEMASK(v) == 0x0000ff
525 && CHECK_BYTE_ORDER(v)
526 && v->RedGamma == 1.0 && v->GreenGamma == 1.0 && v->BlueGamma == 1.0){
527 if (v->BitsPerPixel==32) {
528 /* if 32 bpp, and visual indicates 8 bpp alpha channel */
529 if (GET_VISUAL_DEPTH(v) == 32 && v->mesa_visual.alphaBits == 8)
530 v->undithered_pf = v->dithered_pf = PF_8A8R8G8B; /* ARGB */
531 else
532 v->undithered_pf = v->dithered_pf = PF_8R8G8B; /* xRGB */
533 }
534 else if (v->BitsPerPixel == 24) {
535 v->undithered_pf = v->dithered_pf = PF_8R8G8B24; /* RGB */
536 }
537 }
538 else if (GET_REDMASK(v) ==0xf800
539 && GET_GREENMASK(v)==0x07e0
540 && GET_BLUEMASK(v) ==0x001f
541 && CHECK_BYTE_ORDER(v)
542 && v->BitsPerPixel==16
543 && v->RedGamma==1.0 && v->GreenGamma==1.0 && v->BlueGamma==1.0) {
544 /* 5-6-5 RGB */
545 v->undithered_pf = PF_5R6G5B;
546 v->dithered_pf = PF_Dither_5R6G5B;
547 }
548 }
549
550
551 /**
552 * When a context is bound for the first time, we can finally finish
553 * initializing the context's visual and buffer information.
554 * \param v the XMesaVisual to initialize
555 * \param b the XMesaBuffer to initialize (may be NULL)
556 * \param rgb_flag TRUE = RGBA mode, FALSE = color index mode
557 * \param window the window/pixmap we're rendering into
558 * \param cmap the colormap associated with the window/pixmap
559 * \return GL_TRUE=success, GL_FALSE=failure
560 */
561 static GLboolean
562 initialize_visual_and_buffer(XMesaVisual v, XMesaBuffer b,
563 XMesaDrawable window,
564 XMesaColormap cmap)
565 {
566 const int xclass = v->visualType;
567
568
569 assert(!b || b->xm_visual == v);
570
571 /* Save true bits/pixel */
572 v->BitsPerPixel = bits_per_pixel(v);
573 assert(v->BitsPerPixel > 0);
574
575 /* RGB WINDOW:
576 * We support RGB rendering into almost any kind of visual.
577 */
578 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
579 setup_truecolor( v, b, cmap );
580 }
581 else {
582 _mesa_warning(NULL, "XMesa: RGB mode rendering not supported in given visual.\n");
583 return GL_FALSE;
584 }
585
586 if (getenv("MESA_NO_DITHER")) {
587 v->dithered_pf = v->undithered_pf;
588 }
589
590
591 /*
592 * If MESA_INFO env var is set print out some debugging info
593 * which can help Brian figure out what's going on when a user
594 * reports bugs.
595 */
596 if (getenv("MESA_INFO")) {
597 printf("X/Mesa visual = %p\n", (void *) v);
598 printf("X/Mesa dithered pf = %u\n", v->dithered_pf);
599 printf("X/Mesa undithered pf = %u\n", v->undithered_pf);
600 printf("X/Mesa level = %d\n", v->mesa_visual.level);
601 printf("X/Mesa depth = %d\n", GET_VISUAL_DEPTH(v));
602 printf("X/Mesa bits per pixel = %d\n", v->BitsPerPixel);
603 }
604
605 if (b && window) {
606 /* Do window-specific initializations */
607
608 /* these should have been set in create_xmesa_buffer */
609 assert(b->frontxrb->drawable == window);
610 assert(b->frontxrb->pixmap == (XMesaPixmap) window);
611
612 /* Setup for single/double buffering */
613 if (v->mesa_visual.doubleBufferMode) {
614 /* Double buffered */
615 b->shm = check_for_xshm( v->display );
616 }
617
618 /* X11 graphics contexts */
619 b->gc = XCreateGC( v->display, window, 0, NULL );
620 XMesaSetFunction( v->display, b->gc, GXcopy );
621
622 /* cleargc - for glClear() */
623 b->cleargc = XCreateGC( v->display, window, 0, NULL );
624 XMesaSetFunction( v->display, b->cleargc, GXcopy );
625
626 /*
627 * Don't generate Graphics Expose/NoExpose events in swapbuffers().
628 * Patch contributed by Michael Pichler May 15, 1995.
629 */
630 {
631 XGCValues gcvalues;
632 gcvalues.graphics_exposures = False;
633 b->swapgc = XCreateGC(v->display, window,
634 GCGraphicsExposures, &gcvalues);
635 }
636 XMesaSetFunction( v->display, b->swapgc, GXcopy );
637 }
638
639 return GL_TRUE;
640 }
641
642
643
644 /*
645 * Convert an RGBA color to a pixel value.
646 */
647 unsigned long
648 xmesa_color_to_pixel(struct gl_context *ctx,
649 GLubyte r, GLubyte g, GLubyte b, GLubyte a,
650 GLuint pixelFormat)
651 {
652 XMesaContext xmesa = XMESA_CONTEXT(ctx);
653 switch (pixelFormat) {
654 case PF_Truecolor:
655 {
656 unsigned long p;
657 PACK_TRUECOLOR( p, r, g, b );
658 return p;
659 }
660 case PF_8A8B8G8R:
661 return PACK_8A8B8G8R( r, g, b, a );
662 case PF_8A8R8G8B:
663 return PACK_8A8R8G8B( r, g, b, a );
664 case PF_8R8G8B:
665 /* fall through */
666 case PF_8R8G8B24:
667 return PACK_8R8G8B( r, g, b );
668 case PF_5R6G5B:
669 return PACK_5R6G5B( r, g, b );
670 case PF_Dither_True:
671 /* fall through */
672 case PF_Dither_5R6G5B:
673 {
674 unsigned long p;
675 PACK_TRUEDITHER(p, 1, 0, r, g, b);
676 return p;
677 }
678 default:
679 _mesa_problem(ctx, "Bad pixel format in xmesa_color_to_pixel");
680 }
681 return 0;
682 }
683
684
685 #define NUM_VISUAL_TYPES 6
686
687 /**
688 * Convert an X visual type to a GLX visual type.
689 *
690 * \param visualType X visual type (i.e., \c TrueColor, \c StaticGray, etc.)
691 * to be converted.
692 * \return If \c visualType is a valid X visual type, a GLX visual type will
693 * be returned. Otherwise \c GLX_NONE will be returned.
694 *
695 * \note
696 * This code was lifted directly from lib/GL/glx/glcontextmodes.c in the
697 * DRI CVS tree.
698 */
699 static GLint
700 xmesa_convert_from_x_visual_type( int visualType )
701 {
702 static const int glx_visual_types[ NUM_VISUAL_TYPES ] = {
703 GLX_STATIC_GRAY, GLX_GRAY_SCALE,
704 GLX_STATIC_COLOR, GLX_PSEUDO_COLOR,
705 GLX_TRUE_COLOR, GLX_DIRECT_COLOR
706 };
707
708 return ( (unsigned) visualType < NUM_VISUAL_TYPES )
709 ? glx_visual_types[ visualType ] : GLX_NONE;
710 }
711
712
713 /**********************************************************************/
714 /***** Public Functions *****/
715 /**********************************************************************/
716
717
718 /*
719 * Create a new X/Mesa visual.
720 * Input: display - X11 display
721 * visinfo - an XVisualInfo pointer
722 * rgb_flag - GL_TRUE = RGB mode,
723 * GL_FALSE = color index mode
724 * alpha_flag - alpha buffer requested?
725 * db_flag - GL_TRUE = double-buffered,
726 * GL_FALSE = single buffered
727 * stereo_flag - stereo visual?
728 * ximage_flag - GL_TRUE = use an XImage for back buffer,
729 * GL_FALSE = use an off-screen pixmap for back buffer
730 * depth_size - requested bits/depth values, or zero
731 * stencil_size - requested bits/stencil values, or zero
732 * accum_red_size - requested bits/red accum values, or zero
733 * accum_green_size - requested bits/green accum values, or zero
734 * accum_blue_size - requested bits/blue accum values, or zero
735 * accum_alpha_size - requested bits/alpha accum values, or zero
736 * num_samples - number of samples/pixel if multisampling, or zero
737 * level - visual level, usually 0
738 * visualCaveat - ala the GLX extension, usually GLX_NONE
739 * Return; a new XMesaVisual or 0 if error.
740 */
741 PUBLIC
742 XMesaVisual XMesaCreateVisual( XMesaDisplay *display,
743 XMesaVisualInfo visinfo,
744 GLboolean rgb_flag,
745 GLboolean alpha_flag,
746 GLboolean db_flag,
747 GLboolean stereo_flag,
748 GLboolean ximage_flag,
749 GLint depth_size,
750 GLint stencil_size,
751 GLint accum_red_size,
752 GLint accum_green_size,
753 GLint accum_blue_size,
754 GLint accum_alpha_size,
755 GLint num_samples,
756 GLint level,
757 GLint visualCaveat )
758 {
759 char *gamma;
760 XMesaVisual v;
761 GLint red_bits, green_bits, blue_bits, alpha_bits;
762
763 /* For debugging only */
764 if (getenv("MESA_XSYNC")) {
765 /* This makes debugging X easier.
766 * In your debugger, set a breakpoint on _XError to stop when an
767 * X protocol error is generated.
768 */
769 XSynchronize( display, 1 );
770 }
771
772 /* Color-index rendering not supported. */
773 if (!rgb_flag)
774 return NULL;
775
776 v = (XMesaVisual) CALLOC_STRUCT(xmesa_visual);
777 if (!v) {
778 return NULL;
779 }
780
781 v->display = display;
782
783 /* Save a copy of the XVisualInfo struct because the user may Xfree()
784 * the struct but we may need some of the information contained in it
785 * at a later time.
786 */
787 v->visinfo = malloc(sizeof(*visinfo));
788 if(!v->visinfo) {
789 free(v);
790 return NULL;
791 }
792 memcpy(v->visinfo, visinfo, sizeof(*visinfo));
793
794 /* check for MESA_GAMMA environment variable */
795 gamma = getenv("MESA_GAMMA");
796 if (gamma) {
797 v->RedGamma = v->GreenGamma = v->BlueGamma = 0.0;
798 sscanf( gamma, "%f %f %f", &v->RedGamma, &v->GreenGamma, &v->BlueGamma );
799 if (v->RedGamma<=0.0) v->RedGamma = 1.0;
800 if (v->GreenGamma<=0.0) v->GreenGamma = v->RedGamma;
801 if (v->BlueGamma<=0.0) v->BlueGamma = v->RedGamma;
802 }
803 else {
804 v->RedGamma = v->GreenGamma = v->BlueGamma = 1.0;
805 }
806
807 v->ximage_flag = ximage_flag;
808
809 v->mesa_visual.redMask = visinfo->red_mask;
810 v->mesa_visual.greenMask = visinfo->green_mask;
811 v->mesa_visual.blueMask = visinfo->blue_mask;
812 v->visualID = visinfo->visualid;
813 v->screen = visinfo->screen;
814
815 #if !(defined(__cplusplus) || defined(c_plusplus))
816 v->visualType = xmesa_convert_from_x_visual_type(visinfo->class);
817 #else
818 v->visualType = xmesa_convert_from_x_visual_type(visinfo->c_class);
819 #endif
820
821 v->mesa_visual.visualRating = visualCaveat;
822
823 if (alpha_flag)
824 v->mesa_visual.alphaBits = 8;
825
826 (void) initialize_visual_and_buffer( v, NULL, 0, 0 );
827
828 {
829 const int xclass = v->visualType;
830 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
831 red_bits = util_bitcount(GET_REDMASK(v));
832 green_bits = util_bitcount(GET_GREENMASK(v));
833 blue_bits = util_bitcount(GET_BLUEMASK(v));
834 }
835 else {
836 /* this is an approximation */
837 int depth;
838 depth = GET_VISUAL_DEPTH(v);
839 red_bits = depth / 3;
840 depth -= red_bits;
841 green_bits = depth / 2;
842 depth -= green_bits;
843 blue_bits = depth;
844 alpha_bits = 0;
845 assert( red_bits + green_bits + blue_bits == GET_VISUAL_DEPTH(v) );
846 }
847 alpha_bits = v->mesa_visual.alphaBits;
848 }
849
850 if (!_mesa_initialize_visual(&v->mesa_visual,
851 db_flag, stereo_flag,
852 red_bits, green_bits,
853 blue_bits, alpha_bits,
854 depth_size,
855 stencil_size,
856 accum_red_size, accum_green_size,
857 accum_blue_size, accum_alpha_size,
858 0)) {
859 free(v->visinfo);
860 free(v);
861 return NULL;
862 }
863
864 /* XXX minor hack */
865 v->mesa_visual.level = level;
866 return v;
867 }
868
869
870 PUBLIC
871 void XMesaDestroyVisual( XMesaVisual v )
872 {
873 free(v->visinfo);
874 free(v);
875 }
876
877
878
879 /**
880 * Create a new XMesaContext.
881 * \param v the XMesaVisual
882 * \param share_list another XMesaContext with which to share display
883 * lists or NULL if no sharing is wanted.
884 * \return an XMesaContext or NULL if error.
885 */
886 PUBLIC
887 XMesaContext XMesaCreateContext( XMesaVisual v, XMesaContext share_list )
888 {
889 static GLboolean firstTime = GL_TRUE;
890 XMesaContext c;
891 struct gl_context *mesaCtx;
892 struct dd_function_table functions;
893 TNLcontext *tnl;
894
895 if (firstTime) {
896 mtx_init(&_xmesa_lock, mtx_plain);
897 firstTime = GL_FALSE;
898 }
899
900 /* Note: the XMesaContext contains a Mesa struct gl_context struct (inheritance) */
901 c = (XMesaContext) CALLOC_STRUCT(xmesa_context);
902 if (!c)
903 return NULL;
904
905 mesaCtx = &(c->mesa);
906
907 /* initialize with default driver functions, then plug in XMesa funcs */
908 _mesa_init_driver_functions(&functions);
909 _tnl_init_driver_draw_function(&functions);
910 xmesa_init_driver_functions(v, &functions);
911 if (!_mesa_initialize_context(mesaCtx, API_OPENGL_COMPAT, &v->mesa_visual,
912 share_list ? &(share_list->mesa) : (struct gl_context *) NULL,
913 &functions)) {
914 free(c);
915 return NULL;
916 }
917
918 /* Enable this to exercise fixed function -> shader translation
919 * with software rendering.
920 */
921 if (0) {
922 mesaCtx->VertexProgram._MaintainTnlProgram = GL_TRUE;
923 mesaCtx->FragmentProgram._MaintainTexEnvProgram = GL_TRUE;
924 }
925
926 _mesa_enable_sw_extensions(mesaCtx);
927
928 #if ENABLE_EXT_timer_query
929 mesaCtx->Extensions.EXT_timer_query = GL_TRUE;
930 #endif
931
932
933 /* finish up xmesa context initializations */
934 c->direct = GL_TRUE;
935 c->swapbytes = CHECK_BYTE_ORDER(v) ? GL_FALSE : GL_TRUE;
936 c->xm_visual = v;
937 c->xm_buffer = NULL; /* set later by XMesaMakeCurrent */
938 c->display = v->display;
939 c->pixelformat = v->dithered_pf; /* Dithering is enabled by default */
940
941 /* Initialize the software rasterizer and helper modules.
942 */
943 if (!_swrast_CreateContext( mesaCtx ) ||
944 !_vbo_CreateContext( mesaCtx, false ) ||
945 !_tnl_CreateContext( mesaCtx ) ||
946 !_swsetup_CreateContext( mesaCtx )) {
947 _mesa_free_context_data(&c->mesa);
948 free(c);
949 return NULL;
950 }
951
952 /* tnl setup */
953 tnl = TNL_CONTEXT(mesaCtx);
954 tnl->Driver.RunPipeline = _tnl_run_pipeline;
955 /* swrast setup */
956 xmesa_register_swrast_functions( mesaCtx );
957 _swsetup_Wakeup(mesaCtx);
958
959 _mesa_meta_init(mesaCtx);
960
961 _mesa_override_extensions(mesaCtx);
962 _mesa_compute_version(mesaCtx);
963
964 /* Exec table initialization requires the version to be computed */
965 _mesa_initialize_dispatch_tables(mesaCtx);
966 _mesa_initialize_vbo_vtxfmt(mesaCtx);
967
968 return c;
969 }
970
971
972
973 PUBLIC
974 void XMesaDestroyContext( XMesaContext c )
975 {
976 struct gl_context *mesaCtx = &c->mesa;
977
978 _mesa_meta_free( mesaCtx );
979
980 _swsetup_DestroyContext( mesaCtx );
981 _swrast_DestroyContext( mesaCtx );
982 _tnl_DestroyContext( mesaCtx );
983 _vbo_DestroyContext( mesaCtx );
984 _mesa_free_context_data(mesaCtx);
985 free( c );
986 }
987
988
989
990 /**
991 * Private function for creating an XMesaBuffer which corresponds to an
992 * X window or pixmap.
993 * \param v the window's XMesaVisual
994 * \param w the window we're wrapping
995 * \return new XMesaBuffer or NULL if error
996 */
997 PUBLIC XMesaBuffer
998 XMesaCreateWindowBuffer(XMesaVisual v, XMesaWindow w)
999 {
1000 XWindowAttributes attr;
1001 XMesaBuffer b;
1002 XMesaColormap cmap;
1003 int depth;
1004
1005 assert(v);
1006 assert(w);
1007
1008 /* Check that window depth matches visual depth */
1009 XGetWindowAttributes( v->display, w, &attr );
1010 depth = attr.depth;
1011 if (GET_VISUAL_DEPTH(v) != depth) {
1012 _mesa_warning(NULL, "XMesaCreateWindowBuffer: depth mismatch between visual (%d) and window (%d)!\n",
1013 GET_VISUAL_DEPTH(v), depth);
1014 return NULL;
1015 }
1016
1017 /* Find colormap */
1018 if (attr.colormap) {
1019 cmap = attr.colormap;
1020 }
1021 else {
1022 _mesa_warning(NULL, "Window %u has no colormap!\n", (unsigned int) w);
1023 /* this is weird, a window w/out a colormap!? */
1024 /* OK, let's just allocate a new one and hope for the best */
1025 cmap = XCreateColormap(v->display, w, attr.visual, AllocNone);
1026 }
1027
1028 b = create_xmesa_buffer((XMesaDrawable) w, WINDOW, v, cmap);
1029 if (!b)
1030 return NULL;
1031
1032 if (!initialize_visual_and_buffer( v, b, (XMesaDrawable) w, cmap )) {
1033 xmesa_free_buffer(b);
1034 return NULL;
1035 }
1036
1037 return b;
1038 }
1039
1040
1041
1042 /**
1043 * Create a new XMesaBuffer from an X pixmap.
1044 *
1045 * \param v the XMesaVisual
1046 * \param p the pixmap
1047 * \param cmap the colormap, may be 0 if using a \c GLX_TRUE_COLOR or
1048 * \c GLX_DIRECT_COLOR visual for the pixmap
1049 * \returns new XMesaBuffer or NULL if error
1050 */
1051 PUBLIC XMesaBuffer
1052 XMesaCreatePixmapBuffer(XMesaVisual v, XMesaPixmap p, XMesaColormap cmap)
1053 {
1054 XMesaBuffer b;
1055
1056 assert(v);
1057
1058 b = create_xmesa_buffer((XMesaDrawable) p, PIXMAP, v, cmap);
1059 if (!b)
1060 return NULL;
1061
1062 if (!initialize_visual_and_buffer(v, b, (XMesaDrawable) p, cmap)) {
1063 xmesa_free_buffer(b);
1064 return NULL;
1065 }
1066
1067 return b;
1068 }
1069
1070
1071 /**
1072 * For GLX_EXT_texture_from_pixmap
1073 */
1074 XMesaBuffer
1075 XMesaCreatePixmapTextureBuffer(XMesaVisual v, XMesaPixmap p,
1076 XMesaColormap cmap,
1077 int format, int target, int mipmap)
1078 {
1079 GET_CURRENT_CONTEXT(ctx);
1080 XMesaBuffer b;
1081 GLuint width, height;
1082
1083 assert(v);
1084
1085 b = create_xmesa_buffer((XMesaDrawable) p, PIXMAP, v, cmap);
1086 if (!b)
1087 return NULL;
1088
1089 /* get pixmap size, update framebuffer/renderbuffer dims */
1090 xmesa_get_window_size(v->display, b, &width, &height);
1091 _mesa_resize_framebuffer(NULL, &(b->mesa_buffer), width, height);
1092
1093 if (target == 0) {
1094 /* examine dims */
1095 if (ctx->Extensions.ARB_texture_non_power_of_two) {
1096 target = GLX_TEXTURE_2D_EXT;
1097 }
1098 else if ( util_bitcount(width) == 1
1099 && util_bitcount(height) == 1) {
1100 /* power of two size */
1101 if (height == 1) {
1102 target = GLX_TEXTURE_1D_EXT;
1103 }
1104 else {
1105 target = GLX_TEXTURE_2D_EXT;
1106 }
1107 }
1108 else if (ctx->Extensions.NV_texture_rectangle) {
1109 target = GLX_TEXTURE_RECTANGLE_EXT;
1110 }
1111 else {
1112 /* non power of two textures not supported */
1113 XMesaDestroyBuffer(b);
1114 return 0;
1115 }
1116 }
1117
1118 b->TextureTarget = target;
1119 b->TextureFormat = format;
1120 b->TextureMipmap = mipmap;
1121
1122 if (!initialize_visual_and_buffer(v, b, (XMesaDrawable) p, cmap)) {
1123 xmesa_free_buffer(b);
1124 return NULL;
1125 }
1126
1127 return b;
1128 }
1129
1130
1131
1132 XMesaBuffer
1133 XMesaCreatePBuffer(XMesaVisual v, XMesaColormap cmap,
1134 unsigned int width, unsigned int height)
1135 {
1136 XMesaWindow root;
1137 XMesaDrawable drawable; /* X Pixmap Drawable */
1138 XMesaBuffer b;
1139
1140 /* allocate pixmap for front buffer */
1141 root = RootWindow( v->display, v->visinfo->screen );
1142 drawable = XCreatePixmap(v->display, root, width, height,
1143 v->visinfo->depth);
1144 if (!drawable)
1145 return NULL;
1146
1147 b = create_xmesa_buffer(drawable, PBUFFER, v, cmap);
1148 if (!b)
1149 return NULL;
1150
1151 if (!initialize_visual_and_buffer(v, b, drawable, cmap)) {
1152 xmesa_free_buffer(b);
1153 return NULL;
1154 }
1155
1156 return b;
1157 }
1158
1159
1160
1161 /*
1162 * Deallocate an XMesaBuffer structure and all related info.
1163 */
1164 PUBLIC void
1165 XMesaDestroyBuffer(XMesaBuffer b)
1166 {
1167 xmesa_free_buffer(b);
1168 }
1169
1170
1171 /**
1172 * Query the current window size and update the corresponding struct gl_framebuffer
1173 * and all attached renderbuffers.
1174 * Called when:
1175 * 1. the first time a buffer is bound to a context.
1176 * 2. from glViewport to poll for window size changes
1177 * 3. from the XMesaResizeBuffers() API function.
1178 * Note: it's possible (and legal) for xmctx to be NULL. That can happen
1179 * when resizing a buffer when no rendering context is bound.
1180 */
1181 void
1182 xmesa_check_and_update_buffer_size(XMesaContext xmctx, XMesaBuffer drawBuffer)
1183 {
1184 GLuint width, height;
1185 xmesa_get_window_size(drawBuffer->display, drawBuffer, &width, &height);
1186 if (drawBuffer->mesa_buffer.Width != width ||
1187 drawBuffer->mesa_buffer.Height != height) {
1188 struct gl_context *ctx = xmctx ? &xmctx->mesa : NULL;
1189 _mesa_resize_framebuffer(ctx, &(drawBuffer->mesa_buffer), width, height);
1190 }
1191 }
1192
1193
1194 /*
1195 * Bind buffer b to context c and make c the current rendering context.
1196 */
1197 GLboolean XMesaMakeCurrent( XMesaContext c, XMesaBuffer b )
1198 {
1199 return XMesaMakeCurrent2( c, b, b );
1200 }
1201
1202
1203 /*
1204 * Bind buffer b to context c and make c the current rendering context.
1205 */
1206 PUBLIC
1207 GLboolean XMesaMakeCurrent2( XMesaContext c, XMesaBuffer drawBuffer,
1208 XMesaBuffer readBuffer )
1209 {
1210 if (c) {
1211 if (!drawBuffer || !readBuffer)
1212 return GL_FALSE; /* must specify buffers! */
1213
1214 if (&(c->mesa) == _mesa_get_current_context()
1215 && c->mesa.DrawBuffer == &drawBuffer->mesa_buffer
1216 && c->mesa.ReadBuffer == &readBuffer->mesa_buffer
1217 && XMESA_BUFFER(c->mesa.DrawBuffer)->wasCurrent) {
1218 /* same context and buffer, do nothing */
1219 return GL_TRUE;
1220 }
1221
1222 c->xm_buffer = drawBuffer;
1223
1224 xmesa_check_and_update_buffer_size(c, drawBuffer);
1225 if (readBuffer != drawBuffer)
1226 xmesa_check_and_update_buffer_size(c, readBuffer);
1227
1228 _mesa_make_current(&(c->mesa),
1229 &drawBuffer->mesa_buffer,
1230 &readBuffer->mesa_buffer);
1231
1232 /*
1233 * Must recompute and set these pixel values because colormap
1234 * can be different for different windows.
1235 */
1236 c->clearpixel = xmesa_color_to_pixel( &c->mesa,
1237 c->clearcolor[0],
1238 c->clearcolor[1],
1239 c->clearcolor[2],
1240 c->clearcolor[3],
1241 c->xm_visual->undithered_pf);
1242 XMesaSetForeground(c->display, drawBuffer->cleargc, c->clearpixel);
1243
1244 /* Solution to Stephane Rehel's problem with glXReleaseBuffersMESA(): */
1245 drawBuffer->wasCurrent = GL_TRUE;
1246 }
1247 else {
1248 /* Detach */
1249 _mesa_make_current( NULL, NULL, NULL );
1250 }
1251 return GL_TRUE;
1252 }
1253
1254
1255 /*
1256 * Unbind the context c from its buffer.
1257 */
1258 GLboolean XMesaUnbindContext( XMesaContext c )
1259 {
1260 /* A no-op for XFree86 integration purposes */
1261 return GL_TRUE;
1262 }
1263
1264
1265 XMesaContext XMesaGetCurrentContext( void )
1266 {
1267 GET_CURRENT_CONTEXT(ctx);
1268 if (ctx) {
1269 XMesaContext xmesa = XMESA_CONTEXT(ctx);
1270 return xmesa;
1271 }
1272 else {
1273 return 0;
1274 }
1275 }
1276
1277
1278 XMesaBuffer XMesaGetCurrentBuffer( void )
1279 {
1280 GET_CURRENT_CONTEXT(ctx);
1281 if (ctx) {
1282 XMesaBuffer xmbuf = XMESA_BUFFER(ctx->DrawBuffer);
1283 return xmbuf;
1284 }
1285 else {
1286 return 0;
1287 }
1288 }
1289
1290
1291 /* New in Mesa 3.1 */
1292 XMesaBuffer XMesaGetCurrentReadBuffer( void )
1293 {
1294 GET_CURRENT_CONTEXT(ctx);
1295 if (ctx) {
1296 return XMESA_BUFFER(ctx->ReadBuffer);
1297 }
1298 else {
1299 return 0;
1300 }
1301 }
1302
1303
1304 Display *XMesaGetCurrentDisplay(void)
1305 {
1306 GET_CURRENT_CONTEXT(ctx);
1307 XMesaContext xmctx = XMESA_CONTEXT(ctx);
1308 return xmctx ? xmctx->display : NULL;
1309 }
1310
1311
1312
1313 /*
1314 * Copy the back buffer to the front buffer. If there's no back buffer
1315 * this is a no-op.
1316 */
1317 PUBLIC
1318 void XMesaSwapBuffers( XMesaBuffer b )
1319 {
1320 GET_CURRENT_CONTEXT(ctx);
1321
1322 if (!b->backxrb) {
1323 /* single buffered */
1324 return;
1325 }
1326
1327 /* If we're swapping the buffer associated with the current context
1328 * we have to flush any pending rendering commands first.
1329 */
1330 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
1331 _mesa_notifySwapBuffers(ctx);
1332
1333 if (b->db_mode) {
1334 if (b->backxrb->ximage) {
1335 /* Copy Ximage (back buf) from client memory to server window */
1336 #if defined(USE_XSHM)
1337 if (b->shm) {
1338 /*mtx_lock(&_xmesa_lock);*/
1339 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
1340 b->swapgc,
1341 b->backxrb->ximage, 0, 0,
1342 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1343 False );
1344 /*mtx_unlock(&_xmesa_lock);*/
1345 }
1346 else
1347 #endif
1348 {
1349 /*mtx_lock(&_xmesa_lock);*/
1350 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
1351 b->swapgc,
1352 b->backxrb->ximage, 0, 0,
1353 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height );
1354 /*mtx_unlock(&_xmesa_lock);*/
1355 }
1356 }
1357 else if (b->backxrb->pixmap) {
1358 /* Copy pixmap (back buf) to window (front buf) on server */
1359 /*mtx_lock(&_xmesa_lock);*/
1360 XMesaCopyArea( b->xm_visual->display,
1361 b->backxrb->pixmap, /* source drawable */
1362 b->frontxrb->drawable, /* dest. drawable */
1363 b->swapgc,
1364 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1365 0, 0 /* dest region */
1366 );
1367 /*mtx_unlock(&_xmesa_lock);*/
1368 }
1369 }
1370 XSync( b->xm_visual->display, False );
1371 }
1372
1373
1374
1375 /*
1376 * Copy sub-region of back buffer to front buffer
1377 */
1378 void XMesaCopySubBuffer( XMesaBuffer b, int x, int y, int width, int height )
1379 {
1380 GET_CURRENT_CONTEXT(ctx);
1381
1382 /* If we're swapping the buffer associated with the current context
1383 * we have to flush any pending rendering commands first.
1384 */
1385 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
1386 _mesa_notifySwapBuffers(ctx);
1387
1388 if (!b->backxrb) {
1389 /* single buffered */
1390 return;
1391 }
1392
1393 if (b->db_mode) {
1394 int yTop = b->mesa_buffer.Height - y - height;
1395 if (b->backxrb->ximage) {
1396 /* Copy Ximage from host's memory to server's window */
1397 #if defined(USE_XSHM)
1398 if (b->shm) {
1399 /* XXX assuming width and height aren't too large! */
1400 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
1401 b->swapgc,
1402 b->backxrb->ximage, x, yTop,
1403 x, yTop, width, height, False );
1404 /* wait for finished event??? */
1405 }
1406 else
1407 #endif
1408 {
1409 /* XXX assuming width and height aren't too large! */
1410 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
1411 b->swapgc,
1412 b->backxrb->ximage, x, yTop,
1413 x, yTop, width, height );
1414 }
1415 }
1416 else {
1417 /* Copy pixmap to window on server */
1418 XMesaCopyArea( b->xm_visual->display,
1419 b->backxrb->pixmap, /* source drawable */
1420 b->frontxrb->drawable, /* dest. drawable */
1421 b->swapgc,
1422 x, yTop, width, height, /* source region */
1423 x, yTop /* dest region */
1424 );
1425 }
1426 }
1427 }
1428
1429
1430 /*
1431 * Return a pointer to the XMesa backbuffer Pixmap or XImage. This function
1432 * is a way to get "under the hood" of X/Mesa so one can manipulate the
1433 * back buffer directly.
1434 * Output: pixmap - pointer to back buffer's Pixmap, or 0
1435 * ximage - pointer to back buffer's XImage, or NULL
1436 * Return: GL_TRUE = context is double buffered
1437 * GL_FALSE = context is single buffered
1438 */
1439 GLboolean XMesaGetBackBuffer( XMesaBuffer b,
1440 XMesaPixmap *pixmap,
1441 XMesaImage **ximage )
1442 {
1443 if (b->db_mode) {
1444 if (pixmap)
1445 *pixmap = b->backxrb->pixmap;
1446 if (ximage)
1447 *ximage = b->backxrb->ximage;
1448 return GL_TRUE;
1449 }
1450 else {
1451 *pixmap = 0;
1452 *ximage = NULL;
1453 return GL_FALSE;
1454 }
1455 }
1456
1457
1458 /*
1459 * Return the depth buffer associated with an XMesaBuffer.
1460 * Input: b - the XMesa buffer handle
1461 * Output: width, height - size of buffer in pixels
1462 * bytesPerValue - bytes per depth value (2 or 4)
1463 * buffer - pointer to depth buffer values
1464 * Return: GL_TRUE or GL_FALSE to indicate success or failure.
1465 */
1466 GLboolean XMesaGetDepthBuffer( XMesaBuffer b, GLint *width, GLint *height,
1467 GLint *bytesPerValue, void **buffer )
1468 {
1469 struct gl_renderbuffer *rb
1470 = b->mesa_buffer.Attachment[BUFFER_DEPTH].Renderbuffer;
1471 struct xmesa_renderbuffer *xrb = xmesa_renderbuffer(rb);
1472
1473 if (!xrb || !xrb->Base.Buffer) {
1474 *width = 0;
1475 *height = 0;
1476 *bytesPerValue = 0;
1477 *buffer = 0;
1478 return GL_FALSE;
1479 }
1480 else {
1481 *width = b->mesa_buffer.Width;
1482 *height = b->mesa_buffer.Height;
1483 *bytesPerValue = b->mesa_buffer.Visual.depthBits <= 16
1484 ? sizeof(GLushort) : sizeof(GLuint);
1485 *buffer = (void *) xrb->Base.Buffer;
1486 return GL_TRUE;
1487 }
1488 }
1489
1490
1491 void XMesaFlush( XMesaContext c )
1492 {
1493 if (c && c->xm_visual) {
1494 XSync( c->xm_visual->display, False );
1495 }
1496 }
1497
1498
1499
1500 const char *XMesaGetString( XMesaContext c, int name )
1501 {
1502 (void) c;
1503 if (name==XMESA_VERSION) {
1504 return "5.0";
1505 }
1506 else if (name==XMESA_EXTENSIONS) {
1507 return "";
1508 }
1509 else {
1510 return NULL;
1511 }
1512 }
1513
1514
1515
1516 XMesaBuffer XMesaFindBuffer( XMesaDisplay *dpy, XMesaDrawable d )
1517 {
1518 XMesaBuffer b;
1519 for (b=XMesaBufferList; b; b=b->Next) {
1520 if (b->frontxrb->drawable == d && b->display == dpy) {
1521 return b;
1522 }
1523 }
1524 return NULL;
1525 }
1526
1527
1528 /**
1529 * Free/destroy all XMesaBuffers associated with given display.
1530 */
1531 void xmesa_destroy_buffers_on_display(XMesaDisplay *dpy)
1532 {
1533 XMesaBuffer b, next;
1534 for (b = XMesaBufferList; b; b = next) {
1535 next = b->Next;
1536 if (b->display == dpy) {
1537 xmesa_free_buffer(b);
1538 }
1539 }
1540 }
1541
1542
1543 /*
1544 * Look for XMesaBuffers whose X window has been destroyed.
1545 * Deallocate any such XMesaBuffers.
1546 */
1547 void XMesaGarbageCollect( XMesaDisplay* dpy )
1548 {
1549 XMesaBuffer b, next;
1550 for (b=XMesaBufferList; b; b=next) {
1551 next = b->Next;
1552 if (b->display && b->display == dpy && b->frontxrb->drawable && b->type == WINDOW) {
1553 XSync(b->display, False);
1554 if (!window_exists( b->display, b->frontxrb->drawable )) {
1555 /* found a dead window, free the ancillary info */
1556 XMesaDestroyBuffer( b );
1557 }
1558 }
1559 }
1560 }
1561
1562
1563 unsigned long XMesaDitherColor( XMesaContext xmesa, GLint x, GLint y,
1564 GLfloat red, GLfloat green,
1565 GLfloat blue, GLfloat alpha )
1566 {
1567 GLint r = (GLint) (red * 255.0F);
1568 GLint g = (GLint) (green * 255.0F);
1569 GLint b = (GLint) (blue * 255.0F);
1570 GLint a = (GLint) (alpha * 255.0F);
1571
1572 switch (xmesa->pixelformat) {
1573 case PF_Truecolor:
1574 {
1575 unsigned long p;
1576 PACK_TRUECOLOR( p, r, g, b );
1577 return p;
1578 }
1579 case PF_8A8B8G8R:
1580 return PACK_8A8B8G8R( r, g, b, a );
1581 case PF_8A8R8G8B:
1582 return PACK_8A8R8G8B( r, g, b, a );
1583 case PF_8R8G8B:
1584 return PACK_8R8G8B( r, g, b );
1585 case PF_5R6G5B:
1586 return PACK_5R6G5B( r, g, b );
1587 case PF_Dither_5R6G5B:
1588 /* fall through */
1589 case PF_Dither_True:
1590 {
1591 unsigned long p;
1592 PACK_TRUEDITHER(p, x, y, r, g, b);
1593 return p;
1594 }
1595 default:
1596 _mesa_problem(NULL, "Bad pixel format in XMesaDitherColor");
1597 }
1598 return 0;
1599 }
1600
1601
1602 /*
1603 * This is typically called when the window size changes and we need
1604 * to reallocate the buffer's back/depth/stencil/accum buffers.
1605 */
1606 PUBLIC void
1607 XMesaResizeBuffers( XMesaBuffer b )
1608 {
1609 GET_CURRENT_CONTEXT(ctx);
1610 XMesaContext xmctx = XMESA_CONTEXT(ctx);
1611 if (!xmctx)
1612 return;
1613 xmesa_check_and_update_buffer_size(xmctx, b);
1614 }
1615
1616
1617 static GLint
1618 xbuffer_to_renderbuffer(int buffer)
1619 {
1620 assert(MAX_AUX_BUFFERS <= 4);
1621
1622 switch (buffer) {
1623 case GLX_FRONT_LEFT_EXT:
1624 return BUFFER_FRONT_LEFT;
1625 case GLX_FRONT_RIGHT_EXT:
1626 return BUFFER_FRONT_RIGHT;
1627 case GLX_BACK_LEFT_EXT:
1628 return BUFFER_BACK_LEFT;
1629 case GLX_BACK_RIGHT_EXT:
1630 return BUFFER_BACK_RIGHT;
1631 case GLX_AUX0_EXT:
1632 return BUFFER_AUX0;
1633 case GLX_AUX1_EXT:
1634 case GLX_AUX2_EXT:
1635 case GLX_AUX3_EXT:
1636 case GLX_AUX4_EXT:
1637 case GLX_AUX5_EXT:
1638 case GLX_AUX6_EXT:
1639 case GLX_AUX7_EXT:
1640 case GLX_AUX8_EXT:
1641 case GLX_AUX9_EXT:
1642 default:
1643 /* BadValue error */
1644 return -1;
1645 }
1646 }
1647
1648
1649 PUBLIC void
1650 XMesaBindTexImage(XMesaDisplay *dpy, XMesaBuffer drawable, int buffer,
1651 const int *attrib_list)
1652 {
1653 #if 0
1654 GET_CURRENT_CONTEXT(ctx);
1655 const GLuint unit = ctx->Texture.CurrentUnit;
1656 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[unit];
1657 struct gl_texture_object *texObj;
1658 #endif
1659 struct gl_renderbuffer *rb;
1660 struct xmesa_renderbuffer *xrb;
1661 GLint b;
1662 XMesaImage *img = NULL;
1663 GLboolean freeImg = GL_FALSE;
1664
1665 b = xbuffer_to_renderbuffer(buffer);
1666 if (b < 0)
1667 return;
1668
1669 if (drawable->TextureFormat == GLX_TEXTURE_FORMAT_NONE_EXT)
1670 return; /* BadMatch error */
1671
1672 rb = drawable->mesa_buffer.Attachment[b].Renderbuffer;
1673 if (!rb) {
1674 /* invalid buffer */
1675 return;
1676 }
1677 xrb = xmesa_renderbuffer(rb);
1678
1679 #if 0
1680 switch (drawable->TextureTarget) {
1681 case GLX_TEXTURE_1D_EXT:
1682 texObj = texUnit->CurrentTex[TEXTURE_1D_INDEX];
1683 break;
1684 case GLX_TEXTURE_2D_EXT:
1685 texObj = texUnit->CurrentTex[TEXTURE_2D_INDEX];
1686 break;
1687 case GLX_TEXTURE_RECTANGLE_EXT:
1688 texObj = texUnit->CurrentTex[TEXTURE_RECT_INDEX];
1689 break;
1690 default:
1691 return; /* BadMatch error */
1692 }
1693 #endif
1694
1695 /*
1696 * The following is a quick and simple way to implement
1697 * BindTexImage. The better way is to write some new FetchTexel()
1698 * functions which would extract texels from XImages. We'd still
1699 * need to use GetImage when texturing from a Pixmap (front buffer)
1700 * but texturing from a back buffer (XImage) would avoid an image
1701 * copy.
1702 */
1703
1704 /* get XImage */
1705 if (xrb->pixmap) {
1706 img = XMesaGetImage(dpy, xrb->pixmap, 0, 0, rb->Width, rb->Height, ~0L,
1707 ZPixmap);
1708 freeImg = GL_TRUE;
1709 }
1710 else if (xrb->ximage) {
1711 img = xrb->ximage;
1712 }
1713
1714 /* store the XImage as a new texture image */
1715 if (img) {
1716 GLenum format, type, intFormat;
1717 if (img->bits_per_pixel == 32) {
1718 format = GL_BGRA;
1719 type = GL_UNSIGNED_BYTE;
1720 intFormat = GL_RGBA;
1721 }
1722 else if (img->bits_per_pixel == 24) {
1723 format = GL_BGR;
1724 type = GL_UNSIGNED_BYTE;
1725 intFormat = GL_RGB;
1726 }
1727 else if (img->bits_per_pixel == 16) {
1728 format = GL_BGR;
1729 type = GL_UNSIGNED_SHORT_5_6_5;
1730 intFormat = GL_RGB;
1731 }
1732 else {
1733 _mesa_problem(NULL, "Unexpected XImage format in XMesaBindTexImage");
1734 return;
1735 }
1736 if (drawable->TextureFormat == GLX_TEXTURE_FORMAT_RGBA_EXT) {
1737 intFormat = GL_RGBA;
1738 }
1739 else if (drawable->TextureFormat == GLX_TEXTURE_FORMAT_RGB_EXT) {
1740 intFormat = GL_RGB;
1741 }
1742
1743 _mesa_TexImage2D(GL_TEXTURE_2D, 0, intFormat, rb->Width, rb->Height, 0,
1744 format, type, img->data);
1745
1746 if (freeImg) {
1747 XMesaDestroyImage(img);
1748 }
1749 }
1750 }
1751
1752
1753
1754 PUBLIC void
1755 XMesaReleaseTexImage(XMesaDisplay *dpy, XMesaBuffer drawable, int buffer)
1756 {
1757 const GLint b = xbuffer_to_renderbuffer(buffer);
1758 if (b < 0)
1759 return;
1760
1761 /* no-op for now */
1762 }
1763