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