Sweden-Number/dlls/winex11.drv/palette.c

1315 lines
44 KiB
C

/*
* X11DRV OEM bitmap objects
*
* Copyright 1994, 1995 Alexandre Julliard
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#include "config.h"
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
#include "windef.h"
#include "winbase.h"
#include "x11drv.h"
#include "wine/debug.h"
WINE_DEFAULT_DEBUG_CHANNEL(palette);
/* Palette indexed mode:
* logical palette -> mapping -> pixel
*
*
* Windows needs contiguous color space ( from 0 to n ) but
* it is possible only with the private colormap. Otherwise we
* have to map DC palette indices to real pixel values. With
* private colormaps it boils down to the identity mapping. The
* other special case is when we have a fixed color visual with
* the screendepth > 8 - we abandon palette mappings altogether
* because pixel values can be calculated without X server
* assistance.
*/
#define NB_RESERVED_COLORS 20 /* number of fixed colors in system palette */
#define PC_SYS_USED 0x80 /* palentry is used (both system and logical) */
#define PC_SYS_RESERVED 0x40 /* system palentry is not to be mapped to */
static PALETTEENTRY *COLOR_sysPal; /* current system palette */
static int COLOR_gapStart = 256;
static int COLOR_gapEnd = -1;
UINT16 X11DRV_PALETTE_PaletteFlags = 0;
/* initialize to zero to handle abortive X11DRV_PALETTE_VIRTUAL visuals */
ColorShifts X11DRV_PALETTE_default_shifts = { {0,0,0,}, {0,0,0}, {0,0,0}, {0,0,0}, {0,0,0}, {0,0,0} };
static int X11DRV_PALETTE_Graymax = 0;
static int palette_size;
/* First free dynamic color cell, 0 = full palette, -1 = fixed palette */
static int X11DRV_PALETTE_firstFree = 0;
static unsigned char X11DRV_PALETTE_freeList[256];
static XContext palette_context; /* X context to associate a color mapping to a palette */
static CRITICAL_SECTION palette_cs;
static CRITICAL_SECTION_DEBUG critsect_debug =
{
0, 0, &palette_cs,
{ &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
0, 0, { (DWORD_PTR)(__FILE__ ": palette_cs") }
};
static CRITICAL_SECTION palette_cs = { &critsect_debug, -1, 0, 0, 0, 0 };
/**********************************************************************/
/* Map an EGA index (0..15) to a pixel value in the system color space. */
int X11DRV_PALETTE_mapEGAPixel[16];
/**********************************************************************/
#define NB_COLORCUBE_START_INDEX 63
#define NB_PALETTE_EMPTY_VALUE -1
/* Maps entry in the system palette to X pixel value */
int *X11DRV_PALETTE_PaletteToXPixel = NULL;
/* Maps pixel to the entry in the system palette */
int *X11DRV_PALETTE_XPixelToPalette = NULL;
/**********************************************************************/
static BOOL X11DRV_PALETTE_BuildPrivateMap( const PALETTEENTRY *sys_pal_template );
static BOOL X11DRV_PALETTE_BuildSharedMap( const PALETTEENTRY *sys_pal_template );
static void X11DRV_PALETTE_FillDefaultColors( const PALETTEENTRY *sys_pal_template );
static void X11DRV_PALETTE_FormatSystemPalette(void);
static BOOL X11DRV_PALETTE_CheckSysColor( const PALETTEENTRY *sys_pal_template, COLORREF c);
static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col);
/***********************************************************************
* palette_get_mapping
*/
static int *palette_get_mapping( HPALETTE hpal )
{
int *mapping;
if (XFindContext( gdi_display, (XID)hpal, palette_context, (char **)&mapping )) mapping = NULL;
return mapping;
}
/***********************************************************************
* palette_set_mapping
*/
static void palette_set_mapping( HPALETTE hpal, int *mapping )
{
XSaveContext( gdi_display, (XID)hpal, palette_context, (char *)mapping );
}
/***********************************************************************
* X11DRV_PALETTE_ComputeChannelShift
*
* Calculate conversion parameters for a given color mask
*/
static void X11DRV_PALETTE_ComputeChannelShift(unsigned long maskbits, ChannelShift *physical, ChannelShift *to_logical)
{
int i;
if (maskbits==0)
{
physical->shift=0;
physical->scale=0;
physical->max=0;
to_logical->shift=0;
to_logical->scale=0;
to_logical->max=0;
return;
}
for(i=0;!(maskbits&1);i++)
maskbits >>= 1;
physical->shift = i;
physical->max = maskbits;
for(i=0;maskbits!=0;i++)
maskbits >>= 1;
physical->scale = i;
if (physical->scale>8)
{
/* On FreeBSD, VNC's default 32bpp mode is bgrabb (ffc00000,3ff800,7ff)!
* So we adjust the shifts to also normalize the color fields to
* the Win32 standard of 8 bits per color.
*/
to_logical->shift=physical->shift+(physical->scale-8);
to_logical->scale=8;
to_logical->max=0xff;
} else {
to_logical->shift=physical->shift;
to_logical->scale=physical->scale;
to_logical->max=physical->max;
}
}
/***********************************************************************
* X11DRV_PALETTE_ComputeColorShifts
*
* Calculate conversion parameters for a given color
*/
static void X11DRV_PALETTE_ComputeColorShifts(ColorShifts *shifts, unsigned long redMask, unsigned long greenMask, unsigned long blueMask)
{
X11DRV_PALETTE_ComputeChannelShift(redMask, &shifts->physicalRed, &shifts->logicalRed);
X11DRV_PALETTE_ComputeChannelShift(greenMask, &shifts->physicalGreen, &shifts->logicalGreen);
X11DRV_PALETTE_ComputeChannelShift(blueMask, &shifts->physicalBlue, &shifts->logicalBlue);
}
/***********************************************************************
* COLOR_Init
*
* Initialize color management.
*/
int X11DRV_PALETTE_Init(void)
{
int *mapping;
PALETTEENTRY sys_pal_template[NB_RESERVED_COLORS];
TRACE("initializing palette manager...\n");
palette_context = XUniqueContext();
palette_size = default_visual.colormap_size;
switch(default_visual.class)
{
case DirectColor:
X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
/* fall through */
case GrayScale:
case PseudoColor:
if (private_color_map)
{
XSetWindowAttributes win_attr;
XFreeColormap( gdi_display, default_colormap );
default_colormap = XCreateColormap( gdi_display, root_window,
default_visual.visual, AllocAll );
if (default_colormap)
{
X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_PRIVATE;
if (is_virtual_desktop())
{
win_attr.colormap = default_colormap;
XChangeWindowAttributes( gdi_display, root_window, CWColormap, &win_attr );
}
}
}
break;
case StaticGray:
X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
X11DRV_PALETTE_Graymax = (1 << default_visual.depth)-1;
break;
case TrueColor:
X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_VIRTUAL;
/* fall through */
case StaticColor:
X11DRV_PALETTE_PaletteFlags |= X11DRV_PALETTE_FIXED;
X11DRV_PALETTE_ComputeColorShifts(&X11DRV_PALETTE_default_shifts, default_visual.red_mask, default_visual.green_mask, default_visual.blue_mask);
break;
}
if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
{
palette_size = 0;
}
else
{
GetPaletteEntries( GetStockObject(DEFAULT_PALETTE), 0, NB_RESERVED_COLORS, sys_pal_template );
if ((mapping = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(int) * NB_RESERVED_COLORS )))
palette_set_mapping( GetStockObject(DEFAULT_PALETTE), mapping );
if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_PRIVATE)
X11DRV_PALETTE_BuildPrivateMap( sys_pal_template );
else
X11DRV_PALETTE_BuildSharedMap( sys_pal_template );
/* Build free list */
if( X11DRV_PALETTE_firstFree != -1 )
X11DRV_PALETTE_FormatSystemPalette();
X11DRV_PALETTE_FillDefaultColors( sys_pal_template );
palette_size = default_visual.colormap_size;
}
return palette_size;
}
/***********************************************************************
* X11DRV_PALETTE_BuildPrivateMap
*
* Allocate colorcells and initialize mapping tables.
*/
static BOOL X11DRV_PALETTE_BuildPrivateMap( const PALETTEENTRY *sys_pal_template )
{
/* Private colormap - identity mapping */
XColor color;
int i;
if((COLOR_sysPal = HeapAlloc(GetProcessHeap(), 0, sizeof(PALETTEENTRY)*palette_size)) == NULL) {
WARN("Unable to allocate the system palette\n");
return FALSE;
}
TRACE("Building private map - %i palette entries\n", palette_size);
/* Allocate system palette colors */
for( i=0; i < palette_size; i++ )
{
if( i < NB_RESERVED_COLORS/2 )
{
color.red = sys_pal_template[i].peRed * 65535 / 255;
color.green = sys_pal_template[i].peGreen * 65535 / 255;
color.blue = sys_pal_template[i].peBlue * 65535 / 255;
COLOR_sysPal[i] = sys_pal_template[i];
COLOR_sysPal[i].peFlags |= PC_SYS_USED;
}
else if( i >= palette_size - NB_RESERVED_COLORS/2 )
{
int j = NB_RESERVED_COLORS + i - palette_size;
color.red = sys_pal_template[j].peRed * 65535 / 255;
color.green = sys_pal_template[j].peGreen * 65535 / 255;
color.blue = sys_pal_template[j].peBlue * 65535 / 255;
COLOR_sysPal[i] = sys_pal_template[j];
COLOR_sysPal[i].peFlags |= PC_SYS_USED;
}
color.flags = DoRed | DoGreen | DoBlue;
color.pixel = i;
XStoreColor(gdi_display, default_colormap, &color);
/* Set EGA mapping if color is from the first or last eight */
if (i < 8)
X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
else if (i >= palette_size - 8 )
X11DRV_PALETTE_mapEGAPixel[i - (palette_size - 16)] = color.pixel;
}
X11DRV_PALETTE_XPixelToPalette = X11DRV_PALETTE_PaletteToXPixel = NULL;
COLOR_gapStart = 256; COLOR_gapEnd = -1;
X11DRV_PALETTE_firstFree = (palette_size > NB_RESERVED_COLORS)?NB_RESERVED_COLORS/2 : -1;
return FALSE;
}
/***********************************************************************
* X11DRV_PALETTE_BuildSharedMap
*
* Allocate colorcells and initialize mapping tables.
*/
static BOOL X11DRV_PALETTE_BuildSharedMap( const PALETTEENTRY *sys_pal_template )
{
XColor color;
unsigned long sysPixel[NB_RESERVED_COLORS];
unsigned long* pixDynMapping = NULL;
unsigned long plane_masks[1];
int i, j, warn = 0;
int diff, r, g, b, bp = 0, wp = 1;
int step = 1;
unsigned int max = 256;
Colormap defaultCM;
XColor defaultColors[256];
/* Copy the first bunch of colors out of the default colormap to prevent
* colormap flashing as much as possible. We're likely to get the most
* important Window Manager colors, etc in the first 128 colors */
defaultCM = DefaultColormap( gdi_display, DefaultScreen(gdi_display) );
if (copy_default_colors > 256) copy_default_colors = 256;
for (i = 0; i < copy_default_colors; i++)
defaultColors[i].pixel = (long) i;
XQueryColors(gdi_display, defaultCM, &defaultColors[0], copy_default_colors);
for (i = 0; i < copy_default_colors; i++)
XAllocColor( gdi_display, default_colormap, &defaultColors[i] );
if (alloc_system_colors > 256) alloc_system_colors = 256;
else if (alloc_system_colors < 20) alloc_system_colors = 20;
TRACE("%d colors configured.\n", alloc_system_colors);
TRACE("Building shared map - %i palette entries\n", palette_size);
/* Be nice and allocate system colors as read-only */
for( i = 0; i < NB_RESERVED_COLORS; i++ )
{
color.red = sys_pal_template[i].peRed * 65535 / 255;
color.green = sys_pal_template[i].peGreen * 65535 / 255;
color.blue = sys_pal_template[i].peBlue * 65535 / 255;
color.flags = DoRed | DoGreen | DoBlue;
if (!XAllocColor( gdi_display, default_colormap, &color ))
{
XColor best, c;
if( !warn++ )
{
WARN("Not enough colors for the full system palette.\n");
bp = BlackPixel(gdi_display, DefaultScreen(gdi_display));
wp = WhitePixel(gdi_display, DefaultScreen(gdi_display));
max = 0xffffffff >> (32 - default_visual.depth);
if( max > 256 )
{
step = max/256;
max = 256;
}
}
/* reinit color (XAllocColor() may change it)
* and map to the best shared colorcell */
color.red = sys_pal_template[i].peRed * 65535 / 255;
color.green = sys_pal_template[i].peGreen * 65535 / 255;
color.blue = sys_pal_template[i].peBlue * 65535 / 255;
best.pixel = best.red = best.green = best.blue = 0;
for( c.pixel = 0, diff = 0x7fffffff; c.pixel < max; c.pixel += step )
{
XQueryColor(gdi_display, default_colormap, &c);
r = (c.red - color.red)>>8;
g = (c.green - color.green)>>8;
b = (c.blue - color.blue)>>8;
r = r*r + g*g + b*b;
if( r < diff ) { best = c; diff = r; }
}
if( XAllocColor(gdi_display, default_colormap, &best) )
color.pixel = best.pixel;
else color.pixel = (i < NB_RESERVED_COLORS/2)? bp : wp;
}
sysPixel[i] = color.pixel;
TRACE("syscolor(%x) -> pixel %i\n", *(const COLORREF*)(sys_pal_template+i),
(int)color.pixel);
/* Set EGA mapping if color in the first or last eight */
if (i < 8)
X11DRV_PALETTE_mapEGAPixel[i] = color.pixel;
else if (i >= NB_RESERVED_COLORS - 8 )
X11DRV_PALETTE_mapEGAPixel[i - (NB_RESERVED_COLORS-16)] = color.pixel;
}
/* now allocate changeable set */
if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
{
int c_min = 0, c_max = palette_size, c_val;
TRACE("Dynamic colormap...\n");
/* let's become the first client that actually follows
* X guidelines and does binary search...
*/
if((pixDynMapping = HeapAlloc(GetProcessHeap(), 0, sizeof(long)*palette_size)) == NULL) {
WARN("Out of memory while building system palette.\n");
return FALSE;
}
/* comment this out if you want to debug palette init */
XGrabServer(gdi_display);
while( c_max - c_min > 0 )
{
c_val = (c_max + c_min)/2 + (c_max + c_min)%2;
if( !XAllocColorCells(gdi_display, default_colormap, False,
plane_masks, 0, pixDynMapping, c_val) )
c_max = c_val - 1;
else
{
XFreeColors(gdi_display, default_colormap, pixDynMapping, c_val, 0);
c_min = c_val;
}
}
if( c_min > alloc_system_colors - NB_RESERVED_COLORS)
c_min = alloc_system_colors - NB_RESERVED_COLORS;
c_min = (c_min/2) + (c_min/2); /* need even set for split palette */
if( c_min > 0 )
if( !XAllocColorCells(gdi_display, default_colormap, False,
plane_masks, 0, pixDynMapping, c_min) )
{
WARN("Inexplicable failure during colorcell allocation.\n");
c_min = 0;
}
palette_size = c_min + NB_RESERVED_COLORS;
XUngrabServer(gdi_display);
XFlush(gdi_display);
TRACE("adjusted size %i colorcells\n", palette_size);
}
else if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
{
/* virtual colorspace - ToPhysical takes care of
* color translations but we have to allocate full palette
* to maintain compatibility
*/
palette_size = 256;
TRACE("Virtual colorspace - screendepth %i\n", default_visual.depth);
}
else palette_size = NB_RESERVED_COLORS; /* system palette only - however we can alloc a bunch
* of colors and map to them */
TRACE("Shared system palette uses %i colors.\n", palette_size);
/* set gap to account for pixel shortage. It has to be right in the center
* of the system palette because otherwise raster ops get screwed. */
if( palette_size >= 256 )
{ COLOR_gapStart = 256; COLOR_gapEnd = -1; }
else
{ COLOR_gapStart = palette_size/2; COLOR_gapEnd = 255 - palette_size/2; }
X11DRV_PALETTE_firstFree = ( palette_size > NB_RESERVED_COLORS &&
(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL || !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED)) )
? NB_RESERVED_COLORS/2 : -1;
COLOR_sysPal = HeapAlloc(GetProcessHeap(),0,sizeof(PALETTEENTRY)*256);
if(COLOR_sysPal == NULL) {
ERR("Unable to allocate the system palette!\n");
HeapFree(GetProcessHeap(), 0, pixDynMapping);
return FALSE;
}
/* setup system palette entry <-> pixel mappings and fill in 20 fixed entries */
if (default_visual.depth <= 8)
{
X11DRV_PALETTE_XPixelToPalette = HeapAlloc( GetProcessHeap(), 0, 256 * sizeof(int) );
if(X11DRV_PALETTE_XPixelToPalette == NULL) {
ERR("Out of memory: XPixelToPalette!\n");
HeapFree(GetProcessHeap(), 0, pixDynMapping);
return FALSE;
}
for( i = 0; i < 256; i++ )
X11DRV_PALETTE_XPixelToPalette[i] = NB_PALETTE_EMPTY_VALUE;
}
/* for hicolor visuals PaletteToPixel mapping is used to skip
* RGB->pixel calculation in X11DRV_PALETTE_ToPhysical().
*/
X11DRV_PALETTE_PaletteToXPixel = HeapAlloc(GetProcessHeap(),0,sizeof(int)*256);
if(X11DRV_PALETTE_PaletteToXPixel == NULL) {
ERR("Out of memory: PaletteToXPixel!\n");
HeapFree(GetProcessHeap(), 0, pixDynMapping);
return FALSE;
}
for( i = j = 0; i < 256; i++ )
{
if( i >= COLOR_gapStart && i <= COLOR_gapEnd )
{
X11DRV_PALETTE_PaletteToXPixel[i] = NB_PALETTE_EMPTY_VALUE;
COLOR_sysPal[i].peFlags = 0; /* mark as unused */
continue;
}
if( i < NB_RESERVED_COLORS/2 )
{
X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[i];
COLOR_sysPal[i] = sys_pal_template[i];
COLOR_sysPal[i].peFlags |= PC_SYS_USED;
}
else if( i >= 256 - NB_RESERVED_COLORS/2 )
{
X11DRV_PALETTE_PaletteToXPixel[i] = sysPixel[(i + NB_RESERVED_COLORS) - 256];
COLOR_sysPal[i] = sys_pal_template[(i + NB_RESERVED_COLORS) - 256];
COLOR_sysPal[i].peFlags |= PC_SYS_USED;
}
else if( pixDynMapping )
X11DRV_PALETTE_PaletteToXPixel[i] = pixDynMapping[j++];
else
X11DRV_PALETTE_PaletteToXPixel[i] = i;
TRACE("index %i -> pixel %i\n", i, X11DRV_PALETTE_PaletteToXPixel[i]);
if( X11DRV_PALETTE_XPixelToPalette )
X11DRV_PALETTE_XPixelToPalette[X11DRV_PALETTE_PaletteToXPixel[i]] = i;
}
HeapFree(GetProcessHeap(), 0, pixDynMapping);
return TRUE;
}
/***********************************************************************
* Colormap Initialization
*/
static void X11DRV_PALETTE_FillDefaultColors( const PALETTEENTRY *sys_pal_template )
{
/* initialize unused entries to what Windows uses as a color
* cube - based on Greg Kreider's code.
*/
int i = 1, idx = 0;
int red, no_r, inc_r;
int green, no_g, inc_g;
int blue, no_b, inc_b;
if (palette_size <= NB_RESERVED_COLORS)
return;
while (i*i*i <= (palette_size - NB_RESERVED_COLORS)) i++;
no_r = no_g = no_b = --i;
if ((no_r * (no_g+1) * no_b) <= (palette_size - NB_RESERVED_COLORS)) no_g++;
if ((no_r * no_g * (no_b+1)) <= (palette_size - NB_RESERVED_COLORS)) no_b++;
inc_r = (255 - NB_COLORCUBE_START_INDEX)/no_r;
inc_g = (255 - NB_COLORCUBE_START_INDEX)/no_g;
inc_b = (255 - NB_COLORCUBE_START_INDEX)/no_b;
idx = X11DRV_PALETTE_firstFree;
if( idx != -1 )
for (blue = NB_COLORCUBE_START_INDEX; blue < 256 && idx; blue += inc_b )
for (green = NB_COLORCUBE_START_INDEX; green < 256 && idx; green += inc_g )
for (red = NB_COLORCUBE_START_INDEX; red < 256 && idx; red += inc_r )
{
/* weird but true */
if( red == NB_COLORCUBE_START_INDEX && green == red && blue == green ) continue;
COLOR_sysPal[idx].peRed = red;
COLOR_sysPal[idx].peGreen = green;
COLOR_sysPal[idx].peBlue = blue;
/* set X color */
if( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
{
ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
if (shifts->physicalRed.max != 255) no_r = (red * shifts->physicalRed.max) / 255;
if (shifts->physicalGreen.max != 255) no_g = (green * shifts->physicalGreen.max) / 255;
if (shifts->physicalBlue.max != 255) no_b = (blue * shifts->physicalBlue.max) / 255;
X11DRV_PALETTE_PaletteToXPixel[idx] = (no_r << shifts->physicalRed.shift) | (no_g << shifts->physicalGreen.shift) | (no_b << shifts->physicalBlue.shift);
}
else if( !(X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) )
{
XColor color;
color.pixel = (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[idx] : idx;
color.red = COLOR_sysPal[idx].peRed << 8;
color.green = COLOR_sysPal[idx].peGreen << 8;
color.blue = COLOR_sysPal[idx].peBlue << 8;
color.flags = DoRed | DoGreen | DoBlue;
XStoreColor(gdi_display, default_colormap, &color);
}
idx = X11DRV_PALETTE_freeList[idx];
}
/* try to fill some entries in the "gap" with
* what's already in the colormap - they will be
* mappable to but not changeable. */
if( COLOR_gapStart < COLOR_gapEnd && X11DRV_PALETTE_XPixelToPalette )
{
XColor xc;
int r, g, b, max;
max = alloc_system_colors - (256 - (COLOR_gapEnd - COLOR_gapStart));
for ( i = 0, idx = COLOR_gapStart; i < 256 && idx <= COLOR_gapEnd; i++ )
if( X11DRV_PALETTE_XPixelToPalette[i] == NB_PALETTE_EMPTY_VALUE )
{
xc.pixel = i;
XQueryColor(gdi_display, default_colormap, &xc);
r = xc.red>>8; g = xc.green>>8; b = xc.blue>>8;
if( xc.pixel < 256 && X11DRV_PALETTE_CheckSysColor( sys_pal_template, RGB(r, g, b)) &&
XAllocColor(gdi_display, default_colormap, &xc) )
{
X11DRV_PALETTE_XPixelToPalette[xc.pixel] = idx;
X11DRV_PALETTE_PaletteToXPixel[idx] = xc.pixel;
*(COLORREF*)(COLOR_sysPal + idx) = RGB(r, g, b);
COLOR_sysPal[idx++].peFlags |= PC_SYS_USED;
if( --max <= 0 ) break;
}
}
}
}
/***********************************************************************
* X11DRV_IsSolidColor
*
* Check whether 'color' can be represented with a solid color.
*/
BOOL X11DRV_IsSolidColor( COLORREF color )
{
int i;
const PALETTEENTRY *pEntry = COLOR_sysPal;
if (color & 0xff000000) return TRUE; /* indexed color */
if (!color || (color == 0xffffff)) return TRUE; /* black or white */
if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL) return TRUE; /* no palette */
EnterCriticalSection( &palette_cs );
for (i = 0; i < palette_size ; i++, pEntry++)
{
if( i < COLOR_gapStart || i > COLOR_gapEnd )
if ((GetRValue(color) == pEntry->peRed) &&
(GetGValue(color) == pEntry->peGreen) &&
(GetBValue(color) == pEntry->peBlue))
{
LeaveCriticalSection( &palette_cs );
return TRUE;
}
}
LeaveCriticalSection( &palette_cs );
return FALSE;
}
/***********************************************************************
* X11DRV_PALETTE_ToLogical
*
* Return RGB color for given X pixel.
*/
COLORREF X11DRV_PALETTE_ToLogical(X11DRV_PDEVICE *physDev, int pixel)
{
XColor color;
/* check for hicolor visuals first */
if ( (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED) && !X11DRV_PALETTE_Graymax )
{
ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
if(physDev->color_shifts)
shifts = physDev->color_shifts;
color.red = (pixel >> shifts->logicalRed.shift) & shifts->logicalRed.max;
if (shifts->logicalRed.scale<8)
color.red= color.red << (8-shifts->logicalRed.scale) |
color.red >> (2*shifts->logicalRed.scale-8);
color.green = (pixel >> shifts->logicalGreen.shift) & shifts->logicalGreen.max;
if (shifts->logicalGreen.scale<8)
color.green=color.green << (8-shifts->logicalGreen.scale) |
color.green >> (2*shifts->logicalGreen.scale-8);
color.blue = (pixel >> shifts->logicalBlue.shift) & shifts->logicalBlue.max;
if (shifts->logicalBlue.scale<8)
color.blue= color.blue << (8-shifts->logicalBlue.scale) |
color.blue >> (2*shifts->logicalBlue.scale-8);
return RGB(color.red,color.green,color.blue);
}
/* check if we can bypass X */
if ((default_visual.depth <= 8) && (pixel < 256) &&
!(X11DRV_PALETTE_PaletteFlags & (X11DRV_PALETTE_VIRTUAL | X11DRV_PALETTE_FIXED)) ) {
COLORREF ret;
EnterCriticalSection( &palette_cs );
ret = *(COLORREF *)(COLOR_sysPal + (X11DRV_PALETTE_XPixelToPalette ? X11DRV_PALETTE_XPixelToPalette[pixel]: pixel)) & 0x00ffffff;
LeaveCriticalSection( &palette_cs );
return ret;
}
color.pixel = pixel;
XQueryColor(gdi_display, default_colormap, &color);
return RGB(color.red >> 8, color.green >> 8, color.blue >> 8);
}
/***********************************************************************
* X11DRV_SysPaletteLookupPixel
*/
static int X11DRV_SysPaletteLookupPixel( COLORREF col, BOOL skipReserved )
{
int i, best = 0, diff = 0x7fffffff;
int r,g,b;
for( i = 0; i < palette_size && diff ; i++ )
{
if( !(COLOR_sysPal[i].peFlags & PC_SYS_USED) ||
(skipReserved && COLOR_sysPal[i].peFlags & PC_SYS_RESERVED) )
continue;
r = COLOR_sysPal[i].peRed - GetRValue(col);
g = COLOR_sysPal[i].peGreen - GetGValue(col);
b = COLOR_sysPal[i].peBlue - GetBValue(col);
r = r*r + g*g + b*b;
if( r < diff ) { best = i; diff = r; }
}
return best;
}
/***********************************************************************
* X11DRV_PALETTE_GetColor
*
* Resolve PALETTEINDEX/PALETTERGB/DIBINDEX COLORREFs to an RGB COLORREF.
*/
COLORREF X11DRV_PALETTE_GetColor( X11DRV_PDEVICE *physDev, COLORREF color )
{
HPALETTE hPal = GetCurrentObject(physDev->dev.hdc, OBJ_PAL );
PALETTEENTRY entry;
if (color & (1 << 24)) /* PALETTEINDEX */
{
unsigned int idx = LOWORD(color);
if (!GetPaletteEntries( hPal, idx, 1, &entry )) return 0;
return RGB( entry.peRed, entry.peGreen, entry.peBlue );
}
if (color >> 24 == 2) /* PALETTERGB */
{
unsigned int idx = GetNearestPaletteIndex( hPal, color & 0xffffff );
if (!GetPaletteEntries( hPal, idx, 1, &entry )) return 0;
return RGB( entry.peRed, entry.peGreen, entry.peBlue );
}
if (color >> 16 == 0x10ff) /* DIBINDEX */
return 0;
return color & 0xffffff;
}
/***********************************************************************
* X11DRV_PALETTE_ToPhysical
*
* Return the physical color closest to 'color'.
*/
int X11DRV_PALETTE_ToPhysical( X11DRV_PDEVICE *physDev, COLORREF color )
{
WORD index = 0;
HPALETTE hPal = GetCurrentObject(physDev->dev.hdc, OBJ_PAL );
int *mapping = palette_get_mapping( hPal );
PALETTEENTRY entry;
ColorShifts *shifts = &X11DRV_PALETTE_default_shifts;
if(physDev->color_shifts)
shifts = physDev->color_shifts;
if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED )
{
/* there is no colormap limitation; we are going to have to compute
* the pixel value from the visual information stored earlier
*/
unsigned long red, green, blue;
if (color & (1 << 24)) /* PALETTEINDEX */
{
unsigned int idx = LOWORD( color );
if (!GetPaletteEntries( hPal, idx, 1, &entry ))
{
WARN("PALETTEINDEX(%x) : idx %d is out of bounds, assuming black\n", color, idx);
return 0;
}
if (mapping) return mapping[idx];
red = entry.peRed;
green = entry.peGreen;
blue = entry.peBlue;
}
else if (color >> 16 == 0x10ff) /* DIBINDEX */
{
return 0;
}
else /* RGB */
{
if (physDev->depth == 1)
return (((color >> 16) & 0xff) +
((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? 1 : 0;
red = GetRValue( color );
green = GetGValue( color );
blue = GetBValue( color );
}
if (X11DRV_PALETTE_Graymax)
{
/* grayscale only; return scaled value */
return ( (red * 30 + green * 59 + blue * 11) * X11DRV_PALETTE_Graymax) / 25500;
}
else
{
/* scale each individually and construct the TrueColor pixel value */
if (shifts->physicalRed.scale < 8)
red = red >> (8-shifts->physicalRed.scale);
else if (shifts->physicalRed.scale > 8)
red = red << (shifts->physicalRed.scale-8) |
red >> (16-shifts->physicalRed.scale);
if (shifts->physicalGreen.scale < 8)
green = green >> (8-shifts->physicalGreen.scale);
else if (shifts->physicalGreen.scale > 8)
green = green << (shifts->physicalGreen.scale-8) |
green >> (16-shifts->physicalGreen.scale);
if (shifts->physicalBlue.scale < 8)
blue = blue >> (8-shifts->physicalBlue.scale);
else if (shifts->physicalBlue.scale > 8)
blue = blue << (shifts->physicalBlue.scale-8) |
blue >> (16-shifts->physicalBlue.scale);
return (red << shifts->physicalRed.shift) | (green << shifts->physicalGreen.shift) | (blue << shifts->physicalBlue.shift);
}
}
else
{
if (!mapping)
WARN("Palette %p is not realized\n", hPal);
if (color & (1 << 24)) /* PALETTEINDEX */
{
index = LOWORD( color );
if (!GetPaletteEntries( hPal, index, 1, &entry ))
WARN("PALETTEINDEX(%x) : index %i is out of bounds\n", color, index);
else if (mapping) index = mapping[index];
}
else if (color >> 24 == 2) /* PALETTERGB */
{
index = GetNearestPaletteIndex( hPal, color );
if (mapping) index = mapping[index];
}
else if (color >> 16 == 0x10ff) /* DIBINDEX */
{
return 0;
}
else /* RGB */
{
if (physDev->depth == 1)
return (((color >> 16) & 0xff) +
((color >> 8) & 0xff) + (color & 0xff) > 255*3/2) ? 1 : 0;
EnterCriticalSection( &palette_cs );
index = X11DRV_SysPaletteLookupPixel( color & 0xffffff, FALSE);
if (X11DRV_PALETTE_PaletteToXPixel) index = X11DRV_PALETTE_PaletteToXPixel[index];
LeaveCriticalSection( &palette_cs );
}
}
return index;
}
/***********************************************************************
* X11DRV_PALETTE_LookupPixel
*/
static int X11DRV_PALETTE_LookupPixel(ColorShifts *shifts, COLORREF color )
{
unsigned char spec_type = color >> 24;
/* Only accept RGB which has spec_type = 0 */
if(spec_type)
return 0;
color &= 0xffffff;
if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_FIXED )
{
unsigned long red, green, blue;
red = GetRValue(color); green = GetGValue(color); blue = GetBValue(color);
if (X11DRV_PALETTE_Graymax)
{
/* grayscale only; return scaled value */
return ( (red * 30 + green * 59 + blue * 11) * X11DRV_PALETTE_Graymax) / 25500;
}
else
{
/* No shifts are set in case of 1-bit */
if(!shifts) shifts = &X11DRV_PALETTE_default_shifts;
/* scale each individually and construct the TrueColor pixel value */
if (shifts->physicalRed.scale < 8)
red = red >> (8-shifts->physicalRed.scale);
else if (shifts->physicalRed.scale > 8)
red = red << (shifts->physicalRed.scale-8) |
red >> (16-shifts->physicalRed.scale);
if (shifts->physicalGreen.scale < 8)
green = green >> (8-shifts->physicalGreen.scale);
else if (shifts->physicalGreen.scale > 8)
green = green << (shifts->physicalGreen.scale-8) |
green >> (16-shifts->physicalGreen.scale);
if (shifts->physicalBlue.scale < 8)
blue = blue >> (8-shifts->physicalBlue.scale);
else if (shifts->physicalBlue.scale > 8)
blue = blue << (shifts->physicalBlue.scale-8) |
blue >> (16-shifts->physicalBlue.scale);
return (red << shifts->physicalRed.shift) | (green << shifts->physicalGreen.shift) | (blue << shifts->physicalBlue.shift);
}
}
else
{
WORD index;
HPALETTE hPal = GetStockObject(DEFAULT_PALETTE);
int *mapping = palette_get_mapping( hPal );
if (!mapping)
WARN("Palette %p is not realized\n", hPal);
EnterCriticalSection( &palette_cs );
index = X11DRV_SysPaletteLookupPixel( color, FALSE);
if (X11DRV_PALETTE_PaletteToXPixel)
index = X11DRV_PALETTE_PaletteToXPixel[index];
LeaveCriticalSection( &palette_cs );
return index;
}
}
/***********************************************************************
* X11DRV_PALETTE_LookupSystemXPixel
*/
static int X11DRV_PALETTE_LookupSystemXPixel(COLORREF col)
{
int i, best = 0, diff = 0x7fffffff;
int size = palette_size;
int r,g,b;
for( i = 0; i < size && diff ; i++ )
{
if( i == NB_RESERVED_COLORS/2 )
{
int newi = size - NB_RESERVED_COLORS/2;
if (newi>i) i=newi;
}
r = COLOR_sysPal[i].peRed - GetRValue(col);
g = COLOR_sysPal[i].peGreen - GetGValue(col);
b = COLOR_sysPal[i].peBlue - GetBValue(col);
r = r*r + g*g + b*b;
if( r < diff ) { best = i; diff = r; }
}
return (X11DRV_PALETTE_PaletteToXPixel)? X11DRV_PALETTE_PaletteToXPixel[best] : best;
}
/***********************************************************************
* X11DRV_PALETTE_FormatSystemPalette
*/
static void X11DRV_PALETTE_FormatSystemPalette(void)
{
/* Build free list so we'd have an easy way to find
* out if there are any available colorcells.
*/
int i, j = X11DRV_PALETTE_firstFree = NB_RESERVED_COLORS/2;
COLOR_sysPal[j].peFlags = 0;
for( i = NB_RESERVED_COLORS/2 + 1 ; i < 256 - NB_RESERVED_COLORS/2 ; i++ )
if( i < COLOR_gapStart || i > COLOR_gapEnd )
{
COLOR_sysPal[i].peFlags = 0; /* unused tag */
X11DRV_PALETTE_freeList[j] = i; /* next */
j = i;
}
X11DRV_PALETTE_freeList[j] = 0;
}
/***********************************************************************
* X11DRV_PALETTE_CheckSysColor
*/
static BOOL X11DRV_PALETTE_CheckSysColor( const PALETTEENTRY *sys_pal_template, COLORREF c)
{
int i;
for( i = 0; i < NB_RESERVED_COLORS; i++ )
if( c == (*(const COLORREF*)(sys_pal_template + i) & 0x00ffffff) )
return FALSE;
return TRUE;
}
/***********************************************************************
* X11DRV_LookupSysPaletteExact
*/
static int X11DRV_LookupSysPaletteExact( BYTE r, BYTE g, BYTE b )
{
int i;
for( i = 0; i < palette_size; i++ )
{
if( COLOR_sysPal[i].peFlags & PC_SYS_USED ) /* skips gap */
if( COLOR_sysPal[i].peRed == r &&
COLOR_sysPal[i].peGreen == g &&
COLOR_sysPal[i].peBlue == b )
return i;
}
return -1;
}
/***********************************************************************
* RealizePalette (X11DRV.@)
*/
UINT CDECL X11DRV_RealizePalette( PHYSDEV dev, HPALETTE hpal, BOOL primary )
{
X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
char flag;
int index;
UINT i, iRemapped = 0;
int *prev_mapping, *mapping;
PALETTEENTRY entries[256];
WORD num_entries;
if (X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL) return 0;
if (!GetObjectW( hpal, sizeof(num_entries), &num_entries )) return 0;
/* initialize palette mapping table */
prev_mapping = palette_get_mapping( hpal );
if (prev_mapping)
mapping = HeapReAlloc( GetProcessHeap(), 0, prev_mapping, sizeof(int)*num_entries);
else
mapping = HeapAlloc( GetProcessHeap(), 0, sizeof(int)*num_entries);
if(mapping == NULL) {
ERR("Unable to allocate new mapping -- memory exhausted!\n");
return 0;
}
palette_set_mapping( hpal, mapping );
if (num_entries > 256)
{
FIXME( "more than 256 entries not supported\n" );
num_entries = 256;
}
if (!(num_entries = GetPaletteEntries( hpal, 0, num_entries, entries ))) return 0;
/* reset dynamic system palette entries */
EnterCriticalSection( &palette_cs );
if( primary && X11DRV_PALETTE_firstFree != -1)
X11DRV_PALETTE_FormatSystemPalette();
for (i = 0; i < num_entries; i++)
{
index = -1;
flag = PC_SYS_USED;
/* Even though the docs say that only one flag is to be set,
* they are a bitmask. At least one app sets more than one at
* the same time. */
if ( entries[i].peFlags & PC_EXPLICIT ) {
/* palette entries are indices into system palette */
index = *(WORD*)&entries[i];
if( index > 255 || (index >= COLOR_gapStart && index <= COLOR_gapEnd) )
{
WARN("PC_EXPLICIT: idx %d out of system palette, assuming black.\n", index);
index = 0;
}
if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
} else {
if ( entries[i].peFlags & PC_RESERVED ) {
/* forbid future mappings to this entry */
flag |= PC_SYS_RESERVED;
}
if (! (entries[i].peFlags & PC_NOCOLLAPSE) ) {
/* try to collapse identical colors */
index = X11DRV_LookupSysPaletteExact( entries[i].peRed, entries[i].peGreen, entries[i].peBlue );
}
if( index < 0 )
{
if( X11DRV_PALETTE_firstFree > 0 )
{
XColor color;
index = X11DRV_PALETTE_firstFree; /* ought to be available */
X11DRV_PALETTE_firstFree = X11DRV_PALETTE_freeList[index];
color.pixel = (X11DRV_PALETTE_PaletteToXPixel) ? X11DRV_PALETTE_PaletteToXPixel[index] : index;
color.red = entries[i].peRed << 8;
color.green = entries[i].peGreen << 8;
color.blue = entries[i].peBlue << 8;
color.flags = DoRed | DoGreen | DoBlue;
XStoreColor(gdi_display, default_colormap, &color);
COLOR_sysPal[index] = entries[i];
COLOR_sysPal[index].peFlags = flag;
X11DRV_PALETTE_freeList[index] = 0;
if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
}
else if ( X11DRV_PALETTE_PaletteFlags & X11DRV_PALETTE_VIRTUAL )
{
index = X11DRV_PALETTE_LookupPixel( physDev->color_shifts, RGB( entries[i].peRed, entries[i].peGreen, entries[i].peBlue ));
}
/* we have to map to existing entry in the system palette */
index = X11DRV_SysPaletteLookupPixel( RGB( entries[i].peRed, entries[i].peGreen, entries[i].peBlue ),
TRUE );
}
if( X11DRV_PALETTE_PaletteToXPixel ) index = X11DRV_PALETTE_PaletteToXPixel[index];
}
if( !prev_mapping || mapping[i] != index ) iRemapped++;
mapping[i] = index;
TRACE("entry %i (%x) -> pixel %i\n", i, *(COLORREF*)&entries[i], index);
}
LeaveCriticalSection( &palette_cs );
return iRemapped;
}
/***********************************************************************
* UnrealizePalette (X11DRV.@)
*/
BOOL CDECL X11DRV_UnrealizePalette( HPALETTE hpal )
{
int *mapping = palette_get_mapping( hpal );
if (mapping)
{
XDeleteContext( gdi_display, (XID)hpal, palette_context );
HeapFree( GetProcessHeap(), 0, mapping );
}
return TRUE;
}
/***********************************************************************
* GetSystemPaletteEntries (X11DRV.@)
*/
UINT CDECL X11DRV_GetSystemPaletteEntries( PHYSDEV dev, UINT start, UINT count, LPPALETTEENTRY entries )
{
UINT i;
if (!palette_size)
{
dev = GET_NEXT_PHYSDEV(dev, pGetSystemPaletteEntries);
return dev->funcs->pGetSystemPaletteEntries(dev, start, count, entries);
}
if (!entries) return palette_size;
if (start >= palette_size) return 0;
if (start + count >= palette_size) count = palette_size - start;
EnterCriticalSection( &palette_cs );
for (i = 0; i < count; i++)
{
entries[i].peRed = COLOR_sysPal[start + i].peRed;
entries[i].peGreen = COLOR_sysPal[start + i].peGreen;
entries[i].peBlue = COLOR_sysPal[start + i].peBlue;
entries[i].peFlags = 0;
TRACE("\tidx(%02x) -> RGB(%08x)\n", start + i, *(COLORREF*)(entries + i) );
}
LeaveCriticalSection( &palette_cs );
return count;
}
/***********************************************************************
* GetNearestColor (X11DRV.@)
*/
COLORREF CDECL X11DRV_GetNearestColor( PHYSDEV dev, COLORREF color )
{
unsigned char spec_type = color >> 24;
COLORREF nearest;
if (!palette_size) return color;
if (spec_type == 1 || spec_type == 2)
{
/* we need logical palette for PALETTERGB and PALETTEINDEX colorrefs */
UINT index;
PALETTEENTRY entry;
HPALETTE hpal = GetCurrentObject( dev->hdc, OBJ_PAL );
if (!hpal) hpal = GetStockObject( DEFAULT_PALETTE );
if (spec_type == 2) /* PALETTERGB */
index = GetNearestPaletteIndex( hpal, color );
else /* PALETTEINDEX */
index = LOWORD(color);
if (!GetPaletteEntries( hpal, index, 1, &entry ))
{
WARN("RGB(%x) : idx %d is out of bounds, assuming NULL\n", color, index );
if (!GetPaletteEntries( hpal, 0, 1, &entry )) return CLR_INVALID;
}
color = RGB( entry.peRed, entry.peGreen, entry.peBlue );
}
color &= 0x00ffffff;
EnterCriticalSection( &palette_cs );
nearest = (0x00ffffff & *(COLORREF*)(COLOR_sysPal + X11DRV_SysPaletteLookupPixel(color, FALSE)));
LeaveCriticalSection( &palette_cs );
TRACE("(%06x): returning %06x\n", color, nearest );
return nearest;
}
/***********************************************************************
* RealizeDefaultPalette (X11DRV.@)
*/
UINT CDECL X11DRV_RealizeDefaultPalette( PHYSDEV dev )
{
UINT ret = 0;
if (palette_size && GetObjectType(dev->hdc) != OBJ_MEMDC)
{
/* lookup is needed to account for SetSystemPaletteUse() stuff */
int i, index, *mapping = palette_get_mapping( GetStockObject(DEFAULT_PALETTE) );
PALETTEENTRY entries[NB_RESERVED_COLORS];
GetPaletteEntries( GetStockObject(DEFAULT_PALETTE), 0, NB_RESERVED_COLORS, entries );
EnterCriticalSection( &palette_cs );
for( i = 0; i < NB_RESERVED_COLORS; i++ )
{
index = X11DRV_PALETTE_LookupSystemXPixel( RGB(entries[i].peRed,
entries[i].peGreen,
entries[i].peBlue) );
/* mapping is allocated in COLOR_InitPalette() */
if( index != mapping[i] )
{
mapping[i]=index;
ret++;
}
}
LeaveCriticalSection( &palette_cs );
}
return ret;
}