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