dlls/x11drv/brush.c

   1 /*
   2  * X11DRV brush objects
   3  *
   4  * Copyright 1993, 1994  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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdlib.h>
  24
  25 #include "gdi.h"
  26 #include "x11drv.h"
  27 #include "wine/debug.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(gdi);
  30
  31 #define NB_HATCH_STYLES  (HS_DIAGCROSS+1)
  32
  33 static const char HatchBrushes[NB_HATCH_STYLES + 1][8] =
  34 {
  35     { 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00 }, /* HS_HORIZONTAL */
  36     { 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08 }, /* HS_VERTICAL   */
  37     { 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 }, /* HS_FDIAGONAL  */
  38     { 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01 }, /* HS_BDIAGONAL  */
  39     { 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08, 0x08 }, /* HS_CROSS      */
  40     { 0x81, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42, 0x81 }, /* HS_DIAGCROSS  */
  41     { 0xee, 0xbb, 0xee, 0xbb, 0xee, 0xbb, 0xee, 0xbb }  /* Hack for DKGRAY */
  42 };
  43
  44   /* Levels of each primary for dithering */
  45 #define PRIMARY_LEVELS  3
  46 #define TOTAL_LEVELS    (PRIMARY_LEVELS*PRIMARY_LEVELS*PRIMARY_LEVELS)
  47
  48  /* Dithering matrix size  */
  49 #define MATRIX_SIZE     8
  50 #define MATRIX_SIZE_2   (MATRIX_SIZE*MATRIX_SIZE)
  51
  52   /* Total number of possible levels for a dithered primary color */
  53 #define DITHER_LEVELS   (MATRIX_SIZE_2 * (PRIMARY_LEVELS-1) + 1)
  54
  55   /* Dithering matrix */
  56 static const int dither_matrix[MATRIX_SIZE_2] =
  57 {
  58      0, 32,  8, 40,  2, 34, 10, 42,
  59     48, 16, 56, 24, 50, 18, 58, 26,
  60     12, 44,  4, 36, 14, 46,  6, 38,
  61     60, 28, 52, 20, 62, 30, 54, 22,
  62      3, 35, 11, 43,  1, 33,  9, 41,
  63     51, 19, 59, 27, 49, 17, 57, 25,
  64     15, 47,  7, 39, 13, 45,  5, 37,
  65     63, 31, 55, 23, 61, 29, 53, 21
  66 };
  67
  68   /* Mapping between (R,G,B) triples and EGA colors */
  69 static const int EGAmapping[TOTAL_LEVELS] =
  70 {
  71     0,  /* 000000 -> 000000 */
  72     4,  /* 00007f -> 000080 */
  73     12, /* 0000ff -> 0000ff */
  74     2,  /* 007f00 -> 008000 */
  75     6,  /* 007f7f -> 008080 */
  76     6,  /* 007fff -> 008080 */
  77     10, /* 00ff00 -> 00ff00 */
  78     6,  /* 00ff7f -> 008080 */
  79     14, /* 00ffff -> 00ffff */
  80     1,  /* 7f0000 -> 800000 */
  81     5,  /* 7f007f -> 800080 */
  82     5,  /* 7f00ff -> 800080 */
  83     3,  /* 7f7f00 -> 808000 */
  84     8,  /* 7f7f7f -> 808080 */
  85     7,  /* 7f7fff -> c0c0c0 */
  86     3,  /* 7fff00 -> 808000 */
  87     7,  /* 7fff7f -> c0c0c0 */
  88     7,  /* 7fffff -> c0c0c0 */
  89     9,  /* ff0000 -> ff0000 */
  90     5,  /* ff007f -> 800080 */
  91     13, /* ff00ff -> ff00ff */
  92     3,  /* ff7f00 -> 808000 */
  93     7,  /* ff7f7f -> c0c0c0 */
  94     7,  /* ff7fff -> c0c0c0 */
  95     11, /* ffff00 -> ffff00 */
  96     7,  /* ffff7f -> c0c0c0 */
  97     15  /* ffffff -> ffffff */
  98 };
  99
 100 #define PIXEL_VALUE(r,g,b) \
 101     X11DRV_PALETTE_mapEGAPixel[EGAmapping[((r)*PRIMARY_LEVELS+(g))*PRIMARY_LEVELS+(b)]]
 102
 103   /* X image for building dithered pixmap */
 104 static XImage *ditherImage = NULL;
 105
 106
 107 /***********************************************************************
 108  *           BRUSH_DitherColor
 109  */
 110 static Pixmap BRUSH_DitherColor( COLORREF color )
 111 {
 112     static COLORREF prevColor = 0xffffffff;
 113     unsigned int x, y;
 114     Pixmap pixmap;
 115
 116     if (!ditherImage)
 117     {
 118         ditherImage = X11DRV_DIB_CreateXImage( MATRIX_SIZE, MATRIX_SIZE, screen_depth );
 119         if (!ditherImage) return 0;
 120     }
 121
 122     wine_tsx11_lock();
 123     if (color != prevColor)
 124     {
 125         int r = GetRValue( color ) * DITHER_LEVELS;
 126         int g = GetGValue( color ) * DITHER_LEVELS;
 127         int b = GetBValue( color ) * DITHER_LEVELS;
 128         const int *pmatrix = dither_matrix;
 129
 130         for (y = 0; y < MATRIX_SIZE; y++)
 131         {
 132             for (x = 0; x < MATRIX_SIZE; x++)
 133             {
 134                 int d  = *pmatrix++ * 256;
 135                 int dr = ((r + d) / MATRIX_SIZE_2) / 256;
 136                 int dg = ((g + d) / MATRIX_SIZE_2) / 256;
 137                 int db = ((b + d) / MATRIX_SIZE_2) / 256;
 138                 XPutPixel( ditherImage, x, y, PIXEL_VALUE(dr,dg,db) );
 139             }
 140         }
 141         prevColor = color;
 142     }
 143
 144     pixmap = XCreatePixmap( gdi_display, root_window, MATRIX_SIZE, MATRIX_SIZE, screen_depth );
 145     XPutImage( gdi_display, pixmap, BITMAP_colorGC, ditherImage, 0, 0,
 146                0, 0, MATRIX_SIZE, MATRIX_SIZE );
 147     wine_tsx11_unlock();
 148     return pixmap;
 149 }
 150
 151
 152 /***********************************************************************
 153  *           BRUSH_SelectSolidBrush
 154  */
 155 static void BRUSH_SelectSolidBrush( X11DRV_PDEVICE *physDev, COLORREF color )
 156 {
 157     if ((physDev->depth > 1) && (screen_depth <= 8) && !X11DRV_IsSolidColor( color ))
 158     {
 159           /* Dithered brush */
 160         physDev->brush.pixmap = BRUSH_DitherColor( color );
 161         physDev->brush.fillStyle = FillTiled;
 162         physDev->brush.pixel = 0;
 163     }
 164     else
 165     {
 166           /* Solid brush */
 167         physDev->brush.pixel = X11DRV_PALETTE_ToPhysical( physDev, color );
 168         physDev->brush.fillStyle = FillSolid;
 169     }
 170 }
 171
 172
 173 /***********************************************************************
 174  *           BRUSH_SelectPatternBrush
 175  */
 176 static BOOL BRUSH_SelectPatternBrush( X11DRV_PDEVICE *physDev, HBITMAP hbitmap )
 177 {
 178     BOOL ret = FALSE;
 179     Pixmap pixmap;
 180     BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 181     if (!bmp) return FALSE;
 182
 183     if (!(pixmap = X11DRV_get_pixmap( hbitmap ))) goto done;
 184
 185     wine_tsx11_lock();
 186     if ((physDev->depth == 1) && (bmp->bitmap.bmBitsPixel != 1))
 187     {
 188         /* Special case: a color pattern on a monochrome DC */
 189         physDev->brush.pixmap = XCreatePixmap( gdi_display, root_window,
 190                                                bmp->bitmap.bmWidth, bmp->bitmap.bmHeight, 1);
 191         /* FIXME: should probably convert to monochrome instead */
 192         XCopyPlane( gdi_display, pixmap, physDev->brush.pixmap,
 193                     BITMAP_monoGC, 0, 0, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight, 0, 0, 1 );
 194     }
 195     else
 196     {
 197         physDev->brush.pixmap = XCreatePixmap( gdi_display, root_window,
 198                                                bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 199                                                bmp->bitmap.bmBitsPixel );
 200         XCopyArea( gdi_display, pixmap, physDev->brush.pixmap,
 201                    BITMAP_GC(bmp), 0, 0, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight, 0, 0 );
 202     }
 203     wine_tsx11_unlock();
 204
 205     if (bmp->bitmap.bmBitsPixel > 1)
 206     {
 207         physDev->brush.fillStyle = FillTiled;
 208         physDev->brush.pixel = 0;  /* Ignored */
 209     }
 210     else
 211     {
 212         physDev->brush.fillStyle = FillOpaqueStippled;
 213         physDev->brush.pixel = -1;  /* Special case (see DC_SetupGCForBrush) */
 214     }
 215     ret = TRUE;
 216  done:
 217     GDI_ReleaseObj( hbitmap );
 218     return ret;
 219 }
 220
 221
 222 /***********************************************************************
 223  *           SelectBrush   (X11DRV.@)
 224  */
 225 HBRUSH X11DRV_SelectBrush( X11DRV_PDEVICE *physDev, HBRUSH hbrush )
 226 {
 227     LOGBRUSH logbrush;
 228     HBITMAP hBitmap;
 229     BITMAPINFO * bmpInfo;
 230
 231     if (!GetObjectA( hbrush, sizeof(logbrush), &logbrush )) return 0;
 232
 233     TRACE("hdc=%p hbrush=%p\n", physDev->hdc,hbrush);
 234
 235     if (physDev->brush.pixmap)
 236     {
 237         wine_tsx11_lock();
 238         XFreePixmap( gdi_display, physDev->brush.pixmap );
 239         wine_tsx11_unlock();
 240         physDev->brush.pixmap = 0;
 241     }
 242     physDev->brush.style = logbrush.lbStyle;
 243     if (hbrush == GetStockObject( DC_BRUSH ))
 244         logbrush.lbColor = GetDCBrushColor( physDev->hdc );
 245
 246     switch(logbrush.lbStyle)
 247     {
 248       case BS_NULL:
 249         TRACE("BS_NULL\n" );
 250         break;
 251
 252       case BS_SOLID:
 253         TRACE("BS_SOLID\n" );
 254         BRUSH_SelectSolidBrush( physDev, logbrush.lbColor );
 255         break;
 256
 257       case BS_HATCHED:
 258         TRACE("BS_HATCHED\n" );
 259         physDev->brush.pixel = X11DRV_PALETTE_ToPhysical( physDev, logbrush.lbColor );
 260         wine_tsx11_lock();
 261         physDev->brush.pixmap = XCreateBitmapFromData( gdi_display, root_window,
 262                                                        HatchBrushes[logbrush.lbHatch], 8, 8 );
 263         wine_tsx11_unlock();
 264         physDev->brush.fillStyle = FillStippled;
 265         break;
 266
 267       case BS_PATTERN:
 268         TRACE("BS_PATTERN\n");
 269         if (!BRUSH_SelectPatternBrush( physDev, (HBITMAP)logbrush.lbHatch )) return 0;
 270         break;
 271
 272       case BS_DIBPATTERN:
 273         TRACE("BS_DIBPATTERN\n");
 274         if ((bmpInfo = (BITMAPINFO *) GlobalLock16( (HGLOBAL16)logbrush.lbHatch )))
 275         {
 276             int size = X11DRV_DIB_BitmapInfoSize( bmpInfo, logbrush.lbColor );
 277             hBitmap = CreateDIBitmap( physDev->hdc, &bmpInfo->bmiHeader,
 278                                         CBM_INIT, ((char *)bmpInfo) + size,
 279                                         bmpInfo,
 280                                         (WORD)logbrush.lbColor );
 281             BRUSH_SelectPatternBrush( physDev, hBitmap );
 282             DeleteObject( hBitmap );
 283             GlobalUnlock16( (HGLOBAL16)logbrush.lbHatch );
 284         }
 285
 286         break;
 287     }
 288     return hbrush;
 289 }
 290
 291
 292 /***********************************************************************
 293  *           SetDCBrushColor (X11DRV.@)
 294  */
 295 COLORREF X11DRV_SetDCBrushColor( X11DRV_PDEVICE *physDev, COLORREF crColor )
 296 {
 297     if (GetCurrentObject(physDev->hdc, OBJ_BRUSH) == GetStockObject( DC_BRUSH ))
 298         BRUSH_SelectSolidBrush( physDev, crColor );
 299
 300     return crColor;
 301 }