dlls/winedib.drv/palette.c

   1 /*
   2  * DIBDRV palette objects
   3  *
   4  * Copyright 2009 Massimo Del Fedele
   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 #include "wine/port.h"
  23
  24 #include "dibdrv.h"
  25
  26 WINE_DEFAULT_DEBUG_CHANNEL(dibdrv);
  27
  28 /* maps a colorref to actual color */
  29 COLORREF _DIBDRV_MapColor(DIBDRVPHYSDEV *physDev, COLORREF color)
  30 {
  31     WORD index;
  32     RGBQUAD *palColor;
  33     HPALETTE hPal;
  34     PALETTEENTRY paletteEntry;
  35
  36     switch(color >> 24)
  37     {
  38         case 0x10 : /* DIBINDEX */
  39             MAYBE(TRACE("DIBINDEX Color is %08x\n", color));
  40             index =  color & 0xffff;
  41             if(index >= physDev->physBitmap->colorTableSize)
  42             {
  43                 WARN("DIBINDEX color %d out of range, color table size is %d\n", index, physDev->physBitmap->colorTableSize);
  44                 return 0;
  45             }
  46             palColor = physDev->physBitmap->colorTable + index;
  47             MAYBE(TRACE("Returning color %08x\n", RGB(palColor->rgbRed, palColor->rgbGreen, palColor->rgbBlue)));
  48             return RGB(palColor->rgbRed, palColor->rgbGreen, palColor->rgbBlue);
  49
  50         case 0x01: /* PALETTEINDEX */
  51             MAYBE(TRACE("PALETTEINDEX Color is %08x\n", color));
  52             index =  color & 0xffff;
  53             if(!(hPal = GetCurrentObject(physDev->hdc, OBJ_PAL)))
  54             {
  55                 ERR("Couldn't get palette\n");
  56                 return 0;
  57             }
  58             if (!GetPaletteEntries(hPal, index, 1, &paletteEntry))
  59             {
  60                 WARN("PALETTEINDEX(%x) : index %d is out of bounds, assuming black\n", color, index);
  61                 return 0;
  62             }
  63             MAYBE(TRACE("Returning color %08x\n", RGB(paletteEntry.peRed, paletteEntry.peGreen, paletteEntry.peBlue)));
  64             return RGB(paletteEntry.peRed, paletteEntry.peGreen, paletteEntry.peBlue);
  65
  66         case 0x02: /* PALETTERGB */
  67             return _DIBDRV_GetNearestColor(physDev->physBitmap, color & 0xffffff);
  68
  69         default:
  70             /* RGB color -- we must process special case for monochrome bitmaps */
  71             if(physDev->physBitmap->bitCount == 1)
  72             {
  73                 RGBQUAD *back = physDev->physBitmap->colorTable;
  74                 RGBQUAD *fore = back+1;
  75                 COLORREF lightColorref, darkColorref;
  76
  77                 /* lightest color is considered to be 'foreground' one, i.e. associated to white color */
  78                 if(physDev->physBitmap->lightColor == 1)
  79                 {
  80                     darkColorref = RGB(back->rgbRed, back->rgbGreen, back->rgbBlue);
  81                     lightColorref = RGB(fore->rgbRed, fore->rgbGreen, fore->rgbBlue);
  82                 }
  83                 else
  84                 {
  85                     darkColorref = RGB(fore->rgbRed, fore->rgbGreen, fore->rgbBlue);
  86                     lightColorref = RGB(back->rgbRed, back->rgbGreen, back->rgbBlue);
  87                 }
  88
  89                 /* tested on Windows XP -- if present in colortable, maps to corresponding color
  90                    if not, if white maps to the lightest color, otherwise darkest one. */
  91                 if(color == lightColorref || color == darkColorref)
  92                     return color;
  93                 else if (color == 0x00ffffff)
  94                     return lightColorref;
  95                 else
  96                     return darkColorref;
  97             }
  98             else
  99                 return color;
 100     }
 101 }
 102
 103 /***********************************************************************
 104  *              DIBDRV_RealizePalette
 105  */
 106 UINT DIBDRV_RealizePalette( DIBDRVPHYSDEV *physDev, HPALETTE hpal, BOOL primary )
 107 {
 108     UINT res = 0;
 109
 110     MAYBE(TRACE("physDev:%p, hpal:%p, primary:%s\n", physDev, hpal, (primary ? "TRUE" : "FALSE")));
 111
 112     if(physDev && physDev->hasDIB)
 113     {
 114         /* DIB section selected in, additional (if needed) engine code */
 115         ONCE(FIXME("STUB\n"));
 116         res = 0;
 117     }
 118     else
 119     {
 120         /* we should in any case call X11 function, as UnrealizePalette() doesn't
 121          * take a physDev parameter */
 122         res = _DIBDRV_GetDisplayDriver()->pRealizePalette(physDev ? physDev->X11PhysDev : NULL, hpal, primary);
 123
 124     }
 125
 126     return res;
 127 }
 128
 129 /***********************************************************************
 130  *              DIBDRV_UnrealizePalette
 131  */
 132 BOOL DIBDRV_UnrealizePalette( HPALETTE hpal )
 133 {
 134     BOOL res;
 135
 136     MAYBE(TRACE("hpal:%p\n", hpal));
 137
 138     /* we should in any case call X11 function, as UnrealizePalette() doesn't
 139      * take a physDev parameter */
 140     res = _DIBDRV_GetDisplayDriver()->pUnrealizePalette(hpal);
 141
 142     /* additional Engine code here, if needed */
 143     ONCE(FIXME("STUB\n"));
 144
 145     return res;
 146 }
 147
 148 /***********************************************************************
 149  *              DIBDRV_GetSystemPaletteEntries
 150  */
 151 UINT DIBDRV_GetSystemPaletteEntries( DIBDRVPHYSDEV *physDev, UINT start, UINT count,
 152                                      LPPALETTEENTRY entries )
 153 {
 154     UINT res;
 155
 156     MAYBE(TRACE("physDev:%p, start:%d, count:%d, entries:%p\n", physDev, start, count, entries));
 157
 158     if(physDev->hasDIB)
 159     {
 160         /* DIB section selected in, use DIB Engine */
 161         ONCE(FIXME("STUB\n"));
 162         res = 0;
 163     }
 164     else
 165     {
 166         /* DDB selected in, use X11 driver */
 167         res = _DIBDRV_GetDisplayDriver()->pGetSystemPaletteEntries(physDev->X11PhysDev, start, count, entries);
 168     }
 169     return res;
 170 }
 171
 172 /***********************************************************************
 173  *              DIBDRV_GetNearestColor
 174  */
 175 COLORREF DIBDRV_GetNearestColor( DIBDRVPHYSDEV *physDev, COLORREF color )
 176 {
 177     COLORREF res;
 178
 179     MAYBE(TRACE("physDev:%p, color:%x\n", physDev, color));
 180
 181     if(physDev->hasDIB)
 182     {
 183         /* DIB section selected in, use DIB Engine */
 184         ONCE(FIXME("STUB\n"));
 185         res = 0;
 186     }
 187     else
 188     {
 189         /* DDB selected in, use X11 driver */
 190         res = _DIBDRV_GetDisplayDriver()->pGetNearestColor(physDev->X11PhysDev, color);
 191     }
 192     return res;
 193 }
 194
 195 /***********************************************************************
 196  *              DIBDRV_RealizeDefaultPalette
 197  */
 198 UINT DIBDRV_RealizeDefaultPalette( DIBDRVPHYSDEV *physDev )
 199 {
 200     UINT res;
 201 #ifdef DIBDRV_ENABLE_MAYBE
 202     int i;
 203     RGBQUAD *q;
 204 #endif
 205
 206     MAYBE(TRACE("physDev:%p\n", physDev));
 207
 208     if(physDev->hasDIB)
 209     {
 210         /* DIB section selected in, use DIB Engine */
 211         ONCE(FIXME("STUB\n"));
 212         /* HACK - we can't get the dib color table during SelectBitmap since it hasn't
 213            been initialized yet.  This is called from DC_InitDC so it's a convenient place
 214            to grab the color table. */
 215         MAYBE(TRACE("Color table size = %d, Color table = %p\n", physDev->physBitmap->colorTableSize, physDev->physBitmap->colorTable));
 216         if(!physDev->physBitmap->colorTableGrabbed)
 217         {
 218             MAYBE(TRACE("Grabbing palette\n"));
 219             physDev->physBitmap->colorTable = HeapAlloc(GetProcessHeap(), 0, sizeof(physDev->physBitmap->colorTable[0]) * physDev->physBitmap->colorTableSize);
 220             GetDIBColorTable(physDev->hdc, 0, physDev->physBitmap->colorTableSize, physDev->physBitmap->colorTable);
 221 #ifdef DIBDRV_ENABLE_MAYBE
 222            for(i = 0; i < physDev->physBitmap->colorTableSize; i++)
 223             {
 224                 q = physDev->physBitmap->colorTable + i;
 225                 TRACE("  %03d : R%03d G%03d B%03d\n", i, q->rgbRed, q->rgbGreen, q->rgbBlue);
 226             }
 227 #endif
 228             physDev->physBitmap->colorTableGrabbed = TRUE;
 229
 230             /* for monochrome bitmaps, we need the 'lightest' color */
 231             _DIBDRVBITMAP_GetLightestColorIndex(physDev->physBitmap);
 232
 233         }
 234         res = 0;
 235     }
 236     else
 237     {
 238         /* DDB selected in, use X11 driver */
 239         res = _DIBDRV_GetDisplayDriver()->pRealizeDefaultPalette(physDev->X11PhysDev);
 240     }
 241     return res;
 242 }
 243
 244 BOOL DIBDRV_GetICMProfile(DIBDRVPHYSDEV *physDev, LPDWORD lpcbName, LPWSTR lpszFilename)
 245 {
 246     BOOL res;
 247
 248     MAYBE(TRACE("physDev:%p, lpcpName:%p, lpszFilename:%p\n", physDev, lpcbName, lpszFilename));
 249
 250     if(physDev->hasDIB)
 251     {
 252         /* DIB section selected in, use DIB Engine */
 253         ONCE(FIXME("STUB\n"));
 254
 255         res = 0;
 256     }
 257     else
 258     {
 259         /* DDB selected in, use X11 driver */
 260         res = _DIBDRV_GetDisplayDriver()->pGetICMProfile(physDev->X11PhysDev, lpcbName, lpszFilename);
 261     }
 262     return res;
 263 }