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