git.oblomov.eu Git - wine/blob - graphics/x11drv/palette.c

   1 /*
   2  * X11DRV OEM bitmap objects
   3  *
   4  * Copyright 1994, 1995 Alexandre Julliard
   5  *
   6  */
   7
   8 #include "config.h"
   9
  10 #ifndef X_DISPLAY_MISSING
  11
  12 #include "ts_xlib.h"
  13
  14 #include <stdlib.h>
  15 #include <string.h>
  16
  17 #include "color.h"
  18 #include "debugtools.h"
  19 #include "gdi.h"
  20 #include "options.h"
  21 #include "palette.h"
  22 #include "windef.h"
  23 #include "xmalloc.h"
  24 #include "x11drv.h"
  25
  26 DEFAULT_DEBUG_CHANNEL(palette);
  27
  28 /* Palette indexed mode:
  29  *      logical palette -> mapping -> pixel
  30  *
  31  *
  32  * Windows needs contiguous color space ( from 0 to n ) but
  33  * it is possible only with the private colormap. Otherwise we
  34  * have to map DC palette indices to real pixel values. With
  35  * private colormaps it boils down to the identity mapping. The
  36  * other special case is when we have a fixed color visual with
  37  * the screendepth > 8 - we abandon palette mappings altogether
  38  * because pixel values can be calculated without X server
  39  * assistance.
  40  *
  41  * Windows palette manager is described in the
  42  * http://premium.microsoft.com/msdn/library/techart/f30/f34/f40/d4d/sa942.htm
  43  */
  44
  45 extern PALETTEENTRY *COLOR_sysPal;
  46 extern int COLOR_gapStart;
  47 extern int COLOR_gapEnd;
  48 extern int COLOR_gapFilled;
  49 extern int COLOR_max;
  50
  51 extern const PALETTEENTRY COLOR_sysPalTemplate[NB_RESERVED_COLORS];
  52
  53 Colormap X11DRV_PALETTE_PaletteXColormap = 0;
  54 UINT16   X11DRV_PALETTE_PaletteFlags     = 0;
  55
  56 static int X11DRV_PALETTE_Redshift   = 0; /* to handle abortive X11DRV_PALETTE_VIRTUAL visuals */
  57 static int X11DRV_PALETTE_Redmax     = 0;
  58 static int X11DRV_PALETTE_Greenshift = 0;
  59 static int X11DRV_PALETTE_Greenmax   = 0;
  60 static int X11DRV_PALETTE_Blueshift  = 0;
  61 static int X11DRV_PALETTE_Bluemax    = 0;
  62 static int X11DRV_PALETTE_Graymax    = 0;
  63
  64 /* First free dynamic color cell, 0 = full palette, -1 = fixed palette */
  65 static int           X11DRV_PALETTE_firstFree = 0;
  66 static unsigned char X11DRV_PALETTE_freeList[256];
  67
  68 /**********************************************************************/
  69
  70    /* Map an EGA index (0..15) to a pixel value in the system color space.  */
  71
  72 int X11DRV_PALETTE_mapEGAPixel[16];
  73
  74 /**********************************************************************/
  75
  76 #define NB_COLORCUBE_START_INDEX        63
  77
  78 /* Maps entry in the system palette to X pixel value */
  79 int *X11DRV_PALETTE_PaletteToXPixel = NULL;
  80
  81 /* Maps pixel to the entry in the system palette */
  82 int *X11DRV_PALETTE_XPixelToPalette = NULL;
  83
  84 /**********************************************************************/
  85
  86 static BOOL X11DRV_PALETTE_BuildPrivateMap(void);
  87 static BOOL X11DRV_PALETTE_BuildSharedMap(void);
  88 static void X11DRV_PALETTE_ComputeShifts(unsigned long maskbits, int *shift, int *max);
  89 static void X11DRV_PALETTE_FillDefaultColors(void);
  90 static void X11DRV_PALETTE_FormatSystemPalette(void);
  91 static BOOL X11DRV_PALETTE_CheckSysColor(COLORREF c);
  92 static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col);
  93
  94 /***********************************************************************
  95  *           COLOR_Init
  96  *
  97  * Initialize color management.
  98  */
  99 BOOL X11DRV_PALETTE_Init(void)
 100 {
 101     int mask, white, black;
 102     int monoPlane;
 103
 104     Visual *visual = X11DRV_GetVisual();
 105
 106     TRACE("initializing palette manager...\n");
 107
 108     white = WhitePixelOfScreen( X11DRV_GetXScreen() );
 109     black = BlackPixelOfScreen( X11DRV_GetXScreen() );
 110     monoPlane = 1;
 111     for( mask = 1; !((white & mask)^(black & mask)); mask <<= 1 )
 112          monoPlane++;
 113     X11DRV_PALETTE_PaletteFlags = (white & mask) ? X11DRV_PALETTE_WHITESET : 0;
 114     X11DRV_DevCaps.sizePalette = visual->map_entries;
 115
 116     switch(visual->class)
 117     {
 118     case DirectColor:
 119         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
 120     case GrayScale:
 121     case PseudoColor:
 122         if (PROFILE_GetWineIniBool( "x11drv", "PrivateColorMap", 0 ))
 123         {
 124             XSetWindowAttributes win_attr;
 125
 126             X11DRV_PALETTE_PaletteXColormap = TSXCreateColormap( display, X11DRV_GetXRootWindow(),
 127                                                  visual, AllocAll );
 128             if (X11DRV_PALETTE_PaletteXColormap)
 129             {
 130                 X11DRV_PALETTE_PaletteFlags |= (X11DRV_PALETTE_PRIVATE | X11DRV_PALETTE_WHITESET);
 131
 132                 monoPlane = 1;
 133                 for( white = X11DRV_DevCaps.sizePalette - 1; !(white & 1); white >>= 1 )
 134                      monoPlane++;
 135
 136                 if( X11DRV_GetXRootWindow() != DefaultRootWindow(display) )
 137                 {
 138                     win_attr.colormap = X11DRV_PALETTE_PaletteXColormap;
 139                     TSXChangeWindowAttributes( display, X11DRV_GetXRootWindow(),
 140                                          CWColormap, &win_attr );
 141                 }
 142                 break;
 143             }
 144         }
 145         X11DRV_PALETTE_PaletteXColormap = DefaultColormapOfScreen( X11DRV_GetXScreen() );
 146         break;
 147
 148     case StaticGray:
 149         X11DRV_PALETTE_PaletteXColormap = DefaultColormapOfScreen( X11DRV_GetXScreen() );
 150         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
 151         X11DRV_PALETTE_Graymax = (1 << X11DRV_GetDepth())-1;
 152         break;
 153
 154     case TrueColor:
 155         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
 156     case StaticColor: {
 157         int *depths,nrofdepths;
 158         /* FIXME: hack to detect XFree32 XF_VGA16 ... We just have
 159          * depths 1 and 4
 160          */
 161         depths=TSXListDepths(display,DefaultScreen(display),&nrofdepths);
 162         if ((nrofdepths==2) && ((depths[0]==4) || depths[1]==4)) {
 163             monoPlane = 1;
 164             for( white = X11DRV_DevCaps.sizePalette - 1; !(white & 1); white >>= 1 )
 165                 monoPlane++;
 166             X11DRV_PALETTE_PaletteFlags = (white & mask) ? X11DRV_PALETTE_WHITESET : 0;
 167             X11DRV_PALETTE_PaletteXColormap = DefaultColormapOfScreen( X11DRV_GetXScreen() );
 168             TSXFree(depths);
 169             break;
 170         }
 171         TSXFree(depths);
 172         X11DRV_PALETTE_PaletteXColormap = DefaultColormapOfScreen( X11DRV_GetXScreen() );
 173         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
 174         X11DRV_PALETTE_ComputeShifts(visual->red_mask, &X11DRV_PALETTE_Redshift, &X11DRV_PALETTE_Redmax);
 175         X11DRV_PALETTE_ComputeShifts(visual->green_mask, &X11DRV_PALETTE_Greenshift, &X11DRV_PALETTE_Greenmax);
 176         X11DRV_PALETTE_ComputeShifts(visual->blue_mask, &X11DRV_PALETTE_Blueshift, &X11DRV_PALETTE_Bluemax);
 177         break;
 178     }
 179     }
 180
 181     TRACE(" visual class %i (%i)\n",  visual->class, monoPlane);
 182
 183     memset(X11DRV_PALETTE_freeList, 0, 256*sizeof(unsigned char));
 184
 185     if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_PRIVATE)
 186         X11DRV_PALETTE_BuildPrivateMap();
 187     else
 188         X11DRV_PALETTE_BuildSharedMap();
 189
 190     /* Build free list */
 191
 192     if( X11DRV_PALETTE_firstFree != -1 )
 193         X11DRV_PALETTE_FormatSystemPalette();
 194
 195     X11DRV_PALETTE_FillDefaultColors();
 196
 197     if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 198         X11DRV_DevCaps.sizePalette = 0;
 199     else
 200     {
 201         X11DRV_DevCaps.rasterCaps |= RC_PALETTE;
 202         X11DRV_DevCaps.sizePalette = visual->map_entries;
 203     }
 204
 205     return TRUE;
 206 }
 207
 208 /***********************************************************************
 209  *           X11DRV_PALETTE_Cleanup
 210  *
 211  * Free external colors we grabbed in the FillDefaultPalette()
 212  */
 213 void X11DRV_PALETTE_Cleanup(void)
 214 {
 215   if( COLOR_gapFilled )
 216     TSXFreeColors(display, X11DRV_PALETTE_PaletteXColormap,
 217                   (unsigned long*)(X11DRV_PALETTE_PaletteToXPixel + COLOR_gapStart),
 218                   COLOR_gapFilled, 0);
 219 }
 220
 221 /***********************************************************************
 222  *              X11DRV_PALETTE_ComputeShifts
 223  *
 224  * Calculate conversion parameters for direct mapped visuals
 225  */
 226 static void X11DRV_PALETTE_ComputeShifts(unsigned long maskbits, int *shift, int *max)
 227 {
 228     int i;
 229
 230     if (maskbits==0)
 231     {
 232         *shift=0;
 233         *max=0;
 234         return;
 235     }
 236
 237     for(i=0;!(maskbits&1);i++)
 238         maskbits >>= 1;
 239
 240     *shift = i;
 241     *max = maskbits;
 242 }
 243
 244 /***********************************************************************
 245  *           X11DRV_PALETTE_BuildPrivateMap
 246  *
 247  * Allocate colorcells and initialize mapping tables.
 248  */
 249 static BOOL X11DRV_PALETTE_BuildPrivateMap(void)
 250 {
 251     /* Private colormap - identity mapping */
 252
 253     XColor color;
 254     int i;
 255
 256     COLOR_sysPal = (PALETTEENTRY*)xmalloc(sizeof(PALETTEENTRY)*X11DRV_DevCaps.sizePalette);
 257
 258     TRACE("Building private map - %i palette entries\n", X11DRV_DevCaps.sizePalette);
 259
 260       /* Allocate system palette colors */
 261
 262     for( i=0; i < X11DRV_DevCaps.sizePalette; i++ )
 263     {
 264        if( i < NB_RESERVED_COLORS/2 )
 265        {
 266          color.red   = COLOR_sysPalTemplate[i].peRed * 65535 / 255;
 267          color.green = COLOR_sysPalTemplate[i].peGreen * 65535 / 255;
 268          color.blue  = COLOR_sysPalTemplate[i].peBlue * 65535 / 255;
 269          COLOR_sysPal[i] = COLOR_sysPalTemplate[i];
 270        }
 271        else if( i >= X11DRV_DevCaps.sizePalette - NB_RESERVED_COLORS/2 )
 272        {
 273          int j = NB_RESERVED_COLORS + i - X11DRV_DevCaps.sizePalette;
 274          color.red   = COLOR_sysPalTemplate[j].peRed * 65535 / 255;
 275          color.green = COLOR_sysPalTemplate[j].peGreen * 65535 / 255;
 276          color.blue  = COLOR_sysPalTemplate[j].peBlue * 65535 / 255;
 277          COLOR_sysPal[i] = COLOR_sysPalTemplate[j];
 278        }
 279
 280        color.flags = DoRed | DoGreen | DoBlue;
 281        color.pixel = i;
 282        TSXStoreColor(display, X11DRV_PALETTE_PaletteXColormap, &color);
 283
 284        /* Set EGA mapping if color is from the first or last eight */
 285
 286        if (i < 8)
 287            X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
 288        else if (i >= X11DRV_DevCaps.sizePalette - 8 )
 289            X11DRV_PALETTE_mapEGAPixel[i - (X11DRV_DevCaps.sizePalette - 16)] = color.pixel;
 290     }
 291
 292     X11DRV_PALETTE_XPixelToPalette = X11DRV_PALETTE_PaletteToXPixel = NULL;
 293
 294     COLOR_gapStart = 256; COLOR_gapEnd = -1;
 295
 296     X11DRV_PALETTE_firstFree = (X11DRV_DevCaps.sizePalette > NB_RESERVED_COLORS)?NB_RESERVED_COLORS/2 : -1;
 297
 298     return FALSE;
 299 }
 300
 301 /***********************************************************************
 302  *           X11DRV_PALETTE_BuildSharedMap
 303  *
 304  * Allocate colorcells and initialize mapping tables.
 305  */
 306 static BOOL X11DRV_PALETTE_BuildSharedMap(void)
 307 {
 308    XColor               color;
 309    unsigned long        sysPixel[NB_RESERVED_COLORS];
 310    unsigned long*       pixDynMapping = NULL;
 311    unsigned long        plane_masks[1];
 312    int                  i, j, warn = 0;
 313    int                  diff, r, g, b, max = 256, bp = 0, wp = 1;
 314    int                  step = 1;
 315
 316    /* read "AllocSystemColors" from wine.conf */
 317
 318    COLOR_max = PROFILE_GetWineIniInt( "x11drv", "AllocSystemColors", 256);
 319    if (COLOR_max > 256) COLOR_max = 256;
 320    else if (COLOR_max < 20) COLOR_max = 20;
 321    TRACE("%d colors configured.\n", COLOR_max);
 322
 323    TRACE("Building shared map - %i palette entries\n", X11DRV_DevCaps.sizePalette);
 324
 325    /* Be nice and allocate system colors as read-only */
 326
 327    for( i = 0; i < NB_RESERVED_COLORS; i++ )
 328      {
 329         color.red   = COLOR_sysPalTemplate[i].peRed * 65535 / 255;
 330         color.green = COLOR_sysPalTemplate[i].peGreen * 65535 / 255;
 331         color.blue  = COLOR_sysPalTemplate[i].peBlue * 65535 / 255;
 332         color.flags = DoRed | DoGreen | DoBlue;
 333
 334         if (!TSXAllocColor( display, X11DRV_PALETTE_PaletteXColormap, &color ))
 335         {
 336              XColor     best, c;
 337
 338              if( !warn++ )
 339              {
 340                   WARN("Not enough colors for the full system palette.\n");
 341
 342                   bp = BlackPixel(display, DefaultScreen(display));
 343                   wp = WhitePixel(display, DefaultScreen(display));
 344
 345                   max = (0xffffffff)>>(32 - X11DRV_GetDepth());
 346                   if( max > 256 )
 347                   {
 348                       step = max/256;
 349                       max = 256;
 350                   }
 351              }
 352
 353              /* reinit color (XAllocColor() may change it)
 354               * and map to the best shared colorcell */
 355
 356              color.red   = COLOR_sysPalTemplate[i].peRed * 65535 / 255;
 357              color.green = COLOR_sysPalTemplate[i].peGreen * 65535 / 255;
 358              color.blue  = COLOR_sysPalTemplate[i].peBlue * 65535 / 255;
 359
 360              best.pixel = best.red = best.green = best.blue = 0;
 361              for( c.pixel = 0, diff = 0x7fffffff; c.pixel < max; c.pixel += step )
 362              {
 363                 TSXQueryColor(display, X11DRV_PALETTE_PaletteXColormap, &c);
 364                 r = (c.red - color.red)>>8;
 365                 g = (c.green - color.green)>>8;
 366                 b = (c.blue - color.blue)>>8;
 367                 r = r*r + g*g + b*b;
 368                 if( r < diff ) { best = c; diff = r; }
 369              }
 370
 371              if( TSXAllocColor(display, X11DRV_PALETTE_PaletteXColormap, &best) )
 372                  color.pixel = best.pixel;
 373              else color.pixel = (i < NB_RESERVED_COLORS/2)? bp : wp;
 374         }
 375
 376         sysPixel[i] = color.pixel;
 377
 378         TRACE("syscolor(%lx) -> pixel %i\n",
 379                       *(COLORREF*)(COLOR_sysPalTemplate+i), (int)color.pixel);
 380
 381         /* Set EGA mapping if color in the first or last eight */
 382
 383         if (i < 8)
 384             X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
 385         else if (i >= NB_RESERVED_COLORS - 8 )
 386             X11DRV_PALETTE_mapEGAPixel[i - (NB_RESERVED_COLORS-16)] = color.pixel;
 387      }
 388
 389    /* now allocate changeable set */
 390
 391    if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
 392      {
 393         int c_min = 0, c_max = X11DRV_DevCaps.sizePalette, c_val;
 394
 395         TRACE("Dynamic colormap... \n");
 396
 397         /* comment this out if you want to debug palette init */
 398
 399         TSXGrabServer(display);
 400
 401         /* let's become the first client that actually follows
 402          * X guidelines and does binary search...
 403          */
 404
 405         pixDynMapping = (unsigned long*)xmalloc(sizeof(long)*X11DRV_DevCaps.sizePalette);
 406         while( c_max - c_min > 0 )
 407           {
 408              c_val = (c_max + c_min)/2 + (c_max + c_min)%2;
 409
 410              if( !TSXAllocColorCells(display, X11DRV_PALETTE_PaletteXColormap, False,
 411                                    plane_masks, 0, pixDynMapping, c_val) )
 412                  c_max = c_val - 1;
 413              else
 414                {
 415                  TSXFreeColors(display, X11DRV_PALETTE_PaletteXColormap, pixDynMapping, c_val, 0);
 416                  c_min = c_val;
 417                }
 418           }
 419
 420         if( c_min > COLOR_max - NB_RESERVED_COLORS)
 421             c_min = COLOR_max - NB_RESERVED_COLORS;
 422
 423         c_min = (c_min/2) + (c_min/2);          /* need even set for split palette */
 424
 425         if( c_min > 0 )
 426           if( !TSXAllocColorCells(display, X11DRV_PALETTE_PaletteXColormap, False,
 427                                 plane_masks, 0, pixDynMapping, c_min) )
 428             {
 429               WARN("Inexplicable failure during colorcell allocation.\n");
 430               c_min = 0;
 431             }
 432
 433         X11DRV_DevCaps.sizePalette = c_min + NB_RESERVED_COLORS;
 434
 435         TSXUngrabServer(display);
 436
 437         TRACE("adjusted size %i colorcells\n", X11DRV_DevCaps.sizePalette);
 438      }
 439    else if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 440         {
 441           /* virtual colorspace - ToPhysical takes care of
 442            * color translations but we have to allocate full palette
 443            * to maintain compatibility
 444            */
 445           X11DRV_DevCaps.sizePalette = 256;
 446           TRACE("Virtual colorspace - screendepth %i\n", X11DRV_GetDepth());
 447         }
 448    else X11DRV_DevCaps.sizePalette = NB_RESERVED_COLORS;        /* system palette only - however we can alloc a bunch
 449                                          * of colors and map to them */
 450
 451    TRACE("Shared system palette uses %i colors.\n", X11DRV_DevCaps.sizePalette);
 452
 453    /* set gap to account for pixel shortage. It has to be right in the center
 454     * of the system palette because otherwise raster ops get screwed. */
 455
 456    if( X11DRV_DevCaps.sizePalette >= 256 )
 457      { COLOR_gapStart = 256; COLOR_gapEnd = -1; }
 458    else
 459      { COLOR_gapStart = X11DRV_DevCaps.sizePalette/2; COLOR_gapEnd = 255 - X11DRV_DevCaps.sizePalette/2; }
 460
 461    X11DRV_PALETTE_firstFree = ( X11DRV_DevCaps.sizePalette > NB_RESERVED_COLORS &&
 462                       (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL || !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED)) )
 463                      ? NB_RESERVED_COLORS/2 : -1;
 464
 465    COLOR_sysPal = (PALETTEENTRY*)HeapAlloc(GetProcessHeap(),0,sizeof(PALETTEENTRY)*256);
 466    if(COLOR_sysPal == NULL) {
 467        ERR("Can not allocate system palette!\n");
 468        return FALSE;
 469    }
 470
 471    /* setup system palette entry <-> pixel mappings and fill in 20 fixed entries */
 472
 473    if (X11DRV_GetDepth() <= 8)
 474    {
 475        X11DRV_PALETTE_XPixelToPalette = (int*)calloc(256, sizeof(int));
 476        if(X11DRV_PALETTE_XPixelToPalette == NULL) {
 477            ERR("Out of memory: XPixelToPalette!\n");
 478            return FALSE;
 479        }
 480    }
 481
 482    /* for hicolor visuals PaletteToPixel mapping is used to skip
 483     * RGB->pixel calculation in X11DRV_PALETTE_ToPhysical().
 484     */
 485
 486    X11DRV_PALETTE_PaletteToXPixel = (int*)HeapAlloc(GetProcessHeap(),0,sizeof(int)*256);
 487    if(X11DRV_PALETTE_PaletteToXPixel == NULL) {
 488        ERR("Out of memory: PaletteToXPixel!\n");
 489        return FALSE;
 490    }
 491
 492    for( i = j = 0; i < 256; i++ )
 493    {
 494       if( i >= COLOR_gapStart && i <= COLOR_gapEnd )
 495       {
 496          X11DRV_PALETTE_PaletteToXPixel[i] = 0;
 497          COLOR_sysPal[i].peFlags = 0;   /* mark as unused */
 498          continue;
 499       }
 500
 501       if( i < NB_RESERVED_COLORS/2 )
 502       {
 503         X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[i];
 504         COLOR_sysPal[i] = COLOR_sysPalTemplate[i];
 505       }
 506       else if( i >= 256 - NB_RESERVED_COLORS/2 )
 507       {
 508         X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[(i + NB_RESERVED_COLORS) - 256];
 509         COLOR_sysPal[i] = COLOR_sysPalTemplate[(i + NB_RESERVED_COLORS) - 256];
 510       }
 511       else if( pixDynMapping )
 512              X11DRV_PALETTE_PaletteToXPixel[i] = pixDynMapping[j++];
 513            else
 514              X11DRV_PALETTE_PaletteToXPixel[i] = i;
 515
 516       TRACE("index %i -> pixel %i\n", i, X11DRV_PALETTE_PaletteToXPixel[i]);
 517
 518       if( X11DRV_PALETTE_XPixelToPalette )
 519           X11DRV_PALETTE_XPixelToPalette[X11DRV_PALETTE_PaletteToXPixel[i]] = i;
 520    }
 521
 522    if( pixDynMapping ) free(pixDynMapping);
 523
 524    return TRUE;
 525 }
 526
 527 /***********************************************************************
 528  *      Colormap Initialization
 529  */
 530 static void X11DRV_PALETTE_FillDefaultColors(void)
 531 {
 532  /* initialize unused entries to what Windows uses as a color
 533   * cube - based on Greg Kreider's code.
 534   */
 535
 536   int i = 0, idx = 0;
 537   int red, no_r, inc_r;
 538   int green, no_g, inc_g;
 539   int blue, no_b, inc_b;
 540
 541   if (X11DRV_DevCaps.sizePalette <= NB_RESERVED_COLORS)
 542         return;
 543   while (i*i*i < (X11DRV_DevCaps.sizePalette - NB_RESERVED_COLORS)) i++;
 544   no_r = no_g = no_b = --i;
 545   if ((no_r * (no_g+1) * no_b) < (X11DRV_DevCaps.sizePalette - NB_RESERVED_COLORS)) no_g++;
 546   if ((no_r * no_g * (no_b+1)) < (X11DRV_DevCaps.sizePalette - NB_RESERVED_COLORS)) no_b++;
 547   inc_r = (255 - NB_COLORCUBE_START_INDEX)/no_r;
 548   inc_g = (255 - NB_COLORCUBE_START_INDEX)/no_g;
 549   inc_b = (255 - NB_COLORCUBE_START_INDEX)/no_b;
 550
 551   idx = X11DRV_PALETTE_firstFree;
 552
 553   if( idx != -1 )
 554     for (blue = NB_COLORCUBE_START_INDEX; blue < 256 && idx; blue += inc_b )
 555      for (green = NB_COLORCUBE_START_INDEX; green < 256 && idx; green += inc_g )
 556       for (red = NB_COLORCUBE_START_INDEX; red < 256 && idx; red += inc_r )
 557       {
 558          /* weird but true */
 559
 560          if( red == NB_COLORCUBE_START_INDEX && green == red && blue == green ) continue;
 561
 562          COLOR_sysPal[idx].peRed = red;
 563          COLOR_sysPal[idx].peGreen = green;
 564          COLOR_sysPal[idx].peBlue = blue;
 565
 566          /* set X color */
 567
 568          if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 569          {
 570             if (X11DRV_PALETTE_Redmax != 255) no_r = (red * X11DRV_PALETTE_Redmax) / 255;
 571             if (X11DRV_PALETTE_Greenmax != 255) no_g = (green * X11DRV_PALETTE_Greenmax) / 255;
 572             if (X11DRV_PALETTE_Bluemax != 255) no_b = (blue * X11DRV_PALETTE_Bluemax) / 255;
 573
 574             X11DRV_PALETTE_PaletteToXPixel[idx] = (no_r << X11DRV_PALETTE_Redshift) | (no_g << X11DRV_PALETTE_Greenshift) | (no_b << X11DRV_PALETTE_Blueshift);
 575          }
 576          else if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
 577          {
 578            XColor color;
 579            color.pixel = (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[idx] : idx;
 580            color.red = COLOR_sysPal[idx].peRed << 8;
 581            color.green = COLOR_sysPal[idx].peGreen << 8;
 582            color.blue =  COLOR_sysPal[idx].peBlue << 8;
 583            color.flags = DoRed | DoGreen | DoBlue;
 584            TSXStoreColor(display, X11DRV_PALETTE_PaletteXColormap, &color);
 585          }
 586          idx = X11DRV_PALETTE_freeList[idx];
 587       }
 588
 589   /* try to fill some entries in the "gap" with
 590    * what's already in the colormap - they will be
 591    * mappable to but not changeable. */
 592
 593   if( COLOR_gapStart < COLOR_gapEnd && X11DRV_PALETTE_XPixelToPalette )
 594   {
 595     XColor      xc;
 596     int         r, g, b, max;
 597
 598     max = COLOR_max - (256 - (COLOR_gapEnd - COLOR_gapStart));
 599     for ( i = 0, idx = COLOR_gapStart; i < 256 && idx <= COLOR_gapEnd; i++ )
 600       if( X11DRV_PALETTE_XPixelToPalette[i] == 0 )
 601         {
 602           xc.pixel = i;
 603
 604           TSXQueryColor(display, X11DRV_PALETTE_PaletteXColormap, &xc);
 605           r = xc.red>>8; g = xc.green>>8; b = xc.blue>>8;
 606
 607           if( xc.pixel < 256 && X11DRV_PALETTE_CheckSysColor(RGB(r, g, b)) &&
 608               TSXAllocColor(display, X11DRV_PALETTE_PaletteXColormap, &xc) )
 609           {
 610              X11DRV_PALETTE_XPixelToPalette[xc.pixel] = idx;
 611              X11DRV_PALETTE_PaletteToXPixel[idx] = xc.pixel;
 612            *(COLORREF*)(COLOR_sysPal + idx) = RGB(r, g, b);
 613              COLOR_sysPal[idx++].peFlags |= PC_SYS_USED;
 614              if( --max <= 0 ) break;
 615           }
 616         }
 617     COLOR_gapFilled = idx - COLOR_gapStart;
 618   }
 619 }
 620
 621
 622 /***********************************************************************
 623  *           X11DRV_PALETTE_ToLogical
 624  *
 625  * Return RGB color for given X pixel.
 626  */
 627 COLORREF X11DRV_PALETTE_ToLogical(int pixel)
 628 {
 629     XColor color;
 630
 631 #if 0
 632     /* truecolor visual */
 633
 634     if (X11DRV_GetDepth() >= 24) return pixel;
 635 #endif
 636
 637     /* check for hicolor visuals first */
 638
 639     if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED && !X11DRV_PALETTE_Graymax )
 640     {
 641          color.red = (pixel >> X11DRV_PALETTE_Redshift) & X11DRV_PALETTE_Redmax;
 642          color.green = (pixel >> X11DRV_PALETTE_Greenshift) & X11DRV_PALETTE_Greenmax;
 643          color.blue = (pixel >> X11DRV_PALETTE_Blueshift) & X11DRV_PALETTE_Bluemax;
 644          return RGB(MulDiv(color.red, 255, X11DRV_PALETTE_Redmax),
 645                     MulDiv(color.green, 255, X11DRV_PALETTE_Greenmax),
 646                     MulDiv(color.blue, 255, X11DRV_PALETTE_Bluemax));
 647     }
 648
 649     /* check if we can bypass X */
 650
 651     if ((X11DRV_GetDepth() <= 8) && (pixel < 256) &&
 652        !(X11DRV_PALETTE_PaletteFlags & (X11DRV_PALETTE_VIRTUAL | X11DRV_PALETTE_FIXED)) )
 653          return  ( *(COLORREF*)(COLOR_sysPal +
 654                    ((X11DRV_PALETTE_XPixelToPalette)?X11DRV_PALETTE_XPixelToPalette[pixel]:pixel)) ) & 0x00ffffff;
 655
 656     color.pixel = pixel;
 657     TSXQueryColor(display, X11DRV_PALETTE_PaletteXColormap, &color);
 658     return RGB(color.red >> 8, color.green >> 8, color.blue >> 8);
 659 }
 660
 661 /***********************************************************************
 662  *           X11DRV_PALETTE_ToPhysical
 663  *
 664  * Return the physical color closest to 'color'.
 665  */
 666 int X11DRV_PALETTE_ToPhysical( DC *dc, COLORREF color )
 667 {
 668     WORD                 index = 0;
 669     HPALETTE16           hPal = (dc)? dc->w.hPalette: STOCK_DEFAULT_PALETTE;
 670     unsigned char        spec_type = color >> 24;
 671     PALETTEOBJ*          palPtr = (PALETTEOBJ *) GDI_GetObjPtr( hPal, PALETTE_MAGIC );
 672
 673     /* palPtr can be NULL when DC is being destroyed */
 674     if( !palPtr ) return 0;
 675
 676     if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED )
 677     {
 678         /* there is no colormap limitation; we are going to have to compute
 679          * the pixel value from the visual information stored earlier
 680          */
 681
 682         unsigned        long red, green, blue;
 683         unsigned        idx = 0;
 684
 685         switch(spec_type)
 686         {
 687           case 1: /* PALETTEINDEX */
 688
 689             if( (idx = color & 0xffff) >= palPtr->logpalette.palNumEntries)
 690             {
 691                 WARN("RGB(%lx) : idx %d is out of bounds, assuming black\n", color, idx);
 692                 GDI_HEAP_UNLOCK( hPal );
 693                 return 0;
 694             }
 695
 696             if( palPtr->mapping )
 697             {
 698                 GDI_HEAP_UNLOCK( hPal );
 699                 return palPtr->mapping[idx];
 700             }
 701             color = *(COLORREF*)(palPtr->logpalette.palPalEntry + idx);
 702             break;
 703
 704           default:
 705             color &= 0xffffff;
 706             /* fall through to RGB */
 707
 708           case 0: /* RGB */
 709             if( dc && (dc->w.bitsPerPixel == 1) )
 710             {
 711                 GDI_HEAP_UNLOCK( hPal );
 712                 return (((color >> 16) & 0xff) +
 713                         ((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? 1 : 0;
 714             }
 715
 716         }
 717
 718         red = GetRValue(color); green = GetGValue(color); blue = GetBValue(color);
 719
 720         if (X11DRV_PALETTE_Graymax)
 721         {
 722             /* grayscale only; return scaled value */
 723             GDI_HEAP_UNLOCK( hPal );
 724             return ( (red * 30 + green * 69 + blue * 11) * X11DRV_PALETTE_Graymax) / 25500;
 725         }
 726         else
 727         {
 728             /* scale each individually and construct the TrueColor pixel value */
 729             if (X11DRV_PALETTE_Redmax != 255)
 730                 red = MulDiv(red, X11DRV_PALETTE_Redmax, 255);
 731             if (X11DRV_PALETTE_Greenmax != 255)
 732                 green = MulDiv(green, X11DRV_PALETTE_Greenmax, 255);
 733             if (X11DRV_PALETTE_Bluemax != 255)
 734                 blue = MulDiv(blue, X11DRV_PALETTE_Bluemax, 255);
 735
 736             GDI_HEAP_UNLOCK( hPal );
 737             return (red << X11DRV_PALETTE_Redshift) | (green << X11DRV_PALETTE_Greenshift) | (blue << X11DRV_PALETTE_Blueshift);
 738         }
 739     }
 740     else
 741     {
 742
 743         if( !palPtr->mapping )
 744             WARN("Palette %04x is not realized\n", dc->w.hPalette);
 745
 746         switch(spec_type)       /* we have to peruse DC and system palette */
 747         {
 748             default:
 749                 color &= 0xffffff;
 750                 /* fall through to RGB */
 751
 752             case 0:  /* RGB */
 753                 if( dc && (dc->w.bitsPerPixel == 1) )
 754                 {
 755                     GDI_HEAP_UNLOCK( hPal );
 756                     return (((color >> 16) & 0xff) +
 757                             ((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? 1 : 0;
 758                 }
 759
 760                 index = COLOR_PaletteLookupPixel( COLOR_sysPal, 256,
 761                                                   X11DRV_PALETTE_PaletteToXPixel, color, FALSE);
 762
 763                 /* TRACE(palette,"RGB(%lx) -> pixel %i\n", color, index);
 764                  */
 765                 break;
 766             case 1:  /* PALETTEINDEX */
 767                 index = color & 0xffff;
 768
 769                 if( index >= palPtr->logpalette.palNumEntries )
 770                     WARN("RGB(%lx) : index %i is out of bounds\n", color, index);
 771                 else if( palPtr->mapping ) index = palPtr->mapping[index];
 772
 773                 /*  TRACE(palette,"PALETTEINDEX(%04x) -> pixel %i\n", (WORD)color, index);
 774                  */
 775                 break;
 776             case 2:  /* PALETTERGB */
 777                 index = COLOR_PaletteLookupPixel( palPtr->logpalette.palPalEntry,
 778                                              palPtr->logpalette.palNumEntries,
 779                                              palPtr->mapping, color, FALSE);
 780                 /* TRACE(palette,"PALETTERGB(%lx) -> pixel %i\n", color, index);
 781                  */
 782                 break;
 783         }
 784     }
 785
 786     GDI_HEAP_UNLOCK( hPal );
 787     return index;
 788 }
 789
 790 /***********************************************************************
 791  *           X11DRV_PALETTE_LookupSystemXPixel
 792  */
 793 static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col)
 794 {
 795  int            i, best = 0, diff = 0x7fffffff;
 796  int            size = X11DRV_DevCaps.sizePalette;
 797  int            r,g,b;
 798
 799  for( i = 0; i < size && diff ; i++ )
 800     {
 801       if( i == NB_RESERVED_COLORS/2 )
 802       {
 803         int newi = size - NB_RESERVED_COLORS/2;
 804         if (newi>i) i=newi;
 805       }
 806
 807       r = COLOR_sysPal[i].peRed - GetRValue(col);
 808       g = COLOR_sysPal[i].peGreen - GetGValue(col);
 809       b = COLOR_sysPal[i].peBlue - GetBValue(col);
 810
 811       r = r*r + g*g + b*b;
 812
 813       if( r < diff ) { best = i; diff = r; }
 814     }
 815
 816  return (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[best] : best;
 817 }
 818
 819 /***********************************************************************
 820  *           X11DRV_PALETTE_FormatSystemPalette
 821  */
 822 static void X11DRV_PALETTE_FormatSystemPalette(void)
 823 {
 824  /* Build free list so we'd have an easy way to find
 825   * out if there are any available colorcells.
 826   */
 827
 828   int i, j = X11DRV_PALETTE_firstFree = NB_RESERVED_COLORS/2;
 829
 830   COLOR_sysPal[j].peFlags = 0;
 831   for( i = NB_RESERVED_COLORS/2 + 1 ; i < 256 - NB_RESERVED_COLORS/2 ; i++ )
 832     if( i < COLOR_gapStart || i > COLOR_gapEnd )
 833       {
 834         COLOR_sysPal[i].peFlags = 0;  /* unused tag */
 835         X11DRV_PALETTE_freeList[j] = i;   /* next */
 836         j = i;
 837       }
 838   X11DRV_PALETTE_freeList[j] = 0;
 839 }
 840
 841 /***********************************************************************
 842  *           X11DRV_PALETTE_CheckSysColor
 843  */
 844 static BOOL X11DRV_PALETTE_CheckSysColor(COLORREF c)
 845 {
 846   int i;
 847   for( i = 0; i < NB_RESERVED_COLORS; i++ )
 848        if( c == (*(COLORREF*)(COLOR_sysPalTemplate + i) & 0x00ffffff) )
 849            return 0;
 850   return 1;
 851 }
 852
 853 /***********************************************************************
 854  *           X11DRV_PALETTE_SetMapping
 855  *
 856  * Set the color-mapping table for selected palette.
 857  * Return number of entries which mapping has changed.
 858  */
 859 int X11DRV_PALETTE_SetMapping( PALETTEOBJ* palPtr, UINT uStart, UINT uNum, BOOL mapOnly )
 860 {
 861     char flag;
 862     int  prevMapping = (palPtr->mapping) ? 1 : 0;
 863     int  index, iRemapped = 0;
 864     int* mapping;
 865
 866     /* reset dynamic system palette entries */
 867
 868     if( !mapOnly && X11DRV_PALETTE_firstFree != -1)
 869          X11DRV_PALETTE_FormatSystemPalette();
 870
 871     /* initialize palette mapping table */
 872
 873     mapping = HeapReAlloc( GetProcessHeap(), 0, palPtr->mapping,
 874                            sizeof(int)*palPtr->logpalette.palNumEntries);
 875     if(mapping == NULL) {
 876         ERR("Can not allocate new mapping -- memory exausted!");
 877         return 0;
 878     }
 879     palPtr->mapping = mapping;
 880
 881     for( uNum += uStart; uStart < uNum; uStart++ )
 882     {
 883         index = -1;
 884         flag = PC_SYS_USED;
 885
 886         switch( palPtr->logpalette.palPalEntry[uStart].peFlags & 0x07 )
 887         {
 888         case PC_EXPLICIT:   /* palette entries are indices into system palette */
 889             index = *(WORD*)(palPtr->logpalette.palPalEntry + uStart);
 890             if( index > 255 || (index >= COLOR_gapStart && index <= COLOR_gapEnd) )
 891             {
 892                 WARN("PC_EXPLICIT: idx %d out of system palette, assuming black.\n", index);
 893                 index = 0;
 894             }
 895             break;
 896
 897         case PC_RESERVED:   /* forbid future mappings to this entry */
 898             flag |= PC_SYS_RESERVED;
 899
 900             /* fall through */
 901         default:            /* try to collapse identical colors */
 902             index = COLOR_PaletteLookupExactIndex(COLOR_sysPal, 256,
 903                              *(COLORREF*)(palPtr->logpalette.palPalEntry + uStart));
 904             /* fall through */
 905         case PC_NOCOLLAPSE:
 906             if( index < 0 )
 907             {
 908                 if( X11DRV_PALETTE_firstFree > 0 && !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
 909                 {
 910                     XColor color;
 911                     index = X11DRV_PALETTE_firstFree;  /* ought to be available */
 912                     X11DRV_PALETTE_firstFree = X11DRV_PALETTE_freeList[index];
 913
 914                     color.pixel = (X11DRV_PALETTE_PaletteToXPixel) ? X11DRV_PALETTE_PaletteToXPixel[index] : index;
 915                     color.red = palPtr->logpalette.palPalEntry[uStart].peRed << 8;
 916                     color.green = palPtr->logpalette.palPalEntry[uStart].peGreen << 8;
 917                     color.blue = palPtr->logpalette.palPalEntry[uStart].peBlue << 8;
 918                     color.flags = DoRed | DoGreen | DoBlue;
 919                     TSXStoreColor(display, X11DRV_PALETTE_PaletteXColormap, &color);
 920
 921                     COLOR_sysPal[index] = palPtr->logpalette.palPalEntry[uStart];
 922                     COLOR_sysPal[index].peFlags = flag;
 923                     X11DRV_PALETTE_freeList[index] = 0;
 924
 925                     if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
 926                     break;
 927                 }
 928                 else if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 929                 {
 930                     index = X11DRV_PALETTE_ToPhysical( NULL, 0x00ffffff &
 931                              *(COLORREF*)(palPtr->logpalette.palPalEntry + uStart));
 932                     break;
 933                 }
 934
 935                 /* we have to map to existing entry in the system palette */
 936
 937                 index = COLOR_PaletteLookupPixel(COLOR_sysPal, 256, NULL,
 938                        *(COLORREF*)(palPtr->logpalette.palPalEntry + uStart), TRUE);
 939             }
 940             palPtr->logpalette.palPalEntry[uStart].peFlags |= PC_SYS_USED;
 941
 942             if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
 943             break;
 944         }
 945
 946         if( !prevMapping || palPtr->mapping[uStart] != index ) iRemapped++;
 947         palPtr->mapping[uStart] = index;
 948
 949         TRACE("entry %i (%lx) -> pixel %i\n", uStart,
 950                                 *(COLORREF*)(palPtr->logpalette.palPalEntry + uStart), index);
 951
 952     }
 953     return iRemapped;
 954 }
 955
 956 /***********************************************************************
 957  *           X11DRV_PALETTE_UpdateMapping
 958  *
 959  * Update the color-mapping table for selected palette.
 960  * Return number of entries which mapping has changed.
 961  */
 962 int X11DRV_PALETTE_UpdateMapping(PALETTEOBJ *palPtr)
 963 {
 964   int i, index, realized = 0;
 965
 966   if (!X11DRV_DevCaps.sizePalette)
 967     return 0;
 968
 969   for( i = 0; i < 20; i++ )
 970     {
 971       index = X11DRV_PALETTE_LookupSystemXPixel(*(COLORREF*)(palPtr->logpalette.palPalEntry + i));
 972
 973       /* mapping is allocated in COLOR_InitPalette() */
 974
 975       if( index != palPtr->mapping[i] ) { palPtr->mapping[i]=index; realized++; }
 976     }
 977
 978     return realized;
 979 }
 980
 981 /**************************************************************************
 982  *              X11DRV_PALETTE_IsDark
 983  */
 984 BOOL X11DRV_PALETTE_IsDark(int pixel)
 985 {
 986   COLORREF col = X11DRV_PALETTE_ToLogical(pixel);
 987   return (GetRValue(col) + GetGValue(col) + GetBValue(col)) <= 0x180;
 988 }
 989
 990 #endif /* !defined(X_DISPLAY_MISSING) */