4 * Copyright 1993, 1994 Alexandre Julliard
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.
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.
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
25 #include "wine/winbase16.h"
27 #include "wine/debug.h"
29 WINE_DEFAULT_DEBUG_CHANNEL(gdi
);
31 static const char HatchBrushes
[][8] =
33 { 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00 }, /* HS_HORIZONTAL */
34 { 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08 }, /* HS_VERTICAL */
35 { 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 }, /* HS_FDIAGONAL */
36 { 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01 }, /* HS_BDIAGONAL */
37 { 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08, 0x08 }, /* HS_CROSS */
38 { 0x81, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42, 0x81 }, /* HS_DIAGCROSS */
41 /* Levels of each primary for dithering */
42 #define PRIMARY_LEVELS 3
43 #define TOTAL_LEVELS (PRIMARY_LEVELS*PRIMARY_LEVELS*PRIMARY_LEVELS)
45 /* Dithering matrix size */
47 #define MATRIX_SIZE_2 (MATRIX_SIZE*MATRIX_SIZE)
49 /* Total number of possible levels for a dithered primary color */
50 #define DITHER_LEVELS (MATRIX_SIZE_2 * (PRIMARY_LEVELS-1) + 1)
52 /* Dithering matrix */
53 static const int dither_matrix
[MATRIX_SIZE_2
] =
55 0, 32, 8, 40, 2, 34, 10, 42,
56 48, 16, 56, 24, 50, 18, 58, 26,
57 12, 44, 4, 36, 14, 46, 6, 38,
58 60, 28, 52, 20, 62, 30, 54, 22,
59 3, 35, 11, 43, 1, 33, 9, 41,
60 51, 19, 59, 27, 49, 17, 57, 25,
61 15, 47, 7, 39, 13, 45, 5, 37,
62 63, 31, 55, 23, 61, 29, 53, 21
65 /* Mapping between (R,G,B) triples and EGA colors */
66 static const int EGAmapping
[TOTAL_LEVELS
] =
68 0, /* 000000 -> 000000 */
69 4, /* 00007f -> 000080 */
70 12, /* 0000ff -> 0000ff */
71 2, /* 007f00 -> 008000 */
72 6, /* 007f7f -> 008080 */
73 6, /* 007fff -> 008080 */
74 10, /* 00ff00 -> 00ff00 */
75 6, /* 00ff7f -> 008080 */
76 14, /* 00ffff -> 00ffff */
77 1, /* 7f0000 -> 800000 */
78 5, /* 7f007f -> 800080 */
79 5, /* 7f00ff -> 800080 */
80 3, /* 7f7f00 -> 808000 */
81 8, /* 7f7f7f -> 808080 */
82 7, /* 7f7fff -> c0c0c0 */
83 3, /* 7fff00 -> 808000 */
84 7, /* 7fff7f -> c0c0c0 */
85 7, /* 7fffff -> c0c0c0 */
86 9, /* ff0000 -> ff0000 */
87 5, /* ff007f -> 800080 */
88 13, /* ff00ff -> ff00ff */
89 3, /* ff7f00 -> 808000 */
90 7, /* ff7f7f -> c0c0c0 */
91 7, /* ff7fff -> c0c0c0 */
92 11, /* ffff00 -> ffff00 */
93 7, /* ffff7f -> c0c0c0 */
94 15 /* ffffff -> ffffff */
97 #define PIXEL_VALUE(r,g,b) \
98 X11DRV_PALETTE_mapEGAPixel[EGAmapping[((r)*PRIMARY_LEVELS+(g))*PRIMARY_LEVELS+(b)]]
100 static const COLORREF BLACK
= RGB(0, 0, 0);
101 static const COLORREF WHITE
= RGB(0xff, 0xff, 0xff);
103 /***********************************************************************
106 static Pixmap
BRUSH_DitherColor( COLORREF color
, int depth
)
108 /* X image for building dithered pixmap */
109 static XImage
*ditherImage
= NULL
;
110 static COLORREF prevColor
= 0xffffffff;
113 GC gc
= get_bitmap_gc(depth
);
117 ditherImage
= X11DRV_DIB_CreateXImage( MATRIX_SIZE
, MATRIX_SIZE
, depth
);
120 ERR("Could not create dither image\n");
126 if (color
!= prevColor
)
128 int r
= GetRValue( color
) * DITHER_LEVELS
;
129 int g
= GetGValue( color
) * DITHER_LEVELS
;
130 int b
= GetBValue( color
) * DITHER_LEVELS
;
131 const int *pmatrix
= dither_matrix
;
133 for (y
= 0; y
< MATRIX_SIZE
; y
++)
135 for (x
= 0; x
< MATRIX_SIZE
; x
++)
137 int d
= *pmatrix
++ * 256;
138 int dr
= ((r
+ d
) / MATRIX_SIZE_2
) / 256;
139 int dg
= ((g
+ d
) / MATRIX_SIZE_2
) / 256;
140 int db
= ((b
+ d
) / MATRIX_SIZE_2
) / 256;
141 XPutPixel( ditherImage
, x
, y
, PIXEL_VALUE(dr
,dg
,db
) );
147 pixmap
= XCreatePixmap( gdi_display
, root_window
, MATRIX_SIZE
, MATRIX_SIZE
, depth
);
148 XPutImage( gdi_display
, pixmap
, gc
, ditherImage
, 0, 0,
149 0, 0, MATRIX_SIZE
, MATRIX_SIZE
);
156 /***********************************************************************
159 static Pixmap
BRUSH_DitherMono( COLORREF color
)
161 /* This makes the spray work in Win 3.11 pbrush.exe */
162 /* FIXME. Extend this basic selection of dither patterns */
163 static const char gray_dither
[][2] = {{ 0x1, 0x0 }, /* DKGRAY */
164 { 0x2, 0x1 }, /* GRAY */
165 { 0x1, 0x3 }, /* LTGRAY */
167 int gray
= (30 * GetRValue(color
) + 59 * GetGValue(color
) + 11 * GetBValue(color
)) / 100;
168 int idx
= gray
* (sizeof gray_dither
/sizeof gray_dither
[0] + 1)/256 - 1;
171 TRACE("color=%06x -> gray=%x\n", color
, gray
);
174 pixmap
= XCreateBitmapFromData( gdi_display
, root_window
,
181 /***********************************************************************
182 * BRUSH_SelectSolidBrush
184 static void BRUSH_SelectSolidBrush( X11DRV_PDEVICE
*physDev
, COLORREF color
)
186 COLORREF colorRGB
= X11DRV_PALETTE_GetColor( physDev
, color
);
187 if ((physDev
->depth
> 1) && (screen_depth
<= 8) && !X11DRV_IsSolidColor( color
))
190 physDev
->brush
.pixmap
= BRUSH_DitherColor( colorRGB
, physDev
->depth
);
191 physDev
->brush
.fillStyle
= FillTiled
;
192 physDev
->brush
.pixel
= 0;
194 else if (physDev
->depth
== 1 && colorRGB
!= WHITE
&& colorRGB
!= BLACK
)
196 physDev
->brush
.pixel
= 0;
197 physDev
->brush
.pixmap
= BRUSH_DitherMono( colorRGB
);
198 physDev
->brush
.fillStyle
= FillTiled
;
203 physDev
->brush
.pixel
= X11DRV_PALETTE_ToPhysical( physDev
, color
);
204 physDev
->brush
.fillStyle
= FillSolid
;
209 /***********************************************************************
210 * BRUSH_SelectPatternBrush
212 static void BRUSH_SelectPatternBrush( X11DRV_PDEVICE
*physDev
, HBITMAP hbitmap
, X_PHYSBITMAP
*physBitmap
)
216 GetObjectW( hbitmap
, sizeof(bitmap
), &bitmap
);
218 X11DRV_DIB_Lock( physBitmap
, DIB_Status_GdiMod
);
222 if (physDev
->brush
.pixmap
) XFreePixmap( gdi_display
, physDev
->brush
.pixmap
);
224 if ((physDev
->depth
== 1) && (physBitmap
->depth
!= 1))
226 /* Special case: a color pattern on a monochrome DC */
227 physDev
->brush
.pixmap
= XCreatePixmap( gdi_display
, root_window
,
228 bitmap
.bmWidth
, bitmap
.bmHeight
, 1);
229 /* FIXME: should probably convert to monochrome instead */
230 XCopyPlane( gdi_display
, physBitmap
->pixmap
, physDev
->brush
.pixmap
,
231 get_bitmap_gc(1), 0, 0, bitmap
.bmWidth
, bitmap
.bmHeight
, 0, 0, 1 );
235 physDev
->brush
.pixmap
= XCreatePixmap( gdi_display
, root_window
,
236 bitmap
.bmWidth
, bitmap
.bmHeight
, physBitmap
->depth
);
237 XCopyArea( gdi_display
, physBitmap
->pixmap
, physDev
->brush
.pixmap
,
238 get_bitmap_gc(physBitmap
->depth
), 0, 0, bitmap
.bmWidth
, bitmap
.bmHeight
, 0, 0 );
242 X11DRV_DIB_Unlock( physBitmap
, TRUE
);
244 if (physBitmap
->depth
> 1)
246 physDev
->brush
.fillStyle
= FillTiled
;
247 physDev
->brush
.pixel
= 0; /* Ignored */
251 physDev
->brush
.fillStyle
= FillOpaqueStippled
;
252 physDev
->brush
.pixel
= -1; /* Special case (see DC_SetupGCForBrush) */
256 /* create a bitmap appropriate for the given DIB pattern brush */
257 HBITMAP
create_brush_bitmap( X11DRV_PDEVICE
*physDev
, const BITMAPINFO
*info
, void *bits
, UINT usage
)
260 int bpp
= screen_bpp
;
263 if (physDev
->depth
== 1 || info
->bmiHeader
.biBitCount
== 1) bpp
= 1;
264 bitmap
= CreateBitmap( info
->bmiHeader
.biWidth
, abs(info
->bmiHeader
.biHeight
), 1, bpp
, NULL
);
265 if (!bitmap
) return 0;
267 /* make sure it's owned by x11drv */
268 memdc
= CreateCompatibleDC( physDev
->dev
.hdc
);
269 SelectObject( memdc
, bitmap
);
272 SetDIBits( physDev
->dev
.hdc
, bitmap
, 0, abs(info
->bmiHeader
.biHeight
), bits
, info
, usage
);
277 /***********************************************************************
278 * SelectBrush (X11DRV.@)
280 HBRUSH
X11DRV_SelectBrush( PHYSDEV dev
, HBRUSH hbrush
, HBITMAP bitmap
,
281 const BITMAPINFO
*info
, void *bits
, UINT usage
)
283 X11DRV_PDEVICE
*physDev
= get_x11drv_dev( dev
);
286 if (bitmap
|| info
) /* pattern brush */
288 X_PHYSBITMAP
*physbitmap
;
289 BOOL delete_bitmap
= FALSE
;
291 if (!bitmap
|| !(physbitmap
= X11DRV_get_phys_bitmap( bitmap
)))
293 if (!(bitmap
= create_brush_bitmap( physDev
, info
, bits
, usage
))) return 0;
294 physbitmap
= X11DRV_get_phys_bitmap( bitmap
);
295 delete_bitmap
= TRUE
;
297 BRUSH_SelectPatternBrush( physDev
, bitmap
, physbitmap
);
298 TRACE("BS_PATTERN\n");
299 physDev
->brush
.style
= BS_PATTERN
;
300 if (delete_bitmap
) DeleteObject( bitmap
);
304 if (!GetObjectA( hbrush
, sizeof(logbrush
), &logbrush
)) return 0;
306 TRACE("hdc=%p hbrush=%p\n", dev
->hdc
, hbrush
);
308 if (physDev
->brush
.pixmap
)
311 XFreePixmap( gdi_display
, physDev
->brush
.pixmap
);
313 physDev
->brush
.pixmap
= 0;
315 physDev
->brush
.style
= logbrush
.lbStyle
;
316 if (hbrush
== GetStockObject( DC_BRUSH
))
317 logbrush
.lbColor
= GetDCBrushColor( dev
->hdc
);
319 switch(logbrush
.lbStyle
)
326 TRACE("BS_SOLID\n" );
327 BRUSH_SelectSolidBrush( physDev
, logbrush
.lbColor
);
331 TRACE("BS_HATCHED\n" );
332 physDev
->brush
.pixel
= X11DRV_PALETTE_ToPhysical( physDev
, logbrush
.lbColor
);
334 physDev
->brush
.pixmap
= XCreateBitmapFromData( gdi_display
, root_window
,
335 HatchBrushes
[logbrush
.lbHatch
], 8, 8 );
337 physDev
->brush
.fillStyle
= FillStippled
;
344 /***********************************************************************
345 * SetDCBrushColor (X11DRV.@)
347 COLORREF
X11DRV_SetDCBrushColor( PHYSDEV dev
, COLORREF crColor
)
349 X11DRV_PDEVICE
*physDev
= get_x11drv_dev( dev
);
351 if (GetCurrentObject(dev
->hdc
, OBJ_BRUSH
) == GetStockObject( DC_BRUSH
))
352 BRUSH_SelectSolidBrush( physDev
, crColor
);