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