git.oblomov.eu Git - wine/blob - dlls/winex11.drv/palette.c

   1 /*
   2  * X11DRV OEM bitmap objects
   3  *
   4  * Copyright 1994, 1995 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdarg.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "x11drv.h"
  30 #include "wine/debug.h"
  31
  32 WINE_DEFAULT_DEBUG_CHANNEL(palette);
  33
  34 /* Palette indexed mode:
  35  *      logical palette -> mapping -> pixel
  36  *
  37  *
  38  * Windows needs contiguous color space ( from 0 to n ) but
  39  * it is possible only with the private colormap. Otherwise we
  40  * have to map DC palette indices to real pixel values. With
  41  * private colormaps it boils down to the identity mapping. The
  42  * other special case is when we have a fixed color visual with
  43  * the screendepth > 8 - we abandon palette mappings altogether
  44  * because pixel values can be calculated without X server
  45  * assistance.
  46  */
  47
  48 #define NB_RESERVED_COLORS     20   /* number of fixed colors in system palette */
  49
  50 #define PC_SYS_USED            0x80 /* palentry is used (both system and logical) */
  51 #define PC_SYS_RESERVED        0x40 /* system palentry is not to be mapped to */
  52
  53 static PALETTEENTRY *COLOR_sysPal; /* current system palette */
  54
  55 static int COLOR_gapStart = 256;
  56 static int COLOR_gapEnd = -1;
  57 static int COLOR_gapFilled = 0;
  58
  59 Colormap X11DRV_PALETTE_PaletteXColormap = 0;
  60 UINT16   X11DRV_PALETTE_PaletteFlags     = 0;
  61
  62 /* initialize to zero to handle abortive X11DRV_PALETTE_VIRTUAL visuals */
  63 ColorShifts X11DRV_PALETTE_default_shifts = { {0,0,0,}, {0,0,0}, {0,0,0}, {0,0,0}, {0,0,0}, {0,0,0} };
  64 static int X11DRV_PALETTE_Graymax        = 0;
  65
  66 static int palette_size;
  67
  68 /* First free dynamic color cell, 0 = full palette, -1 = fixed palette */
  69 static int           X11DRV_PALETTE_firstFree = 0;
  70 static unsigned char X11DRV_PALETTE_freeList[256];
  71
  72 static XContext palette_context;  /* X context to associate a color mapping to a palette */
  73
  74 static CRITICAL_SECTION palette_cs;
  75 static CRITICAL_SECTION_DEBUG critsect_debug =
  76 {
  77     0, 0, &palette_cs,
  78     { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
  79       0, 0, { (DWORD_PTR)(__FILE__ ": palette_cs") }
  80 };
  81 static CRITICAL_SECTION palette_cs = { &critsect_debug, -1, 0, 0, 0, 0 };
  82
  83 /**********************************************************************/
  84
  85    /* Map an EGA index (0..15) to a pixel value in the system color space.  */
  86
  87 int X11DRV_PALETTE_mapEGAPixel[16];
  88
  89 /**********************************************************************/
  90
  91 #define NB_COLORCUBE_START_INDEX        63
  92 #define NB_PALETTE_EMPTY_VALUE          -1
  93
  94 /* Maps entry in the system palette to X pixel value */
  95 int *X11DRV_PALETTE_PaletteToXPixel = NULL;
  96
  97 /* Maps pixel to the entry in the system palette */
  98 int *X11DRV_PALETTE_XPixelToPalette = NULL;
  99
 100 /**********************************************************************/
 101
 102 static BOOL X11DRV_PALETTE_BuildPrivateMap( const PALETTEENTRY *sys_pal_template );
 103 static BOOL X11DRV_PALETTE_BuildSharedMap( const PALETTEENTRY *sys_pal_template );
 104 static void X11DRV_PALETTE_FillDefaultColors( const PALETTEENTRY *sys_pal_template );
 105 static void X11DRV_PALETTE_FormatSystemPalette(void);
 106 static BOOL X11DRV_PALETTE_CheckSysColor( const PALETTEENTRY *sys_pal_template, COLORREF c);
 107 static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col);
 108
 109
 110 /***********************************************************************
 111  *           palette_get_mapping
 112  */
 113 static int *palette_get_mapping( HPALETTE hpal )
 114 {
 115     int *mapping;
 116
 117     wine_tsx11_lock();
 118     if (XFindContext( gdi_display, (XID)hpal, palette_context, (char **)&mapping )) mapping = NULL;
 119     wine_tsx11_unlock();
 120     return mapping;
 121 }
 122
 123
 124 /***********************************************************************
 125  *           palette_set_mapping
 126  */
 127 static void palette_set_mapping( HPALETTE hpal, int *mapping )
 128 {
 129     wine_tsx11_lock();
 130     XSaveContext( gdi_display, (XID)hpal, palette_context, (char *)mapping );
 131     wine_tsx11_unlock();
 132 }
 133
 134
 135 /***********************************************************************
 136  *           COLOR_Init
 137  *
 138  * Initialize color management.
 139  */
 140 int X11DRV_PALETTE_Init(void)
 141 {
 142     int mask, white, black;
 143     int monoPlane;
 144     int *mapping;
 145     PALETTEENTRY sys_pal_template[NB_RESERVED_COLORS];
 146
 147     TRACE("initializing palette manager...\n");
 148
 149     wine_tsx11_lock();
 150     palette_context = XUniqueContext();
 151     wine_tsx11_unlock();
 152     white = WhitePixel( gdi_display, DefaultScreen(gdi_display) );
 153     black = BlackPixel( gdi_display, DefaultScreen(gdi_display) );
 154     monoPlane = 1;
 155     for( mask = 1; !((white & mask)^(black & mask)); mask <<= 1 )
 156          monoPlane++;
 157     X11DRV_PALETTE_PaletteFlags = (white & mask) ? X11DRV_PALETTE_WHITESET : 0;
 158     palette_size = visual->map_entries;
 159
 160     switch(visual->class)
 161     {
 162     case DirectColor:
 163         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
 164     case GrayScale:
 165     case PseudoColor:
 166         wine_tsx11_lock();
 167         if (private_color_map)
 168         {
 169             XSetWindowAttributes win_attr;
 170
 171             X11DRV_PALETTE_PaletteXColormap = XCreateColormap( gdi_display, root_window,
 172                                                                visual, AllocAll );
 173             if (X11DRV_PALETTE_PaletteXColormap)
 174             {
 175                 X11DRV_PALETTE_PaletteFlags |= (X11DRV_PALETTE_PRIVATE | X11DRV_PALETTE_WHITESET);
 176
 177                 monoPlane = 1;
 178                 for( white = palette_size - 1; !(white & 1); white >>= 1 )
 179                      monoPlane++;
 180
 181                 if( root_window != DefaultRootWindow(gdi_display) )
 182                 {
 183                     win_attr.colormap = X11DRV_PALETTE_PaletteXColormap;
 184                     XChangeWindowAttributes( gdi_display, root_window, CWColormap, &win_attr );
 185                 }
 186             }
 187         } else {
 188           X11DRV_PALETTE_PaletteXColormap = XCreateColormap(gdi_display, root_window,
 189                                                             visual, AllocNone);
 190         }
 191         wine_tsx11_unlock();
 192         break;
 193
 194     case StaticGray:
 195         wine_tsx11_lock();
 196         X11DRV_PALETTE_PaletteXColormap = XCreateColormap(gdi_display, root_window,
 197                                                           visual, AllocNone);
 198         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
 199         X11DRV_PALETTE_Graymax = (1 << screen_depth)-1;
 200         wine_tsx11_unlock();
 201         break;
 202
 203     case TrueColor:
 204         X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
 205     case StaticColor: {
 206         int *depths,nrofdepths;
 207         /* FIXME: hack to detect XFree32 XF_VGA16 ... We just have
 208          * depths 1 and 4
 209          */
 210         wine_tsx11_lock();
 211         depths = XListDepths(gdi_display,DefaultScreen(gdi_display),&nrofdepths);
 212         if ((nrofdepths==2) && ((depths[0]==4) || depths[1]==4)) {
 213             monoPlane = 1;
 214             for( white = palette_size - 1; !(white & 1); white >>= 1 )
 215                 monoPlane++;
 216             X11DRV_PALETTE_PaletteFlags = (white & mask) ? X11DRV_PALETTE_WHITESET : 0;
 217             X11DRV_PALETTE_PaletteXColormap = XCreateColormap(gdi_display, root_window,
 218                                                               visual, AllocNone);
 219         }
 220         else
 221         {
 222             X11DRV_PALETTE_PaletteXColormap = XCreateColormap(gdi_display, root_window,
 223                                                               visual, AllocNone);
 224             X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
 225             X11DRV_PALETTE_ComputeColorShifts(&X11DRV_PALETTE_default_shifts, visual->red_mask, visual->green_mask, visual->blue_mask);
 226         }
 227         XFree(depths);
 228         wine_tsx11_unlock();
 229         break;
 230       }
 231     }
 232
 233     TRACE(" visual class %i (%i)\n",  visual->class, monoPlane);
 234
 235     GetPaletteEntries( GetStockObject(DEFAULT_PALETTE), 0, NB_RESERVED_COLORS, sys_pal_template );
 236
 237     if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 238     {
 239         palette_size = 0;
 240     }
 241     else
 242     {
 243         if ((mapping = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(int) * NB_RESERVED_COLORS )))
 244             palette_set_mapping( GetStockObject(DEFAULT_PALETTE), mapping );
 245
 246         if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_PRIVATE)
 247             X11DRV_PALETTE_BuildPrivateMap( sys_pal_template );
 248         else
 249             X11DRV_PALETTE_BuildSharedMap( sys_pal_template );
 250
 251         /* Build free list */
 252
 253         if( X11DRV_PALETTE_firstFree != -1 )
 254             X11DRV_PALETTE_FormatSystemPalette();
 255
 256         X11DRV_PALETTE_FillDefaultColors( sys_pal_template );
 257         palette_size = visual->map_entries;
 258     }
 259
 260     return palette_size;
 261 }
 262
 263 /***********************************************************************
 264  *           X11DRV_PALETTE_Cleanup
 265  *
 266  * Free external colors we grabbed in the FillDefaultPalette()
 267  */
 268 void X11DRV_PALETTE_Cleanup(void)
 269 {
 270   if( COLOR_gapFilled )
 271   {
 272       wine_tsx11_lock();
 273       XFreeColors(gdi_display, X11DRV_PALETTE_PaletteXColormap,
 274                   (unsigned long*)(X11DRV_PALETTE_PaletteToXPixel + COLOR_gapStart),
 275                   COLOR_gapFilled, 0);
 276       wine_tsx11_unlock();
 277   }
 278   DeleteCriticalSection(&palette_cs);
 279 }
 280
 281 /***********************************************************************
 282  *              X11DRV_PALETTE_ComputeChannelShift
 283  *
 284  * Calculate conversion parameters for a given color mask
 285  */
 286 static void X11DRV_PALETTE_ComputeChannelShift(unsigned long maskbits, ChannelShift *physical, ChannelShift *to_logical)
 287 {
 288     int i;
 289
 290     if (maskbits==0)
 291     {
 292         physical->shift=0;
 293         physical->scale=0;
 294         physical->max=0;
 295         to_logical->shift=0;
 296         to_logical->scale=0;
 297         to_logical->max=0;
 298         return;
 299     }
 300
 301     for(i=0;!(maskbits&1);i++)
 302         maskbits >>= 1;
 303
 304     physical->shift = i;
 305     physical->max = maskbits;
 306
 307     for(i=0;maskbits!=0;i++)
 308         maskbits >>= 1;
 309     physical->scale = i;
 310
 311     if (physical->scale>8)
 312     {
 313         /* On FreeBSD, VNC's default 32bpp mode is bgrabb (ffc00000,3ff800,7ff)!
 314          * So we adjust the shifts to also normalize the color fields to
 315          * the Win32 standard of 8 bits per color.
 316          */
 317         to_logical->shift=physical->shift+(physical->scale-8);
 318         to_logical->scale=8;
 319         to_logical->max=0xff;
 320     } else {
 321         to_logical->shift=physical->shift;
 322         to_logical->scale=physical->scale;
 323         to_logical->max=physical->max;
 324     }
 325 }
 326
 327 /***********************************************************************
 328  *      X11DRV_PALETTE_ComputeColorShifts
 329  *
 330  * Calculate conversion parameters for a given color
 331  */
 332 void X11DRV_PALETTE_ComputeColorShifts(ColorShifts *shifts, unsigned long redMask, unsigned long greenMask, unsigned long blueMask)
 333 {
 334     X11DRV_PALETTE_ComputeChannelShift(redMask, &shifts->physicalRed, &shifts->logicalRed);
 335     X11DRV_PALETTE_ComputeChannelShift(greenMask, &shifts->physicalGreen, &shifts->logicalGreen);
 336     X11DRV_PALETTE_ComputeChannelShift(blueMask, &shifts->physicalBlue, &shifts->logicalBlue);
 337 }
 338
 339 /***********************************************************************
 340  *           X11DRV_PALETTE_BuildPrivateMap
 341  *
 342  * Allocate colorcells and initialize mapping tables.
 343  */
 344 static BOOL X11DRV_PALETTE_BuildPrivateMap( const PALETTEENTRY *sys_pal_template )
 345 {
 346     /* Private colormap - identity mapping */
 347
 348     XColor color;
 349     int i;
 350
 351     if((COLOR_sysPal = HeapAlloc(GetProcessHeap(), 0, sizeof(PALETTEENTRY)*palette_size)) == NULL) {
 352         WARN("Unable to allocate the system palette\n");
 353         return FALSE;
 354     }
 355
 356     TRACE("Building private map - %i palette entries\n", palette_size);
 357
 358       /* Allocate system palette colors */
 359
 360     wine_tsx11_lock();
 361     for( i=0; i < palette_size; i++ )
 362     {
 363        if( i < NB_RESERVED_COLORS/2 )
 364        {
 365          color.red   = sys_pal_template[i].peRed * 65535 / 255;
 366          color.green = sys_pal_template[i].peGreen * 65535 / 255;
 367          color.blue  = sys_pal_template[i].peBlue * 65535 / 255;
 368          COLOR_sysPal[i] = sys_pal_template[i];
 369          COLOR_sysPal[i].peFlags |= PC_SYS_USED;
 370        }
 371        else if( i >= palette_size - NB_RESERVED_COLORS/2 )
 372        {
 373          int j = NB_RESERVED_COLORS + i - palette_size;
 374          color.red   = sys_pal_template[j].peRed * 65535 / 255;
 375          color.green = sys_pal_template[j].peGreen * 65535 / 255;
 376          color.blue  = sys_pal_template[j].peBlue * 65535 / 255;
 377          COLOR_sysPal[i] = sys_pal_template[j];
 378          COLOR_sysPal[i].peFlags |= PC_SYS_USED;
 379        }
 380
 381        color.flags = DoRed | DoGreen | DoBlue;
 382        color.pixel = i;
 383        XStoreColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &color);
 384
 385        /* Set EGA mapping if color is from the first or last eight */
 386
 387        if (i < 8)
 388            X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
 389        else if (i >= palette_size - 8 )
 390            X11DRV_PALETTE_mapEGAPixel[i - (palette_size - 16)] = color.pixel;
 391     }
 392     wine_tsx11_unlock();
 393
 394     X11DRV_PALETTE_XPixelToPalette = X11DRV_PALETTE_PaletteToXPixel = NULL;
 395
 396     COLOR_gapStart = 256; COLOR_gapEnd = -1;
 397
 398     X11DRV_PALETTE_firstFree = (palette_size > NB_RESERVED_COLORS)?NB_RESERVED_COLORS/2 : -1;
 399
 400     return FALSE;
 401 }
 402
 403 /***********************************************************************
 404  *           X11DRV_PALETTE_BuildSharedMap
 405  *
 406  * Allocate colorcells and initialize mapping tables.
 407  */
 408 static BOOL X11DRV_PALETTE_BuildSharedMap( const PALETTEENTRY *sys_pal_template )
 409 {
 410    XColor               color;
 411    unsigned long        sysPixel[NB_RESERVED_COLORS];
 412    unsigned long*       pixDynMapping = NULL;
 413    unsigned long        plane_masks[1];
 414    int                  i, j, warn = 0;
 415    int                  diff, r, g, b, bp = 0, wp = 1;
 416    int                  step = 1;
 417    unsigned int max = 256;
 418    Colormap             defaultCM;
 419    XColor               defaultColors[256];
 420
 421    /* Copy the first bunch of colors out of the default colormap to prevent
 422     * colormap flashing as much as possible.  We're likely to get the most
 423     * important Window Manager colors, etc in the first 128 colors */
 424    defaultCM = DefaultColormap( gdi_display, DefaultScreen(gdi_display) );
 425
 426    if (copy_default_colors > 256) copy_default_colors = 256;
 427    for (i = 0; i < copy_default_colors; i++)
 428        defaultColors[i].pixel = (long) i;
 429    wine_tsx11_lock();
 430    XQueryColors(gdi_display, defaultCM, &defaultColors[0], copy_default_colors);
 431    for (i = 0; i < copy_default_colors; i++)
 432        XAllocColor( gdi_display, X11DRV_PALETTE_PaletteXColormap, &defaultColors[i] );
 433
 434    if (alloc_system_colors > 256) alloc_system_colors = 256;
 435    else if (alloc_system_colors < 20) alloc_system_colors = 20;
 436    TRACE("%d colors configured.\n", alloc_system_colors);
 437
 438    TRACE("Building shared map - %i palette entries\n", palette_size);
 439
 440    /* Be nice and allocate system colors as read-only */
 441
 442    for( i = 0; i < NB_RESERVED_COLORS; i++ )
 443      {
 444         color.red   = sys_pal_template[i].peRed * 65535 / 255;
 445         color.green = sys_pal_template[i].peGreen * 65535 / 255;
 446         color.blue  = sys_pal_template[i].peBlue * 65535 / 255;
 447         color.flags = DoRed | DoGreen | DoBlue;
 448
 449         if (!XAllocColor( gdi_display, X11DRV_PALETTE_PaletteXColormap, &color ))
 450         {
 451              XColor     best, c;
 452
 453              if( !warn++ )
 454              {
 455                   WARN("Not enough colors for the full system palette.\n");
 456
 457                   bp = BlackPixel(gdi_display, DefaultScreen(gdi_display));
 458                   wp = WhitePixel(gdi_display, DefaultScreen(gdi_display));
 459
 460                   max = (0xffffffff)>>(32 - screen_depth);
 461                   if( max > 256 )
 462                   {
 463                       step = max/256;
 464                       max = 256;
 465                   }
 466              }
 467
 468              /* reinit color (XAllocColor() may change it)
 469               * and map to the best shared colorcell */
 470
 471              color.red   = sys_pal_template[i].peRed * 65535 / 255;
 472              color.green = sys_pal_template[i].peGreen * 65535 / 255;
 473              color.blue  = sys_pal_template[i].peBlue * 65535 / 255;
 474
 475              best.pixel = best.red = best.green = best.blue = 0;
 476              for( c.pixel = 0, diff = 0x7fffffff; c.pixel < max; c.pixel += step )
 477              {
 478                 XQueryColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &c);
 479                 r = (c.red - color.red)>>8;
 480                 g = (c.green - color.green)>>8;
 481                 b = (c.blue - color.blue)>>8;
 482                 r = r*r + g*g + b*b;
 483                 if( r < diff ) { best = c; diff = r; }
 484              }
 485
 486              if( XAllocColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &best) )
 487                  color.pixel = best.pixel;
 488              else color.pixel = (i < NB_RESERVED_COLORS/2)? bp : wp;
 489         }
 490
 491         sysPixel[i] = color.pixel;
 492
 493         TRACE("syscolor(%x) -> pixel %i\n", *(const COLORREF*)(sys_pal_template+i),
 494               (int)color.pixel);
 495
 496         /* Set EGA mapping if color in the first or last eight */
 497
 498         if (i < 8)
 499             X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
 500         else if (i >= NB_RESERVED_COLORS - 8 )
 501             X11DRV_PALETTE_mapEGAPixel[i - (NB_RESERVED_COLORS-16)] = color.pixel;
 502      }
 503    wine_tsx11_unlock();
 504
 505    /* now allocate changeable set */
 506
 507    if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
 508      {
 509         int c_min = 0, c_max = palette_size, c_val;
 510
 511         TRACE("Dynamic colormap...\n");
 512
 513         /* let's become the first client that actually follows
 514          * X guidelines and does binary search...
 515          */
 516
 517         if((pixDynMapping = HeapAlloc(GetProcessHeap(), 0, sizeof(long)*palette_size)) == NULL) {
 518             WARN("Out of memory while building system palette.\n");
 519             return FALSE;
 520         }
 521
 522         wine_tsx11_lock();
 523         /* comment this out if you want to debug palette init */
 524         XGrabServer(gdi_display);
 525
 526         while( c_max - c_min > 0 )
 527           {
 528              c_val = (c_max + c_min)/2 + (c_max + c_min)%2;
 529
 530              if( !XAllocColorCells(gdi_display, X11DRV_PALETTE_PaletteXColormap, False,
 531                                    plane_masks, 0, pixDynMapping, c_val) )
 532                  c_max = c_val - 1;
 533              else
 534                {
 535                  XFreeColors(gdi_display, X11DRV_PALETTE_PaletteXColormap, pixDynMapping, c_val, 0);
 536                  c_min = c_val;
 537                }
 538           }
 539
 540         if( c_min > alloc_system_colors - NB_RESERVED_COLORS)
 541             c_min = alloc_system_colors - NB_RESERVED_COLORS;
 542
 543         c_min = (c_min/2) + (c_min/2);          /* need even set for split palette */
 544
 545         if( c_min > 0 )
 546           if( !XAllocColorCells(gdi_display, X11DRV_PALETTE_PaletteXColormap, False,
 547                                 plane_masks, 0, pixDynMapping, c_min) )
 548             {
 549               WARN("Inexplicable failure during colorcell allocation.\n");
 550               c_min = 0;
 551             }
 552
 553         palette_size = c_min + NB_RESERVED_COLORS;
 554
 555         XUngrabServer(gdi_display);
 556         wine_tsx11_unlock();
 557
 558         TRACE("adjusted size %i colorcells\n", palette_size);
 559      }
 560    else if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 561         {
 562           /* virtual colorspace - ToPhysical takes care of
 563            * color translations but we have to allocate full palette
 564            * to maintain compatibility
 565            */
 566           palette_size = 256;
 567           TRACE("Virtual colorspace - screendepth %i\n", screen_depth);
 568         }
 569    else palette_size = NB_RESERVED_COLORS;      /* system palette only - however we can alloc a bunch
 570                                          * of colors and map to them */
 571
 572    TRACE("Shared system palette uses %i colors.\n", palette_size);
 573
 574    /* set gap to account for pixel shortage. It has to be right in the center
 575     * of the system palette because otherwise raster ops get screwed. */
 576
 577    if( palette_size >= 256 )
 578      { COLOR_gapStart = 256; COLOR_gapEnd = -1; }
 579    else
 580      { COLOR_gapStart = palette_size/2; COLOR_gapEnd = 255 - palette_size/2; }
 581
 582    X11DRV_PALETTE_firstFree = ( palette_size > NB_RESERVED_COLORS &&
 583                       (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL || !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED)) )
 584                      ? NB_RESERVED_COLORS/2 : -1;
 585
 586    COLOR_sysPal = HeapAlloc(GetProcessHeap(),0,sizeof(PALETTEENTRY)*256);
 587    if(COLOR_sysPal == NULL) {
 588        ERR("Unable to allocate the system palette!\n");
 589        HeapFree(GetProcessHeap(), 0, pixDynMapping);
 590        return FALSE;
 591    }
 592
 593    /* setup system palette entry <-> pixel mappings and fill in 20 fixed entries */
 594
 595    if (screen_depth <= 8)
 596    {
 597        X11DRV_PALETTE_XPixelToPalette = HeapAlloc( GetProcessHeap(), 0, 256 * sizeof(int) );
 598        if(X11DRV_PALETTE_XPixelToPalette == NULL) {
 599            ERR("Out of memory: XPixelToPalette!\n");
 600            HeapFree(GetProcessHeap(), 0, pixDynMapping);
 601            return FALSE;
 602        }
 603        for( i = 0; i < 256; i++ )
 604            X11DRV_PALETTE_XPixelToPalette[i] = NB_PALETTE_EMPTY_VALUE;
 605    }
 606
 607    /* for hicolor visuals PaletteToPixel mapping is used to skip
 608     * RGB->pixel calculation in X11DRV_PALETTE_ToPhysical().
 609     */
 610
 611    X11DRV_PALETTE_PaletteToXPixel = HeapAlloc(GetProcessHeap(),0,sizeof(int)*256);
 612    if(X11DRV_PALETTE_PaletteToXPixel == NULL) {
 613        ERR("Out of memory: PaletteToXPixel!\n");
 614        HeapFree(GetProcessHeap(), 0, pixDynMapping);
 615        return FALSE;
 616    }
 617
 618    for( i = j = 0; i < 256; i++ )
 619    {
 620       if( i >= COLOR_gapStart && i <= COLOR_gapEnd )
 621       {
 622          X11DRV_PALETTE_PaletteToXPixel[i] = NB_PALETTE_EMPTY_VALUE;
 623          COLOR_sysPal[i].peFlags = 0;   /* mark as unused */
 624          continue;
 625       }
 626
 627       if( i < NB_RESERVED_COLORS/2 )
 628       {
 629         X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[i];
 630         COLOR_sysPal[i] = sys_pal_template[i];
 631         COLOR_sysPal[i].peFlags |= PC_SYS_USED;
 632       }
 633       else if( i >= 256 - NB_RESERVED_COLORS/2 )
 634       {
 635         X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[(i + NB_RESERVED_COLORS) - 256];
 636         COLOR_sysPal[i] = sys_pal_template[(i + NB_RESERVED_COLORS) - 256];
 637         COLOR_sysPal[i].peFlags |= PC_SYS_USED;
 638       }
 639       else if( pixDynMapping )
 640              X11DRV_PALETTE_PaletteToXPixel[i] = pixDynMapping[j++];
 641            else
 642              X11DRV_PALETTE_PaletteToXPixel[i] = i;
 643
 644       TRACE("index %i -> pixel %i\n", i, X11DRV_PALETTE_PaletteToXPixel[i]);
 645
 646       if( X11DRV_PALETTE_XPixelToPalette )
 647           X11DRV_PALETTE_XPixelToPalette[X11DRV_PALETTE_PaletteToXPixel[i]] = i;
 648    }
 649
 650    HeapFree(GetProcessHeap(), 0, pixDynMapping);
 651
 652    return TRUE;
 653 }
 654
 655 /***********************************************************************
 656  *      Colormap Initialization
 657  */
 658 static void X11DRV_PALETTE_FillDefaultColors( const PALETTEENTRY *sys_pal_template )
 659 {
 660  /* initialize unused entries to what Windows uses as a color
 661   * cube - based on Greg Kreider's code.
 662   */
 663
 664   int i = 0, idx = 0;
 665   int red, no_r, inc_r;
 666   int green, no_g, inc_g;
 667   int blue, no_b, inc_b;
 668
 669   if (palette_size <= NB_RESERVED_COLORS)
 670         return;
 671   while (i*i*i < (palette_size - NB_RESERVED_COLORS)) i++;
 672   no_r = no_g = no_b = --i;
 673   if ((no_r * (no_g+1) * no_b) < (palette_size - NB_RESERVED_COLORS)) no_g++;
 674   if ((no_r * no_g * (no_b+1)) < (palette_size - NB_RESERVED_COLORS)) no_b++;
 675   inc_r = (255 - NB_COLORCUBE_START_INDEX)/no_r;
 676   inc_g = (255 - NB_COLORCUBE_START_INDEX)/no_g;
 677   inc_b = (255 - NB_COLORCUBE_START_INDEX)/no_b;
 678
 679   wine_tsx11_lock();
 680
 681   idx = X11DRV_PALETTE_firstFree;
 682
 683   if( idx != -1 )
 684     for (blue = NB_COLORCUBE_START_INDEX; blue < 256 && idx; blue += inc_b )
 685      for (green = NB_COLORCUBE_START_INDEX; green < 256 && idx; green += inc_g )
 686       for (red = NB_COLORCUBE_START_INDEX; red < 256 && idx; red += inc_r )
 687       {
 688          /* weird but true */
 689
 690          if( red == NB_COLORCUBE_START_INDEX && green == red && blue == green ) continue;
 691
 692          COLOR_sysPal[idx].peRed = red;
 693          COLOR_sysPal[idx].peGreen = green;
 694          COLOR_sysPal[idx].peBlue = blue;
 695
 696          /* set X color */
 697
 698          if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
 699          {
 700             ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
 701             if (shifts->physicalRed.max != 255) no_r = (red * shifts->physicalRed.max) / 255;
 702             if (shifts->physicalGreen.max != 255) no_g = (green * shifts->physicalGreen.max) / 255;
 703             if (shifts->physicalBlue.max != 255) no_b = (blue * shifts->physicalBlue.max) / 255;
 704
 705             X11DRV_PALETTE_PaletteToXPixel[idx] = (no_r << shifts->physicalRed.shift) | (no_g << shifts->physicalGreen.shift) | (no_b << shifts->physicalBlue.shift);
 706          }
 707          else if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
 708          {
 709            XColor color;
 710            color.pixel = (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[idx] : idx;
 711            color.red = COLOR_sysPal[idx].peRed << 8;
 712            color.green = COLOR_sysPal[idx].peGreen << 8;
 713            color.blue =  COLOR_sysPal[idx].peBlue << 8;
 714            color.flags = DoRed | DoGreen | DoBlue;
 715            XStoreColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &color);
 716          }
 717          idx = X11DRV_PALETTE_freeList[idx];
 718       }
 719
 720   /* try to fill some entries in the "gap" with
 721    * what's already in the colormap - they will be
 722    * mappable to but not changeable. */
 723
 724   if( COLOR_gapStart < COLOR_gapEnd && X11DRV_PALETTE_XPixelToPalette )
 725   {
 726     XColor      xc;
 727     int         r, g, b, max;
 728
 729     max = alloc_system_colors - (256 - (COLOR_gapEnd - COLOR_gapStart));
 730     for ( i = 0, idx = COLOR_gapStart; i < 256 && idx <= COLOR_gapEnd; i++ )
 731       if( X11DRV_PALETTE_XPixelToPalette[i] == NB_PALETTE_EMPTY_VALUE )
 732         {
 733           xc.pixel = i;
 734
 735           XQueryColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &xc);
 736           r = xc.red>>8; g = xc.green>>8; b = xc.blue>>8;
 737
 738           if( xc.pixel < 256 && X11DRV_PALETTE_CheckSysColor( sys_pal_template, RGB(r, g, b)) &&
 739               XAllocColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &xc) )
 740           {
 741              X11DRV_PALETTE_XPixelToPalette[xc.pixel] = idx;
 742              X11DRV_PALETTE_PaletteToXPixel[idx] = xc.pixel;
 743            *(COLORREF*)(COLOR_sysPal + idx) = RGB(r, g, b);
 744              COLOR_sysPal[idx++].peFlags |= PC_SYS_USED;
 745              if( --max <= 0 ) break;
 746           }
 747         }
 748     COLOR_gapFilled = idx - COLOR_gapStart;
 749   }
 750   wine_tsx11_unlock();
 751 }
 752
 753
 754 /***********************************************************************
 755  *           X11DRV_IsSolidColor
 756  *
 757  * Check whether 'color' can be represented with a solid color.
 758  */
 759 BOOL X11DRV_IsSolidColor( COLORREF color )
 760 {
 761     int i;
 762     const PALETTEENTRY *pEntry = COLOR_sysPal;
 763
 764     if (color & 0xff000000) return TRUE;  /* indexed color */
 765
 766     if (!color || (color == 0xffffff)) return TRUE;  /* black or white */
 767
 768     if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL) return TRUE;  /* no palette */
 769
 770     EnterCriticalSection( &palette_cs );
 771     for (i = 0; i < palette_size ; i++, pEntry++)
 772     {
 773         if( i < COLOR_gapStart || i > COLOR_gapEnd )
 774             if ((GetRValue(color) == pEntry->peRed) &&
 775                 (GetGValue(color) == pEntry->peGreen) &&
 776                 (GetBValue(color) == pEntry->peBlue))
 777             {
 778                 LeaveCriticalSection( &palette_cs );
 779                 return TRUE;
 780             }
 781     }
 782     LeaveCriticalSection( &palette_cs );
 783     return FALSE;
 784 }
 785
 786
 787 /***********************************************************************
 788  *           X11DRV_PALETTE_ToLogical
 789  *
 790  * Return RGB color for given X pixel.
 791  */
 792 COLORREF X11DRV_PALETTE_ToLogical(X11DRV_PDEVICE *physDev, int pixel)
 793 {
 794     XColor color;
 795
 796 #if 0
 797     /* truecolor visual */
 798
 799     if (screen_depth >= 24) return pixel;
 800 #endif
 801
 802     /* check for hicolor visuals first */
 803
 804     if ( (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) && !X11DRV_PALETTE_Graymax )
 805     {
 806          ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
 807
 808          if(physDev->color_shifts)
 809              shifts = physDev->color_shifts;
 810
 811          color.red = (pixel >> shifts->logicalRed.shift) & shifts->logicalRed.max;
 812          if (shifts->logicalRed.scale<8)
 813              color.red=  color.red   << (8-shifts->logicalRed.scale) |
 814                          color.red   >> (2*shifts->logicalRed.scale-8);
 815          color.green = (pixel >> shifts->logicalGreen.shift) & shifts->logicalGreen.max;
 816          if (shifts->logicalGreen.scale<8)
 817              color.green=color.green << (8-shifts->logicalGreen.scale) |
 818                          color.green >> (2*shifts->logicalGreen.scale-8);
 819          color.blue = (pixel >> shifts->logicalBlue.shift) & shifts->logicalBlue.max;
 820          if (shifts->logicalBlue.scale<8)
 821              color.blue= color.blue  << (8-shifts->logicalBlue.scale)  |
 822                          color.blue  >> (2*shifts->logicalBlue.scale-8);
 823                  return RGB(color.red,color.green,color.blue);
 824     }
 825
 826     /* check if we can bypass X */
 827
 828     if ((screen_depth <= 8) && (pixel < 256) &&
 829         !(X11DRV_PALETTE_PaletteFlags & (X11DRV_PALETTE_VIRTUAL | X11DRV_PALETTE_FIXED)) ) {
 830         COLORREF ret;
 831         EnterCriticalSection( &palette_cs );
 832         ret = *(COLORREF *)(COLOR_sysPal + (X11DRV_PALETTE_XPixelToPalette ? X11DRV_PALETTE_XPixelToPalette[pixel]: pixel)) & 0x00ffffff;
 833         LeaveCriticalSection( &palette_cs );
 834         return ret;
 835     }
 836
 837     wine_tsx11_lock();
 838     color.pixel = pixel;
 839     XQueryColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &color);
 840     wine_tsx11_unlock();
 841     return RGB(color.red >> 8, color.green >> 8, color.blue >> 8);
 842 }
 843
 844
 845 /***********************************************************************
 846  *           X11DRV_SysPaletteLookupPixel
 847  */
 848 static int X11DRV_SysPaletteLookupPixel( COLORREF col, BOOL skipReserved )
 849 {
 850     int i, best = 0, diff = 0x7fffffff;
 851     int r,g,b;
 852
 853     for( i = 0; i < palette_size && diff ; i++ )
 854     {
 855         if( !(COLOR_sysPal[i].peFlags & PC_SYS_USED) ||
 856             (skipReserved && COLOR_sysPal[i].peFlags  & PC_SYS_RESERVED) )
 857             continue;
 858
 859         r = COLOR_sysPal[i].peRed - GetRValue(col);
 860         g = COLOR_sysPal[i].peGreen - GetGValue(col);
 861         b = COLOR_sysPal[i].peBlue - GetBValue(col);
 862
 863         r = r*r + g*g + b*b;
 864
 865         if( r < diff ) { best = i; diff = r; }
 866     }
 867     return best;
 868 }
 869
 870
 871 static inline BOOL colour_is_brighter(RGBQUAD c1, RGBQUAD c2)
 872 {
 873     return (c1.rgbRed * c1.rgbRed + c1.rgbGreen * c1.rgbGreen + c1.rgbBlue * c1.rgbBlue) >
 874         (c2.rgbRed * c2.rgbRed + c2.rgbGreen * c2.rgbGreen + c2.rgbBlue * c2.rgbBlue);
 875 }
 876
 877 /***********************************************************************
 878  *           X11DRV_PALETTE_GetColor
 879  *
 880  * Resolve PALETTEINDEX/PALETTERGB/DIBINDEX COLORREFs to an RGB COLORREF.
 881  */
 882 COLORREF X11DRV_PALETTE_GetColor( X11DRV_PDEVICE *physDev, COLORREF color )
 883 {
 884     HPALETTE             hPal = GetCurrentObject(physDev->dev.hdc, OBJ_PAL );
 885     unsigned char        spec_type = color >> 24;
 886     unsigned             idx = color & 0xffff;
 887     PALETTEENTRY         entry;
 888     RGBQUAD              quad;
 889
 890     switch(spec_type)
 891     {
 892       case 2:  /* PALETTERGB */
 893         idx = GetNearestPaletteIndex( hPal, color );
 894         /* fall through to PALETTEINDEX */
 895
 896       case 1: /* PALETTEINDEX */
 897         if (!GetPaletteEntries( hPal, idx, 1, &entry ))
 898         {
 899             WARN("PALETTEINDEX(%x) : idx %d is out of bounds, assuming black\n", color, idx);
 900             return 0;
 901         }
 902         return RGB( entry.peRed, entry.peGreen, entry.peBlue );
 903
 904       case 0x10: /* DIBINDEX */
 905         if( GetDIBColorTable( physDev->dev.hdc, idx, 1, &quad ) != 1 ) {
 906             WARN("DIBINDEX(%x) : idx %d is out of bounds, assuming black\n", color , idx);
 907             return 0;
 908         }
 909         return RGB( quad.rgbRed, quad.rgbGreen, quad.rgbBlue );
 910
 911       default:
 912         color &= 0xffffff;
 913         /* fall through to RGB */
 914
 915       case 0: /* RGB */
 916         return color;
 917     }
 918 }
 919
 920 /***********************************************************************
 921  *           X11DRV_PALETTE_ToPhysical
 922  *
 923  * Return the physical color closest to 'color'.
 924  */
 925 int X11DRV_PALETTE_ToPhysical( X11DRV_PDEVICE *physDev, COLORREF color )
 926 {
 927     WORD                 index = 0;
 928     HPALETTE             hPal = GetCurrentObject(physDev->dev.hdc, OBJ_PAL );
 929     unsigned char        spec_type = color >> 24;
 930     int *mapping = palette_get_mapping( hPal );
 931     PALETTEENTRY entry;
 932     ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
 933
 934     if(physDev->color_shifts)
 935         shifts = physDev->color_shifts;
 936
 937     if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED )
 938     {
 939         /* there is no colormap limitation; we are going to have to compute
 940          * the pixel value from the visual information stored earlier
 941          */
 942
 943         unsigned        long red, green, blue;
 944         unsigned        idx = color & 0xffff;
 945
 946         switch(spec_type)
 947         {
 948           case 0x10: /* DIBINDEX */
 949             color = X11DRV_PALETTE_GetColor( physDev, color );
 950             break;
 951
 952           case 1: /* PALETTEINDEX */
 953             if (!GetPaletteEntries( hPal, idx, 1, &entry ))
 954             {
 955                 WARN("PALETTEINDEX(%x) : idx %d is out of bounds, assuming black\n", color, idx);
 956                 return 0;
 957             }
 958             if (mapping) return mapping[idx];
 959             color = RGB( entry.peRed, entry.peGreen, entry.peBlue );
 960             break;
 961
 962           default:
 963             color &= 0xffffff;
 964             /* fall through to RGB */
 965
 966           case 0: /* RGB */
 967             if (physDev->depth == 1)
 968             {
 969                 int white = 1;
 970                 RGBQUAD table[2];
 971
 972                 if (GetDIBColorTable( physDev->dev.hdc, 0, 2, table ) == 2)
 973                 {
 974                     if(!colour_is_brighter(table[1], table[0])) white = 0;
 975                 }
 976                 return (((color >> 16) & 0xff) +
 977                         ((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? white : 1 - white;
 978             }
 979
 980         }
 981
 982         red = GetRValue(color); green = GetGValue(color); blue = GetBValue(color);
 983
 984         if (X11DRV_PALETTE_Graymax)
 985         {
 986             /* grayscale only; return scaled value */
 987             return ( (red * 30 + green * 59 + blue * 11) * X11DRV_PALETTE_Graymax) / 25500;
 988         }
 989         else
 990         {
 991             /* scale each individually and construct the TrueColor pixel value */
 992             if (shifts->physicalRed.scale < 8)
 993                 red = red >> (8-shifts->physicalRed.scale);
 994             else if (shifts->physicalRed.scale > 8)
 995                 red = red << (shifts->physicalRed.scale-8) |
 996                       red >> (16-shifts->physicalRed.scale);
 997             if (shifts->physicalGreen.scale < 8)
 998                 green = green >> (8-shifts->physicalGreen.scale);
 999             else if (shifts->physicalGreen.scale > 8)
1000                 green = green << (shifts->physicalGreen.scale-8) |
1001                         green >> (16-shifts->physicalGreen.scale);
1002             if (shifts->physicalBlue.scale < 8)
1003                 blue =  blue >> (8-shifts->physicalBlue.scale);
1004             else if (shifts->physicalBlue.scale > 8)
1005                 blue =  blue << (shifts->physicalBlue.scale-8) |
1006                         blue >> (16-shifts->physicalBlue.scale);
1007
1008             return (red << shifts->physicalRed.shift) | (green << shifts->physicalGreen.shift) | (blue << shifts->physicalBlue.shift);
1009         }
1010     }
1011     else
1012     {
1013         if (!mapping)
1014             WARN("Palette %p is not realized\n", hPal);
1015
1016         switch(spec_type)       /* we have to peruse DC and system palette */
1017         {
1018             default:
1019                 color &= 0xffffff;
1020                 /* fall through to RGB */
1021
1022             case 0:  /* RGB */
1023                 if (physDev->depth == 1)
1024                 {
1025                     int white = 1;
1026                     RGBQUAD table[2];
1027
1028                     if (GetDIBColorTable( physDev->dev.hdc, 0, 2, table ) == 2)
1029                     {
1030                         if(!colour_is_brighter(table[1], table[0]))
1031                             white = 0;
1032                     }
1033                     return (((color >> 16) & 0xff) +
1034                             ((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? white : 1 - white;
1035                 }
1036
1037                 EnterCriticalSection( &palette_cs );
1038                 index = X11DRV_SysPaletteLookupPixel( color, FALSE);
1039                 if (X11DRV_PALETTE_PaletteToXPixel) index = X11DRV_PALETTE_PaletteToXPixel[index];
1040                 LeaveCriticalSection( &palette_cs );
1041
1042                 /* TRACE(palette,"RGB(%lx) -> pixel %i\n", color, index);
1043                  */
1044                 break;
1045             case 1:  /* PALETTEINDEX */
1046                 index = color & 0xffff;
1047                 if (!GetPaletteEntries( hPal, index, 1, &entry ))
1048                     WARN("PALETTEINDEX(%x) : index %i is out of bounds\n", color, index);
1049                 else if (mapping) index = mapping[index];
1050
1051                 /*  TRACE(palette,"PALETTEINDEX(%04x) -> pixel %i\n", (WORD)color, index);
1052                  */
1053                 break;
1054             case 2:  /* PALETTERGB */
1055                 index = GetNearestPaletteIndex( hPal, color );
1056                 if (mapping) index = mapping[index];
1057                 /* TRACE(palette,"PALETTERGB(%lx) -> pixel %i\n", color, index);
1058                  */
1059                 break;
1060         }
1061     }
1062     return index;
1063 }
1064
1065 /***********************************************************************
1066  *           X11DRV_PALETTE_LookupPixel
1067  */
1068 int X11DRV_PALETTE_LookupPixel(ColorShifts *shifts, COLORREF color )
1069 {
1070     unsigned char spec_type = color >> 24;
1071
1072     /* Only accept RGB which has spec_type = 0 */
1073     if(spec_type)
1074         return 0;
1075
1076     color &= 0xffffff;
1077
1078     if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED )
1079     {
1080         unsigned long red, green, blue;
1081         red = GetRValue(color); green = GetGValue(color); blue = GetBValue(color);
1082
1083         if (X11DRV_PALETTE_Graymax)
1084         {
1085             /* grayscale only; return scaled value */
1086             return ( (red * 30 + green * 59 + blue * 11) * X11DRV_PALETTE_Graymax) / 25500;
1087         }
1088         else
1089         {
1090             /* No shifts are set in case of 1-bit */
1091             if(!shifts) shifts = &X11DRV_PALETTE_default_shifts;
1092
1093             /* scale each individually and construct the TrueColor pixel value */
1094             if (shifts->physicalRed.scale < 8)
1095                 red = red >> (8-shifts->physicalRed.scale);
1096             else if (shifts->physicalRed.scale > 8)
1097                 red = red << (shifts->physicalRed.scale-8) |
1098                       red >> (16-shifts->physicalRed.scale);
1099             if (shifts->physicalGreen.scale < 8)
1100                 green = green >> (8-shifts->physicalGreen.scale);
1101             else if (shifts->physicalGreen.scale > 8)
1102                 green = green << (shifts->physicalGreen.scale-8) |
1103                         green >> (16-shifts->physicalGreen.scale);
1104             if (shifts->physicalBlue.scale < 8)
1105                 blue =  blue >> (8-shifts->physicalBlue.scale);
1106             else if (shifts->physicalBlue.scale > 8)
1107                 blue =  blue << (shifts->physicalBlue.scale-8) |
1108                         blue >> (16-shifts->physicalBlue.scale);
1109
1110             return (red << shifts->physicalRed.shift) | (green << shifts->physicalGreen.shift) | (blue << shifts->physicalBlue.shift);
1111         }
1112     }
1113     else
1114     {
1115         WORD index;
1116         HPALETTE hPal = GetStockObject(DEFAULT_PALETTE);
1117         int *mapping = palette_get_mapping( hPal );
1118
1119         if (!mapping)
1120             WARN("Palette %p is not realized\n", hPal);
1121
1122         EnterCriticalSection( &palette_cs );
1123         index = X11DRV_SysPaletteLookupPixel( color, FALSE);
1124         if (X11DRV_PALETTE_PaletteToXPixel)
1125             index = X11DRV_PALETTE_PaletteToXPixel[index];
1126         LeaveCriticalSection( &palette_cs );
1127         return index;
1128     }
1129 }
1130
1131
1132 /***********************************************************************
1133  *           X11DRV_PALETTE_LookupSystemXPixel
1134  */
1135 static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col)
1136 {
1137  int            i, best = 0, diff = 0x7fffffff;
1138  int            size = palette_size;
1139  int            r,g,b;
1140
1141  for( i = 0; i < size && diff ; i++ )
1142     {
1143       if( i == NB_RESERVED_COLORS/2 )
1144       {
1145         int newi = size - NB_RESERVED_COLORS/2;
1146         if (newi>i) i=newi;
1147       }
1148
1149       r = COLOR_sysPal[i].peRed - GetRValue(col);
1150       g = COLOR_sysPal[i].peGreen - GetGValue(col);
1151       b = COLOR_sysPal[i].peBlue - GetBValue(col);
1152
1153       r = r*r + g*g + b*b;
1154
1155       if( r < diff ) { best = i; diff = r; }
1156     }
1157
1158  return (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[best] : best;
1159 }
1160
1161 /***********************************************************************
1162  *           X11DRV_PALETTE_FormatSystemPalette
1163  */
1164 static void X11DRV_PALETTE_FormatSystemPalette(void)
1165 {
1166  /* Build free list so we'd have an easy way to find
1167   * out if there are any available colorcells.
1168   */
1169
1170   int i, j = X11DRV_PALETTE_firstFree = NB_RESERVED_COLORS/2;
1171
1172   COLOR_sysPal[j].peFlags = 0;
1173   for( i = NB_RESERVED_COLORS/2 + 1 ; i < 256 - NB_RESERVED_COLORS/2 ; i++ )
1174     if( i < COLOR_gapStart || i > COLOR_gapEnd )
1175       {
1176         COLOR_sysPal[i].peFlags = 0;  /* unused tag */
1177         X11DRV_PALETTE_freeList[j] = i;   /* next */
1178         j = i;
1179       }
1180   X11DRV_PALETTE_freeList[j] = 0;
1181 }
1182
1183 /***********************************************************************
1184  *           X11DRV_PALETTE_CheckSysColor
1185  */
1186 static BOOL X11DRV_PALETTE_CheckSysColor( const PALETTEENTRY *sys_pal_template, COLORREF c)
1187 {
1188   int i;
1189   for( i = 0; i < NB_RESERVED_COLORS; i++ )
1190        if( c == (*(const COLORREF*)(sys_pal_template + i) & 0x00ffffff) )
1191            return 0;
1192   return 1;
1193 }
1194
1195
1196 /***********************************************************************
1197  *           X11DRV_LookupSysPaletteExact
1198  */
1199 static int X11DRV_LookupSysPaletteExact( BYTE r, BYTE g, BYTE b )
1200 {
1201     int i;
1202     for( i = 0; i < palette_size; i++ )
1203     {
1204         if( COLOR_sysPal[i].peFlags & PC_SYS_USED )  /* skips gap */
1205             if( COLOR_sysPal[i].peRed == r &&
1206                 COLOR_sysPal[i].peGreen == g &&
1207                 COLOR_sysPal[i].peBlue == b )
1208                 return i;
1209     }
1210     return -1;
1211 }
1212
1213
1214 /***********************************************************************
1215  *              RealizePalette    (X11DRV.@)
1216  */
1217 UINT X11DRV_RealizePalette( PHYSDEV dev, HPALETTE hpal, BOOL primary )
1218 {
1219     X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1220     char flag;
1221     int  index;
1222     UINT i, iRemapped = 0;
1223     int *prev_mapping, *mapping;
1224     PALETTEENTRY entries[256];
1225     WORD num_entries;
1226
1227     if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL) return 0;
1228
1229     if (!GetObjectW( hpal, sizeof(num_entries), &num_entries )) return 0;
1230
1231     /* initialize palette mapping table */
1232     prev_mapping = palette_get_mapping( hpal );
1233     if (prev_mapping)
1234         mapping = HeapReAlloc( GetProcessHeap(), 0, prev_mapping, sizeof(int)*num_entries);
1235     else
1236         mapping = HeapAlloc( GetProcessHeap(), 0, sizeof(int)*num_entries);
1237
1238     if(mapping == NULL) {
1239         ERR("Unable to allocate new mapping -- memory exhausted!\n");
1240         return 0;
1241     }
1242     palette_set_mapping( hpal, mapping );
1243
1244     if (num_entries > 256)
1245     {
1246         FIXME( "more than 256 entries not supported\n" );
1247         num_entries = 256;
1248     }
1249     if (!(num_entries = GetPaletteEntries( hpal, 0, num_entries, entries ))) return 0;
1250
1251     /* reset dynamic system palette entries */
1252
1253     EnterCriticalSection( &palette_cs );
1254     if( primary && X11DRV_PALETTE_firstFree != -1)
1255          X11DRV_PALETTE_FormatSystemPalette();
1256
1257     for (i = 0; i < num_entries; i++)
1258     {
1259         index = -1;
1260         flag = PC_SYS_USED;
1261
1262         /* Even though the docs say that only one flag is to be set,
1263          * they are a bitmask. At least one app sets more than one at
1264          * the same time. */
1265         if ( entries[i].peFlags & PC_EXPLICIT ) {
1266             /* palette entries are indices into system palette */
1267             index = *(WORD*)&entries[i];
1268             if( index > 255 || (index >= COLOR_gapStart && index <= COLOR_gapEnd) )
1269             {
1270                 WARN("PC_EXPLICIT: idx %d out of system palette, assuming black.\n", index);
1271                 index = 0;
1272             }
1273             if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
1274         } else {
1275             if ( entries[i].peFlags & PC_RESERVED ) {
1276                 /* forbid future mappings to this entry */
1277                 flag |= PC_SYS_RESERVED;
1278             }
1279
1280             if (! (entries[i].peFlags & PC_NOCOLLAPSE) ) {
1281                 /* try to collapse identical colors */
1282                 index = X11DRV_LookupSysPaletteExact( entries[i].peRed, entries[i].peGreen, entries[i].peBlue );
1283             }
1284
1285             if( index < 0 )
1286             {
1287                 if( X11DRV_PALETTE_firstFree > 0 )
1288                 {
1289                     XColor color;
1290                     index = X11DRV_PALETTE_firstFree;  /* ought to be available */
1291                     X11DRV_PALETTE_firstFree = X11DRV_PALETTE_freeList[index];
1292
1293                     color.pixel = (X11DRV_PALETTE_PaletteToXPixel) ? X11DRV_PALETTE_PaletteToXPixel[index] : index;
1294                     color.red = entries[i].peRed << 8;
1295                     color.green = entries[i].peGreen << 8;
1296                     color.blue = entries[i].peBlue << 8;
1297                     color.flags = DoRed | DoGreen | DoBlue;
1298                     wine_tsx11_lock();
1299                     XStoreColor(gdi_display, X11DRV_PALETTE_PaletteXColormap, &color);
1300                     wine_tsx11_unlock();
1301
1302                     COLOR_sysPal[index] = entries[i];
1303                     COLOR_sysPal[index].peFlags = flag;
1304                     X11DRV_PALETTE_freeList[index] = 0;
1305
1306                     if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
1307                 }
1308                 else if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
1309                 {
1310                     index = X11DRV_PALETTE_LookupPixel( physDev->color_shifts, RGB( entries[i].peRed, entries[i].peGreen, entries[i].peBlue ));
1311                 }
1312
1313                 /* we have to map to existing entry in the system palette */
1314
1315                 index = X11DRV_SysPaletteLookupPixel( RGB( entries[i].peRed, entries[i].peGreen, entries[i].peBlue ),
1316                                                       TRUE );
1317             }
1318
1319             if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
1320         }
1321
1322         if( !prev_mapping || mapping[i] != index ) iRemapped++;
1323         mapping[i] = index;
1324
1325         TRACE("entry %i (%x) -> pixel %i\n", i, *(COLORREF*)&entries[i], index);
1326
1327     }
1328     LeaveCriticalSection( &palette_cs );
1329     return iRemapped;
1330 }
1331
1332
1333 /***********************************************************************
1334  *              UnrealizePalette    (X11DRV.@)
1335  */
1336 BOOL X11DRV_UnrealizePalette( HPALETTE hpal )
1337 {
1338     int *mapping = palette_get_mapping( hpal );
1339
1340     if (mapping)
1341     {
1342         wine_tsx11_lock();
1343         XDeleteContext( gdi_display, (XID)hpal, palette_context );
1344         wine_tsx11_unlock();
1345         HeapFree( GetProcessHeap(), 0, mapping );
1346     }
1347     return TRUE;
1348 }
1349
1350
1351 /***********************************************************************
1352  *              GetSystemPaletteEntries   (X11DRV.@)
1353  */
1354 UINT X11DRV_GetSystemPaletteEntries( PHYSDEV dev, UINT start, UINT count, LPPALETTEENTRY entries )
1355 {
1356     UINT i;
1357
1358     if (!entries) return palette_size;
1359     if (start >= palette_size) return 0;
1360     if (start + count >= palette_size) count = palette_size - start;
1361
1362     EnterCriticalSection( &palette_cs );
1363     for (i = 0; i < count; i++)
1364     {
1365         entries[i].peRed   = COLOR_sysPal[start + i].peRed;
1366         entries[i].peGreen = COLOR_sysPal[start + i].peGreen;
1367         entries[i].peBlue  = COLOR_sysPal[start + i].peBlue;
1368         entries[i].peFlags = 0;
1369         TRACE("\tidx(%02x) -> RGB(%08x)\n", start + i, *(COLORREF*)(entries + i) );
1370     }
1371     LeaveCriticalSection( &palette_cs );
1372     return count;
1373 }
1374
1375
1376 /***********************************************************************
1377  *              GetNearestColor   (X11DRV.@)
1378  */
1379 COLORREF X11DRV_GetNearestColor( PHYSDEV dev, COLORREF color )
1380 {
1381     unsigned char spec_type = color >> 24;
1382     COLORREF nearest;
1383
1384     if (!palette_size) return color;
1385
1386     if (spec_type == 1 || spec_type == 2)
1387     {
1388         /* we need logical palette for PALETTERGB and PALETTEINDEX colorrefs */
1389
1390         UINT index;
1391         PALETTEENTRY entry;
1392         HPALETTE hpal = GetCurrentObject( dev->hdc, OBJ_PAL );
1393
1394         if (!hpal) hpal = GetStockObject( DEFAULT_PALETTE );
1395
1396         if (spec_type == 2) /* PALETTERGB */
1397             index = GetNearestPaletteIndex( hpal, color );
1398         else  /* PALETTEINDEX */
1399             index = LOWORD(color);
1400
1401         if (!GetPaletteEntries( hpal, index, 1, &entry ))
1402         {
1403             WARN("RGB(%x) : idx %d is out of bounds, assuming NULL\n", color, index );
1404             if (!GetPaletteEntries( hpal, 0, 1, &entry )) return CLR_INVALID;
1405         }
1406         color = RGB( entry.peRed,  entry.peGreen, entry.peBlue );
1407     }
1408     color &= 0x00ffffff;
1409     EnterCriticalSection( &palette_cs );
1410     nearest = (0x00ffffff & *(COLORREF*)(COLOR_sysPal + X11DRV_SysPaletteLookupPixel(color, FALSE)));
1411     LeaveCriticalSection( &palette_cs );
1412
1413     TRACE("(%06x): returning %06x\n", color, nearest );
1414     return nearest;
1415 }
1416
1417
1418 /***********************************************************************
1419  *              RealizeDefaultPalette    (X11DRV.@)
1420  */
1421 UINT X11DRV_RealizeDefaultPalette( PHYSDEV dev )
1422 {
1423     UINT ret = 0;
1424
1425     if (palette_size && GetObjectType(dev->hdc) != OBJ_MEMDC)
1426     {
1427         /* lookup is needed to account for SetSystemPaletteUse() stuff */
1428         int i, index, *mapping = palette_get_mapping( GetStockObject(DEFAULT_PALETTE) );
1429         PALETTEENTRY entries[NB_RESERVED_COLORS];
1430
1431         GetPaletteEntries( GetStockObject(DEFAULT_PALETTE), 0, NB_RESERVED_COLORS, entries );
1432         EnterCriticalSection( &palette_cs );
1433         for( i = 0; i < NB_RESERVED_COLORS; i++ )
1434         {
1435             index = X11DRV_PALETTE_LookupSystemXPixel( RGB(entries[i].peRed,
1436                                                            entries[i].peGreen,
1437                                                            entries[i].peBlue) );
1438             /* mapping is allocated in COLOR_InitPalette() */
1439             if( index != mapping[i] )
1440             {
1441                 mapping[i]=index;
1442                 ret++;
1443             }
1444         }
1445         LeaveCriticalSection( &palette_cs );
1446     }
1447     return ret;
1448 }