a07d0a90cf326a389384882f29f5040a0bc422f7
[mesa.git] / src / mesa / drivers / x11 / xm_api.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 6.5.2
4 *
5 * Copyright (C) 1999-2006 Brian Paul All Rights Reserved.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
21 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR 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 "glxheader.h"
66 #include "GL/xmesa.h"
67 #include "xmesaP.h"
68 #include "context.h"
69 #include "extensions.h"
70 #include "framebuffer.h"
71 #include "glthread.h"
72 #include "imports.h"
73 #include "macros.h"
74 #include "renderbuffer.h"
75 #include "swrast/swrast.h"
76 #include "swrast_setup/swrast_setup.h"
77 #include "vbo/vbo.h"
78 #include "tnl/tnl.h"
79 #include "tnl/t_context.h"
80 #include "tnl/t_pipeline.h"
81 #include "drivers/common/driverfuncs.h"
82
83 /**
84 * Global X driver lock
85 */
86 _glthread_Mutex _xmesa_lock;
87
88
89
90 /**
91 * Lookup tables for HPCR pixel format:
92 */
93 static short hpcr_rgbTbl[3][256] = {
94 {
95 16, 16, 17, 17, 18, 18, 19, 19, 20, 20, 21, 21, 22, 22, 23, 23,
96 24, 24, 25, 25, 26, 26, 27, 27, 28, 28, 29, 29, 30, 30, 31, 31,
97 32, 32, 33, 33, 34, 34, 35, 35, 36, 36, 37, 37, 38, 38, 39, 39,
98 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
99 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
100 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
101 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
102 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111,
103 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127,
104 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
105 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159,
106 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175,
107 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191,
108 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207,
109 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223,
110 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239
111 },
112 {
113 16, 16, 17, 17, 18, 18, 19, 19, 20, 20, 21, 21, 22, 22, 23, 23,
114 24, 24, 25, 25, 26, 26, 27, 27, 28, 28, 29, 29, 30, 30, 31, 31,
115 32, 32, 33, 33, 34, 34, 35, 35, 36, 36, 37, 37, 38, 38, 39, 39,
116 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
117 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63,
118 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79,
119 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
120 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111,
121 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127,
122 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
123 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159,
124 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175,
125 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191,
126 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207,
127 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223,
128 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239
129 },
130 {
131 32, 32, 33, 33, 34, 34, 35, 35, 36, 36, 37, 37, 38, 38, 39, 39,
132 40, 40, 41, 41, 42, 42, 43, 43, 44, 44, 45, 45, 46, 46, 47, 47,
133 48, 48, 49, 49, 50, 50, 51, 51, 52, 52, 53, 53, 54, 54, 55, 55,
134 56, 56, 57, 57, 58, 58, 59, 59, 60, 60, 61, 61, 62, 62, 63, 63,
135 64, 64, 65, 65, 66, 66, 67, 67, 68, 68, 69, 69, 70, 70, 71, 71,
136 72, 72, 73, 73, 74, 74, 75, 75, 76, 76, 77, 77, 78, 78, 79, 79,
137 80, 80, 81, 81, 82, 82, 83, 83, 84, 84, 85, 85, 86, 86, 87, 87,
138 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
139 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111,
140 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127,
141 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
142 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159,
143 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175,
144 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191,
145 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207,
146 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223
147 }
148 };
149
150
151
152 /**********************************************************************/
153 /***** X Utility Functions *****/
154 /**********************************************************************/
155
156
157 /**
158 * Return the host's byte order as LSBFirst or MSBFirst ala X.
159 */
160 #ifndef XFree86Server
161 static int host_byte_order( void )
162 {
163 int i = 1;
164 char *cptr = (char *) &i;
165 return (*cptr==1) ? LSBFirst : MSBFirst;
166 }
167 #endif
168
169
170 /**
171 * Check if the X Shared Memory extension is available.
172 * Return: 0 = not available
173 * 1 = shared XImage support available
174 * 2 = shared Pixmap support available also
175 */
176 static int check_for_xshm( XMesaDisplay *display )
177 {
178 #if defined(USE_XSHM) && !defined(XFree86Server)
179 int major, minor, ignore;
180 Bool pixmaps;
181
182 if (XQueryExtension( display, "MIT-SHM", &ignore, &ignore, &ignore )) {
183 if (XShmQueryVersion( display, &major, &minor, &pixmaps )==True) {
184 return (pixmaps==True) ? 2 : 1;
185 }
186 else {
187 return 0;
188 }
189 }
190 else {
191 return 0;
192 }
193 #else
194 /* No XSHM support */
195 return 0;
196 #endif
197 }
198
199
200 /**
201 * Apply gamma correction to an intensity value in [0..max]. Return the
202 * new intensity value.
203 */
204 static GLint
205 gamma_adjust( GLfloat gamma, GLint value, GLint max )
206 {
207 if (gamma == 1.0) {
208 return value;
209 }
210 else {
211 double x = (double) value / (double) max;
212 return IROUND_POS((GLfloat) max * _mesa_pow(x, 1.0F/gamma));
213 }
214 }
215
216
217
218 /**
219 * Return the true number of bits per pixel for XImages.
220 * For example, if we request a 24-bit deep visual we may actually need/get
221 * 32bpp XImages. This function returns the appropriate bpp.
222 * Input: dpy - the X display
223 * visinfo - desribes the visual to be used for XImages
224 * Return: true number of bits per pixel for XImages
225 */
226 static int
227 bits_per_pixel( XMesaVisual xmv )
228 {
229 #ifdef XFree86Server
230 const int depth = xmv->nplanes;
231 int i;
232 assert(depth > 0);
233 for (i = 0; i < screenInfo.numPixmapFormats; i++) {
234 if (screenInfo.formats[i].depth == depth)
235 return screenInfo.formats[i].bitsPerPixel;
236 }
237 return depth; /* should never get here, but this should be safe */
238 #else
239 XMesaDisplay *dpy = xmv->display;
240 XMesaVisualInfo visinfo = xmv->visinfo;
241 XMesaImage *img;
242 int bitsPerPixel;
243 /* Create a temporary XImage */
244 img = XCreateImage( dpy, visinfo->visual, visinfo->depth,
245 ZPixmap, 0, /*format, offset*/
246 (char*) MALLOC(8), /*data*/
247 1, 1, /*width, height*/
248 32, /*bitmap_pad*/
249 0 /*bytes_per_line*/
250 );
251 assert(img);
252 /* grab the bits/pixel value */
253 bitsPerPixel = img->bits_per_pixel;
254 /* free the XImage */
255 _mesa_free( img->data );
256 img->data = NULL;
257 XMesaDestroyImage( img );
258 return bitsPerPixel;
259 #endif
260 }
261
262
263
264 /*
265 * Determine if a given X window ID is valid (window exists).
266 * Do this by calling XGetWindowAttributes() for the window and
267 * checking if we catch an X error.
268 * Input: dpy - the display
269 * win - the window to check for existance
270 * Return: GL_TRUE - window exists
271 * GL_FALSE - window doesn't exist
272 */
273 #ifndef XFree86Server
274 static GLboolean WindowExistsFlag;
275
276 static int window_exists_err_handler( XMesaDisplay* dpy, XErrorEvent* xerr )
277 {
278 (void) dpy;
279 if (xerr->error_code == BadWindow) {
280 WindowExistsFlag = GL_FALSE;
281 }
282 return 0;
283 }
284
285 static GLboolean window_exists( XMesaDisplay *dpy, Window win )
286 {
287 XWindowAttributes wa;
288 int (*old_handler)( XMesaDisplay*, XErrorEvent* );
289 WindowExistsFlag = GL_TRUE;
290 old_handler = XSetErrorHandler(window_exists_err_handler);
291 XGetWindowAttributes( dpy, win, &wa ); /* dummy request */
292 XSetErrorHandler(old_handler);
293 return WindowExistsFlag;
294 }
295 #endif
296
297
298
299 /**
300 * Return the size of the window (or pixmap) that corresponds to the
301 * given XMesaBuffer.
302 * \param width returns width in pixels
303 * \param height returns height in pixels
304 */
305 void
306 xmesa_get_window_size(XMesaDisplay *dpy, XMesaBuffer b,
307 GLuint *width, GLuint *height)
308 {
309 #ifdef XFree86Server
310 *width = MIN2(b->frontxrb->drawable->width, MAX_WIDTH);
311 *height = MIN2(b->frontxrb->drawable->height, MAX_HEIGHT);
312 #else
313 Window root;
314 Status stat;
315 int xpos, ypos;
316 unsigned int w, h, bw, depth;
317
318 _glthread_LOCK_MUTEX(_xmesa_lock);
319 XSync(b->xm_visual->display, 0); /* added for Chromium */
320 stat = XGetGeometry(dpy, b->frontxrb->pixmap, &root, &xpos, &ypos,
321 &w, &h, &bw, &depth);
322 _glthread_UNLOCK_MUTEX(_xmesa_lock);
323
324 if (stat) {
325 *width = w;
326 *height = h;
327 }
328 else {
329 /* probably querying a window that's recently been destroyed */
330 _mesa_warning(NULL, "XGetGeometry failed!\n");
331 *width = *height = 1;
332 }
333 #endif
334 }
335
336
337
338 /**********************************************************************/
339 /***** Linked list of XMesaBuffers *****/
340 /**********************************************************************/
341
342 XMesaBuffer XMesaBufferList = NULL;
343
344
345 /**
346 * Allocate a new XMesaBuffer object which corresponds to the given drawable.
347 * Note that XMesaBuffer is derived from GLframebuffer.
348 * The new XMesaBuffer will not have any size (Width=Height=0).
349 *
350 * \param d the corresponding X drawable (window or pixmap)
351 * \param type either WINDOW, PIXMAP or PBUFFER, describing d
352 * \param vis the buffer's visual
353 * \param cmap the window's colormap, if known.
354 * \return new XMesaBuffer or NULL if any problem
355 */
356 static XMesaBuffer
357 create_xmesa_buffer(XMesaDrawable d, BufferType type,
358 XMesaVisual vis, XMesaColormap cmap)
359 {
360 XMesaBuffer b;
361
362 ASSERT(type == WINDOW || type == PIXMAP || type == PBUFFER);
363
364 b = (XMesaBuffer) CALLOC_STRUCT(xmesa_buffer);
365 if (!b)
366 return NULL;
367
368 b->display = vis->display;
369 b->xm_visual = vis;
370 b->type = type;
371 b->cmap = cmap;
372
373 _mesa_initialize_framebuffer(&b->mesa_buffer, &vis->mesa_visual);
374 b->mesa_buffer.Delete = xmesa_delete_framebuffer;
375
376 /*
377 * Front renderbuffer
378 */
379 b->frontxrb = xmesa_new_renderbuffer(NULL, 0, &vis->mesa_visual, GL_FALSE);
380 if (!b->frontxrb) {
381 _mesa_free(b);
382 return NULL;
383 }
384 b->frontxrb->Parent = b;
385 b->frontxrb->drawable = d;
386 b->frontxrb->pixmap = (XMesaPixmap) d;
387 _mesa_add_renderbuffer(&b->mesa_buffer, BUFFER_FRONT_LEFT,
388 &b->frontxrb->Base);
389
390 /*
391 * Back renderbuffer
392 */
393 if (vis->mesa_visual.doubleBufferMode) {
394 b->backxrb = xmesa_new_renderbuffer(NULL, 0, &vis->mesa_visual, GL_TRUE);
395 if (!b->backxrb) {
396 /* XXX free front xrb too */
397 _mesa_free(b);
398 return NULL;
399 }
400 b->backxrb->Parent = b;
401 /* determine back buffer implementation */
402 b->db_mode = vis->ximage_flag ? BACK_XIMAGE : BACK_PIXMAP;
403
404 _mesa_add_renderbuffer(&b->mesa_buffer, BUFFER_BACK_LEFT,
405 &b->backxrb->Base);
406 }
407
408 /*
409 * Software alpha planes
410 */
411 if (vis->mesa_visual.alphaBits > 0
412 && vis->undithered_pf != PF_8A8B8G8R
413 && vis->undithered_pf != PF_8A8R8G8B) {
414 /* Visual has alpha, but pixel format doesn't support it.
415 * We'll use an alpha renderbuffer wrapper.
416 */
417 b->swAlpha = GL_TRUE;
418 }
419 else {
420 b->swAlpha = GL_FALSE;
421 }
422
423 /*
424 * Other renderbuffer (depth, stencil, etc)
425 */
426 _mesa_add_soft_renderbuffers(&b->mesa_buffer,
427 GL_FALSE, /* color */
428 vis->mesa_visual.haveDepthBuffer,
429 vis->mesa_visual.haveStencilBuffer,
430 vis->mesa_visual.haveAccumBuffer,
431 b->swAlpha,
432 vis->mesa_visual.numAuxBuffers > 0 );
433
434 /* insert buffer into linked list */
435 b->Next = XMesaBufferList;
436 XMesaBufferList = b;
437
438 return b;
439 }
440
441
442 /**
443 * Find an XMesaBuffer by matching X display and colormap but NOT matching
444 * the notThis buffer.
445 */
446 XMesaBuffer
447 xmesa_find_buffer(XMesaDisplay *dpy, XMesaColormap cmap, XMesaBuffer notThis)
448 {
449 XMesaBuffer b;
450 for (b=XMesaBufferList; b; b=b->Next) {
451 if (b->display==dpy && b->cmap==cmap && b!=notThis) {
452 return b;
453 }
454 }
455 return NULL;
456 }
457
458
459 /**
460 * Remove buffer from linked list, delete if no longer referenced.
461 */
462 static void
463 xmesa_free_buffer(XMesaBuffer buffer)
464 {
465 XMesaBuffer prev = NULL, b;
466
467 for (b = XMesaBufferList; b; b = b->Next) {
468 if (b == buffer) {
469 struct gl_framebuffer *fb = &buffer->mesa_buffer;
470
471 /* unlink buffer from list */
472 if (prev)
473 prev->Next = buffer->Next;
474 else
475 XMesaBufferList = buffer->Next;
476
477 /* mark as delete pending */
478 fb->DeletePending = GL_TRUE;
479
480 /* Since the X window for the XMesaBuffer is going away, we don't
481 * want to dereference this pointer in the future.
482 */
483 b->frontxrb->drawable = 0;
484
485 /* Unreference. If count = zero we'll really delete the buffer */
486 _mesa_unreference_framebuffer(&fb);
487
488 return;
489 }
490 /* continue search */
491 prev = b;
492 }
493 /* buffer not found in XMesaBufferList */
494 _mesa_problem(NULL,"xmesa_free_buffer() - buffer not found\n");
495 }
496
497
498 /**
499 * Copy X color table stuff from one XMesaBuffer to another.
500 */
501 static void
502 copy_colortable_info(XMesaBuffer dst, const XMesaBuffer src)
503 {
504 MEMCPY(dst->color_table, src->color_table, sizeof(src->color_table));
505 MEMCPY(dst->pixel_to_r, src->pixel_to_r, sizeof(src->pixel_to_r));
506 MEMCPY(dst->pixel_to_g, src->pixel_to_g, sizeof(src->pixel_to_g));
507 MEMCPY(dst->pixel_to_b, src->pixel_to_b, sizeof(src->pixel_to_b));
508 dst->num_alloced = src->num_alloced;
509 MEMCPY(dst->alloced_colors, src->alloced_colors,
510 sizeof(src->alloced_colors));
511 }
512
513
514
515 /**********************************************************************/
516 /***** Misc Private Functions *****/
517 /**********************************************************************/
518
519
520 /**
521 * A replacement for XAllocColor. This function should never
522 * fail to allocate a color. When XAllocColor fails, we return
523 * the nearest matching color. If we have to allocate many colors
524 * this function isn't too efficient; the XQueryColors() could be
525 * done just once.
526 * Written by Michael Pichler, Brian Paul, Mark Kilgard
527 * Input: dpy - X display
528 * cmap - X colormap
529 * cmapSize - size of colormap
530 * In/Out: color - the XColor struct
531 * Output: exact - 1=exact color match, 0=closest match
532 * alloced - 1=XAlloc worked, 0=XAlloc failed
533 */
534 static void
535 noFaultXAllocColor( int client,
536 XMesaDisplay *dpy,
537 XMesaColormap cmap,
538 int cmapSize,
539 XMesaColor *color,
540 int *exact, int *alloced )
541 {
542 #ifdef XFree86Server
543 Pixel *ppixIn;
544 xrgb *ctable;
545 #else
546 /* we'll try to cache ctable for better remote display performance */
547 static Display *prevDisplay = NULL;
548 static XMesaColormap prevCmap = 0;
549 static int prevCmapSize = 0;
550 static XMesaColor *ctable = NULL;
551 #endif
552 XMesaColor subColor;
553 int i, bestmatch;
554 double mindist; /* 3*2^16^2 exceeds long int precision. */
555
556 (void) client;
557
558 /* First try just using XAllocColor. */
559 #ifdef XFree86Server
560 if (AllocColor(cmap,
561 &color->red, &color->green, &color->blue,
562 &color->pixel,
563 client) == Success)
564 #else
565 if (XAllocColor(dpy, cmap, color))
566 #endif
567 {
568 *exact = 1;
569 *alloced = 1;
570 return;
571 }
572
573 /* Alloc failed, search for closest match */
574
575 /* Retrieve color table entries. */
576 /* XXX alloca candidate. */
577 #ifdef XFree86Server
578 ppixIn = (Pixel *) MALLOC(cmapSize * sizeof(Pixel));
579 ctable = (xrgb *) MALLOC(cmapSize * sizeof(xrgb));
580 for (i = 0; i < cmapSize; i++) {
581 ppixIn[i] = i;
582 }
583 QueryColors(cmap, cmapSize, ppixIn, ctable);
584 #else
585 if (prevDisplay != dpy || prevCmap != cmap
586 || prevCmapSize != cmapSize || !ctable) {
587 /* free previously cached color table */
588 if (ctable)
589 _mesa_free(ctable);
590 /* Get the color table from X */
591 ctable = (XMesaColor *) MALLOC(cmapSize * sizeof(XMesaColor));
592 assert(ctable);
593 for (i = 0; i < cmapSize; i++) {
594 ctable[i].pixel = i;
595 }
596 XQueryColors(dpy, cmap, ctable, cmapSize);
597 prevDisplay = dpy;
598 prevCmap = cmap;
599 prevCmapSize = cmapSize;
600 }
601 #endif
602
603 /* Find best match. */
604 bestmatch = -1;
605 mindist = 0.0;
606 for (i = 0; i < cmapSize; i++) {
607 double dr = 0.30 * ((double) color->red - (double) ctable[i].red);
608 double dg = 0.59 * ((double) color->green - (double) ctable[i].green);
609 double db = 0.11 * ((double) color->blue - (double) ctable[i].blue);
610 double dist = dr * dr + dg * dg + db * db;
611 if (bestmatch < 0 || dist < mindist) {
612 bestmatch = i;
613 mindist = dist;
614 }
615 }
616
617 /* Return result. */
618 subColor.red = ctable[bestmatch].red;
619 subColor.green = ctable[bestmatch].green;
620 subColor.blue = ctable[bestmatch].blue;
621 /* Try to allocate the closest match color. This should only
622 * fail if the cell is read/write. Otherwise, we're incrementing
623 * the cell's reference count.
624 */
625 #ifdef XFree86Server
626 if (AllocColor(cmap,
627 &subColor.red, &subColor.green, &subColor.blue,
628 &subColor.pixel,
629 client) == Success) {
630 #else
631 if (XAllocColor(dpy, cmap, &subColor)) {
632 #endif
633 *alloced = 1;
634 }
635 else {
636 /* do this to work around a problem reported by Frank Ortega */
637 subColor.pixel = (unsigned long) bestmatch;
638 subColor.red = ctable[bestmatch].red;
639 subColor.green = ctable[bestmatch].green;
640 subColor.blue = ctable[bestmatch].blue;
641 subColor.flags = DoRed | DoGreen | DoBlue;
642 *alloced = 0;
643 }
644 #ifdef XFree86Server
645 _mesa_free(ppixIn);
646 _mesa_free(ctable);
647 #else
648 /* don't free table, save it for next time */
649 #endif
650
651 *color = subColor;
652 *exact = 0;
653 }
654
655
656
657 /**
658 * Do setup for PF_GRAYSCALE pixel format.
659 * Note that buffer may be NULL.
660 */
661 static GLboolean
662 setup_grayscale(int client, XMesaVisual v,
663 XMesaBuffer buffer, XMesaColormap cmap)
664 {
665 if (GET_VISUAL_DEPTH(v)<4 || GET_VISUAL_DEPTH(v)>16) {
666 return GL_FALSE;
667 }
668
669 if (buffer) {
670 XMesaBuffer prevBuffer;
671
672 if (!cmap) {
673 return GL_FALSE;
674 }
675
676 prevBuffer = xmesa_find_buffer(v->display, cmap, buffer);
677 if (prevBuffer &&
678 (buffer->xm_visual->mesa_visual.rgbMode ==
679 prevBuffer->xm_visual->mesa_visual.rgbMode)) {
680 /* Copy colormap stuff from previous XMesaBuffer which uses same
681 * X colormap. Do this to avoid time spent in noFaultXAllocColor.
682 */
683 copy_colortable_info(buffer, prevBuffer);
684 }
685 else {
686 /* Allocate 256 shades of gray */
687 int gray;
688 int colorsfailed = 0;
689 for (gray=0;gray<256;gray++) {
690 GLint r = gamma_adjust( v->RedGamma, gray, 255 );
691 GLint g = gamma_adjust( v->GreenGamma, gray, 255 );
692 GLint b = gamma_adjust( v->BlueGamma, gray, 255 );
693 int exact, alloced;
694 XMesaColor xcol;
695 xcol.red = (r << 8) | r;
696 xcol.green = (g << 8) | g;
697 xcol.blue = (b << 8) | b;
698 noFaultXAllocColor( client, v->display,
699 cmap, GET_COLORMAP_SIZE(v),
700 &xcol, &exact, &alloced );
701 if (!exact) {
702 colorsfailed++;
703 }
704 if (alloced) {
705 assert(buffer->num_alloced<256);
706 buffer->alloced_colors[buffer->num_alloced] = xcol.pixel;
707 buffer->num_alloced++;
708 }
709
710 /*OLD
711 assert(gray < 576);
712 buffer->color_table[gray*3+0] = xcol.pixel;
713 buffer->color_table[gray*3+1] = xcol.pixel;
714 buffer->color_table[gray*3+2] = xcol.pixel;
715 assert(xcol.pixel < 65536);
716 buffer->pixel_to_r[xcol.pixel] = gray * 30 / 100;
717 buffer->pixel_to_g[xcol.pixel] = gray * 59 / 100;
718 buffer->pixel_to_b[xcol.pixel] = gray * 11 / 100;
719 */
720 buffer->color_table[gray] = xcol.pixel;
721 assert(xcol.pixel < 65536);
722 buffer->pixel_to_r[xcol.pixel] = gray;
723 buffer->pixel_to_g[xcol.pixel] = gray;
724 buffer->pixel_to_b[xcol.pixel] = gray;
725 }
726
727 if (colorsfailed && _mesa_getenv("MESA_DEBUG")) {
728 _mesa_warning(NULL,
729 "Note: %d out of 256 needed colors do not match exactly.\n",
730 colorsfailed );
731 }
732 }
733 }
734
735 v->dithered_pf = PF_Grayscale;
736 v->undithered_pf = PF_Grayscale;
737 return GL_TRUE;
738 }
739
740
741
742 /**
743 * Setup RGB rendering for a window with a PseudoColor, StaticColor,
744 * or 8-bit TrueColor visual visual. We try to allocate a palette of 225
745 * colors (5 red, 9 green, 5 blue) and dither to approximate a 24-bit RGB
746 * color. While this function was originally designed just for 8-bit
747 * visuals, it has also proven to work from 4-bit up to 16-bit visuals.
748 * Dithering code contributed by Bob Mercier.
749 */
750 static GLboolean
751 setup_dithered_color(int client, XMesaVisual v,
752 XMesaBuffer buffer, XMesaColormap cmap)
753 {
754 if (GET_VISUAL_DEPTH(v)<4 || GET_VISUAL_DEPTH(v)>16) {
755 return GL_FALSE;
756 }
757
758 if (buffer) {
759 XMesaBuffer prevBuffer;
760
761 if (!cmap) {
762 return GL_FALSE;
763 }
764
765 prevBuffer = xmesa_find_buffer(v->display, cmap, buffer);
766 if (prevBuffer &&
767 (buffer->xm_visual->mesa_visual.rgbMode ==
768 prevBuffer->xm_visual->mesa_visual.rgbMode)) {
769 /* Copy colormap stuff from previous, matching XMesaBuffer.
770 * Do this to avoid time spent in noFaultXAllocColor.
771 */
772 copy_colortable_info(buffer, prevBuffer);
773 }
774 else {
775 /* Allocate X colors and initialize color_table[], red_table[], etc */
776 int r, g, b, i;
777 int colorsfailed = 0;
778 for (r = 0; r < DITH_R; r++) {
779 for (g = 0; g < DITH_G; g++) {
780 for (b = 0; b < DITH_B; b++) {
781 XMesaColor xcol;
782 int exact, alloced;
783 xcol.red =gamma_adjust(v->RedGamma, r*65535/(DITH_R-1),65535);
784 xcol.green=gamma_adjust(v->GreenGamma, g*65535/(DITH_G-1),65535);
785 xcol.blue =gamma_adjust(v->BlueGamma, b*65535/(DITH_B-1),65535);
786 noFaultXAllocColor( client, v->display,
787 cmap, GET_COLORMAP_SIZE(v),
788 &xcol, &exact, &alloced );
789 if (!exact) {
790 colorsfailed++;
791 }
792 if (alloced) {
793 assert(buffer->num_alloced<256);
794 buffer->alloced_colors[buffer->num_alloced] = xcol.pixel;
795 buffer->num_alloced++;
796 }
797 i = DITH_MIX( r, g, b );
798 assert(i < 576);
799 buffer->color_table[i] = xcol.pixel;
800 assert(xcol.pixel < 65536);
801 buffer->pixel_to_r[xcol.pixel] = r * 255 / (DITH_R-1);
802 buffer->pixel_to_g[xcol.pixel] = g * 255 / (DITH_G-1);
803 buffer->pixel_to_b[xcol.pixel] = b * 255 / (DITH_B-1);
804 }
805 }
806 }
807
808 if (colorsfailed && _mesa_getenv("MESA_DEBUG")) {
809 _mesa_warning(NULL,
810 "Note: %d out of %d needed colors do not match exactly.\n",
811 colorsfailed, DITH_R * DITH_G * DITH_B );
812 }
813 }
814 }
815
816 v->dithered_pf = PF_Dither;
817 v->undithered_pf = PF_Lookup;
818 return GL_TRUE;
819 }
820
821
822 /**
823 * Setup for Hewlett Packard Color Recovery 8-bit TrueColor mode.
824 * HPCR simulates 24-bit color fidelity with an 8-bit frame buffer.
825 * Special dithering tables have to be initialized.
826 */
827 static void
828 setup_8bit_hpcr(XMesaVisual v)
829 {
830 /* HP Color Recovery contributed by: Alex De Bruyn (ad@lms.be)
831 * To work properly, the atom _HP_RGB_SMOOTH_MAP_LIST must be defined
832 * on the root window AND the colormap obtainable by XGetRGBColormaps
833 * for that atom must be set on the window. (see also tkInitWindow)
834 * If that colormap is not set, the output will look stripy.
835 */
836
837 /* Setup color tables with gamma correction */
838 int i;
839 double g;
840
841 g = 1.0 / v->RedGamma;
842 for (i=0; i<256; i++) {
843 GLint red = IROUND_POS(255.0 * _mesa_pow( hpcr_rgbTbl[0][i]/255.0, g ));
844 v->hpcr_rgbTbl[0][i] = CLAMP( red, 16, 239 );
845 }
846
847 g = 1.0 / v->GreenGamma;
848 for (i=0; i<256; i++) {
849 GLint green = IROUND_POS(255.0 * _mesa_pow( hpcr_rgbTbl[1][i]/255.0, g ));
850 v->hpcr_rgbTbl[1][i] = CLAMP( green, 16, 239 );
851 }
852
853 g = 1.0 / v->BlueGamma;
854 for (i=0; i<256; i++) {
855 GLint blue = IROUND_POS(255.0 * _mesa_pow( hpcr_rgbTbl[2][i]/255.0, g ));
856 v->hpcr_rgbTbl[2][i] = CLAMP( blue, 32, 223 );
857 }
858 v->undithered_pf = PF_HPCR; /* can't really disable dithering for now */
859 v->dithered_pf = PF_HPCR;
860
861 /* which method should I use to clear */
862 /* GL_FALSE: keep the ordinary method */
863 /* GL_TRUE : clear with dither pattern */
864 v->hpcr_clear_flag = _mesa_getenv("MESA_HPCR_CLEAR") ? GL_TRUE : GL_FALSE;
865
866 if (v->hpcr_clear_flag) {
867 v->hpcr_clear_pixmap = XMesaCreatePixmap(v->display,
868 DefaultRootWindow(v->display),
869 16, 2, 8);
870 #ifndef XFree86Server
871 v->hpcr_clear_ximage = XGetImage(v->display, v->hpcr_clear_pixmap,
872 0, 0, 16, 2, AllPlanes, ZPixmap);
873 #endif
874 }
875 }
876
877
878 /**
879 * Setup RGB rendering for a window with a True/DirectColor visual.
880 */
881 static void
882 setup_truecolor(XMesaVisual v, XMesaBuffer buffer, XMesaColormap cmap)
883 {
884 unsigned long rmask, gmask, bmask;
885 (void) buffer;
886 (void) cmap;
887
888 /* Compute red multiplier (mask) and bit shift */
889 v->rshift = 0;
890 rmask = GET_REDMASK(v);
891 while ((rmask & 1)==0) {
892 v->rshift++;
893 rmask = rmask >> 1;
894 }
895
896 /* Compute green multiplier (mask) and bit shift */
897 v->gshift = 0;
898 gmask = GET_GREENMASK(v);
899 while ((gmask & 1)==0) {
900 v->gshift++;
901 gmask = gmask >> 1;
902 }
903
904 /* Compute blue multiplier (mask) and bit shift */
905 v->bshift = 0;
906 bmask = GET_BLUEMASK(v);
907 while ((bmask & 1)==0) {
908 v->bshift++;
909 bmask = bmask >> 1;
910 }
911
912 /*
913 * Compute component-to-pixel lookup tables and dithering kernel
914 */
915 {
916 static GLubyte kernel[16] = {
917 0*16, 8*16, 2*16, 10*16,
918 12*16, 4*16, 14*16, 6*16,
919 3*16, 11*16, 1*16, 9*16,
920 15*16, 7*16, 13*16, 5*16,
921 };
922 GLint rBits = _mesa_bitcount(rmask);
923 GLint gBits = _mesa_bitcount(gmask);
924 GLint bBits = _mesa_bitcount(bmask);
925 GLint maxBits;
926 GLuint i;
927
928 /* convert pixel components in [0,_mask] to RGB values in [0,255] */
929 for (i=0; i<=rmask; i++)
930 v->PixelToR[i] = (unsigned char) ((i * 255) / rmask);
931 for (i=0; i<=gmask; i++)
932 v->PixelToG[i] = (unsigned char) ((i * 255) / gmask);
933 for (i=0; i<=bmask; i++)
934 v->PixelToB[i] = (unsigned char) ((i * 255) / bmask);
935
936 /* convert RGB values from [0,255] to pixel components */
937
938 for (i=0;i<256;i++) {
939 GLint r = gamma_adjust(v->RedGamma, i, 255);
940 GLint g = gamma_adjust(v->GreenGamma, i, 255);
941 GLint b = gamma_adjust(v->BlueGamma, i, 255);
942 v->RtoPixel[i] = (r >> (8-rBits)) << v->rshift;
943 v->GtoPixel[i] = (g >> (8-gBits)) << v->gshift;
944 v->BtoPixel[i] = (b >> (8-bBits)) << v->bshift;
945 }
946 /* overflow protection */
947 for (i=256;i<512;i++) {
948 v->RtoPixel[i] = v->RtoPixel[255];
949 v->GtoPixel[i] = v->GtoPixel[255];
950 v->BtoPixel[i] = v->BtoPixel[255];
951 }
952
953 /* setup dithering kernel */
954 maxBits = rBits;
955 if (gBits > maxBits) maxBits = gBits;
956 if (bBits > maxBits) maxBits = bBits;
957 for (i=0;i<16;i++) {
958 v->Kernel[i] = kernel[i] >> maxBits;
959 }
960
961 v->undithered_pf = PF_Truecolor;
962 v->dithered_pf = (GET_VISUAL_DEPTH(v)<24) ? PF_Dither_True : PF_Truecolor;
963 }
964
965 /*
966 * Now check for TrueColor visuals which we can optimize.
967 */
968 if ( GET_REDMASK(v) ==0x0000ff
969 && GET_GREENMASK(v)==0x00ff00
970 && GET_BLUEMASK(v) ==0xff0000
971 && CHECK_BYTE_ORDER(v)
972 && v->BitsPerPixel==32
973 && v->RedGamma==1.0 && v->GreenGamma==1.0 && v->BlueGamma==1.0) {
974 /* common 32 bpp config used on SGI, Sun */
975 v->undithered_pf = v->dithered_pf = PF_8A8B8G8R; /* ABGR */
976 }
977 else if (GET_REDMASK(v) == 0xff0000
978 && GET_GREENMASK(v)== 0x00ff00
979 && GET_BLUEMASK(v) == 0x0000ff
980 && CHECK_BYTE_ORDER(v)
981 && v->RedGamma == 1.0 && v->GreenGamma == 1.0 && v->BlueGamma == 1.0){
982 if (v->BitsPerPixel==32) {
983 /* if 32 bpp, and visual indicates 8 bpp alpha channel */
984 if (GET_VISUAL_DEPTH(v) == 32 && v->mesa_visual.alphaBits == 8)
985 v->undithered_pf = v->dithered_pf = PF_8A8R8G8B; /* ARGB */
986 else
987 v->undithered_pf = v->dithered_pf = PF_8R8G8B; /* xRGB */
988 }
989 else if (v->BitsPerPixel == 24) {
990 v->undithered_pf = v->dithered_pf = PF_8R8G8B24; /* RGB */
991 }
992 }
993 else if (GET_REDMASK(v) ==0xf800
994 && GET_GREENMASK(v)==0x07e0
995 && GET_BLUEMASK(v) ==0x001f
996 && CHECK_BYTE_ORDER(v)
997 && v->BitsPerPixel==16
998 && v->RedGamma==1.0 && v->GreenGamma==1.0 && v->BlueGamma==1.0) {
999 /* 5-6-5 RGB */
1000 v->undithered_pf = PF_5R6G5B;
1001 v->dithered_pf = PF_Dither_5R6G5B;
1002 }
1003 else if (GET_REDMASK(v) ==0xe0
1004 && GET_GREENMASK(v)==0x1c
1005 && GET_BLUEMASK(v) ==0x03
1006 && CHECK_FOR_HPCR(v)) {
1007 /* 8-bit HP color recovery */
1008 setup_8bit_hpcr( v );
1009 }
1010 }
1011
1012
1013
1014 /**
1015 * Setup RGB rendering for a window with a monochrome visual.
1016 */
1017 static void
1018 setup_monochrome( XMesaVisual v, XMesaBuffer b )
1019 {
1020 (void) b;
1021 v->dithered_pf = v->undithered_pf = PF_1Bit;
1022 /* if black=1 then we must flip pixel values */
1023 v->bitFlip = (GET_BLACK_PIXEL(v) != 0);
1024 }
1025
1026
1027
1028 /**
1029 * When a context is bound for the first time, we can finally finish
1030 * initializing the context's visual and buffer information.
1031 * \param v the XMesaVisual to initialize
1032 * \param b the XMesaBuffer to initialize (may be NULL)
1033 * \param rgb_flag TRUE = RGBA mode, FALSE = color index mode
1034 * \param window the window/pixmap we're rendering into
1035 * \param cmap the colormap associated with the window/pixmap
1036 * \return GL_TRUE=success, GL_FALSE=failure
1037 */
1038 static GLboolean
1039 initialize_visual_and_buffer(XMesaVisual v, XMesaBuffer b,
1040 GLboolean rgb_flag, XMesaDrawable window,
1041 XMesaColormap cmap)
1042 {
1043 int client = 0;
1044
1045 #ifdef XFree86Server
1046 client = (window) ? CLIENT_ID(window->id) : 0;
1047 #endif
1048
1049 ASSERT(!b || b->xm_visual == v);
1050
1051 /* Save true bits/pixel */
1052 v->BitsPerPixel = bits_per_pixel(v);
1053 assert(v->BitsPerPixel > 0);
1054
1055 if (rgb_flag == GL_FALSE) {
1056 /* COLOR-INDEXED WINDOW:
1057 * Even if the visual is TrueColor or DirectColor we treat it as
1058 * being color indexed. This is weird but might be useful to someone.
1059 */
1060 v->dithered_pf = v->undithered_pf = PF_Index;
1061 v->mesa_visual.indexBits = GET_VISUAL_DEPTH(v);
1062 }
1063 else {
1064 /* RGB WINDOW:
1065 * We support RGB rendering into almost any kind of visual.
1066 */
1067 const int xclass = v->mesa_visual.visualType;
1068 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
1069 setup_truecolor( v, b, cmap );
1070 }
1071 else if (xclass == GLX_STATIC_GRAY && GET_VISUAL_DEPTH(v) == 1) {
1072 setup_monochrome( v, b );
1073 }
1074 else if (xclass == GLX_GRAY_SCALE || xclass == GLX_STATIC_GRAY) {
1075 if (!setup_grayscale( client, v, b, cmap )) {
1076 return GL_FALSE;
1077 }
1078 }
1079 else if ((xclass == GLX_PSEUDO_COLOR || xclass == GLX_STATIC_COLOR)
1080 && GET_VISUAL_DEPTH(v)>=4 && GET_VISUAL_DEPTH(v)<=16) {
1081 if (!setup_dithered_color( client, v, b, cmap )) {
1082 return GL_FALSE;
1083 }
1084 }
1085 else {
1086 _mesa_warning(NULL, "XMesa: RGB mode rendering not supported in given visual.\n");
1087 return GL_FALSE;
1088 }
1089 v->mesa_visual.indexBits = 0;
1090
1091 if (_mesa_getenv("MESA_NO_DITHER")) {
1092 v->dithered_pf = v->undithered_pf;
1093 }
1094 }
1095
1096
1097 /*
1098 * If MESA_INFO env var is set print out some debugging info
1099 * which can help Brian figure out what's going on when a user
1100 * reports bugs.
1101 */
1102 if (_mesa_getenv("MESA_INFO")) {
1103 _mesa_printf("X/Mesa visual = %p\n", (void *) v);
1104 _mesa_printf("X/Mesa dithered pf = %u\n", v->dithered_pf);
1105 _mesa_printf("X/Mesa undithered pf = %u\n", v->undithered_pf);
1106 _mesa_printf("X/Mesa level = %d\n", v->mesa_visual.level);
1107 _mesa_printf("X/Mesa depth = %d\n", GET_VISUAL_DEPTH(v));
1108 _mesa_printf("X/Mesa bits per pixel = %d\n", v->BitsPerPixel);
1109 }
1110
1111 if (b && window) {
1112 char *data;
1113
1114 /* Do window-specific initializations */
1115
1116 /* these should have been set in create_xmesa_buffer */
1117 ASSERT(b->frontxrb->drawable == window);
1118 ASSERT(b->frontxrb->pixmap == (XMesaPixmap) window);
1119
1120 /* Setup for single/double buffering */
1121 if (v->mesa_visual.doubleBufferMode) {
1122 /* Double buffered */
1123 b->shm = check_for_xshm( v->display );
1124 }
1125
1126 /* X11 graphics contexts */
1127 #ifdef XFree86Server
1128 b->gc = CreateScratchGC(v->display, window->depth);
1129 #else
1130 b->gc = XCreateGC( v->display, window, 0, NULL );
1131 #endif
1132 XMesaSetFunction( v->display, b->gc, GXcopy );
1133
1134 /* cleargc - for glClear() */
1135 #ifdef XFree86Server
1136 b->cleargc = CreateScratchGC(v->display, window->depth);
1137 #else
1138 b->cleargc = XCreateGC( v->display, window, 0, NULL );
1139 #endif
1140 XMesaSetFunction( v->display, b->cleargc, GXcopy );
1141
1142 /*
1143 * Don't generate Graphics Expose/NoExpose events in swapbuffers().
1144 * Patch contributed by Michael Pichler May 15, 1995.
1145 */
1146 #ifdef XFree86Server
1147 b->swapgc = CreateScratchGC(v->display, window->depth);
1148 {
1149 CARD32 v[1];
1150 v[0] = FALSE;
1151 dixChangeGC(NullClient, b->swapgc, GCGraphicsExposures, v, NULL);
1152 }
1153 #else
1154 {
1155 XGCValues gcvalues;
1156 gcvalues.graphics_exposures = False;
1157 b->swapgc = XCreateGC(v->display, window,
1158 GCGraphicsExposures, &gcvalues);
1159 }
1160 #endif
1161 XMesaSetFunction( v->display, b->swapgc, GXcopy );
1162 /*
1163 * Set fill style and tile pixmap once for all for HPCR stuff
1164 * (instead of doing it each time in clear_color_HPCR_pixmap())
1165 * Initialize whole stuff
1166 * Patch contributed by Jacques Leroy March 8, 1998.
1167 */
1168 if (v->hpcr_clear_flag && b->backxrb && b->backxrb->pixmap) {
1169 int i;
1170 for (i = 0; i < 16; i++) {
1171 XMesaPutPixel(v->hpcr_clear_ximage, i, 0, 0);
1172 XMesaPutPixel(v->hpcr_clear_ximage, i, 1, 0);
1173 }
1174 XMesaPutImage(b->display, (XMesaDrawable) v->hpcr_clear_pixmap,
1175 b->cleargc, v->hpcr_clear_ximage, 0, 0, 0, 0, 16, 2);
1176 XMesaSetFillStyle( v->display, b->cleargc, FillTiled);
1177 XMesaSetTile( v->display, b->cleargc, v->hpcr_clear_pixmap );
1178 }
1179
1180 /* Initialize the row buffer XImage for use in write_color_span() */
1181 data = (char*) MALLOC(MAX_WIDTH*4);
1182 #ifdef XFree86Server
1183 b->rowimage = XMesaCreateImage(GET_VISUAL_DEPTH(v), MAX_WIDTH, 1, data);
1184 #else
1185 b->rowimage = XCreateImage( v->display,
1186 v->visinfo->visual,
1187 v->visinfo->depth,
1188 ZPixmap, 0, /*format, offset*/
1189 data, /*data*/
1190 MAX_WIDTH, 1, /*width, height*/
1191 32, /*bitmap_pad*/
1192 0 /*bytes_per_line*/ );
1193 #endif
1194 if (!b->rowimage)
1195 return GL_FALSE;
1196 }
1197
1198 return GL_TRUE;
1199 }
1200
1201
1202
1203 /*
1204 * Convert an RGBA color to a pixel value.
1205 */
1206 unsigned long
1207 xmesa_color_to_pixel(GLcontext *ctx,
1208 GLubyte r, GLubyte g, GLubyte b, GLubyte a,
1209 GLuint pixelFormat)
1210 {
1211 XMesaContext xmesa = XMESA_CONTEXT(ctx);
1212 switch (pixelFormat) {
1213 case PF_Index:
1214 return 0;
1215 case PF_Truecolor:
1216 {
1217 unsigned long p;
1218 PACK_TRUECOLOR( p, r, g, b );
1219 return p;
1220 }
1221 case PF_8A8B8G8R:
1222 return PACK_8A8B8G8R( r, g, b, a );
1223 case PF_8A8R8G8B:
1224 return PACK_8A8R8G8B( r, g, b, a );
1225 case PF_8R8G8B:
1226 /* fall through */
1227 case PF_8R8G8B24:
1228 return PACK_8R8G8B( r, g, b );
1229 case PF_5R6G5B:
1230 return PACK_5R6G5B( r, g, b );
1231 case PF_Dither:
1232 {
1233 DITHER_SETUP;
1234 return DITHER( 1, 0, r, g, b );
1235 }
1236 case PF_1Bit:
1237 /* 382 = (3*255)/2 */
1238 return ((r+g+b) > 382) ^ xmesa->xm_visual->bitFlip;
1239 case PF_HPCR:
1240 return DITHER_HPCR(1, 1, r, g, b);
1241 case PF_Lookup:
1242 {
1243 LOOKUP_SETUP;
1244 return LOOKUP( r, g, b );
1245 }
1246 case PF_Grayscale:
1247 return GRAY_RGB( r, g, b );
1248 case PF_Dither_True:
1249 /* fall through */
1250 case PF_Dither_5R6G5B:
1251 {
1252 unsigned long p;
1253 PACK_TRUEDITHER(p, 1, 0, r, g, b);
1254 return p;
1255 }
1256 default:
1257 _mesa_problem(ctx, "Bad pixel format in xmesa_color_to_pixel");
1258 }
1259 return 0;
1260 }
1261
1262
1263 #define NUM_VISUAL_TYPES 6
1264
1265 /**
1266 * Convert an X visual type to a GLX visual type.
1267 *
1268 * \param visualType X visual type (i.e., \c TrueColor, \c StaticGray, etc.)
1269 * to be converted.
1270 * \return If \c visualType is a valid X visual type, a GLX visual type will
1271 * be returned. Otherwise \c GLX_NONE will be returned.
1272 *
1273 * \note
1274 * This code was lifted directly from lib/GL/glx/glcontextmodes.c in the
1275 * DRI CVS tree.
1276 */
1277 static GLint
1278 xmesa_convert_from_x_visual_type( int visualType )
1279 {
1280 static const int glx_visual_types[ NUM_VISUAL_TYPES ] = {
1281 GLX_STATIC_GRAY, GLX_GRAY_SCALE,
1282 GLX_STATIC_COLOR, GLX_PSEUDO_COLOR,
1283 GLX_TRUE_COLOR, GLX_DIRECT_COLOR
1284 };
1285
1286 return ( (unsigned) visualType < NUM_VISUAL_TYPES )
1287 ? glx_visual_types[ visualType ] : GLX_NONE;
1288 }
1289
1290
1291 /**********************************************************************/
1292 /***** Public Functions *****/
1293 /**********************************************************************/
1294
1295
1296 /*
1297 * Create a new X/Mesa visual.
1298 * Input: display - X11 display
1299 * visinfo - an XVisualInfo pointer
1300 * rgb_flag - GL_TRUE = RGB mode,
1301 * GL_FALSE = color index mode
1302 * alpha_flag - alpha buffer requested?
1303 * db_flag - GL_TRUE = double-buffered,
1304 * GL_FALSE = single buffered
1305 * stereo_flag - stereo visual?
1306 * ximage_flag - GL_TRUE = use an XImage for back buffer,
1307 * GL_FALSE = use an off-screen pixmap for back buffer
1308 * depth_size - requested bits/depth values, or zero
1309 * stencil_size - requested bits/stencil values, or zero
1310 * accum_red_size - requested bits/red accum values, or zero
1311 * accum_green_size - requested bits/green accum values, or zero
1312 * accum_blue_size - requested bits/blue accum values, or zero
1313 * accum_alpha_size - requested bits/alpha accum values, or zero
1314 * num_samples - number of samples/pixel if multisampling, or zero
1315 * level - visual level, usually 0
1316 * visualCaveat - ala the GLX extension, usually GLX_NONE
1317 * Return; a new XMesaVisual or 0 if error.
1318 */
1319 PUBLIC
1320 XMesaVisual XMesaCreateVisual( XMesaDisplay *display,
1321 XMesaVisualInfo visinfo,
1322 GLboolean rgb_flag,
1323 GLboolean alpha_flag,
1324 GLboolean db_flag,
1325 GLboolean stereo_flag,
1326 GLboolean ximage_flag,
1327 GLint depth_size,
1328 GLint stencil_size,
1329 GLint accum_red_size,
1330 GLint accum_green_size,
1331 GLint accum_blue_size,
1332 GLint accum_alpha_size,
1333 GLint num_samples,
1334 GLint level,
1335 GLint visualCaveat )
1336 {
1337 char *gamma;
1338 XMesaVisual v;
1339 GLint red_bits, green_bits, blue_bits, alpha_bits;
1340
1341 #ifndef XFree86Server
1342 /* For debugging only */
1343 if (_mesa_getenv("MESA_XSYNC")) {
1344 /* This makes debugging X easier.
1345 * In your debugger, set a breakpoint on _XError to stop when an
1346 * X protocol error is generated.
1347 */
1348 XSynchronize( display, 1 );
1349 }
1350 #endif
1351
1352 v = (XMesaVisual) CALLOC_STRUCT(xmesa_visual);
1353 if (!v) {
1354 return NULL;
1355 }
1356
1357 v->display = display;
1358
1359 /* Save a copy of the XVisualInfo struct because the user may X_mesa_free()
1360 * the struct but we may need some of the information contained in it
1361 * at a later time.
1362 */
1363 #ifndef XFree86Server
1364 v->visinfo = (XVisualInfo *) MALLOC(sizeof(*visinfo));
1365 if(!v->visinfo) {
1366 _mesa_free(v);
1367 return NULL;
1368 }
1369 MEMCPY(v->visinfo, visinfo, sizeof(*visinfo));
1370 #endif
1371
1372 /* check for MESA_GAMMA environment variable */
1373 gamma = _mesa_getenv("MESA_GAMMA");
1374 if (gamma) {
1375 v->RedGamma = v->GreenGamma = v->BlueGamma = 0.0;
1376 sscanf( gamma, "%f %f %f", &v->RedGamma, &v->GreenGamma, &v->BlueGamma );
1377 if (v->RedGamma<=0.0) v->RedGamma = 1.0;
1378 if (v->GreenGamma<=0.0) v->GreenGamma = v->RedGamma;
1379 if (v->BlueGamma<=0.0) v->BlueGamma = v->RedGamma;
1380 }
1381 else {
1382 v->RedGamma = v->GreenGamma = v->BlueGamma = 1.0;
1383 }
1384
1385 v->ximage_flag = ximage_flag;
1386
1387 #ifdef XFree86Server
1388 /* We could calculate these values by ourselves. nplanes is either the sum
1389 * of the red, green, and blue bits or the number index bits.
1390 * ColormapEntries is either (1U << index_bits) or
1391 * (1U << max(redBits, greenBits, blueBits)).
1392 */
1393 assert(visinfo->nplanes > 0);
1394 v->nplanes = visinfo->nplanes;
1395 v->ColormapEntries = visinfo->ColormapEntries;
1396
1397 v->mesa_visual.redMask = visinfo->redMask;
1398 v->mesa_visual.greenMask = visinfo->greenMask;
1399 v->mesa_visual.blueMask = visinfo->blueMask;
1400 v->mesa_visual.visualID = visinfo->vid;
1401 v->mesa_visual.screen = 0; /* FIXME: What should be done here? */
1402 #else
1403 v->mesa_visual.redMask = visinfo->red_mask;
1404 v->mesa_visual.greenMask = visinfo->green_mask;
1405 v->mesa_visual.blueMask = visinfo->blue_mask;
1406 v->mesa_visual.visualID = visinfo->visualid;
1407 v->mesa_visual.screen = visinfo->screen;
1408 #endif
1409
1410 #if defined(XFree86Server) || !(defined(__cplusplus) || defined(c_plusplus))
1411 v->mesa_visual.visualType = xmesa_convert_from_x_visual_type(visinfo->class);
1412 #else
1413 v->mesa_visual.visualType = xmesa_convert_from_x_visual_type(visinfo->c_class);
1414 #endif
1415
1416 v->mesa_visual.visualRating = visualCaveat;
1417
1418 if (alpha_flag)
1419 v->mesa_visual.alphaBits = 8;
1420
1421 (void) initialize_visual_and_buffer( v, NULL, rgb_flag, 0, 0 );
1422
1423 {
1424 const int xclass = v->mesa_visual.visualType;
1425 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
1426 red_bits = _mesa_bitcount(GET_REDMASK(v));
1427 green_bits = _mesa_bitcount(GET_GREENMASK(v));
1428 blue_bits = _mesa_bitcount(GET_BLUEMASK(v));
1429 }
1430 else {
1431 /* this is an approximation */
1432 int depth;
1433 depth = GET_VISUAL_DEPTH(v);
1434 red_bits = depth / 3;
1435 depth -= red_bits;
1436 green_bits = depth / 2;
1437 depth -= green_bits;
1438 blue_bits = depth;
1439 alpha_bits = 0;
1440 assert( red_bits + green_bits + blue_bits == GET_VISUAL_DEPTH(v) );
1441 }
1442 alpha_bits = v->mesa_visual.alphaBits;
1443 }
1444
1445 _mesa_initialize_visual( &v->mesa_visual,
1446 rgb_flag, db_flag, stereo_flag,
1447 red_bits, green_bits,
1448 blue_bits, alpha_bits,
1449 v->mesa_visual.indexBits,
1450 depth_size,
1451 stencil_size,
1452 accum_red_size, accum_green_size,
1453 accum_blue_size, accum_alpha_size,
1454 0 );
1455
1456 /* XXX minor hack */
1457 v->mesa_visual.level = level;
1458 return v;
1459 }
1460
1461
1462 PUBLIC
1463 void XMesaDestroyVisual( XMesaVisual v )
1464 {
1465 #ifndef XFree86Server
1466 _mesa_free(v->visinfo);
1467 #endif
1468 _mesa_free(v);
1469 }
1470
1471
1472
1473 /**
1474 * Create a new XMesaContext.
1475 * \param v the XMesaVisual
1476 * \param share_list another XMesaContext with which to share display
1477 * lists or NULL if no sharing is wanted.
1478 * \return an XMesaContext or NULL if error.
1479 */
1480 PUBLIC
1481 XMesaContext XMesaCreateContext( XMesaVisual v, XMesaContext share_list )
1482 {
1483 static GLboolean firstTime = GL_TRUE;
1484 XMesaContext c;
1485 GLcontext *mesaCtx;
1486 struct dd_function_table functions;
1487 TNLcontext *tnl;
1488
1489 if (firstTime) {
1490 _glthread_INIT_MUTEX(_xmesa_lock);
1491 firstTime = GL_FALSE;
1492 }
1493
1494 /* Note: the XMesaContext contains a Mesa GLcontext struct (inheritance) */
1495 c = (XMesaContext) CALLOC_STRUCT(xmesa_context);
1496 if (!c)
1497 return NULL;
1498
1499 mesaCtx = &(c->mesa);
1500
1501 /* initialize with default driver functions, then plug in XMesa funcs */
1502 _mesa_init_driver_functions(&functions);
1503 xmesa_init_driver_functions(v, &functions);
1504 if (!_mesa_initialize_context(mesaCtx, &v->mesa_visual,
1505 share_list ? &(share_list->mesa) : (GLcontext *) NULL,
1506 &functions, (void *) c)) {
1507 _mesa_free(c);
1508 return NULL;
1509 }
1510
1511 _mesa_enable_sw_extensions(mesaCtx);
1512 _mesa_enable_1_3_extensions(mesaCtx);
1513 _mesa_enable_1_4_extensions(mesaCtx);
1514 _mesa_enable_1_5_extensions(mesaCtx);
1515 _mesa_enable_2_0_extensions(mesaCtx);
1516 #if ENABLE_EXT_texure_compression_s3tc
1517 if (c->Mesa_DXTn) {
1518 _mesa_enable_extension(mesaCtx, "GL_EXT_texture_compression_s3tc");
1519 _mesa_enable_extension(mesaCtx, "GL_S3_s3tc");
1520 }
1521 _mesa_enable_extension(mesaCtx, "GL_3DFX_texture_compression_FXT1");
1522 #endif
1523 #if ENABLE_EXT_timer_query
1524 _mesa_enable_extension(mesaCtx, "GL_EXT_timer_query");
1525 #endif
1526
1527 #ifdef XFree86Server
1528 /* If we're running in the X server, do bounds checking to prevent
1529 * segfaults and server crashes!
1530 */
1531 mesaCtx->Const.CheckArrayBounds = GL_TRUE;
1532 #endif
1533
1534 /* finish up xmesa context initializations */
1535 c->swapbytes = CHECK_BYTE_ORDER(v) ? GL_FALSE : GL_TRUE;
1536 c->xm_visual = v;
1537 c->xm_buffer = NULL; /* set later by XMesaMakeCurrent */
1538 c->display = v->display;
1539 c->pixelformat = v->dithered_pf; /* Dithering is enabled by default */
1540
1541 /* Initialize the software rasterizer and helper modules.
1542 */
1543 if (!_swrast_CreateContext( mesaCtx ) ||
1544 !_vbo_CreateContext( mesaCtx ) ||
1545 !_tnl_CreateContext( mesaCtx ) ||
1546 !_swsetup_CreateContext( mesaCtx )) {
1547 _mesa_free_context_data(&c->mesa);
1548 _mesa_free(c);
1549 return NULL;
1550 }
1551
1552 /* tnl setup */
1553 tnl = TNL_CONTEXT(mesaCtx);
1554 tnl->Driver.RunPipeline = _tnl_run_pipeline;
1555 /* swrast setup */
1556 xmesa_register_swrast_functions( mesaCtx );
1557 _swsetup_Wakeup(mesaCtx);
1558
1559 return c;
1560 }
1561
1562
1563
1564 PUBLIC
1565 void XMesaDestroyContext( XMesaContext c )
1566 {
1567 GLcontext *mesaCtx = &c->mesa;
1568
1569 #ifdef FX
1570 FXdestroyContext( XMESA_BUFFER(mesaCtx->DrawBuffer) );
1571 #endif
1572
1573 _swsetup_DestroyContext( mesaCtx );
1574 _swrast_DestroyContext( mesaCtx );
1575 _tnl_DestroyContext( mesaCtx );
1576 _vbo_DestroyContext( mesaCtx );
1577 _mesa_free_context_data( mesaCtx );
1578 _mesa_free( c );
1579 }
1580
1581
1582
1583 /**
1584 * Private function for creating an XMesaBuffer which corresponds to an
1585 * X window or pixmap.
1586 * \param v the window's XMesaVisual
1587 * \param w the window we're wrapping
1588 * \return new XMesaBuffer or NULL if error
1589 */
1590 PUBLIC XMesaBuffer
1591 XMesaCreateWindowBuffer(XMesaVisual v, XMesaWindow w)
1592 {
1593 #ifndef XFree86Server
1594 XWindowAttributes attr;
1595 #endif
1596 XMesaBuffer b;
1597 XMesaColormap cmap;
1598 int depth;
1599
1600 assert(v);
1601 assert(w);
1602
1603 /* Check that window depth matches visual depth */
1604 #ifdef XFree86Server
1605 depth = ((XMesaDrawable)w)->depth;
1606 #else
1607 XGetWindowAttributes( v->display, w, &attr );
1608 depth = attr.depth;
1609 #endif
1610 if (GET_VISUAL_DEPTH(v) != depth) {
1611 _mesa_warning(NULL, "XMesaCreateWindowBuffer: depth mismatch between visual (%d) and window (%d)!\n",
1612 GET_VISUAL_DEPTH(v), depth);
1613 return NULL;
1614 }
1615
1616 /* Find colormap */
1617 #ifdef XFree86Server
1618 cmap = (ColormapPtr)LookupIDByType(wColormap(w), RT_COLORMAP);
1619 #else
1620 if (attr.colormap) {
1621 cmap = attr.colormap;
1622 }
1623 else {
1624 _mesa_warning(NULL, "Window %u has no colormap!\n", (unsigned int) w);
1625 /* this is weird, a window w/out a colormap!? */
1626 /* OK, let's just allocate a new one and hope for the best */
1627 cmap = XCreateColormap(v->display, w, attr.visual, AllocNone);
1628 }
1629 #endif
1630
1631 b = create_xmesa_buffer((XMesaDrawable) w, WINDOW, v, cmap);
1632 if (!b)
1633 return NULL;
1634
1635 if (!initialize_visual_and_buffer( v, b, v->mesa_visual.rgbMode,
1636 (XMesaDrawable) w, cmap )) {
1637 xmesa_free_buffer(b);
1638 return NULL;
1639 }
1640
1641 return b;
1642 }
1643
1644
1645
1646 /**
1647 * Create a new XMesaBuffer from an X pixmap.
1648 *
1649 * \param v the XMesaVisual
1650 * \param p the pixmap
1651 * \param cmap the colormap, may be 0 if using a \c GLX_TRUE_COLOR or
1652 * \c GLX_DIRECT_COLOR visual for the pixmap
1653 * \returns new XMesaBuffer or NULL if error
1654 */
1655 PUBLIC XMesaBuffer
1656 XMesaCreatePixmapBuffer(XMesaVisual v, XMesaPixmap p, XMesaColormap cmap)
1657 {
1658 XMesaBuffer b;
1659
1660 assert(v);
1661
1662 b = create_xmesa_buffer((XMesaDrawable) p, PIXMAP, v, cmap);
1663 if (!b)
1664 return NULL;
1665
1666 if (!initialize_visual_and_buffer(v, b, v->mesa_visual.rgbMode,
1667 (XMesaDrawable) p, cmap)) {
1668 xmesa_free_buffer(b);
1669 return NULL;
1670 }
1671
1672 return b;
1673 }
1674
1675
1676
1677 XMesaBuffer
1678 XMesaCreatePBuffer(XMesaVisual v, XMesaColormap cmap,
1679 unsigned int width, unsigned int height)
1680 {
1681 #ifndef XFree86Server
1682 XMesaWindow root;
1683 XMesaDrawable drawable; /* X Pixmap Drawable */
1684 XMesaBuffer b;
1685
1686 /* allocate pixmap for front buffer */
1687 root = RootWindow( v->display, v->visinfo->screen );
1688 drawable = XCreatePixmap(v->display, root, width, height,
1689 v->visinfo->depth);
1690 if (!drawable)
1691 return NULL;
1692
1693 b = create_xmesa_buffer(drawable, PBUFFER, v, cmap);
1694 if (!b)
1695 return NULL;
1696
1697 if (!initialize_visual_and_buffer(v, b, v->mesa_visual.rgbMode,
1698 drawable, cmap)) {
1699 xmesa_free_buffer(b);
1700 return NULL;
1701 }
1702
1703 return b;
1704 #else
1705 return 0;
1706 #endif
1707 }
1708
1709
1710
1711 /*
1712 * Deallocate an XMesaBuffer structure and all related info.
1713 */
1714 PUBLIC void
1715 XMesaDestroyBuffer(XMesaBuffer b)
1716 {
1717 xmesa_free_buffer(b);
1718 }
1719
1720
1721 /**
1722 * Query the current window size and update the corresponding GLframebuffer
1723 * and all attached renderbuffers.
1724 * Called when:
1725 * 1. the first time a buffer is bound to a context.
1726 * 2. from glViewport to poll for window size changes
1727 * 3. from the XMesaResizeBuffers() API function.
1728 * Note: it's possible (and legal) for xmctx to be NULL. That can happen
1729 * when resizing a buffer when no rendering context is bound.
1730 */
1731 void
1732 xmesa_check_and_update_buffer_size(XMesaContext xmctx, XMesaBuffer drawBuffer)
1733 {
1734 GLuint width, height;
1735 xmesa_get_window_size(drawBuffer->display, drawBuffer, &width, &height);
1736 if (drawBuffer->mesa_buffer.Width != width ||
1737 drawBuffer->mesa_buffer.Height != height) {
1738 GLcontext *ctx = xmctx ? &xmctx->mesa : NULL;
1739 _mesa_resize_framebuffer(ctx, &(drawBuffer->mesa_buffer), width, height);
1740 }
1741 drawBuffer->mesa_buffer.Initialized = GL_TRUE; /* XXX TEMPORARY? */
1742 }
1743
1744
1745 /*
1746 * Bind buffer b to context c and make c the current rendering context.
1747 */
1748 GLboolean XMesaMakeCurrent( XMesaContext c, XMesaBuffer b )
1749 {
1750 return XMesaMakeCurrent2( c, b, b );
1751 }
1752
1753
1754 /*
1755 * Bind buffer b to context c and make c the current rendering context.
1756 */
1757 PUBLIC
1758 GLboolean XMesaMakeCurrent2( XMesaContext c, XMesaBuffer drawBuffer,
1759 XMesaBuffer readBuffer )
1760 {
1761 if (c) {
1762 if (!drawBuffer || !readBuffer)
1763 return GL_FALSE; /* must specify buffers! */
1764
1765 if (&(c->mesa) == _mesa_get_current_context()
1766 && c->mesa.DrawBuffer == &drawBuffer->mesa_buffer
1767 && c->mesa.ReadBuffer == &readBuffer->mesa_buffer
1768 && XMESA_BUFFER(c->mesa.DrawBuffer)->wasCurrent) {
1769 /* same context and buffer, do nothing */
1770 return GL_TRUE;
1771 }
1772
1773 c->xm_buffer = drawBuffer;
1774
1775 #ifdef FX
1776 if (FXmakeCurrent( drawBuffer ))
1777 return GL_TRUE;
1778 #endif
1779
1780 /* Call this periodically to detect when the user has begun using
1781 * GL rendering from multiple threads.
1782 */
1783 _glapi_check_multithread();
1784
1785 xmesa_check_and_update_buffer_size(c, drawBuffer);
1786 if (readBuffer != drawBuffer)
1787 xmesa_check_and_update_buffer_size(c, readBuffer);
1788
1789 _mesa_make_current(&(c->mesa),
1790 &drawBuffer->mesa_buffer,
1791 &readBuffer->mesa_buffer);
1792
1793 if (c->xm_visual->mesa_visual.rgbMode) {
1794 /*
1795 * Must recompute and set these pixel values because colormap
1796 * can be different for different windows.
1797 */
1798 c->clearpixel = xmesa_color_to_pixel( &c->mesa,
1799 c->clearcolor[0],
1800 c->clearcolor[1],
1801 c->clearcolor[2],
1802 c->clearcolor[3],
1803 c->xm_visual->undithered_pf);
1804 XMesaSetForeground(c->display, drawBuffer->cleargc, c->clearpixel);
1805 }
1806
1807 /* Solution to Stephane Rehel's problem with glXReleaseBuffersMESA(): */
1808 drawBuffer->wasCurrent = GL_TRUE;
1809 }
1810 else {
1811 /* Detach */
1812 _mesa_make_current( NULL, NULL, NULL );
1813 }
1814 return GL_TRUE;
1815 }
1816
1817
1818 /*
1819 * Unbind the context c from its buffer.
1820 */
1821 GLboolean XMesaUnbindContext( XMesaContext c )
1822 {
1823 /* A no-op for XFree86 integration purposes */
1824 return GL_TRUE;
1825 }
1826
1827
1828 XMesaContext XMesaGetCurrentContext( void )
1829 {
1830 GET_CURRENT_CONTEXT(ctx);
1831 if (ctx) {
1832 XMesaContext xmesa = XMESA_CONTEXT(ctx);
1833 return xmesa;
1834 }
1835 else {
1836 return 0;
1837 }
1838 }
1839
1840
1841 XMesaBuffer XMesaGetCurrentBuffer( void )
1842 {
1843 GET_CURRENT_CONTEXT(ctx);
1844 if (ctx) {
1845 XMesaBuffer xmbuf = XMESA_BUFFER(ctx->DrawBuffer);
1846 return xmbuf;
1847 }
1848 else {
1849 return 0;
1850 }
1851 }
1852
1853
1854 /* New in Mesa 3.1 */
1855 XMesaBuffer XMesaGetCurrentReadBuffer( void )
1856 {
1857 GET_CURRENT_CONTEXT(ctx);
1858 if (ctx) {
1859 return XMESA_BUFFER(ctx->ReadBuffer);
1860 }
1861 else {
1862 return 0;
1863 }
1864 }
1865
1866
1867 #ifdef XFree86Server
1868 PUBLIC
1869 GLboolean XMesaForceCurrent(XMesaContext c)
1870 {
1871 if (c) {
1872 _glapi_set_dispatch(c->mesa.CurrentDispatch);
1873
1874 if (&(c->mesa) != _mesa_get_current_context()) {
1875 _mesa_make_current(&c->mesa, c->mesa.DrawBuffer, c->mesa.ReadBuffer);
1876 }
1877 }
1878 else {
1879 _mesa_make_current(NULL, NULL, NULL);
1880 }
1881 return GL_TRUE;
1882 }
1883
1884
1885 PUBLIC
1886 GLboolean XMesaLoseCurrent(XMesaContext c)
1887 {
1888 (void) c;
1889 _mesa_make_current(NULL, NULL, NULL);
1890 return GL_TRUE;
1891 }
1892
1893
1894 PUBLIC
1895 GLboolean XMesaCopyContext( XMesaContext xm_src, XMesaContext xm_dst, GLuint mask )
1896 {
1897 _mesa_copy_context(&xm_src->mesa, &xm_dst->mesa, mask);
1898 return GL_TRUE;
1899 }
1900 #endif /* XFree86Server */
1901
1902
1903 #ifndef FX
1904 GLboolean XMesaSetFXmode( GLint mode )
1905 {
1906 (void) mode;
1907 return GL_FALSE;
1908 }
1909 #endif
1910
1911
1912
1913 /*
1914 * Copy the back buffer to the front buffer. If there's no back buffer
1915 * this is a no-op.
1916 */
1917 PUBLIC
1918 void XMesaSwapBuffers( XMesaBuffer b )
1919 {
1920 GET_CURRENT_CONTEXT(ctx);
1921
1922 if (!b->backxrb) {
1923 /* single buffered */
1924 return;
1925 }
1926
1927 /* If we're swapping the buffer associated with the current context
1928 * we have to flush any pending rendering commands first.
1929 */
1930 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
1931 _mesa_notifySwapBuffers(ctx);
1932
1933 if (b->db_mode) {
1934 #ifdef FX
1935 if (FXswapBuffers(b))
1936 return;
1937 #endif
1938 if (b->backxrb->ximage) {
1939 /* Copy Ximage (back buf) from client memory to server window */
1940 #if defined(USE_XSHM) && !defined(XFree86Server)
1941 if (b->shm) {
1942 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1943 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
1944 b->swapgc,
1945 b->backxrb->ximage, 0, 0,
1946 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1947 False );
1948 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1949 }
1950 else
1951 #endif
1952 {
1953 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1954 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
1955 b->swapgc,
1956 b->backxrb->ximage, 0, 0,
1957 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height );
1958 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1959 }
1960 }
1961 else if (b->backxrb->pixmap) {
1962 /* Copy pixmap (back buf) to window (front buf) on server */
1963 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1964 XMesaCopyArea( b->xm_visual->display,
1965 b->backxrb->pixmap, /* source drawable */
1966 b->frontxrb->drawable, /* dest. drawable */
1967 b->swapgc,
1968 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1969 0, 0 /* dest region */
1970 );
1971 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1972 }
1973
1974 if (b->swAlpha)
1975 _mesa_copy_soft_alpha_renderbuffers(ctx, &b->mesa_buffer);
1976 }
1977 #if !defined(XFree86Server)
1978 XSync( b->xm_visual->display, False );
1979 #endif
1980 }
1981
1982
1983
1984 /*
1985 * Copy sub-region of back buffer to front buffer
1986 */
1987 void XMesaCopySubBuffer( XMesaBuffer b, int x, int y, int width, int height )
1988 {
1989 GET_CURRENT_CONTEXT(ctx);
1990
1991 /* If we're swapping the buffer associated with the current context
1992 * we have to flush any pending rendering commands first.
1993 */
1994 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
1995 _mesa_notifySwapBuffers(ctx);
1996
1997 if (!b->backxrb) {
1998 /* single buffered */
1999 return;
2000 }
2001
2002 if (b->db_mode) {
2003 int yTop = b->mesa_buffer.Height - y - height;
2004 #ifdef FX
2005 if (FXswapBuffers(b))
2006 return;
2007 #endif
2008 if (b->backxrb->ximage) {
2009 /* Copy Ximage from host's memory to server's window */
2010 #if defined(USE_XSHM) && !defined(XFree86Server)
2011 if (b->shm) {
2012 /* XXX assuming width and height aren't too large! */
2013 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
2014 b->swapgc,
2015 b->backxrb->ximage, x, yTop,
2016 x, yTop, width, height, False );
2017 /* wait for finished event??? */
2018 }
2019 else
2020 #endif
2021 {
2022 /* XXX assuming width and height aren't too large! */
2023 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
2024 b->swapgc,
2025 b->backxrb->ximage, x, yTop,
2026 x, yTop, width, height );
2027 }
2028 }
2029 else {
2030 /* Copy pixmap to window on server */
2031 XMesaCopyArea( b->xm_visual->display,
2032 b->backxrb->pixmap, /* source drawable */
2033 b->frontxrb->drawable, /* dest. drawable */
2034 b->swapgc,
2035 x, yTop, width, height, /* source region */
2036 x, yTop /* dest region */
2037 );
2038 }
2039 }
2040 }
2041
2042
2043 /*
2044 * Return a pointer to the XMesa backbuffer Pixmap or XImage. This function
2045 * is a way to get "under the hood" of X/Mesa so one can manipulate the
2046 * back buffer directly.
2047 * Output: pixmap - pointer to back buffer's Pixmap, or 0
2048 * ximage - pointer to back buffer's XImage, or NULL
2049 * Return: GL_TRUE = context is double buffered
2050 * GL_FALSE = context is single buffered
2051 */
2052 #ifndef XFree86Server
2053 GLboolean XMesaGetBackBuffer( XMesaBuffer b,
2054 XMesaPixmap *pixmap,
2055 XMesaImage **ximage )
2056 {
2057 if (b->db_mode) {
2058 if (pixmap)
2059 *pixmap = b->backxrb->pixmap;
2060 if (ximage)
2061 *ximage = b->backxrb->ximage;
2062 return GL_TRUE;
2063 }
2064 else {
2065 *pixmap = 0;
2066 *ximage = NULL;
2067 return GL_FALSE;
2068 }
2069 }
2070 #endif /* XFree86Server */
2071
2072
2073 /*
2074 * Return the depth buffer associated with an XMesaBuffer.
2075 * Input: b - the XMesa buffer handle
2076 * Output: width, height - size of buffer in pixels
2077 * bytesPerValue - bytes per depth value (2 or 4)
2078 * buffer - pointer to depth buffer values
2079 * Return: GL_TRUE or GL_FALSE to indicate success or failure.
2080 */
2081 GLboolean XMesaGetDepthBuffer( XMesaBuffer b, GLint *width, GLint *height,
2082 GLint *bytesPerValue, void **buffer )
2083 {
2084 struct gl_renderbuffer *rb
2085 = b->mesa_buffer.Attachment[BUFFER_DEPTH].Renderbuffer;
2086 if (!rb || !rb->Data) {
2087 *width = 0;
2088 *height = 0;
2089 *bytesPerValue = 0;
2090 *buffer = 0;
2091 return GL_FALSE;
2092 }
2093 else {
2094 *width = b->mesa_buffer.Width;
2095 *height = b->mesa_buffer.Height;
2096 *bytesPerValue = b->mesa_buffer.Visual.depthBits <= 16
2097 ? sizeof(GLushort) : sizeof(GLuint);
2098 *buffer = rb->Data;
2099 return GL_TRUE;
2100 }
2101 }
2102
2103
2104 void XMesaFlush( XMesaContext c )
2105 {
2106 if (c && c->xm_visual) {
2107 #ifdef XFree86Server
2108 /* NOT_NEEDED */
2109 #else
2110 XSync( c->xm_visual->display, False );
2111 #endif
2112 }
2113 }
2114
2115
2116
2117 const char *XMesaGetString( XMesaContext c, int name )
2118 {
2119 (void) c;
2120 if (name==XMESA_VERSION) {
2121 return "5.0";
2122 }
2123 else if (name==XMESA_EXTENSIONS) {
2124 return "";
2125 }
2126 else {
2127 return NULL;
2128 }
2129 }
2130
2131
2132
2133 XMesaBuffer XMesaFindBuffer( XMesaDisplay *dpy, XMesaDrawable d )
2134 {
2135 XMesaBuffer b;
2136 for (b=XMesaBufferList; b; b=b->Next) {
2137 if (b->frontxrb->drawable == d && b->display == dpy) {
2138 return b;
2139 }
2140 }
2141 return NULL;
2142 }
2143
2144
2145 /**
2146 * Free/destroy all XMesaBuffers associated with given display.
2147 */
2148 void xmesa_destroy_buffers_on_display(XMesaDisplay *dpy)
2149 {
2150 XMesaBuffer b, next;
2151 for (b = XMesaBufferList; b; b = next) {
2152 next = b->Next;
2153 if (b->display == dpy) {
2154 xmesa_free_buffer(b);
2155 }
2156 }
2157 }
2158
2159
2160 /*
2161 * Look for XMesaBuffers whose X window has been destroyed.
2162 * Deallocate any such XMesaBuffers.
2163 */
2164 void XMesaGarbageCollect( void )
2165 {
2166 XMesaBuffer b, next;
2167 for (b=XMesaBufferList; b; b=next) {
2168 next = b->Next;
2169 if (b->display && b->frontxrb->drawable && b->type == WINDOW) {
2170 #ifdef XFree86Server
2171 /* NOT_NEEDED */
2172 #else
2173 XSync(b->display, False);
2174 if (!window_exists( b->display, b->frontxrb->drawable )) {
2175 /* found a dead window, free the ancillary info */
2176 XMesaDestroyBuffer( b );
2177 }
2178 #endif
2179 }
2180 }
2181 }
2182
2183
2184 unsigned long XMesaDitherColor( XMesaContext xmesa, GLint x, GLint y,
2185 GLfloat red, GLfloat green,
2186 GLfloat blue, GLfloat alpha )
2187 {
2188 GLcontext *ctx = &xmesa->mesa;
2189 GLint r = (GLint) (red * 255.0F);
2190 GLint g = (GLint) (green * 255.0F);
2191 GLint b = (GLint) (blue * 255.0F);
2192 GLint a = (GLint) (alpha * 255.0F);
2193
2194 switch (xmesa->pixelformat) {
2195 case PF_Index:
2196 return 0;
2197 case PF_Truecolor:
2198 {
2199 unsigned long p;
2200 PACK_TRUECOLOR( p, r, g, b );
2201 return p;
2202 }
2203 case PF_8A8B8G8R:
2204 return PACK_8A8B8G8R( r, g, b, a );
2205 case PF_8A8R8G8B:
2206 return PACK_8A8R8G8B( r, g, b, a );
2207 case PF_8R8G8B:
2208 return PACK_8R8G8B( r, g, b );
2209 case PF_5R6G5B:
2210 return PACK_5R6G5B( r, g, b );
2211 case PF_Dither:
2212 {
2213 DITHER_SETUP;
2214 return DITHER( x, y, r, g, b );
2215 }
2216 case PF_1Bit:
2217 /* 382 = (3*255)/2 */
2218 return ((r+g+b) > 382) ^ xmesa->xm_visual->bitFlip;
2219 case PF_HPCR:
2220 return DITHER_HPCR(x, y, r, g, b);
2221 case PF_Lookup:
2222 {
2223 LOOKUP_SETUP;
2224 return LOOKUP( r, g, b );
2225 }
2226 case PF_Grayscale:
2227 return GRAY_RGB( r, g, b );
2228 case PF_Dither_5R6G5B:
2229 /* fall through */
2230 case PF_Dither_True:
2231 {
2232 unsigned long p;
2233 PACK_TRUEDITHER(p, x, y, r, g, b);
2234 return p;
2235 }
2236 default:
2237 _mesa_problem(NULL, "Bad pixel format in XMesaDitherColor");
2238 }
2239 return 0;
2240 }
2241
2242
2243 /*
2244 * This is typically called when the window size changes and we need
2245 * to reallocate the buffer's back/depth/stencil/accum buffers.
2246 */
2247 PUBLIC void
2248 XMesaResizeBuffers( XMesaBuffer b )
2249 {
2250 GET_CURRENT_CONTEXT(ctx);
2251 XMesaContext xmctx = XMESA_CONTEXT(ctx);
2252 if (!xmctx)
2253 return;
2254 xmesa_check_and_update_buffer_size(xmctx, b);
2255 }
2256