xmesa: split FX functions to separate file, part 2.
[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(int client, XMesaVisual v, XMesaBuffer b,
1040 GLboolean rgb_flag, XMesaDrawable window,
1041 XMesaColormap cmap)
1042 {
1043 ASSERT(!b || b->xm_visual == v);
1044
1045 /* Save true bits/pixel */
1046 v->BitsPerPixel = bits_per_pixel(v);
1047 assert(v->BitsPerPixel > 0);
1048
1049 if (rgb_flag == GL_FALSE) {
1050 /* COLOR-INDEXED WINDOW:
1051 * Even if the visual is TrueColor or DirectColor we treat it as
1052 * being color indexed. This is weird but might be useful to someone.
1053 */
1054 v->dithered_pf = v->undithered_pf = PF_Index;
1055 v->mesa_visual.indexBits = GET_VISUAL_DEPTH(v);
1056 }
1057 else {
1058 /* RGB WINDOW:
1059 * We support RGB rendering into almost any kind of visual.
1060 */
1061 const int xclass = v->mesa_visual.visualType;
1062 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
1063 setup_truecolor( v, b, cmap );
1064 }
1065 else if (xclass == GLX_STATIC_GRAY && GET_VISUAL_DEPTH(v) == 1) {
1066 setup_monochrome( v, b );
1067 }
1068 else if (xclass == GLX_GRAY_SCALE || xclass == GLX_STATIC_GRAY) {
1069 if (!setup_grayscale( client, v, b, cmap )) {
1070 return GL_FALSE;
1071 }
1072 }
1073 else if ((xclass == GLX_PSEUDO_COLOR || xclass == GLX_STATIC_COLOR)
1074 && GET_VISUAL_DEPTH(v)>=4 && GET_VISUAL_DEPTH(v)<=16) {
1075 if (!setup_dithered_color( client, v, b, cmap )) {
1076 return GL_FALSE;
1077 }
1078 }
1079 else {
1080 _mesa_warning(NULL, "XMesa: RGB mode rendering not supported in given visual.\n");
1081 return GL_FALSE;
1082 }
1083 v->mesa_visual.indexBits = 0;
1084
1085 if (_mesa_getenv("MESA_NO_DITHER")) {
1086 v->dithered_pf = v->undithered_pf;
1087 }
1088 }
1089
1090
1091 /*
1092 * If MESA_INFO env var is set print out some debugging info
1093 * which can help Brian figure out what's going on when a user
1094 * reports bugs.
1095 */
1096 if (_mesa_getenv("MESA_INFO")) {
1097 _mesa_printf("X/Mesa visual = %p\n", (void *) v);
1098 _mesa_printf("X/Mesa dithered pf = %u\n", v->dithered_pf);
1099 _mesa_printf("X/Mesa undithered pf = %u\n", v->undithered_pf);
1100 _mesa_printf("X/Mesa level = %d\n", v->mesa_visual.level);
1101 _mesa_printf("X/Mesa depth = %d\n", GET_VISUAL_DEPTH(v));
1102 _mesa_printf("X/Mesa bits per pixel = %d\n", v->BitsPerPixel);
1103 }
1104
1105 if (b && window) {
1106 /* Do window-specific initializations */
1107
1108 /* these should have been set in create_xmesa_buffer */
1109 ASSERT(b->frontxrb->drawable == window);
1110 ASSERT(b->frontxrb->pixmap == (XMesaPixmap) window);
1111
1112 /* Setup for single/double buffering */
1113 if (v->mesa_visual.doubleBufferMode) {
1114 /* Double buffered */
1115 b->shm = check_for_xshm( v->display );
1116 }
1117
1118 /* X11 graphics contexts */
1119 #ifdef XFree86Server
1120 b->gc = CreateScratchGC(v->display, window->depth);
1121 #else
1122 b->gc = XCreateGC( v->display, window, 0, NULL );
1123 #endif
1124 XMesaSetFunction( v->display, b->gc, GXcopy );
1125
1126 /* cleargc - for glClear() */
1127 #ifdef XFree86Server
1128 b->cleargc = CreateScratchGC(v->display, window->depth);
1129 #else
1130 b->cleargc = XCreateGC( v->display, window, 0, NULL );
1131 #endif
1132 XMesaSetFunction( v->display, b->cleargc, GXcopy );
1133
1134 /*
1135 * Don't generate Graphics Expose/NoExpose events in swapbuffers().
1136 * Patch contributed by Michael Pichler May 15, 1995.
1137 */
1138 #ifdef XFree86Server
1139 b->swapgc = CreateScratchGC(v->display, window->depth);
1140 {
1141 CARD32 v[1];
1142 v[0] = FALSE;
1143 dixChangeGC(NullClient, b->swapgc, GCGraphicsExposures, v, NULL);
1144 }
1145 #else
1146 {
1147 XGCValues gcvalues;
1148 gcvalues.graphics_exposures = False;
1149 b->swapgc = XCreateGC(v->display, window,
1150 GCGraphicsExposures, &gcvalues);
1151 }
1152 #endif
1153 XMesaSetFunction( v->display, b->swapgc, GXcopy );
1154 /*
1155 * Set fill style and tile pixmap once for all for HPCR stuff
1156 * (instead of doing it each time in clear_color_HPCR_pixmap())
1157 * Initialize whole stuff
1158 * Patch contributed by Jacques Leroy March 8, 1998.
1159 */
1160 if (v->hpcr_clear_flag && b->backxrb && b->backxrb->pixmap) {
1161 int i;
1162 for (i = 0; i < 16; i++) {
1163 XMesaPutPixel(v->hpcr_clear_ximage, i, 0, 0);
1164 XMesaPutPixel(v->hpcr_clear_ximage, i, 1, 0);
1165 }
1166 XMesaPutImage(b->display, (XMesaDrawable) v->hpcr_clear_pixmap,
1167 b->cleargc, v->hpcr_clear_ximage, 0, 0, 0, 0, 16, 2);
1168 XMesaSetFillStyle( v->display, b->cleargc, FillTiled);
1169 XMesaSetTile( v->display, b->cleargc, v->hpcr_clear_pixmap );
1170 }
1171
1172 /* Initialize the row buffer XImage for use in write_color_span() */
1173 #ifdef XFree86Server
1174 b->rowimage = XMesaCreateImage(GET_VISUAL_DEPTH(v), MAX_WIDTH, 1,
1175 (char *)MALLOC(MAX_WIDTH*4));
1176 #else
1177 b->rowimage = XCreateImage( v->display,
1178 v->visinfo->visual,
1179 v->visinfo->depth,
1180 ZPixmap, 0, /*format, offset*/
1181 (char*) MALLOC(MAX_WIDTH*4), /*data*/
1182 MAX_WIDTH, 1, /*width, height*/
1183 32, /*bitmap_pad*/
1184 0 /*bytes_per_line*/ );
1185 #endif
1186 if (!b->rowimage)
1187 return GL_FALSE;
1188 }
1189
1190 return GL_TRUE;
1191 }
1192
1193
1194
1195 /*
1196 * Convert an RGBA color to a pixel value.
1197 */
1198 unsigned long
1199 xmesa_color_to_pixel(GLcontext *ctx,
1200 GLubyte r, GLubyte g, GLubyte b, GLubyte a,
1201 GLuint pixelFormat)
1202 {
1203 XMesaContext xmesa = XMESA_CONTEXT(ctx);
1204 switch (pixelFormat) {
1205 case PF_Index:
1206 return 0;
1207 case PF_Truecolor:
1208 {
1209 unsigned long p;
1210 PACK_TRUECOLOR( p, r, g, b );
1211 return p;
1212 }
1213 case PF_8A8B8G8R:
1214 return PACK_8A8B8G8R( r, g, b, a );
1215 case PF_8A8R8G8B:
1216 return PACK_8A8R8G8B( r, g, b, a );
1217 case PF_8R8G8B:
1218 /* fall through */
1219 case PF_8R8G8B24:
1220 return PACK_8R8G8B( r, g, b );
1221 case PF_5R6G5B:
1222 return PACK_5R6G5B( r, g, b );
1223 case PF_Dither:
1224 {
1225 DITHER_SETUP;
1226 return DITHER( 1, 0, r, g, b );
1227 }
1228 case PF_1Bit:
1229 /* 382 = (3*255)/2 */
1230 return ((r+g+b) > 382) ^ xmesa->xm_visual->bitFlip;
1231 case PF_HPCR:
1232 return DITHER_HPCR(1, 1, r, g, b);
1233 case PF_Lookup:
1234 {
1235 LOOKUP_SETUP;
1236 return LOOKUP( r, g, b );
1237 }
1238 case PF_Grayscale:
1239 return GRAY_RGB( r, g, b );
1240 case PF_Dither_True:
1241 /* fall through */
1242 case PF_Dither_5R6G5B:
1243 {
1244 unsigned long p;
1245 PACK_TRUEDITHER(p, 1, 0, r, g, b);
1246 return p;
1247 }
1248 default:
1249 _mesa_problem(ctx, "Bad pixel format in xmesa_color_to_pixel");
1250 }
1251 return 0;
1252 }
1253
1254
1255 #define NUM_VISUAL_TYPES 6
1256
1257 /**
1258 * Convert an X visual type to a GLX visual type.
1259 *
1260 * \param visualType X visual type (i.e., \c TrueColor, \c StaticGray, etc.)
1261 * to be converted.
1262 * \return If \c visualType is a valid X visual type, a GLX visual type will
1263 * be returned. Otherwise \c GLX_NONE will be returned.
1264 *
1265 * \note
1266 * This code was lifted directly from lib/GL/glx/glcontextmodes.c in the
1267 * DRI CVS tree.
1268 */
1269 static GLint
1270 xmesa_convert_from_x_visual_type( int visualType )
1271 {
1272 static const int glx_visual_types[ NUM_VISUAL_TYPES ] = {
1273 GLX_STATIC_GRAY, GLX_GRAY_SCALE,
1274 GLX_STATIC_COLOR, GLX_PSEUDO_COLOR,
1275 GLX_TRUE_COLOR, GLX_DIRECT_COLOR
1276 };
1277
1278 return ( (unsigned) visualType < NUM_VISUAL_TYPES )
1279 ? glx_visual_types[ visualType ] : GLX_NONE;
1280 }
1281
1282
1283 /**********************************************************************/
1284 /***** Public Functions *****/
1285 /**********************************************************************/
1286
1287
1288 /*
1289 * Create a new X/Mesa visual.
1290 * Input: display - X11 display
1291 * visinfo - an XVisualInfo pointer
1292 * rgb_flag - GL_TRUE = RGB mode,
1293 * GL_FALSE = color index mode
1294 * alpha_flag - alpha buffer requested?
1295 * db_flag - GL_TRUE = double-buffered,
1296 * GL_FALSE = single buffered
1297 * stereo_flag - stereo visual?
1298 * ximage_flag - GL_TRUE = use an XImage for back buffer,
1299 * GL_FALSE = use an off-screen pixmap for back buffer
1300 * depth_size - requested bits/depth values, or zero
1301 * stencil_size - requested bits/stencil values, or zero
1302 * accum_red_size - requested bits/red accum values, or zero
1303 * accum_green_size - requested bits/green accum values, or zero
1304 * accum_blue_size - requested bits/blue accum values, or zero
1305 * accum_alpha_size - requested bits/alpha accum values, or zero
1306 * num_samples - number of samples/pixel if multisampling, or zero
1307 * level - visual level, usually 0
1308 * visualCaveat - ala the GLX extension, usually GLX_NONE
1309 * Return; a new XMesaVisual or 0 if error.
1310 */
1311 PUBLIC
1312 XMesaVisual XMesaCreateVisual( XMesaDisplay *display,
1313 XMesaVisualInfo visinfo,
1314 GLboolean rgb_flag,
1315 GLboolean alpha_flag,
1316 GLboolean db_flag,
1317 GLboolean stereo_flag,
1318 GLboolean ximage_flag,
1319 GLint depth_size,
1320 GLint stencil_size,
1321 GLint accum_red_size,
1322 GLint accum_green_size,
1323 GLint accum_blue_size,
1324 GLint accum_alpha_size,
1325 GLint num_samples,
1326 GLint level,
1327 GLint visualCaveat )
1328 {
1329 char *gamma;
1330 XMesaVisual v;
1331 GLint red_bits, green_bits, blue_bits, alpha_bits;
1332
1333 #ifndef XFree86Server
1334 /* For debugging only */
1335 if (_mesa_getenv("MESA_XSYNC")) {
1336 /* This makes debugging X easier.
1337 * In your debugger, set a breakpoint on _XError to stop when an
1338 * X protocol error is generated.
1339 */
1340 XSynchronize( display, 1 );
1341 }
1342 #endif
1343
1344 v = (XMesaVisual) CALLOC_STRUCT(xmesa_visual);
1345 if (!v) {
1346 return NULL;
1347 }
1348
1349 v->display = display;
1350
1351 /* Save a copy of the XVisualInfo struct because the user may X_mesa_free()
1352 * the struct but we may need some of the information contained in it
1353 * at a later time.
1354 */
1355 #ifndef XFree86Server
1356 v->visinfo = (XVisualInfo *) MALLOC(sizeof(*visinfo));
1357 if(!v->visinfo) {
1358 _mesa_free(v);
1359 return NULL;
1360 }
1361 MEMCPY(v->visinfo, visinfo, sizeof(*visinfo));
1362 #endif
1363
1364 /* check for MESA_GAMMA environment variable */
1365 gamma = _mesa_getenv("MESA_GAMMA");
1366 if (gamma) {
1367 v->RedGamma = v->GreenGamma = v->BlueGamma = 0.0;
1368 sscanf( gamma, "%f %f %f", &v->RedGamma, &v->GreenGamma, &v->BlueGamma );
1369 if (v->RedGamma<=0.0) v->RedGamma = 1.0;
1370 if (v->GreenGamma<=0.0) v->GreenGamma = v->RedGamma;
1371 if (v->BlueGamma<=0.0) v->BlueGamma = v->RedGamma;
1372 }
1373 else {
1374 v->RedGamma = v->GreenGamma = v->BlueGamma = 1.0;
1375 }
1376
1377 v->ximage_flag = ximage_flag;
1378
1379 #ifdef XFree86Server
1380 /* We could calculate these values by ourselves. nplanes is either the sum
1381 * of the red, green, and blue bits or the number index bits.
1382 * ColormapEntries is either (1U << index_bits) or
1383 * (1U << max(redBits, greenBits, blueBits)).
1384 */
1385 assert(visinfo->nplanes > 0);
1386 v->nplanes = visinfo->nplanes;
1387 v->ColormapEntries = visinfo->ColormapEntries;
1388
1389 v->mesa_visual.redMask = visinfo->redMask;
1390 v->mesa_visual.greenMask = visinfo->greenMask;
1391 v->mesa_visual.blueMask = visinfo->blueMask;
1392 v->mesa_visual.visualID = visinfo->vid;
1393 v->mesa_visual.screen = 0; /* FIXME: What should be done here? */
1394 #else
1395 v->mesa_visual.redMask = visinfo->red_mask;
1396 v->mesa_visual.greenMask = visinfo->green_mask;
1397 v->mesa_visual.blueMask = visinfo->blue_mask;
1398 v->mesa_visual.visualID = visinfo->visualid;
1399 v->mesa_visual.screen = visinfo->screen;
1400 #endif
1401
1402 #if defined(XFree86Server) || !(defined(__cplusplus) || defined(c_plusplus))
1403 v->mesa_visual.visualType = xmesa_convert_from_x_visual_type(visinfo->class);
1404 #else
1405 v->mesa_visual.visualType = xmesa_convert_from_x_visual_type(visinfo->c_class);
1406 #endif
1407
1408 v->mesa_visual.visualRating = visualCaveat;
1409
1410 if (alpha_flag)
1411 v->mesa_visual.alphaBits = 8;
1412
1413 (void) initialize_visual_and_buffer( 0, v, NULL, rgb_flag, 0, 0 );
1414
1415 {
1416 const int xclass = v->mesa_visual.visualType;
1417 if (xclass == GLX_TRUE_COLOR || xclass == GLX_DIRECT_COLOR) {
1418 red_bits = _mesa_bitcount(GET_REDMASK(v));
1419 green_bits = _mesa_bitcount(GET_GREENMASK(v));
1420 blue_bits = _mesa_bitcount(GET_BLUEMASK(v));
1421 }
1422 else {
1423 /* this is an approximation */
1424 int depth;
1425 depth = GET_VISUAL_DEPTH(v);
1426 red_bits = depth / 3;
1427 depth -= red_bits;
1428 green_bits = depth / 2;
1429 depth -= green_bits;
1430 blue_bits = depth;
1431 alpha_bits = 0;
1432 assert( red_bits + green_bits + blue_bits == GET_VISUAL_DEPTH(v) );
1433 }
1434 alpha_bits = v->mesa_visual.alphaBits;
1435 }
1436
1437 _mesa_initialize_visual( &v->mesa_visual,
1438 rgb_flag, db_flag, stereo_flag,
1439 red_bits, green_bits,
1440 blue_bits, alpha_bits,
1441 v->mesa_visual.indexBits,
1442 depth_size,
1443 stencil_size,
1444 accum_red_size, accum_green_size,
1445 accum_blue_size, accum_alpha_size,
1446 0 );
1447
1448 /* XXX minor hack */
1449 v->mesa_visual.level = level;
1450 return v;
1451 }
1452
1453
1454 PUBLIC
1455 void XMesaDestroyVisual( XMesaVisual v )
1456 {
1457 #ifndef XFree86Server
1458 _mesa_free(v->visinfo);
1459 #endif
1460 _mesa_free(v);
1461 }
1462
1463
1464
1465 /**
1466 * Create a new XMesaContext.
1467 * \param v the XMesaVisual
1468 * \param share_list another XMesaContext with which to share display
1469 * lists or NULL if no sharing is wanted.
1470 * \return an XMesaContext or NULL if error.
1471 */
1472 PUBLIC
1473 XMesaContext XMesaCreateContext( XMesaVisual v, XMesaContext share_list )
1474 {
1475 static GLboolean firstTime = GL_TRUE;
1476 XMesaContext c;
1477 GLcontext *mesaCtx;
1478 struct dd_function_table functions;
1479 TNLcontext *tnl;
1480
1481 if (firstTime) {
1482 _glthread_INIT_MUTEX(_xmesa_lock);
1483 firstTime = GL_FALSE;
1484 }
1485
1486 /* Note: the XMesaContext contains a Mesa GLcontext struct (inheritance) */
1487 c = (XMesaContext) CALLOC_STRUCT(xmesa_context);
1488 if (!c)
1489 return NULL;
1490
1491 mesaCtx = &(c->mesa);
1492
1493 /* initialize with default driver functions, then plug in XMesa funcs */
1494 _mesa_init_driver_functions(&functions);
1495 xmesa_init_driver_functions(v, &functions);
1496 if (!_mesa_initialize_context(mesaCtx, &v->mesa_visual,
1497 share_list ? &(share_list->mesa) : (GLcontext *) NULL,
1498 &functions, (void *) c)) {
1499 _mesa_free(c);
1500 return NULL;
1501 }
1502
1503 _mesa_enable_sw_extensions(mesaCtx);
1504 _mesa_enable_1_3_extensions(mesaCtx);
1505 _mesa_enable_1_4_extensions(mesaCtx);
1506 _mesa_enable_1_5_extensions(mesaCtx);
1507 _mesa_enable_2_0_extensions(mesaCtx);
1508 #if ENABLE_EXT_texure_compression_s3tc
1509 if (c->Mesa_DXTn) {
1510 _mesa_enable_extension(mesaCtx, "GL_EXT_texture_compression_s3tc");
1511 _mesa_enable_extension(mesaCtx, "GL_S3_s3tc");
1512 }
1513 _mesa_enable_extension(mesaCtx, "GL_3DFX_texture_compression_FXT1");
1514 #endif
1515 #if ENABLE_EXT_timer_query
1516 _mesa_enable_extension(mesaCtx, "GL_EXT_timer_query");
1517 #endif
1518
1519 #ifdef XFree86Server
1520 /* If we're running in the X server, do bounds checking to prevent
1521 * segfaults and server crashes!
1522 */
1523 mesaCtx->Const.CheckArrayBounds = GL_TRUE;
1524 #endif
1525
1526 /* finish up xmesa context initializations */
1527 c->swapbytes = CHECK_BYTE_ORDER(v) ? GL_FALSE : GL_TRUE;
1528 c->xm_visual = v;
1529 c->xm_buffer = NULL; /* set later by XMesaMakeCurrent */
1530 c->display = v->display;
1531 c->pixelformat = v->dithered_pf; /* Dithering is enabled by default */
1532
1533 /* Initialize the software rasterizer and helper modules.
1534 */
1535 if (!_swrast_CreateContext( mesaCtx ) ||
1536 !_vbo_CreateContext( mesaCtx ) ||
1537 !_tnl_CreateContext( mesaCtx ) ||
1538 !_swsetup_CreateContext( mesaCtx )) {
1539 _mesa_free_context_data(&c->mesa);
1540 _mesa_free(c);
1541 return NULL;
1542 }
1543
1544 /* tnl setup */
1545 tnl = TNL_CONTEXT(mesaCtx);
1546 tnl->Driver.RunPipeline = _tnl_run_pipeline;
1547 /* swrast setup */
1548 xmesa_register_swrast_functions( mesaCtx );
1549 _swsetup_Wakeup(mesaCtx);
1550
1551 return c;
1552 }
1553
1554
1555
1556 PUBLIC
1557 void XMesaDestroyContext( XMesaContext c )
1558 {
1559 GLcontext *mesaCtx = &c->mesa;
1560
1561 #ifdef FX
1562 FXdestroyContext( XMESA_BUFFER(mesaCtx->DrawBuffer) );
1563 #endif
1564
1565 _swsetup_DestroyContext( mesaCtx );
1566 _swrast_DestroyContext( mesaCtx );
1567 _tnl_DestroyContext( mesaCtx );
1568 _vbo_DestroyContext( mesaCtx );
1569 _mesa_free_context_data( mesaCtx );
1570 _mesa_free( c );
1571 }
1572
1573
1574
1575 /**
1576 * Private function for creating an XMesaBuffer which corresponds to an
1577 * X window or pixmap.
1578 * \param v the window's XMesaVisual
1579 * \param w the window we're wrapping
1580 * \return new XMesaBuffer or NULL if error
1581 */
1582 PUBLIC XMesaBuffer
1583 XMesaCreateWindowBuffer(XMesaVisual v, XMesaWindow w)
1584 {
1585 #ifndef XFree86Server
1586 XWindowAttributes attr;
1587 #endif
1588 int client = 0;
1589 XMesaBuffer b;
1590 XMesaColormap cmap;
1591
1592 assert(v);
1593 assert(w);
1594
1595 /* Check that window depth matches visual depth */
1596 #ifdef XFree86Server
1597 client = CLIENT_ID(((XMesaDrawable)w)->id);
1598
1599 if (GET_VISUAL_DEPTH(v) != ((XMesaDrawable)w)->depth) {
1600 _mesa_warning(NULL, "XMesaCreateWindowBuffer: depth mismatch between visual (%d) and window (%d)!\n",
1601 GET_VISUAL_DEPTH(v), ((XMesaDrawable) w)->depth);
1602 return NULL;
1603 }
1604 #else
1605 XGetWindowAttributes( v->display, w, &attr );
1606
1607 if (GET_VISUAL_DEPTH(v) != attr.depth) {
1608 _mesa_warning(NULL, "XMesaCreateWindowBuffer: depth mismatch between visual (%d) and window (%d)!\n",
1609 GET_VISUAL_DEPTH(v), attr.depth);
1610 return NULL;
1611 }
1612 #endif
1613
1614 /* Find colormap */
1615 #ifdef XFree86Server
1616 cmap = (ColormapPtr)LookupIDByType(wColormap(w), RT_COLORMAP);
1617 #else
1618 if (attr.colormap) {
1619 cmap = attr.colormap;
1620 }
1621 else {
1622 _mesa_warning(NULL, "Window %u has no colormap!\n", (unsigned int) w);
1623 /* this is weird, a window w/out a colormap!? */
1624 /* OK, let's just allocate a new one and hope for the best */
1625 cmap = XCreateColormap(v->display, w, attr.visual, AllocNone);
1626 }
1627 #endif
1628
1629 b = create_xmesa_buffer((XMesaDrawable) w, WINDOW, v, cmap);
1630 if (!b)
1631 return NULL;
1632
1633 if (!initialize_visual_and_buffer( client, v, b, v->mesa_visual.rgbMode,
1634 (XMesaDrawable) w, cmap )) {
1635 xmesa_free_buffer(b);
1636 return NULL;
1637 }
1638
1639 return b;
1640 }
1641
1642
1643
1644 /**
1645 * Create a new XMesaBuffer from an X pixmap.
1646 *
1647 * \param v the XMesaVisual
1648 * \param p the pixmap
1649 * \param cmap the colormap, may be 0 if using a \c GLX_TRUE_COLOR or
1650 * \c GLX_DIRECT_COLOR visual for the pixmap
1651 * \returns new XMesaBuffer or NULL if error
1652 */
1653 PUBLIC XMesaBuffer
1654 XMesaCreatePixmapBuffer(XMesaVisual v, XMesaPixmap p, XMesaColormap cmap)
1655 {
1656 int client = 0;
1657 XMesaBuffer b;
1658
1659 assert(v);
1660
1661 b = create_xmesa_buffer((XMesaDrawable) p, PIXMAP, v, cmap);
1662 if (!b)
1663 return NULL;
1664
1665 #ifdef XFree86Server
1666 client = CLIENT_ID(((XMesaDrawable)p)->id);
1667 #endif
1668
1669 if (!initialize_visual_and_buffer(client, v, b, v->mesa_visual.rgbMode,
1670 (XMesaDrawable) p, cmap)) {
1671 xmesa_free_buffer(b);
1672 return NULL;
1673 }
1674
1675 return b;
1676 }
1677
1678
1679
1680 XMesaBuffer
1681 XMesaCreatePBuffer(XMesaVisual v, XMesaColormap cmap,
1682 unsigned int width, unsigned int height)
1683 {
1684 #ifdef XFree86Server
1685 return 0;
1686 #else
1687 int client = 0;
1688 XMesaWindow root;
1689 XMesaDrawable drawable; /* X Pixmap Drawable */
1690 XMesaBuffer b;
1691
1692 /* allocate pixmap for front buffer */
1693 root = RootWindow( v->display, v->visinfo->screen );
1694 drawable = XCreatePixmap(v->display, root, width, height,
1695 v->visinfo->depth);
1696 if (!drawable)
1697 return NULL;
1698
1699 b = create_xmesa_buffer(drawable, PBUFFER, v, cmap);
1700 if (!b)
1701 return NULL;
1702
1703 if (!initialize_visual_and_buffer(client, v, b, v->mesa_visual.rgbMode,
1704 drawable, cmap)) {
1705 xmesa_free_buffer(b);
1706 return NULL;
1707 }
1708
1709 return b;
1710 #endif
1711 }
1712
1713
1714
1715 /*
1716 * Deallocate an XMesaBuffer structure and all related info.
1717 */
1718 PUBLIC void
1719 XMesaDestroyBuffer(XMesaBuffer b)
1720 {
1721 xmesa_free_buffer(b);
1722 }
1723
1724
1725 /**
1726 * Query the current window size and update the corresponding GLframebuffer
1727 * and all attached renderbuffers.
1728 * Called when:
1729 * 1. the first time a buffer is bound to a context.
1730 * 2. from glViewport to poll for window size changes
1731 * 3. from the XMesaResizeBuffers() API function.
1732 * Note: it's possible (and legal) for xmctx to be NULL. That can happen
1733 * when resizing a buffer when no rendering context is bound.
1734 */
1735 void
1736 xmesa_check_and_update_buffer_size(XMesaContext xmctx, XMesaBuffer drawBuffer)
1737 {
1738 GLuint width, height;
1739 xmesa_get_window_size(drawBuffer->display, drawBuffer, &width, &height);
1740 if (drawBuffer->mesa_buffer.Width != width ||
1741 drawBuffer->mesa_buffer.Height != height) {
1742 GLcontext *ctx = xmctx ? &xmctx->mesa : NULL;
1743 _mesa_resize_framebuffer(ctx, &(drawBuffer->mesa_buffer), width, height);
1744 }
1745 drawBuffer->mesa_buffer.Initialized = GL_TRUE; /* XXX TEMPORARY? */
1746 }
1747
1748
1749 /*
1750 * Bind buffer b to context c and make c the current rendering context.
1751 */
1752 GLboolean XMesaMakeCurrent( XMesaContext c, XMesaBuffer b )
1753 {
1754 return XMesaMakeCurrent2( c, b, b );
1755 }
1756
1757
1758 /*
1759 * Bind buffer b to context c and make c the current rendering context.
1760 */
1761 PUBLIC
1762 GLboolean XMesaMakeCurrent2( XMesaContext c, XMesaBuffer drawBuffer,
1763 XMesaBuffer readBuffer )
1764 {
1765 if (c) {
1766 if (!drawBuffer || !readBuffer)
1767 return GL_FALSE; /* must specify buffers! */
1768
1769 if (&(c->mesa) == _mesa_get_current_context()
1770 && c->mesa.DrawBuffer == &drawBuffer->mesa_buffer
1771 && c->mesa.ReadBuffer == &readBuffer->mesa_buffer
1772 && XMESA_BUFFER(c->mesa.DrawBuffer)->wasCurrent) {
1773 /* same context and buffer, do nothing */
1774 return GL_TRUE;
1775 }
1776
1777 c->xm_buffer = drawBuffer;
1778
1779 #ifdef FX
1780 if (FXmakeCurrent( drawBuffer ))
1781 return GL_TRUE;
1782 #endif
1783
1784 /* Call this periodically to detect when the user has begun using
1785 * GL rendering from multiple threads.
1786 */
1787 _glapi_check_multithread();
1788
1789 xmesa_check_and_update_buffer_size(c, drawBuffer);
1790 if (readBuffer != drawBuffer)
1791 xmesa_check_and_update_buffer_size(c, readBuffer);
1792
1793 _mesa_make_current(&(c->mesa),
1794 &drawBuffer->mesa_buffer,
1795 &readBuffer->mesa_buffer);
1796
1797 if (c->xm_visual->mesa_visual.rgbMode) {
1798 /*
1799 * Must recompute and set these pixel values because colormap
1800 * can be different for different windows.
1801 */
1802 c->clearpixel = xmesa_color_to_pixel( &c->mesa,
1803 c->clearcolor[0],
1804 c->clearcolor[1],
1805 c->clearcolor[2],
1806 c->clearcolor[3],
1807 c->xm_visual->undithered_pf);
1808 XMesaSetForeground(c->display, drawBuffer->cleargc, c->clearpixel);
1809 }
1810
1811 /* Solution to Stephane Rehel's problem with glXReleaseBuffersMESA(): */
1812 drawBuffer->wasCurrent = GL_TRUE;
1813 }
1814 else {
1815 /* Detach */
1816 _mesa_make_current( NULL, NULL, NULL );
1817 }
1818 return GL_TRUE;
1819 }
1820
1821
1822 /*
1823 * Unbind the context c from its buffer.
1824 */
1825 GLboolean XMesaUnbindContext( XMesaContext c )
1826 {
1827 /* A no-op for XFree86 integration purposes */
1828 return GL_TRUE;
1829 }
1830
1831
1832 XMesaContext XMesaGetCurrentContext( void )
1833 {
1834 GET_CURRENT_CONTEXT(ctx);
1835 if (ctx) {
1836 XMesaContext xmesa = XMESA_CONTEXT(ctx);
1837 return xmesa;
1838 }
1839 else {
1840 return 0;
1841 }
1842 }
1843
1844
1845 XMesaBuffer XMesaGetCurrentBuffer( void )
1846 {
1847 GET_CURRENT_CONTEXT(ctx);
1848 if (ctx) {
1849 XMesaBuffer xmbuf = XMESA_BUFFER(ctx->DrawBuffer);
1850 return xmbuf;
1851 }
1852 else {
1853 return 0;
1854 }
1855 }
1856
1857
1858 /* New in Mesa 3.1 */
1859 XMesaBuffer XMesaGetCurrentReadBuffer( void )
1860 {
1861 GET_CURRENT_CONTEXT(ctx);
1862 if (ctx) {
1863 return XMESA_BUFFER(ctx->ReadBuffer);
1864 }
1865 else {
1866 return 0;
1867 }
1868 }
1869
1870
1871 #ifdef XFree86Server
1872 PUBLIC
1873 GLboolean XMesaForceCurrent(XMesaContext c)
1874 {
1875 if (c) {
1876 #ifdef XGLServer
1877 _glapi_set_dispatch(c->mesa.CurrentDispatch);
1878 #endif
1879
1880 if (&(c->mesa) != _mesa_get_current_context()) {
1881 _mesa_make_current(&c->mesa, c->mesa.DrawBuffer, c->mesa.ReadBuffer);
1882 }
1883 }
1884 else {
1885 _mesa_make_current(NULL, NULL, NULL);
1886 }
1887 return GL_TRUE;
1888 }
1889
1890
1891 PUBLIC
1892 GLboolean XMesaLoseCurrent(XMesaContext c)
1893 {
1894 (void) c;
1895 _mesa_make_current(NULL, NULL, NULL);
1896 return GL_TRUE;
1897 }
1898
1899
1900 PUBLIC
1901 GLboolean XMesaCopyContext( XMesaContext xm_src, XMesaContext xm_dst, GLuint mask )
1902 {
1903 _mesa_copy_context(&xm_src->mesa, &xm_dst->mesa, mask);
1904 return GL_TRUE;
1905 }
1906 #endif /* XFree86Server */
1907
1908
1909 #ifndef FX
1910 GLboolean XMesaSetFXmode( GLint mode )
1911 {
1912 (void) mode;
1913 return GL_FALSE;
1914 }
1915 #endif
1916
1917
1918
1919 /*
1920 * Copy the back buffer to the front buffer. If there's no back buffer
1921 * this is a no-op.
1922 */
1923 PUBLIC
1924 void XMesaSwapBuffers( XMesaBuffer b )
1925 {
1926 GET_CURRENT_CONTEXT(ctx);
1927
1928 if (!b->backxrb) {
1929 /* single buffered */
1930 return;
1931 }
1932
1933 /* If we're swapping the buffer associated with the current context
1934 * we have to flush any pending rendering commands first.
1935 */
1936 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
1937 _mesa_notifySwapBuffers(ctx);
1938
1939 if (b->db_mode) {
1940 #ifdef FX
1941 if (FXswapBuffers(b))
1942 return;
1943 #endif
1944 if (b->backxrb->ximage) {
1945 /* Copy Ximage (back buf) from client memory to server window */
1946 #if defined(USE_XSHM) && !defined(XFree86Server)
1947 if (b->shm) {
1948 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1949 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
1950 b->swapgc,
1951 b->backxrb->ximage, 0, 0,
1952 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1953 False );
1954 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1955 }
1956 else
1957 #endif
1958 {
1959 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1960 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
1961 b->swapgc,
1962 b->backxrb->ximage, 0, 0,
1963 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height );
1964 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1965 }
1966 }
1967 else if (b->backxrb->pixmap) {
1968 /* Copy pixmap (back buf) to window (front buf) on server */
1969 /*_glthread_LOCK_MUTEX(_xmesa_lock);*/
1970 XMesaCopyArea( b->xm_visual->display,
1971 b->backxrb->pixmap, /* source drawable */
1972 b->frontxrb->drawable, /* dest. drawable */
1973 b->swapgc,
1974 0, 0, b->mesa_buffer.Width, b->mesa_buffer.Height,
1975 0, 0 /* dest region */
1976 );
1977 /*_glthread_UNLOCK_MUTEX(_xmesa_lock);*/
1978 }
1979
1980 if (b->swAlpha)
1981 _mesa_copy_soft_alpha_renderbuffers(ctx, &b->mesa_buffer);
1982 }
1983 #if !defined(XFree86Server)
1984 XSync( b->xm_visual->display, False );
1985 #endif
1986 }
1987
1988
1989
1990 /*
1991 * Copy sub-region of back buffer to front buffer
1992 */
1993 void XMesaCopySubBuffer( XMesaBuffer b, int x, int y, int width, int height )
1994 {
1995 GET_CURRENT_CONTEXT(ctx);
1996
1997 /* If we're swapping the buffer associated with the current context
1998 * we have to flush any pending rendering commands first.
1999 */
2000 if (ctx && ctx->DrawBuffer == &(b->mesa_buffer))
2001 _mesa_notifySwapBuffers(ctx);
2002
2003 if (!b->backxrb) {
2004 /* single buffered */
2005 return;
2006 }
2007
2008 if (b->db_mode) {
2009 int yTop = b->mesa_buffer.Height - y - height;
2010 #ifdef FX
2011 if (FXswapBuffers(b))
2012 return;
2013 #endif
2014 if (b->backxrb->ximage) {
2015 /* Copy Ximage from host's memory to server's window */
2016 #if defined(USE_XSHM) && !defined(XFree86Server)
2017 if (b->shm) {
2018 /* XXX assuming width and height aren't too large! */
2019 XShmPutImage( b->xm_visual->display, b->frontxrb->drawable,
2020 b->swapgc,
2021 b->backxrb->ximage, x, yTop,
2022 x, yTop, width, height, False );
2023 /* wait for finished event??? */
2024 }
2025 else
2026 #endif
2027 {
2028 /* XXX assuming width and height aren't too large! */
2029 XMesaPutImage( b->xm_visual->display, b->frontxrb->drawable,
2030 b->swapgc,
2031 b->backxrb->ximage, x, yTop,
2032 x, yTop, width, height );
2033 }
2034 }
2035 else {
2036 /* Copy pixmap to window on server */
2037 XMesaCopyArea( b->xm_visual->display,
2038 b->backxrb->pixmap, /* source drawable */
2039 b->frontxrb->drawable, /* dest. drawable */
2040 b->swapgc,
2041 x, yTop, width, height, /* source region */
2042 x, yTop /* dest region */
2043 );
2044 }
2045 }
2046 }
2047
2048
2049 /*
2050 * Return a pointer to the XMesa backbuffer Pixmap or XImage. This function
2051 * is a way to get "under the hood" of X/Mesa so one can manipulate the
2052 * back buffer directly.
2053 * Output: pixmap - pointer to back buffer's Pixmap, or 0
2054 * ximage - pointer to back buffer's XImage, or NULL
2055 * Return: GL_TRUE = context is double buffered
2056 * GL_FALSE = context is single buffered
2057 */
2058 #ifndef XFree86Server
2059 GLboolean XMesaGetBackBuffer( XMesaBuffer b,
2060 XMesaPixmap *pixmap,
2061 XMesaImage **ximage )
2062 {
2063 if (b->db_mode) {
2064 if (pixmap)
2065 *pixmap = b->backxrb->pixmap;
2066 if (ximage)
2067 *ximage = b->backxrb->ximage;
2068 return GL_TRUE;
2069 }
2070 else {
2071 *pixmap = 0;
2072 *ximage = NULL;
2073 return GL_FALSE;
2074 }
2075 }
2076 #endif /* XFree86Server */
2077
2078
2079 /*
2080 * Return the depth buffer associated with an XMesaBuffer.
2081 * Input: b - the XMesa buffer handle
2082 * Output: width, height - size of buffer in pixels
2083 * bytesPerValue - bytes per depth value (2 or 4)
2084 * buffer - pointer to depth buffer values
2085 * Return: GL_TRUE or GL_FALSE to indicate success or failure.
2086 */
2087 GLboolean XMesaGetDepthBuffer( XMesaBuffer b, GLint *width, GLint *height,
2088 GLint *bytesPerValue, void **buffer )
2089 {
2090 struct gl_renderbuffer *rb
2091 = b->mesa_buffer.Attachment[BUFFER_DEPTH].Renderbuffer;
2092 if (!rb || !rb->Data) {
2093 *width = 0;
2094 *height = 0;
2095 *bytesPerValue = 0;
2096 *buffer = 0;
2097 return GL_FALSE;
2098 }
2099 else {
2100 *width = b->mesa_buffer.Width;
2101 *height = b->mesa_buffer.Height;
2102 *bytesPerValue = b->mesa_buffer.Visual.depthBits <= 16
2103 ? sizeof(GLushort) : sizeof(GLuint);
2104 *buffer = rb->Data;
2105 return GL_TRUE;
2106 }
2107 }
2108
2109
2110 void XMesaFlush( XMesaContext c )
2111 {
2112 if (c && c->xm_visual) {
2113 #ifdef XFree86Server
2114 /* NOT_NEEDED */
2115 #else
2116 XSync( c->xm_visual->display, False );
2117 #endif
2118 }
2119 }
2120
2121
2122
2123 const char *XMesaGetString( XMesaContext c, int name )
2124 {
2125 (void) c;
2126 if (name==XMESA_VERSION) {
2127 return "5.0";
2128 }
2129 else if (name==XMESA_EXTENSIONS) {
2130 return "";
2131 }
2132 else {
2133 return NULL;
2134 }
2135 }
2136
2137
2138
2139 XMesaBuffer XMesaFindBuffer( XMesaDisplay *dpy, XMesaDrawable d )
2140 {
2141 XMesaBuffer b;
2142 for (b=XMesaBufferList; b; b=b->Next) {
2143 if (b->frontxrb->drawable == d && b->display == dpy) {
2144 return b;
2145 }
2146 }
2147 return NULL;
2148 }
2149
2150
2151 /**
2152 * Free/destroy all XMesaBuffers associated with given display.
2153 */
2154 void xmesa_destroy_buffers_on_display(XMesaDisplay *dpy)
2155 {
2156 XMesaBuffer b, next;
2157 for (b = XMesaBufferList; b; b = next) {
2158 next = b->Next;
2159 if (b->display == dpy) {
2160 xmesa_free_buffer(b);
2161 }
2162 }
2163 }
2164
2165
2166 /*
2167 * Look for XMesaBuffers whose X window has been destroyed.
2168 * Deallocate any such XMesaBuffers.
2169 */
2170 void XMesaGarbageCollect( void )
2171 {
2172 XMesaBuffer b, next;
2173 for (b=XMesaBufferList; b; b=next) {
2174 next = b->Next;
2175 if (b->display && b->frontxrb->drawable && b->type == WINDOW) {
2176 #ifdef XFree86Server
2177 /* NOT_NEEDED */
2178 #else
2179 XSync(b->display, False);
2180 if (!window_exists( b->display, b->frontxrb->drawable )) {
2181 /* found a dead window, free the ancillary info */
2182 XMesaDestroyBuffer( b );
2183 }
2184 #endif
2185 }
2186 }
2187 }
2188
2189
2190 unsigned long XMesaDitherColor( XMesaContext xmesa, GLint x, GLint y,
2191 GLfloat red, GLfloat green,
2192 GLfloat blue, GLfloat alpha )
2193 {
2194 GLcontext *ctx = &xmesa->mesa;
2195 GLint r = (GLint) (red * 255.0F);
2196 GLint g = (GLint) (green * 255.0F);
2197 GLint b = (GLint) (blue * 255.0F);
2198 GLint a = (GLint) (alpha * 255.0F);
2199
2200 switch (xmesa->pixelformat) {
2201 case PF_Index:
2202 return 0;
2203 case PF_Truecolor:
2204 {
2205 unsigned long p;
2206 PACK_TRUECOLOR( p, r, g, b );
2207 return p;
2208 }
2209 case PF_8A8B8G8R:
2210 return PACK_8A8B8G8R( r, g, b, a );
2211 case PF_8A8R8G8B:
2212 return PACK_8A8R8G8B( r, g, b, a );
2213 case PF_8R8G8B:
2214 return PACK_8R8G8B( r, g, b );
2215 case PF_5R6G5B:
2216 return PACK_5R6G5B( r, g, b );
2217 case PF_Dither:
2218 {
2219 DITHER_SETUP;
2220 return DITHER( x, y, r, g, b );
2221 }
2222 case PF_1Bit:
2223 /* 382 = (3*255)/2 */
2224 return ((r+g+b) > 382) ^ xmesa->xm_visual->bitFlip;
2225 case PF_HPCR:
2226 return DITHER_HPCR(x, y, r, g, b);
2227 case PF_Lookup:
2228 {
2229 LOOKUP_SETUP;
2230 return LOOKUP( r, g, b );
2231 }
2232 case PF_Grayscale:
2233 return GRAY_RGB( r, g, b );
2234 case PF_Dither_5R6G5B:
2235 /* fall through */
2236 case PF_Dither_True:
2237 {
2238 unsigned long p;
2239 PACK_TRUEDITHER(p, x, y, r, g, b);
2240 return p;
2241 }
2242 default:
2243 _mesa_problem(NULL, "Bad pixel format in XMesaDitherColor");
2244 }
2245 return 0;
2246 }
2247
2248
2249 /*
2250 * This is typically called when the window size changes and we need
2251 * to reallocate the buffer's back/depth/stencil/accum buffers.
2252 */
2253 PUBLIC void
2254 XMesaResizeBuffers( XMesaBuffer b )
2255 {
2256 GET_CURRENT_CONTEXT(ctx);
2257 XMesaContext xmctx = XMESA_CONTEXT(ctx);
2258 if (!xmctx)
2259 return;
2260 xmesa_check_and_update_buffer_size(xmctx, b);
2261 }
2262